5
create_world( levelw, levelh)
6
enigma.ConserveLevel=FALSE
8
fill_floor("fl-hay", 0,0,levelw,levelh)
12
function renderLine( line, pattern)
13
for i=1, strlen(pattern) do
14
local c = strsub( pattern, i, i)
16
set_stone( "st-greenbrown", i-1, line)
18
set_stone( "st-thief", i-1, line)
19
set_floor("fl-gradient", i-1, line, {type=1})
21
set_stone( "st-thief", i-1, line)
22
set_floor("fl-gradient", i-1, line, {type=2})
24
set_stone( "st-death", i-1, line)
28
set_stone( "st-brownie", i-1, line)
29
set_floor("fl-water",i-1,line)
33
set_floor("fl-water",i-1,line)
35
set_actor("ac-blackball", i-1,line+.5, {player=0})
37
draw_stones("st-grate1",{i-1,line}, {1,1}, 1)
39
set_stone( "st-wood", i-1, line)
41
set_floor("fl-space",i-1,line)
42
elseif c == "d" then --1-d
43
set_floor("fl-gradient", i-1, line, {type=1})
44
elseif c == "u" then --2-u
45
set_floor("fl-gradient", i-1, line, {type=2})
46
elseif c == "r" then --3-r
47
set_floor("fl-gradient", i-1, line, {type=3})
48
elseif c == "l" then --4-l
49
set_floor("fl-gradient", i-1, line, {type=4})
50
elseif c == "1" then --ur
51
set_floor("fl-gradient", i-1, line, {type=11})
52
elseif c == "3" then --dl
53
set_floor("fl-gradient", i-1, line, {type=9})
54
elseif c == "7" then --dr
55
set_floor("fl-gradient", i-1, line, {type=12})
56
elseif c == "9" then --ul
57
set_floor("fl-gradient", i-1, line, {type=10})
58
elseif c == "D" then --1-d
59
set_floor("fl-gradient", i-1, line, {type=1})
60
draw_stones("st-grate1",{i-1,line}, {1,1}, 1)
61
elseif c == "U" then --2-u
62
set_floor("fl-gradient", i-1, line, {type=2})
63
draw_stones("st-grate1",{i-1,line}, {1,1}, 1)
65
set_item("it-coin1", i-1,line)
67
set_stone("st-coinslot", i-1,line, {action="openclose", target="door1"})
69
doorv( i-1,line, {name="door1"})
74
renderLine(00,"!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!")
75
renderLine(01,"!###############!!!!!!!!!!!!!!!!!!!!!!!!!!!###############!")
76
renderLine(02,"!# cTTTTTTTTTTTTTTTTTTTTTTTTTTTTT #!")
77
renderLine(03,"!# #### UuuuuuuuuuuuuuuuuuuuuuuuuuuuU #### #!")
78
renderLine(04,"!# # TTTTTTTTTTTTTTTTTTTTTTTTTTTTT # #!")
79
renderLine(05,"!### # #!!!!!!!!!!!!!!!!!!!!!!!!!!!# # ###!")
80
renderLine(06,"!#C o z #!!!!!!!!!!!!!!!!!!!!!!!!!!!# * Ao#!")
81
renderLine(07,"!### # #!!!!!!!!!!!!!!!!!!!!!!!!!!!# # ###!")
82
renderLine(08,"!# # SSSSSSSSSSSSSSSSSSSSSSSSSSSSS # #!")
83
renderLine(09,"!# #### DdddddddddddddddddddddddddddD #### #!")
84
renderLine(10,"!# cSSSSSSSSSSSSSSSSSSSSSSSSSSSSS #!")
85
renderLine(11,"!###############!!!!!!!!!!!!!!!!!!!!!!!!!!!###############!")
86
renderLine(12,"!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!")
b'\\ No newline at end of file'