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

« back to all changes in this revision

Viewing changes to data/levels/ss_esp79.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
 
create_world(20, 13)
3
 
oxyd_default_flavor = "a"
4
 
set_actor("ac-blackball", 10.5, 6.5)
5
 
fill_floor("fl-concrete")
6
 
enigma.ConserveLevel=FALSE
7
 
 
8
 
function renderLine( line, pattern)
9
 
    for i=1, strlen(pattern) do
10
 
      local c = strsub( pattern, i, i)
11
 
      if c ==   "#" then
12
 
         set_stone("st-brick",i-1,line)
13
 
      elseif c =="c" then                                                               
14
 
         set_item("it-coin1", i-1,line)
15
 
      elseif c =="M" then 
16
 
         set_stone("st-rock1_move",i-1,line)
17
 
      elseif c =="m" then                                                               
18
 
         set_stone("st-rock1_move",i-1,line)
19
 
         set_item("it-spade", i-1,line)
20
 
      elseif c =="o" then                                                               
21
 
         set_item("it-hollow",i-1,line)
22
 
      elseif c =="*" then                                                               
23
 
         set_item("it-hill",i-1,line)
24
 
      elseif c=="C" then
25
 
         set_stone("st-coinslot", i-1,line,{target="s1", action="callback"})
26
 
      elseif c=="1" then
27
 
         set_stone("st-door_c", i-1,line, {name="door1", type="v"})
28
 
      elseif c=="2" then
29
 
         set_stone("st-door_c", i-1,line, {name="door2", type="v"})
30
 
      elseif c=="R" then
31
 
         set_actor("ac-rotor", i-1+0.5,line+0.5, {mouseforce=1, range=25, force=40})
32
 
      elseif c=="O" then
33
 
         oxyd(i-1,line) 
34
 
        end
35
 
    end
36
 
end
37
 
renderLine(00, "####################")
38
 
renderLine(01, "#O 1***o****o******#")
39
 
renderLine(02, "# R2o*o***o**o**o**#")
40
 
renderLine(03, "####C############*o#")
41
 
renderLine(04, "#################o*#")  
42
 
renderLine(05, "#                oo#")
43
 
renderLine(06, "#       M  M   o   #")
44
 
renderLine(07, "#              M o #")
45
 
renderLine(08, "#  c cc         oo #")
46
 
renderLine(09, "# c cc    m  M ooo #")
47
 
renderLine(10, "# c c c      ooo   #")
48
 
renderLine(11, "#            o    O#")
49
 
renderLine(12, "####################")
50
 
                              
51
 
oxyd_shuffle()
52
 
 
53
 
function s1()
54
 
  SendMessage("door1", "openclose")
55
 
  SendMessage("door2", "openclose")
56
 
end