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

« back to all changes in this revision

Viewing changes to data/levels/ss_esp58.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 = 39
3
 
levelh = 25
4
 
create_world(levelw, levelh)
5
 
oxyd_default_flavor = "a"
6
 
display.SetFollowMode(display.FOLLOW_SCROLLING)
7
 
set_actor("ac-blackball", 19.5,13.5)
8
 
fill_floor("fl-normal",0,0,levelw,levelh)
9
 
 
10
 
function renderLine( line, pattern)
11
 
    for i=1, strlen(pattern) do
12
 
      local c = strsub( pattern, i, i)
13
 
      if c ==   "#" then
14
 
         set_stone("st-stone1", i-1,line)
15
 
      elseif c == " " then
16
 
         set_floor("fl-ice_001",i-1,line)
17
 
         set_item("it-crack0",i-1,line)                                       
18
 
      elseif c == "." then
19
 
         set_floor("fl-ice_001",i-1,line)
20
 
      elseif c == "w" then
21
 
         set_floor("fl-floor_001",i-1,line)
22
 
      elseif c=="1" then
23
 
         set_floor("fl-gradient",  i-1,  line, {type=3})         
24
 
      elseif c=="2" then
25
 
         set_floor("fl-gradient",  i-1,  line, {type=4})   
26
 
      elseif c=="3" then
27
 
         set_floor("fl-gradient",  i-1,  line, {type=1})   
28
 
      elseif c=="4" then
29
 
         set_floor("fl-gradient",  i-1,  line, {type=2})         
30
 
      elseif c=="a" then
31
 
         set_floor("fl-gradient",  i-1,  line, {type=12})   
32
 
      elseif c=="b" then
33
 
         set_floor("fl-gradient",  i-1,  line, {type=10})         
34
 
      elseif c=="c" then
35
 
         set_floor("fl-gradient",  i-1,  line, {type=11})   
36
 
      elseif c=="d" then
37
 
         set_floor("fl-gradient",  i-1,  line, {type=9})  
38
 
      elseif c=="+" then
39
 
         set_floor("fl-normal", i-1,line)
40
 
      elseif c =="M" then
41
 
         set_item("it-wormhole",i-1,line, {targetx="10.5",targety="14.5",strength=0})
42
 
      elseif c =="P" then
43
 
         set_item("it-wormhole",i-1,line, {targetx="20.5",targety="3.5",strength=0})
44
 
      elseif c =="Q" then
45
 
         set_item("it-wormhole",i-1,line, {targetx="8.5",targety="9.5",strength=0})
46
 
      elseif c =="R" then
47
 
         set_item("it-wormhole",i-1,line, {targetx="12.5",targety="6.5",strength=0})
48
 
      elseif c =="S" then
49
 
         set_item("it-wormhole",i-1,line, {targetx="8.5",targety="9.5",strength=0})
50
 
      elseif c =="T" then
51
 
         set_item("it-wormhole",i-1,line, {targetx="15.5",targety="22.5",strength=0})
52
 
      elseif c =="U" then
53
 
         set_item("it-wormhole",i-1,line, {targetx="6.5",targety="18.5",strength=0})
54
 
      elseif c =="V" then
55
 
         set_item("it-wormhole",i-1,line, {targetx="15.5",targety="22.5",strength=0})
56
 
      elseif c =="W" then
57
 
         set_item("it-wormhole",i-1,line, {targetx="29.5",targety="11.5",strength=0})
58
 
      elseif c =="X" then
59
 
         set_item("it-wormhole",i-1,line, {targetx="34.5",targety="16.5",strength=0})
60
 
      elseif c =="Y" then
61
 
         set_item("it-wormhole",i-1,line, {targetx="22.5",targety="11.5",strength=0})
62
 
      elseif c =="Z" then
63
 
         set_item("it-wormhole",i-1,line, {targetx="28.5",targety="11.5",strength=0})
64
 
      elseif c=="h" then                    
65
 
         hammer(i-1,line)
66
 
         set_floor("fl-floor_001",i-1,line)
67
 
      elseif c == ">" then
68
 
         set_stone("st-oneway-e",i-1,line)
69
 
      elseif c == "<" then
70
 
         set_stone("st-oneway-w",i-1,line)
71
 
      elseif c == "g" then
72
 
         set_stone("st-grate1",i-1,line)
73
 
      elseif c == "H" then               
74
 
         set_item("it-hollow",i-1,line)
75
 
      elseif c == "p" then               
76
 
         set_item("it-coffee",i-1,line)
77
 
      elseif c == "x" then               
78
 
         set_floor("fl-floor_001",i-1,line)
79
 
         set_item("it-hill",i-1,line)
80
 
      elseif c == "F" then
81
 
         set_stone("st-fakeoxyd",i-1,line)         
82
 
      elseif c == "O" then
83
 
         oxyd(i-1,line)         
84
 
        end
85
 
    end  
86
 
end
87
 
renderLine(00 , "#######################################")
88
 
renderLine(01 , "#                   .............     #")
89
 
renderLine(02 , "# .....     +++     +++++++++++++     #")
90
 
renderLine(03 , "#.a444b#    + +     + #######   ++    #")
91
 
renderLine(04 , "#.2www1#    + + +<+ M #a444b#    ++++ #")
92
 
renderLine(05 , "#.2wOw1#    + + + +   #2www1#       H #")  
93
 
renderLine(06 , "#.2www1#    + + + H+++g2wOw1#       + #")
94
 
renderLine(07 , "#.c333d++>+ Q +++ +   #2www1#  .....+ #")
95
 
renderLine(08 , "#.####+#  +  .    H   #c333d#  .a444b #")
96
 
renderLine(09 , "#..+S#+#R +++a444b++  ###+###  .2www1 #")
97
 
renderLine(10 , "#..+ #+#  ...2www1 +    #+#    .2wOw1 #")
98
 
renderLine(11 , "#..+ #+#    .2wOw1+++++Z#+#Y++X 2whw1 #")
99
 
renderLine(12 , "#..+ #+#    .2www1      #+#    .c333d #")
100
 
renderLine(13 , "#..+ #+++++  c333d+++++p++.     +.... #") 
101
 
renderLine(14 , "#..+ #+#+ +P +.............     +     #")
102
 
renderLine(15 , "#..+ #+#+   .+.          a4b    + W.  #")
103
 
renderLine(16 , "#..+ #+#++++++.   ...    2F1    + +.  #")
104
 
renderLine(17 , "#..+ .+.. . .   .a444b.  c3d    + +.  #")
105
 
renderLine(18 , "#..+ .+. . . .  .2www1.         + +.  #")  
106
 
renderLine(19 , "#..+ .T..a444b. .2wOw1.   ##### + +.  #")
107
 
renderLine(20 , "#..+.   .2www1. .2www1++++gggg<++++++.#")
108
 
renderLine(21 , "#..++....2wOw1. .c333d... #####     +.#")
109
 
renderLine(22 , "#...+++++2xww1.U ......  V+++++++++++.#")
110
 
renderLine(23 , "#.  .....c333d.          ............ #")
111
 
renderLine(24 , "#######################################")
112
 
                               
113
 
oxyd_shuffle()