← Back to branch summary

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

« back to all changes in this revision

Viewing changes to data/levels/duffy87.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/duffy87.lua
1
 
 
2
 
levelw=21
3
 
levelh=13
4
 
 
5
 
create_world( levelw, levelh)
6
 
 
7
 
fill_floor("fl-hay", 0,0,levelw,levelh)
8
 
 
9
 
function renderLine( line, pattern)
10
 
        for i=1, strlen(pattern) do
11
 
                local c = strsub( pattern, i, i)
12
 
                if c =="#" then
13
 
                        set_stone( "st-greenbrown", i-1, line)
14
 
                elseif c =="%" then
15
 
                        set_stone( "st-greenbrown", i-1, line)
16
 
                        set_floor("fl-normal",i-1,line)
17
 
                elseif c =="A" then
18
 
                        set_stone( "st-actorimpulse", i-1, line)
19
 
                elseif c =="w" then
20
 
                        set_stone( "st-glass", i-1, line)
21
 
                elseif c == "o" then
22
 
                        oxyd( i-1, line)
23
 
                        set_floor("fl-normal",i-1,line)
24
 
                elseif c == "*" then
25
 
                        set_stone( "st-brownie", i-1, line)
26
 
                elseif c == "!" then
27
 
                        abyss(i-1,line)
28
 
                elseif c == "~" then
29
 
                   set_floor("fl-water",i-1,line)
30
 
                elseif c=="z" then
31
 
                   set_actor("ac-blackball", i-.5,line+.5, {player=0})
32
 
                   set_floor("fl-normal",i-1,line)
33
 
                elseif c == "g" then
34
 
                        draw_stones("st-grate1",{i-1,line}, {1,1}, 1)
35
 
                elseif c=="+" then
36
 
                        set_stone( "st-wood", i-1, line)
37
 
                elseif c=="=" then
38
 
                        set_floor("fl-space",i-1,line)
39
 
                elseif c == "d" then --1-d
40
 
                        set_floor("fl-gradient",  i-1,  line, {type=1})
41
 
                elseif c == "u" then --2-u
42
 
                        set_floor("fl-gradient",  i-1,  line, {type=2})
43
 
                elseif c == "r" then --3-r
44
 
                        set_floor("fl-gradient",  i-1,  line, {type=3})
45
 
                elseif c == "l" then --4-l
46
 
                        set_floor("fl-gradient",  i-1,  line, {type=4})
47
 
                elseif c == "1" then --ur
48
 
                        set_floor("fl-gradient",  i-1,  line, {type=11})
49
 
                elseif c == "3" then --dl
50
 
                        set_floor("fl-gradient",  i-1,  line, {type=9})
51
 
                elseif c == "7" then --dr
52
 
                        set_floor("fl-gradient",  i-1,  line, {type=12})
53
 
                elseif c == "9" then --ul
54
 
                        set_floor("fl-gradient",  i-1,  line, {type=10})
55
 
                elseif c == "a" then --ur
56
 
                        set_floor("fl-gradient",  i-1,  line, {type=11})
57
 
                        set_item("it-ring",i-1,line)
58
 
                elseif c == "b" then --dl
59
 
                        set_floor("fl-gradient",  i-1,  line, {type=9})
60
 
                        set_item("it-ring",i-1,line)
61
 
                elseif c == "c" then --dr
62
 
                        set_floor("fl-gradient",  i-1,  line, {type=12})
63
 
                        set_item("it-ring",i-1,line)
64
 
                elseif c == "`" then --ul
65
 
                        set_floor("fl-gradient",  i-1,  line, {type=10})
66
 
                        set_item("it-ring",i-1,line)
67
 
                elseif c=="F" then
68
 
                   set_floor("fl-normal",i-1,line)
69
 
                   set_item("it-flagblack",i-1,line)
70
 
                elseif c=="m" then
71
 
                   set_floor("fl-normal",i-1,line)
72
 
                elseif c=="R" then
73
 
                   set_actor("ac-rotor", i-.5,line+.5, {player=1, mouseforce=0, range=30, force=30})
74
 
                        set_item("it-trigger", i-1,line, {action="open", target="door1"})
75
 
                elseif c=="Q" then
76
 
                   set_item("it-wormhole", i-1, line, {strength=0,targetx="10.5",targety="6.5"})
77
 
                elseif c=="S" then
78
 
                   set_floor("fl-normal",i-1,line)
79
 
                   set_item("it-wormhole", i-1, line, {strength=0,targetx="10.5",targety="6.5"})
80
 
                elseif c=="s" then
81
 
                   set_floor("fl-gradient",  i-1,  line, {type=12})
82
 
                   set_item("it-wormhole", i-1, line, {strength=0,targetx="10.5",targety="6.5"})
83
 
                elseif c=="q" then
84
 
                   set_floor("fl-gradient",  i-1,  line, {type=9})
85
 
                   set_item("it-wormhole", i-1, line, {strength=0,targetx="10.5",targety="6.5"})
86
 
                elseif c=="T" then
87
 
                        set_item("it-trigger", i-1,line, {action="close", target="door1"})
88
 
                elseif c=="t" then
89
 
                   set_stone("st-door_a",i-1,line,{name="door1"})
90
 
             end
91
 
        end     
92
 
end
93
 
 
94
 
renderLine(00,"%%%%%%%%%%%%%%%%%%%%")
95
 
renderLine(01,"%brrrmmmmmmmmmmllla%")
96
 
renderLine(02,"%d################d%")
97
 
renderLine(03,"%d#  1d3 lllllo#o#d%")
98
 
renderLine(04,"%d#d##q#########d#d%")
99
 
renderLine(05,"%m# rrrSl#     #d#m%")
100
 
renderLine(06,"%z####9###R# # #d#F%")
101
 
renderLine(07,"%m#Q#  #Q### ###d#m%")
102
 
renderLine(08,"%u# # ##   Q   #d#u%")
103
 
renderLine(09,"%u#    t T   #   #u%")
104
 
renderLine(10,"%u################u%")
105
 
renderLine(11,"%`rrrmmmmmmmmmmlllc%")
106
 
renderLine(12,"%%%%%%%%%%%%%%%%%%%%")
107
 
 
108
 
oxyd_shuffle()
 
 
b'\\ No newline at end of file'