5
create_world( levelw, levelh)
8
fill_floor("fl-metal", 0,0,levelw,levelh)
10
function renderLine( line, pattern)
11
for i=1, strlen(pattern) do
12
local c = strsub( pattern, i, i)
14
set_stone( "st-rock6", i-1, line)
18
set_stone( "st-brownie", i-1, line)
24
set_actor("ac-whiteball-small", i-.5,line+.5, {player=0,mouseforce=1})
26
draw_stones("st-grate1",{i-1,line}, {1,1}, 1)
28
set_stone( "st-wood", i-1, line)
30
set_floor("fl-space",i-1,line)
32
set_item("it-hollow",i-1,line)
34
set_item("it-wormhole", i-1, line, {strength=3,targetx="2.5",targety="1.5", name="ww1"})
36
set_item("it-wormhole", i-1, line, {strength=3,targetx="9.5",targety="11.5", name="ww2"})
38
set_item("it-wormhole", i-1, line, {strength=3,targetx="18.5",targety="4.5", name="ww3"})
40
set_item("it-wormhole", i-1, line, {strength=3,targetx="13.5",targety="2.5", name="ww4"})
42
set_item("it-wormhole", i-1, line, {strength=3,targetx="13.5",targety="7.5", name="ww5"})
44
set_item("it-wormhole", i-1, line, {strength=3,targetx="2.5",targety="7.5", name="ww6"})
45
elseif c == "d" then --1-d
46
set_floor("fl-gradient", i-1, line, {type=1})
47
elseif c == "u" then --2-u
48
set_floor("fl-gradient", i-1, line, {type=2})
49
elseif c == "r" then --3-r
50
set_floor("fl-gradient", i-1, line, {type=3})
51
elseif c == "l" then --4-l
52
set_floor("fl-gradient", i-1, line, {type=4})
53
elseif c == "1" then --ur
54
set_floor("fl-gradient", i-1, line, {type=11})
55
elseif c == "3" then --dl
56
set_floor("fl-gradient", i-1, line, {type=9})
57
elseif c == "7" then --dr
58
set_floor("fl-gradient", i-1, line, {type=12})
59
elseif c == "9" then --ul
60
set_floor("fl-gradient", i-1, line, {type=10})
62
set_actor("ac-whiteball-small", i-.5,line+.5, {player=0,mouseforce=1})
63
set_floor("fl-gradient", i-1, line, {type=3})
65
set_actor("ac-whiteball-small", i-.5,line+.5, {player=0,mouseforce=1})
66
set_floor("fl-gradient", i-1, line, {type=4})
68
set_actor("ac-whiteball-small", i-.5,line+.5, {player=0,mouseforce=1})
69
set_floor("fl-gradient", i-1, line, {type=2})
71
set_actor("ac-whiteball-small", i-.5,line+.5, {player=0,mouseforce=1})
72
set_floor("fl-gradient", i-1, line, {type=1})
77
renderLine(00,"########### ### ")
78
renderLine(01,"#HRrrrrrr1# #H# ####")
79
renderLine(02,"#########d# #S# #D1#")
80
renderLine(03," #B# #E# ##u#")
81
renderLine(04," ### ### ### #U#")
82
renderLine(05," #A# #H#")
83
renderLine(06," #u# ########### ###")
84
renderLine(07," #U# #FllllllLH# ")
85
renderLine(08," #H# ########### ###")
86
renderLine(09," ### #C#")
87
renderLine(10," ###########u#")
88
renderLine(11," #HRrrrrrrrr7#")
89
renderLine(12," #############")