← Back to branch summary

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

« back to all changes in this revision

Viewing changes to data/levels/siegfried89.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/siegfried89.lua
1
 
--
2
 
--
3
 
 
4
 
levelw = 20
5
 
levelh = 13
6
 
 
7
 
create_world(levelw, levelh)
8
 
draw_border("st-glass2")
9
 
enigma.ConserveLevel = FALSE
10
 
oxyd_default_flavor = "d"
11
 
fill_floor("fl-abyss")
12
 
fill_floor("fl-marble", 1, 1, level_width-2, level_height-2)
13
 
 
14
 
function renderLine( line, pattern)
15
 
    for i=1, strlen(pattern) do
16
 
      local c = strsub( pattern, i, i)
17
 
      if c =="s" then
18
 
         set_stone("st-stoneimpulse",i-1,line)
19
 
      elseif c == "c" then
20
 
         set_stone("st-stoneimpulse-hollow",i-1,line)
21
 
      elseif c == "g" then
22
 
         set_stone("st-glass2",i-1,line)
23
 
      elseif c == "H" then
24
 
         set_stone("st-glass2_hole",i-1,line)
25
 
      elseif c == "A" then
26
 
         set_stone("st-stoneimpulse",i-1,line, {name="impulse1"})
27
 
      elseif c == "B" then
28
 
         set_stone("st-stoneimpulse",i-1,line, {name="impulse2"})
29
 
      elseif c == "C" then
30
 
         set_stone("st-stoneimpulse-hollow",i-1,line, {name="impulse3"})
31
 
      elseif c == "D" then
32
 
         set_stone("st-stoneimpulse-hollow",i-1,line, {name="impulse4"})
33
 
      elseif c == "E" then
34
 
         set_stone("st-stoneimpulse-hollow",i-1,line, {name="impulse5"})
35
 
      elseif c == "N" then
36
 
         set_stone("st-oneway-n",i-1,line)
37
 
      elseif c == "S" then
38
 
         set_stone("st-oneway-s",i-1,line)
39
 
      elseif c == "w" then
40
 
         set_stone("st-wood",i-1,line)
41
 
      elseif c == "1" then
42
 
         set_item("it-trigger",i-1,line, {action="callback", target="st1"})
43
 
      elseif c == "2" then
44
 
         set_item("it-trigger",i-1,line, {action="callback", target="st2"})
45
 
      elseif c == "3" then
46
 
         set_item("it-trigger",i-1,line, {action="callback", target="st3"})
47
 
      elseif c == "4" then
48
 
         set_item("it-trigger",i-1,line, {action="callback", target="st4"})
49
 
      elseif c == "5" then
50
 
         set_item("it-trigger",i-1,line, {action="callback", target="st5"})
51
 
      elseif c == "o" then
52
 
         oxyd( i-1, line)
53
 
      elseif c == "#" then
54
 
         set_item("it-seed",i-1,line)
55
 
      elseif c == "a" then
56
 
         set_actor("ac-blackball", i-.5,line+.5)
57
 
        end
58
 
    end
59
 
end
60
 
 
61
 
renderLine(00, "                    ")
62
 
renderLine(01, "   gggggss          ")
63
 
renderLine(02, "    12  #ss       o ")
64
 
renderLine(03, "   gggHs##ss      o ")
65
 
renderLine(04, " gNEggSss##ss     o ")
66
 
renderLine(05, " gcwwc gss##ss    o ")
67
 
renderLine(06, " Cc45cDg ss##ss   o ")
68
 
renderLine(07, "     ggg  ss##ss  o ")
69
 
renderLine(08, "     g     ss# B  o ")
70
 
renderLine(09, " o   g     gssw   o ")
71
 
renderLine(10, " o   ggggggg sA     ")
72
 
renderLine(11, "       3 a gggggggg ")
73
 
renderLine(12, "                    ")
74
 
 
75
 
oxyd_shuffle()
76
 
 
77
 
function st1()
78
 
    SendMessage("impulse1", "trigger")
79
 
end
80
 
 
81
 
function st2()
82
 
    SendMessage("impulse2", "trigger")
83
 
end
84
 
 
85
 
function st3()
86
 
    SendMessage("impulse3", "trigger")
87
 
    SendMessage("impulse5", "trigger")
88
 
end
89
 
 
90
 
function st4()
91
 
    SendMessage("impulse3", "trigger")
92
 
end
93
 
 
94
 
function st5()
95
 
    SendMessage("impulse4", "trigger")
96
 
end
97