1 |
-- Smutty Smurf 2003 |
-- Sven Siggelkow 2003 |
2 |
|
|
3 |
levelw = 20 |
levelw = 20 |
4 |
levelh = 13 |
levelh = 13 |
10 |
|
|
11 |
fill_floor("fl-black", 0,0, levelw,levelh) |
fill_floor("fl-black", 0,0, levelw,levelh) |
12 |
fill_items( "it-burnable", 0, 0, 20, 13) |
fill_items( "it-burnable", 0, 0, 20, 13) |
13 |
|
enigma.KillItem(11,1) -- no burning water |
14 |
|
|
15 |
function renderLine( line, pattern) |
function renderLine( line, pattern) |
16 |
for i=1, strlen(pattern) do |
for i=1, strlen(pattern) do |
24 |
elseif c =="P" then |
elseif c =="P" then |
25 |
set_stone("st-pull", i-1,line) |
set_stone("st-pull", i-1,line) |
26 |
set_item("it-extinguisher", i-1,line) |
set_item("it-extinguisher", i-1,line) |
|
elseif c=="T" then |
|
|
set_stone( "st-timer", i-1,line, {action="callback", target="s1"}) |
|
27 |
elseif c =="c" then |
elseif c =="c" then |
28 |
set_item("it-crack3", i-1,line) |
set_item("it-crack3", i-1,line) |
29 |
|
elseif c =="b" then |
30 |
|
set_item("it-brush", i-1,line) |
31 |
elseif c =="f" then |
elseif c =="f" then |
32 |
set_floor("fl-water", i-1,line) |
set_floor("fl-water", i-1,line) |
33 |
elseif c=="O" then |
elseif c=="O" then |
34 |
oxyd(i-1,line) |
oxyd(i-1,line) |
35 |
|
set_item("it-burnable-ignited", i-1,line) |
36 |
end |
end |
37 |
end |
end |
38 |
end |
end |
48 |
renderLine(08 , "# #") |
renderLine(08 , "# #") |
49 |
renderLine(09 , "# #") |
renderLine(09 , "# #") |
50 |
renderLine(10 , "# #") |
renderLine(10 , "# #") |
51 |
renderLine(11 , "#O O#") |
renderLine(11 , "#O b O#") |
52 |
renderLine(12 , "###################T") |
renderLine(12 , "####################") |
53 |
-- 01234567890123456789 |
-- 01234567890123456789 |
54 |
|
|
|
set_item("it-burnable", 1,1, {name="burnable1"}) |
|
|
set_item("it-burnable", 1,11, {name="burnable2"}) |
|
|
set_item("it-burnable", 18,1, {name="burnable3"}) |
|
|
set_item("it-burnable", 18,11,{name="burnable4"}) |
|
|
|
|
|
|
|
|
|
|
|
function s1() |
|
|
enigma.SendMessage(enigma.GetNamedObject("burnable1"), "ignite", nil) |
|
|
enigma.SendMessage(enigma.GetNamedObject("burnable2"), "ignite", nil) |
|
|
enigma.SendMessage(enigma.GetNamedObject("burnable3"), "ignite", nil) |
|
|
enigma.SendMessage(enigma.GetNamedObject("burnable4"), "ignite", nil) |
|
|
end |
|
|
|
|