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

« back to all changes in this revision

Viewing changes to data/levels/ss_esp95.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 = 13
4
 
display.SetFollowMode(display.FOLLOW_SCROLLING)
5
 
create_world(levelw, levelh)
6
 
oxyd_default_flavor = "c"
7
 
set_actor("ac-blackball", 2.5,6.5)
8
 
 
9
 
fill_floor("fl-black", 0,0, levelw,levelh)
10
 
fill_items( "it-burnable", 0, 0, 24, 13)
11
 
draw_floor("fl-metal",{24,0},{0,1},13)
12
 
 
13
 
function renderLine( line, pattern)
14
 
    for i=1, strlen(pattern) do
15
 
      local c = strsub( pattern, i, i)
16
 
      if c ==   "#" then
17
 
         set_stone("st-plain", i-1,line)
18
 
      elseif c =="G" then
19
 
         set_stone("st-grate2", i-1,line)
20
 
      elseif c =="b" then
21
 
         set_item("it-brush", i-1,line)
22
 
      elseif c =="s" then
23
 
         set_item("it-spade", i-1,line)
24
 
      elseif c =="d" then
25
 
         set_item("it-dynamite", i-1,line) 
26
 
      elseif c =="f" then
27
 
         set_item("it-extinguisher", i-1,line)
28
 
      elseif c =="~" then
29
 
         set_item("it-burnable", i-1,line, {name="burnable1"})    
30
 
      elseif c =="+" then
31
 
         set_item("it-burnable", i-1,line, {name="burnable2"})                
32
 
      elseif c =="t" then
33
 
         set_item("it-trigger", i-1,line, {invisible=1, action="callback", target="s1"})
34
 
      elseif c =="k" then
35
 
         set_item("it-key_a", i-1,line)
36
 
      elseif c =="B" then
37
 
         set_stone("st-key_a", i-1, line, {action="openclose", target="door1"})
38
 
      elseif c =="D" then
39
 
         set_stone("st-key_a", i-1, line, {action="openclose", target="door2"})
40
 
      elseif c =="A" then
41
 
         set_stone("st-door_c", i-1, line,  {name="door1"})
42
 
      elseif c =="C" then
43
 
         set_stone("st-door_c", i-1, line,  {name="door2"})
44
 
      elseif c =="e" then
45
 
         set_stone("st-door_c", i-1, line,  {name="door3"})
46
 
      elseif c =="E" then
47
 
         set_stone("st-coinslot", i-1,line, {action="openclose", target="door3"})
48
 
      elseif c=="m" then        
49
 
         set_item("it-coin2", i-1,line,{value=3})
50
 
      elseif c =="1" then
51
 
         set_item("it-extralife", i-1,line)
52
 
      elseif c =="2" then
53
 
         set_item("it-magicwand", i-1,line)
54
 
      elseif c =="3" then
55
 
         set_item("it-document", i-1,line)
56
 
      elseif c =="4" then
57
 
         set_item("it-cherry", i-1,line)
58
 
      elseif c =="5" then
59
 
         set_item("it-weight", i-1,line)
60
 
      elseif c =="6" then
61
 
         set_item("it-hammer", i-1,line)
62
 
      elseif c =="7" then
63
 
         set_item("it-sword", i-1,line)
64
 
      elseif c =="8" then
65
 
         set_item("it-wrench", i-1,line)
66
 
      elseif c =="9" then
67
 
         set_item("it-seed", i-1,line)
68
 
      elseif c =="0" then
69
 
         set_item("it-brake", i-1,line)   
70
 
      elseif c =="u" then              
71
 
         set_item("it-umbrella", i-1,line)
72
 
                                                                         
73
 
      elseif c=="O" then                                                               
74
 
         oxyd(i-1,line)         
75
 
        end
76
 
    end  
77
 
end
78
 
renderLine(00 , "#######################################")
79
 
renderLine(01 , "#bbb#uuuu#ffff#12 3#76 3#             #")
80
 
renderLine(02 , "#bbb#uuuu#ffff#4564#2 18# O    O    O #")
81
 
renderLine(03 , "#bbb#uuuu#ffff#8907#8907#             #")
82
 
renderLine(04 , "#bbb#uuuu#ffff# 4mm# 666#             #")  
83
 
renderLine(05 , "#   #AB###CD###GGGG#GGGG#             #")
84
 
renderLine(06 , "#   t     ~             E             #")
85
 
renderLine(07 , "#k  #GGGG#GGGG#         e             #")
86
 
renderLine(08 , "#sss#dddd#    #         #             #")
87
 
renderLine(09 , "#sss#dddd#    #         #             #")
88
 
renderLine(10 , "#sss#dddd#    #         # O    O    O #")
89
 
renderLine(11 , "#sss#dddd#    #        +#             #")
90
 
renderLine(12 , "#######################################") 
91
 
 
92
 
function s1()
93
 
SendMessage("burnable1", "ignite")
94
 
SendMessage("burnable2", "ignite")
95
 
end
96