5
create_world( levelw, levelh)
6
enigma.TwoPlayerGame = TRUE
8
fill_floor("fl-rough", 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-greenbrown", i-1, line)
16
set_stone( "st-glass", i-1, line)
18
set_stone( "st-brick", i-1, line)
20
set_stone( "st-brownie", i-1, line)
22
set_stone( "st-rock6", i-1, line)
24
set_stone( "st-rock5", i-1, line)
26
set_stone( "st-rock4", i-1, line)
28
set_stone( "st-rock3", i-1, line)
30
set_stone( "st-rock2", i-1, line)
32
set_stone( "st-rock1", i-1, line)
34
set_stone( "st-bluegray", i-1, line)
36
set_stone( "st-actorimpulse",i-1,line)
41
-- fill_floor("fl-water", i-1,line, 1,1)
43
set_stone( "st-wood", i-1, line)
45
fill_floor("fl-space", i-1,line, 1,1)
47
set_actor("ac-blackball", i-.5,line+.5)
49
set_actor("ac-whiteball", i-.5,line+.5)
50
elseif c == "d" then --1-d
51
set_floor("fl-gradient", i-1, line, {type=1})
52
elseif c == "u" then --2-u
53
set_floor("fl-gradient", i-1, line, {type=2})
54
elseif c == "r" then --3-r
55
set_floor("fl-gradient", i-1, line, {type=3})
56
elseif c == "l" then --4-l
57
set_floor("fl-gradient", i-1, line, {type=4})
58
elseif c == "1" then --ur
59
set_floor("fl-gradient", i-1, line, {type=11})
60
elseif c == "3" then --dl
61
set_floor("fl-gradient", i-1, line, {type=9})
62
elseif c == "7" then --dr
63
set_floor("fl-gradient", i-1, line, {type=12})
64
elseif c == "9" then --ul
65
set_floor("fl-gradient", i-1, line, {type=10})
67
set_stone("st-oneway-s", i-1, line)
69
set_stone("st-oneway-n", i-1, line)
71
set_stone("st-oneway-e", i-1, line)
73
set_stone("st-oneway-w", i-1, line)
75
draw_stones("st-grate1",{i-1,line}, {1,1}, 1)
77
draw_stones("st-yinyang1", { i-1,line}, {0,1},1)
79
set_floor("fl-bridge", i-1,line, {name="bridge1", type="x"})
81
set_floor("fl-bridge", i-1,line, {name="bridge2", type="x"})
83
set_floor("fl-bridge", i-1,line, {name="bridge3", type="x"})
85
set_floor("fl-bridge", i-1,line, {name="bridge4", type="x"})
87
set_floor("fl-bridge", i-1,line, {name="bridge5", type="x"})
89
set_floor("fl-bridge", i-1,line, {name="bridge6", type="x"})
91
set_floor("fl-bridge", i-1,line, {name="bridge7", type="x"})
93
set_floor("fl-bridge", i-1,line, {name="bridge8", type="x"})
95
set_floor("fl-bridge", i-1,line, {name="bridge9", type="x"})
97
set_floor("fl-bridge", i-1,line, {name="bridge10", type="x"})
99
set_item("it-wormhole", i-1, line, {strength=1,targetx="59.5",targety="22.5", name="ww1"})
101
set_item("it-wormhole", i-1, line, {strength=1,targetx="40.5",targety="26.5", name="ww2"})
103
set_item("it-wormhole", i-1, line, {strength=1,targetx="2.5",targety="14.5", name="ww3"})
105
set_item("it-wormhole", i-1, line, {strength=1,targetx="10",targety="42.5", name="ww4"})
107
set_item("it-wormhole", i-1, line, {strength=1,targetx="74.5",targety="46.5", name="ww5"})
109
set_item("it-wormhole", i-1, line, {strength=1,targetx="71.5",targety="6.5", name="ww6"})
111
set_item("it-wormhole", i-1, line, {strength=1,targetx="49",targety="30.5", name="ww7"})
113
set_item("it-wormhole", i-1, line, {strength=1,targetx="48.5",targety="40.5", name="ww8"})
115
set_item("it-wormhole", i-1, line, {strength=7,targetx="71.5",targety="6.5"})
117
set_item("it-wormhole", i-1, line, {strength=8,targetx="59.5",targety="15.5"})
119
set_item("it-wormhole", i-1, line, {strength=1,targetx="37.5",targety="25.5"})
121
set_stone("st-switch", i-1,line, {action="callback",target="funcc"})
123
set_item("it-trigger", i-1,line, {action="callback", target="changewormholes"})
129
renderLine(00,";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;")
130
renderLine(01,";ggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg;")
131
renderLine(02,";g;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;g;")
132
renderLine(03,";g; ;; ; ; ; ; p ; ;g;")
133
renderLine(04,";g; ; ;; ; ; ;;;;;; ; ;g;")
134
renderLine(05,";g; p ; ; p; ; ; ;;;;; ;g;")
135
renderLine(06,";g; ;; ;; ; p ; ; ; p ; ; p ;g;")
136
renderLine(07,";g; ; ; ;; ; ; ; ; ; ;;;;; ;g;")
137
renderLine(08,";g; q ; p ; ; ; ;;;;;; ; ;g;")
138
renderLine(09,";g;o ; ; ; p ; ;g;")
139
renderLine(10,";g;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;g;")
140
renderLine(11,";ggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggggg;")
141
renderLine(12,"xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxBBBBBBBBBBBBBBBBBBBwwwwwwwwwwwwwwwwwwww")
142
renderLine(13,"x lllrrrrllrll xog g g g g g g g gBo w 0w")
143
renderLine(14,"x lllrrrrllrll xggggggggggggggggggBggggggggggggggggg w w 0 w")
144
renderLine(15,"x lllrrrrllrll xg gBg qg w w w")
145
renderLine(16,"xxxxxxxxxxxxxxxxxxuxg gggggggggggggg gBg ggggggggggggg g wo w 0 w")
146
renderLine(17,"x rrrlllrrrrll1x xg g g gBg g g g wwwwww 0 0w")
147
renderLine(18,"xuxxxxxxxxxxxxlxdxxxg g gggggggggg g gBg g ggggg ggg g g w 0 w")
148
renderLine(19,"xdx lllrrllrll7xdx g g g gBg g g g g g g g w***** w0 0 w")
149
renderLine(20,"xux xxxxxxxxxxxxdxdxg gggggggggggggg gBg g ggg g g ggg g w * w 0 0 w")
150
renderLine(21,"xdx llllllllllll7xdxg gBg gg g g g g w * w 0 0 w")
151
renderLine(22,"xuxxxxxxxxxxxxxxxx xggggggggggggggggggBgg gggg g ggggggg w * w 0 q w")
152
renderLine(23,"x lrlrlrlrlrlrlrlr xg g g g g g g g g B g g w * w 0 0 w")
153
renderLine(24,"########################SS#############RRRRRRddddddRRRRRRwwwwwwwwwwwwwwwwwwww")
154
renderLine(25,"#oX X X Xa # #rrrrr # R======R m m")
155
renderLine(26,"#XX X X Xb z # #rrrr9u# RddddddR m mmmmmmmmmmmmmmmm m")
156
renderLine(27,"# X X Xc # #rrr9uu# R======R m mq m m")
157
renderLine(28,"#XXXX X XD # #rr9uuu# RddddddR m mmmmmmmmmmmmmo m m")
158
renderLine(29,"# X Xe # #r9uuuu# R R m m m")
159
renderLine(30,"########## E V g9uuuuu# R R=====mmmmmmmmmmmmmmmmmm m")
160
renderLine(31,"# X Xf # #g###### R R=====m m")
161
renderLine(32,"#XXXX X XG # # RRRRRRRR=====m mmmmmmmmmmmmmmmmmm")
162
renderLine(33,"# X X Xh # # lllll ====H==m m")
163
renderLine(34,"#XX X X Xi y # # lllll ====H==mmmmmmmmmmmmmmmmmm m")
164
renderLine(35,"#oX X X Xj # # lllll ====H== m")
165
renderLine(36,"#################### #HHHHHHHHHHHHHHHHHHmmmmmmmmmmmmmmmmmmmm")
166
renderLine(37,"/qddddddddddddddddq# # v v v t t t")
167
renderLine(38,"/r3dddddddddddddd1l# # v vvvvvvv vv vvv vtt tt t t t ttt t")
168
renderLine(39,"/rr7uuuuuuuuuuuu9ll# # v v v v v v t t t ttttt t t t")
169
renderLine(40,"/rrl3dddddddddd1rll# # v v vv v v v vvv v tttt t t t t t")
170
renderLine(41,"/rrlr7uuuuuuuu9lrll# # v vvv v v v t tttt t tt t")
171
renderLine(42,"/rrlrl rlrll# # vvvvvv v v vvv tt t t t t ttt")
172
renderLine(43,"/rrlr1dddddddd3lrll# # vvvvvvv v v t t t t tttt tt t")
173
renderLine(44,"/rrl9uuuuuuuuuu7rll# #vvvvv v v vvo v t tt t ttt t t")
174
renderLine(45,"/rr1dddddddddddd3ll# # v v v v t t ttttt t")
175
renderLine(46,"or9uuuuuuuuuuuuuu7l# #vvvvvvvvvvvvvvvSvvv tt tttt tt t t")
176
renderLine(47,"/quuuuuuuuuuuuuuuuq# q`@~$%^&8q W W ot t t")
177
renderLine(48,"///////////////////####################vvvvvvvvvvvvvvvvvvvttttttttttttttttttt")
181
set_floor("fl-gradient", 1, 37, {type=9})
182
set_floor("fl-gradient", 1, 47, {type=10})
183
set_floor("fl-gradient", 18, 37, {type=11})
184
set_floor("fl-gradient", 18, 47, {type=12})
193
SendMessage("bridge1", "openclose")
194
SendMessage("bridge2", "openclose")
195
SendMessage("bridge3", "openclose")
196
SendMessage("bridge4", "openclose")
197
SendMessage("bridge5", "openclose")
198
SendMessage("bridge6", "openclose")
199
SendMessage("bridge7", "openclose")
200
SendMessage("bridge8", "openclose")
201
SendMessage("bridge9", "openclose")
202
SendMessage("bridge10", "openclose")
208
--function changewormholes()
209
--if through2==1 then
212
--if through2==0 then
246
-- SetAttrib(ww1, "targetx", tx)
247
-- SetAttrib(ww1, "targety", ty)
248
-- SetAttrib(ww2, "targetx", tx)
249
-- SetAttrib(ww2, "targety", ty)
250
-- set_item("it-wormhole", 26+w2, 47, {strength=1,targetx="41.5",targety="26.5"})
251
-- set_item("it-wormhole", 26+w3, 47, {strength=1,targetx="2.5",targety="14.5"})
252
-- set_item("it-wormhole", 26+w4, 47, {strength=1,targetx="10",targety="42.5"})
253
-- set_item("it-wormhole", 26+w5, 47, {strength=1,targetx="76.5",targety="46.5"})
254
-- set_item("it-wormhole", 26+w6, 47, {strength=1,targetx="71.5",targety="6.5"})
255
-- set_item("it-wormhole", 26+w7, 47, {strength=1,targetx="49",targety="30.5"})
256
-- set_item("it-wormhole", 26+w8, 47, {strength=1,targetx="48.5",targety="41.5"})
b'\\ No newline at end of file'