← Back to branch summary

~ubuntu-branches/ubuntu/edgy/enigma/edgy

« back to all changes in this revision

Viewing changes to data/levels/duffy126.lua

  • Committer: Bazaar Package Importer
  • Author(s): Erich Schubert
  • Date: 2005-08-28 15:30:09 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20050828153009-sky64kb6tcq37xt5
Tags: 0.92.1-1
http://bugs.debian.org/321669
http://bugs.debian.org/325405
http://bugs.debian.org/308558
* New upstream subversion checkout
* Remove menu.s3m, which we are allowed to distributed but not to modify
  also copyright notice is confusing... (Closes: #321669)
* Rebuild with new libzipios (Closes: #325405)
  I hope this works without a versioned build-dependency
* Added "enigma replaces enigma-data" for upgrades (Closes: #308558)
* Added notes about the fonts copyright.
* updated to policy 3.6.2.1 (no changes)

Show diffs side-by-side

added added

removed removed

Lines of Context:
data/levels/duffy126.lua
1
 
 
2
 
rooms_wide=4
3
 
rooms_high=5
4
 
 
5
 
levelw=1+(19*rooms_wide)
6
 
levelh=1+(12*rooms_high)
7
 
 
8
 
create_world( levelw, levelh)
9
 
enigma.SlopeForce=70
10
 
 
11
 
oxyd_default_flavor="a"
12
 
 
13
 
fill_floor("fl-leaves", 0,0,levelw,levelh)
14
 
 
15
 
function renderLine( line, pattern)
16
 
        for i=1, strlen(pattern) do
17
 
                local c = strsub( pattern, i, i)
18
 
                if c =="#" then
19
 
                        set_stone( "st-greenbrown", i-1, line)
20
 
                elseif c =="0" then
21
 
                        set_floor("fl-ice_001",i-1,line)
22
 
                        set_item("it-pin",i-1,line)
23
 
                elseif c =="s" then
24
 
                        set_stone( "st-greenbrown", i-1, line)
25
 
                   set_floor("fl-inverse",i-1,line)
26
 
                elseif c =="G" then
27
 
           set_stone( "st-fakeoxyda", i-1, line)
28
 
                elseif c =="|" then
29
 
           set_stone( "st-fakeoxyda", i-1, line)
30
 
           set_item("it-cherry",i-1,line)
31
 
                elseif c =="e" then
32
 
                   set_stone("st-glass2_hole",i-1,line)
33
 
                   set_item("it-vortex-open", i-1, line, {targetx="22.5",targety="52.5"})
34
 
                elseif c =="I" then
35
 
                   set_item("it-vortex-open", i-1, line, {targetx="1.5",targety="54.5"})
36
 
                elseif c =="," then
37
 
                   set_item("it-vortex-open", i-1, line)
38
 
                elseif c =="?" then
39
 
                        set_stone( "st-greenbrown", i-1, line)
40
 
                        set_floor("fl-ice_001",i-1,line)
41
 
                elseif c =="x" then
42
 
                        set_stone( "st-greenbrown", i-1, line)
43
 
                        set_floor("fl-swamp",i-1,line)
44
 
                elseif c =="X" then
45
 
                        set_stone( "st-death", i-1, line)
46
 
                elseif c =="f" then
47
 
                        set_stone( "st-death_invisible", i-1, line)
48
 
                elseif c =="v" then
49
 
                        set_stone( "st-glass", i-1, line)
50
 
                elseif c =="V" then
51
 
                        set_stone( "st-brick_magic", i-1, line)
52
 
                elseif c =="`" then
53
 
                   set_stone( "st-bigbrick-nw", i-1, line)
54
 
                elseif c =="@" then
55
 
                   set_stone( "st-bigbrick-ne", i-1, line)
56
 
                elseif c =="^" then
57
 
                   set_stone( "st-bigbrick-es", i-1, line)
58
 
                elseif c =="-" then
59
 
                   set_stone( "st-bigbrick-sw", i-1, line)
60
 
                elseif c =="8" then
61
 
                   set_stone( "st-bigbrick-n", i-1, line)
62
 
                elseif c =="6" then
63
 
                   set_stone( "st-bigbrick-e", i-1, line)
64
 
                elseif c =="." then
65
 
                   set_stone( "st-bigbrick-s", i-1, line)
66
 
                elseif c ==";" then
67
 
                   set_stone( "st-bigbrick-w", i-1, line)
68
 
                elseif c ==":" then
69
 
                   set_stone( "st-bigbrick-nesw", i-1, line)
70
 
                elseif c =="t" then
71
 
                        set_stone( "st-brick_magic", i-1, line)
72
 
                        set_item("it-surprise",i-1,line)
73
 
                elseif c =="/" then
74
 
                        set_stone( "st-brick_magic", i-1, line)
75
 
                        set_item("it-extralife",i-1,line)
76
 
                elseif c =="O" then
77
 
                        set_item("it-extralife",i-1,line)
78
 
                elseif c =="$" then
79
 
                        set_stone( "st-greenbrown", i-1, line)
80
 
                        set_floor("fl-sand",i-1,line)
81
 
                elseif c =="%" then
82
 
                        set_stone( "st-greenbrown", i-1, line)
83
 
                        set_floor("fl-normal",i-1,line)
84
 
                elseif c =="&" then
85
 
                        set_stone( "st-greenbrown", i-1, line)
86
 
                        set_floor("fl-hay",i-1,line)
87
 
                elseif c =="F" then
88
 
                        set_stone( "st-flash", i-1, line)
89
 
                        set_floor("fl-ice_001",i-1,line)
90
 
                elseif c =="a" then
91
 
                        set_stone( "st-actorimpulse", i-1, line)
92
 
                        set_floor("fl-ice_001",i-1,line)
93
 
                elseif c =="Y" then
94
 
                        set_stone( "st-yinyang1", i-1, line)
95
 
                        set_floor("fl-ice_001",i-1,line)
96
 
                elseif c =="S" then
97
 
                        set_stone( "st-surprise", i-1, line)
98
 
                elseif c =="L" then
99
 
                        set_stone( "st-window", i-1, line)
100
 
                elseif c == "o" then
101
 
                        oxyd( i-1, line)
102
 
                elseif c == "J" then
103
 
                        oxyd( i-1, line)
104
 
                        set_floor("fl-hay",i-1,line)
105
 
                elseif c == "<" then
106
 
                        oxyd( i-1, line)
107
 
                        set_floor("fl-normal",i-1,line)
108
 
                elseif c == "*" then
109
 
                        set_stone( "st-brownie", i-1, line)
110
 
                elseif c == "!" then
111
 
                        abyss(i-1,line)
112
 
                elseif c == "~" then
113
 
                   set_floor("fl-water",i-1,line)
114
 
                elseif c=="z" then
115
 
                   set_actor("ac-blackball", i-1,line+.5, {essential=1,player=0})
116
 
                elseif c=="y" then
117
 
                   set_actor("ac-whiteball", i-.5,line+.5, {player=1})
118
 
                elseif c=="w" then
119
 
                   set_actor("ac-killerball", i-.5,line+.5, {player=1,mouseforce=0})
120
 
                        set_floor("fl-ice_001",i-1,line)
121
 
                elseif c=="R" then
122
 
                   set_actor("ac-rotor", i-.5,line+.5, {force=30,range=8})
123
 
                elseif c=="N" then
124
 
                   set_actor("ac-top", i-1,line+.5, {force=40,range=9})
125
 
                   set_item("it-cherry",i-1,line)
126
 
                elseif c==">" then
127
 
                   set_item("it-cherry",i-1,line)
128
 
                elseif c=="b" then
129
 
                   set_actor("ac-bug", i-.5,line+.5)
130
 
                        set_floor("fl-sand",i-1,line)
131
 
                elseif c == "g" then
132
 
                        draw_stones("st-grate1",{i-1,line}, {1,1}, 1)
133
 
                elseif c=="+" then
134
 
                        set_stone( "st-wood", i-1, line)
135
 
                elseif c=="=" then
136
 
                        set_floor("fl-space",i-1,line)
137
 
                        set_floor("fl-space",i-1,line-1)
138
 
                        set_floor("fl-space",i-1,line+1)
139
 
                elseif c=="i" then
140
 
                        set_floor("fl-ice_001",i-1,line)
141
 
                elseif c=="n" then
142
 
                        set_floor("fl-normal",i-1,line)
143
 
                elseif c=="j" then
144
 
                        set_floor("fl-hay",i-1,line)
145
 
                elseif c=="q" then
146
 
                   set_floor("fl-sand",i-1,line)
147
 
                elseif c=="m" then
148
 
                   set_floor("fl-swamp",i-1,line)
149
 
                elseif c=="Q" then
150
 
                   set_floor("fl-inverse",i-1,line)
151
 
                elseif c=="p" then
152
 
                   set_floor("fl-swamp",i-1,line)
153
 
                   set_item("it-extralife",i-1,line)
154
 
                elseif c=="_" then
155
 
                        fill_floor("fl-brick",i-1,line,18,11)
156
 
                elseif c=="Z" then
157
 
                        fill_floor("fl-himalaya",i-2,line,19,12)
158
 
                elseif c=="H" then
159
 
                        set_stone("st-rock3_break", i-1, line)
160
 
                elseif c=="T" then
161
 
                        set_stone("st-rock3_break", i-1, line)
162
 
                        set_item("it-surprise",i-1,line)
163
 
                elseif c=="h" then
164
 
                        set_stone("st-rock3", i-1, line)
165
 
                elseif c=="P" then
166
 
                        set_item("it-hammer",i-1,line)
167
 
                elseif c=="M" then
168
 
                        set_stone( "st-brownie", i-1, line)
169
 
                        set_item("it-magicwand",i-1,line)
170
 
                elseif c=="D" then
171
 
                        set_item("it-dynamite",i-1,line)
172
 
                elseif c=="B" then
173
 
                        set_stone("st-bug", i-1, line)
174
 
                elseif c=="c" then
175
 
                        set_stone("st-bug", i-1, line)
176
 
                        set_item("it-floppy",i-1,line)
177
 
                elseif c == "d" then --1-d
178
 
                        set_floor("fl-gradient",  i-1,  line, {type=1})
179
 
                elseif c == "u" then --2-u
180
 
                        set_floor("fl-gradient",  i-1,  line, {type=2})
181
 
                elseif c == "r" then --3-r
182
 
                        set_floor("fl-gradient",  i-1,  line, {type=3})
183
 
                elseif c == "l" then --4-l
184
 
                        set_floor("fl-gradient",  i-1,  line, {type=4})
185
 
                elseif c == "1" then --ur
186
 
                        set_floor("fl-gradient",  i-1,  line, {type=11})
187
 
                elseif c == "3" then --dl
188
 
                        set_floor("fl-gradient",  i-1,  line, {type=9})
189
 
                elseif c == "7" then --dr
190
 
                        set_floor("fl-gradient",  i-1,  line, {type=12})
191
 
                elseif c == "9" then --ul
192
 
                        set_floor("fl-gradient",  i-1,  line, {type=10})
193
 
                elseif c=="U" then
194
 
                        set_stone("st-bolder", i-1,line, {direction=NORTH})
195
 
                   set_floor("fl-water",i-1,line)
196
 
                elseif c=="4" then
197
 
                        yy1( "white",  i-1, line)
198
 
                        set_floor("fl-gradient",  i-1,  line, {type=4})
199
 
                elseif c=="5" then
200
 
                        yy1( "white",  i-1, line)
201
 
                        set_floor("fl-gradient",  i-1,  line, {type=11})
202
 
                elseif c=="2" then
203
 
                        yy1( "white",  i-1, line)
204
 
                        set_floor("fl-gradient",  i-1,  line, {type=1})
205
 
                elseif c=="W" then
206
 
                        yy1( "black",  i-1, line)
207
 
                elseif c=="C" then
208
 
                        set_stone( "st-floppy", i-1,line,{action="openclose",target="door1"})
209
 
                        set_floor("fl-hay",i-1,line)
210
 
                elseif c=="A" then
211
 
                        doorv( i-1,line, {name="door1"})
212
 
                        set_floor("fl-hay",i-1,line)
213
 
                elseif c=="K" then
214
 
            set_item("it-wormhole", i-1, line, {strength=0,targetx="49.5",targety="49.5"})
215
 
                elseif c=="k" then
216
 
                        set_attrib(laser(i-1,line, TRUE, NORTH), "name", "laser1")
217
 
                elseif c=="E" then
218
 
                   document(i-1,line,"It is not quite that easy.")
219
 
             end
220
 
        end     
221
 
     end
222
 
 
223
 
function yy1( color, x, y)
224
 
        stone = format( "st-%s4", color)
225
 
        set_stone( stone, x, y)
226
 
end
227
 
 
228
 
renderLine(00,"#######################################??????????????????#hhhhhhhhhhhhhhhhhhh")
229
 
renderLine(01,"#cBB        #    31#                  #iiiaiiiiiiiiaiiiii#   =====          h")
230
 
renderLine(02,"#BoB        #    97#        ~~~~      #iiiiiiiiaiiiiiiiia#   =====        o h")
231
 
renderLine(03,"#BBB        # 31   #      ~~~~~~~     #iiaiiiiiiiiaiiiaii#   =====          h")
232
 
renderLine(04,"#           #y97  o#     ~~~~~~~~~    #aiiiiiiiaiiiiiiiii#   =====          h")
233
 
renderLine(05,"#           ########    ~~~~~~~~~~~   #iiiiaiiiiiiiiiiaii#   =====          h")
234
 
renderLine(06,"#       F          W    ~~~~~~~~~~~~   iiiiiiaiiiiiaiiiii    =====    D     h")
235
 
renderLine(07,"#                  #   ~~~~~~+ ~~~~~  #iiiiiiiiiaiiiiiiii#   =====          h")
236
 
renderLine(08,"#                  #  ~~~~~~ + ~~~~~~ #iiiaiii0iiiiiiiaii#   =====          h")
237
 
renderLine(09,"#                  #  ~~~~~~+ +~~~~~~~#iiiiiaiiaiiiaiiiii#   =====          h")
238
 
renderLine(10,"#                  # ~~~~~~ + +  ~~~~~#iaiiiiiiiiiiiiiaii#   =====      O   h")
239
 
renderLine(11,"#                  #o~~~~~~      ~~~~~#iiiiaiiiiiaiiiiiia#   =====          h")
240
 
renderLine(12,"hHHHHHhhhhhhhhhhhhh#########  #########$$$$$$$$$$$$$$$$%%%HHHHHHHHHHHHHHHHHHh")
241
 
renderLine(13,"h                  #       #  #       #qqqqqqqqq31qqqqqrn%                  #")
242
 
renderLine(14,"h                  #                  #qqqqq3d1q97qqqqq9u%                  #")
243
 
renderLine(15,"h                  #   SSSSSSSSSSSS   #qqqqqrnlqqqqqqqqqq$                  #")
244
 
renderLine(16,"h                  #   SSSSSSSSSSSS   #qqqqq9u7qqq3d1qqqq$!!!!!!    o       #")
245
 
renderLine(17,"h                  ### SS        SS ###qq3d1qqqqqqrnlqqqq$!!!!!!!!!!        #")
246
 
renderLine(18,"h  O     R      >      SS    z   SS    qqrnlqqqqqq9u7qbqqq    !!!!!!!!!     #")
247
 
renderLine(19,"h                  ### SS        SS ###qq9u7qqqqqqqqqqqqq$        !!!!!!! P #")
248
 
renderLine(20,"h                  #   SSSSSSSSSSSS   #qqqqqqq3d1qq31qqqq$           !!!!   #")
249
 
renderLine(21,"h                  #   SSSSSSSSSSSS   #31qqqqqrnlqq97qq3d%            !!!!! #")
250
 
renderLine(22,"h                  #                  #97qqqqq9u7qqqqqqrn%             !!!! #")
251
 
renderLine(23,"h                  #       #  #       #qqqqqqqqqqqqqqqq9u%               !! #")
252
 
renderLine(24,"hHhHhHhHhHhHhHhHhHh#########  #########$$$$$$$$$$$$$$$$$$$############ ######")
253
 
renderLine(25,"#HhHhHhHhHhHhHhHhHh#                  #_                 &jjjjjjjjjjjjjjjjjj&")
254
 
renderLine(26,"#HHHHHHHHHHHHHHHHHH#                  #  `88@ `88@ `88@  &jjjjjjjjjjjjjjjjjj&")
255
 
renderLine(27,"#HHHHHHHHHHHHHHHHHH#                  #  ;::6 ;::6 ;::6  &jjjjjjjjjjjjjjjjjj&")
256
 
renderLine(28,"#HHHHHHHHHHHHHHHHHH#                  #  ;::6 ;::6 ;::6  &jjjjjjjjjjjjjjjjjj&")
257
 
renderLine(29,"#HHHHHHHHHHHHHHHHHH#vvvvvvvvvvvvvvvvvv#  -..^ -..^ -..^  &jjjjjjjjjjjjjjjjjj&")
258
 
renderLine(30,"#HHHHHHHHHHHHHHHHHH#vvvvvvvvvvvvvvvvvv#o       >N        &jjjjjjjjjjjjjjjjjj&")
259
 
renderLine(31,"#HHHHHHHHHHHHHHHHHH#vvvvvvvvvvvvvvvvvv#  `88@ `88@ `88@  Cjjjjjjjjjjjjjjjjjj&")
260
 
renderLine(32,"#HTHHHHHHHHHHHHHHHH#vvvVVVvvvvvvvvvVVV#  ;::6 ;::6 ;::6  Ajjjjjjjjjjjjjjjjjj&")
261
 
renderLine(33,"#HHHHHHHHHHHHHHHHHH#vvvV/VvvvvvvvvvVVV#  ;::6 ;::6 ;::6  &jjjjjjjjjjjjjjjjjj&")
262
 
renderLine(34,"#HHHHHHHHHHHHHHHHoH#vvvVVVvvvvvvvvvvvv#  -..^ -..^ -..^  &jjjjjjjjjjjjjjjjJj&")
263
 
renderLine(35,"#HHHHHHHHHHHHHHHHHH#vvvvvvvvvvvvvvvvvv#                  &jjjjjjjjjjjjjjjjjj&")
264
 
renderLine(36,"###############%%###vvvvvvvvvvvVVvvvVV###################&&&&&&&&&&&&&&&&&%%%")
265
 
renderLine(37,"#              rr  #vvvvvvvvvvvVVvvvVV#vvvvvVVvvvvVVvvvvv#      U         4<%")
266
 
renderLine(38,"# XXXXXXXXX    rr  #vvvvVVVvvvvvvvvVVV#VVVvvVVvvvvVVvVVvv#      ~ ~~~     52%")
267
 
renderLine(39,"# X       X    rr  #VVvvVVVvvvvvvvvVVv#VVVvvvvvvvvvvvVVvv#      ~ ~~~       #")
268
 
renderLine(40,"# X XXXXX X    rr  #VVvvvvvvvvvvvvvVVv#vvvvvvvvvVVVvvVVvv#      ~           #")
269
 
renderLine(41,"# X >>>>X XXX  rr  #vvvvvvvvvvvVVvvvvv#vvvVVVvvvVVVvvvvvv#      ~           #")
270
 
renderLine(42,"# X >>>>X      rr  vvvvvVVVvvvvVVvvvvvvvvvV/Vvvvvvvvvvvvvv   M  ~    ~~~    #")
271
 
renderLine(43,"# X >>>>X XXX  rr  #vvvvVVVvvvvvvvvVVv#vvvVVVvvvvvvVVVvvv#      ~    ~~~    #")
272
 
renderLine(44,"# X XXXXX X    rr  #VVvvvvvvvvVVVvvVVv#vvvvvvvvVVvvVVVvvv#      ~    ~~~  ~~#")
273
 
renderLine(45,"# X       X    rr  #VVvVVVvvvvVtVvvvvv#vVVvvvvvVVvvVVVvVV#      ~         ~~#")
274
 
renderLine(46,"# XXXXXXXXX    rr  #vvvVVVvVVvVVVvvVVV#vVVvvvVVvvvvvvvvVV#      ~           #")
275
 
renderLine(47,"#              rr  #ovvvvvvVVvvvvvvVVV#vvvvvvVVvvvvvvvvvv#      Y           #")
276
 
renderLine(48,"###############%%#################################%%%####### ################")
277
 
renderLine(49,"#Z                 #o  #       QQQQ   #mmmmmmmmm# rnl    #            #K   K#")
278
 
renderLine(50,"#                  #   #       QQQQ   #mmmmmmmmm##%%%###L#            #  y  #")
279
 
renderLine(51,"#  gggggggggggggg  #   #       QQQQ   # mmmmmmmmmmmmmmm# #            #     #")
280
 
renderLine(52,"#  g G G~GG~G G g  #  I#       QQQQ   #  mmmmmmmmmmmmmm#L#            #fffff#")
281
 
renderLine(53,"#  gG G~GeeG~G Gg  #####       QQQQ   #   mmmmmmmmmmmmm# #        o   #     #")
282
 
renderLine(54,"#, gGG|G ~~ G|GGg              QQQQ       mmmmmmmmmmmmm#L#            #fffff#")
283
 
renderLine(55,"#  gG G~GeeG~G Gg  #           QQQQ   #   mmmmmmmmmmmmm  #            #     #")
284
 
renderLine(56,"#  g G G~GG~G G g  #    O      QQQQ   #  mmmmmmmmmmmmmm  #            #fffff#")
285
 
renderLine(57,"#  gggggggggggggg  #           QQQQ   #mmmmmmmmmmmmmmm                #     #")
286
 
renderLine(58,"#                  #           QQQQ   #mmmmmmpmmmmmmmm   #            #fffff#")
287
 
renderLine(59,"#                  #        k  QQQQ   #mmmmmmmmmmmmmm    #            E     #")
288
 
renderLine(60,"###############################ssss####xxxxxxxxxxxxxx########################")
289
 
 
290
 
oxyd_shuffle()
291
 
 
292
 
xa=random(5)
293
 
xb=random(5)
294
 
xc=random(5)
295
 
xd=random(5)
296
 
 
297
 
enigma.KillStone(70+xa,58)
298
 
enigma.KillStone(70+xb,56)
299
 
enigma.KillStone(70+xc,54)
300
 
enigma.KillStone(70+xd,52)