~ubuntu-branches/ubuntu/intrepid/enigma/intrepid

« back to all changes in this revision

Viewing changes to data/levels/duffy53.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
* 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:
1
 
 
2
 
levelw=40
3
 
levelh=13
4
 
 
5
 
create_world( levelw, levelh)
6
 
 
7
 
fill_floor("fl-rough", 0,0,levelw,levelh)
8
 
enigma.SetCompatibility("oxyd1")
9
 
enigma.ConserveLevel=FALSE
10
 
 
11
 
function renderLine( line, pattern)
12
 
        for i=1, strlen(pattern) do
13
 
                local c = strsub( pattern, i, i)
14
 
                if c =="#" then
15
 
                        set_stone( "st-greenbrown", i-1, line)
16
 
                elseif c =="X" then
17
 
                        set_stone( "st-death", i-1, line)
18
 
                elseif c == "o" then
19
 
                        oxyd( i-1, line)
20
 
                elseif c == "*" then
21
 
                        set_stone( "st-brownie", i-1, line)
22
 
                elseif c == "!" then
23
 
                        abyss(i-1,line)
24
 
--                      fill_floor("fl-water", i-1,line, 1,1)
25
 
                elseif c == "~" then
26
 
--                      abyss(i-1,line)
27
 
                        fill_floor("fl-water", i-1,line, 1,1)
28
 
                elseif c=="z" then
29
 
                        set_actor("ac-blackball", i-.5,line+.5)
30
 
                elseif c=="=" then
31
 
                   set_stone("st-turnstile",i-1,line)
32
 
                   set_stone("st-turnstile-w",i-2,line)
33
 
                   set_stone("st-turnstile-e",i,line)
34
 
                elseif c=="i" then
35
 
                   set_stone("st-turnstile",i-1,line)
36
 
                   set_stone("st-turnstile-n",i-1,line-1)
37
 
                   set_stone("st-turnstile-s",i-1,line+1)
38
 
                elseif c=="x" then
39
 
                   set_stone("st-turnstile",i-1,line)
40
 
                   set_stone("st-turnstile-n",i-1,line-1)
41
 
                   set_stone("st-turnstile-e",i,line)
42
 
                   set_stone("st-turnstile-s",i-1,line+1)
43
 
                   set_stone("st-turnstile-w",i-2,line)
44
 
                elseif c =="A" then
45
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge1"})
46
 
                elseif c =="B" then
47
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge2"})
48
 
                elseif c =="C" then
49
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge3"})
50
 
                elseif c =="D" then
51
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge4"})
52
 
                elseif c =="E" then
53
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge5"})
54
 
                elseif c =="F" then
55
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge6"})
56
 
                elseif c =="G" then
57
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge7"})
58
 
                elseif c =="H" then
59
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge8"})
60
 
                elseif c =="I" then
61
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge9"})
62
 
                elseif c =="J" then
63
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge10"})
64
 
                elseif c =="K" then
65
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge11"})
66
 
                elseif c =="L" then
67
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge12"})
68
 
                elseif c =="M" then
69
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge13"})
70
 
                elseif c =="N" then
71
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge14"})
72
 
                elseif c =="O" then
73
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge15"})
74
 
                elseif c =="P" then
75
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge16"})
76
 
                elseif c =="Q" then
77
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge17"})
78
 
                elseif c =="R" then
79
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge18"})
80
 
                elseif c =="S" then
81
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge19"})
82
 
                elseif c =="T" then
83
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge20"})
84
 
                elseif c =="U" then
85
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge21"})
86
 
                elseif c =="V" then
87
 
                        set_item("it-trigger", i-1,line, {action="openclose", target="bridge22"})
88
 
                elseif c=="a" then
89
 
                   set_floor("fl-bridge",i-1,line,{name="bridge1"})
90
 
                elseif c=="b" then
91
 
                   set_floor("fl-bridge",i-1,line,{name="bridge2"})
92
 
                elseif c=="c" then
93
 
                   set_floor("fl-bridge",i-1,line,{name="bridge3"})
94
 
                elseif c=="d" then
95
 
                   set_floor("fl-bridge",i-1,line,{name="bridge4"})
96
 
                elseif c=="e" then
97
 
                   set_floor("fl-bridge",i-1,line,{name="bridge5"})
98
 
                elseif c=="f" then
99
 
                   set_floor("fl-bridge",i-1,line,{name="bridge6"})
100
 
                elseif c=="g" then
101
 
                   set_floor("fl-bridge",i-1,line,{name="bridge7"})
102
 
                elseif c=="h" then
103
 
                   set_floor("fl-bridge",i-1,line,{name="bridge8"})
104
 
                elseif c==";" then
105
 
                   set_floor("fl-bridge",i-1,line,{name="bridge9"})
106
 
                elseif c=="j" then
107
 
                   set_floor("fl-bridge",i-1,line,{name="bridge10"})
108
 
                elseif c=="k" then
109
 
                   set_floor("fl-bridge",i-1,line,{name="bridge11"})
110
 
                elseif c=="l" then
111
 
                   set_floor("fl-bridge",i-1,line,{name="bridge12"})
112
 
                elseif c=="m" then
113
 
                   set_floor("fl-bridge",i-1,line,{name="bridge13"})
114
 
                elseif c=="n" then
115
 
                   set_floor("fl-bridge",i-1,line,{name="bridge14"})
116
 
                elseif c==":" then
117
 
                   set_floor("fl-bridge",i-1,line,{name="bridge15"})
118
 
                elseif c=="p" then
119
 
                   set_floor("fl-bridge",i-1,line,{name="bridge16"})
120
 
                elseif c=="q" then
121
 
                   set_floor("fl-bridge",i-1,line,{name="bridge17"})
122
 
                elseif c=="r" then
123
 
                   set_floor("fl-bridge",i-1,line,{name="bridge18"})
124
 
                elseif c=="s" then
125
 
                   set_floor("fl-bridge",i-1,line,{name="bridge19"})
126
 
                elseif c=="t" then
127
 
                   set_floor("fl-bridge",i-1,line,{name="bridge20"})
128
 
                elseif c=="u" then
129
 
                   set_floor("fl-bridge",i-1,line,{name="bridge21"})
130
 
                elseif c=="v" then
131
 
                   set_floor("fl-bridge",i-1,line,{name="bridge22"})
132
 
                elseif c == "%" then
133
 
                        set_stone("st-door_b", i-1,line, {name="door1", type="v"})
134
 
             end
135
 
        end     
136
 
end
137
 
 
138
 
function yy1( color, x, y)
139
 
       stone = format( "st-%s4", color)
140
 
        set_stone( stone, x, y)
141
 
     end
142
 
 
143
 
renderLine(00,"###############################!!!!!!!!")
144
 
renderLine(01,"# z%abcdefgh;jklmn:pqrstuv    #!!!!!!!!")
145
 
renderLine(02,"# ##########################  #!!!!!!!!")
146
 
renderLine(03,"# A  B  C  D  E  F #!!!!!!!#  #!!!!!!!!")
147
 
renderLine(04,"# =  i  =  i  =  i #!!!!!#o#  #o#!!!!!!")
148
 
renderLine(05,"#  G  H  I  J  K   #!!!!!o      o!!!!!!")
149
 
renderLine(06,"#  =  i  =  i  =   #!!!!!# x  x #!!!!!!")
150
 
renderLine(07,"#   L  M  N  O  P  #!!!!!o      o!!!!!!")
151
 
renderLine(08,"#   =  i  =  i  =  #!!!!!o      o!!!!!!")
152
 
renderLine(09,"# Q  R  S  T  U  V #!!!!!# x  x #!!!!!!")
153
 
renderLine(10,"# i  =  i  =  i  = #!!!!!o      o!!!!!!")
154
 
renderLine(11,"#                  #!!!!!#o#oo#o#!!!!!!")
155
 
renderLine(12,"####################!!!!!!!!!!!!!!!!!!!")
156
 
 
157
 
oxyd_shuffle()
158
 
 
159
 
function timer_handler()
160
 
    SendMessage("door1","open")
161
 
end
162
 
 
163
 
set_stone( "st-timer", 39, 12, {action="callback",target="timer_handler",interval=1})
 
 
b'\\ No newline at end of file'