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

« back to all changes in this revision

Viewing changes to data/levels/siegfried86.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
 
--
3
 
 
4
 
levelw = 20
5
 
levelh = 13
6
 
 
7
 
create_world(levelw, levelh)
8
 
enigma.ConserveLevel = FALSE
9
 
oxyd_default_flavor = "c"
10
 
fill_floor("fl-abyss")
11
 
fill_floor("fl-gray", 1, 2, 18, 9)
12
 
 
13
 
function renderLine( line, pattern)
14
 
    for i=1, strlen(pattern) do
15
 
      local c = strsub( pattern, i, i)
16
 
      if c =="N" then
17
 
         set_stone("st-oneway_black-n",i-1,line)
18
 
      elseif c == "n" then
19
 
         set_stone("st-oneway_white-n",i-1,line)
20
 
      elseif c == "E" then
21
 
         set_stone("st-oneway_black-e",i-1,line)
22
 
      elseif c == "e" then
23
 
         set_stone("st-oneway_white-e",i-1,line)
24
 
      elseif c == "S" then
25
 
         set_stone("st-oneway_black-s",i-1,line)
26
 
      elseif c == "s" then
27
 
         set_stone("st-oneway_white-s",i-1,line)
28
 
      elseif c == "W" then
29
 
         set_stone("st-oneway_black-w",i-1,line)
30
 
      elseif c == "w" then
31
 
         set_stone("st-oneway_white-w",i-1,line)
32
 
      elseif c == "h" then
33
 
         set_stone("st-wood",i-1,line)
34
 
      elseif c == "r" then
35
 
         set_stone("st-greenbrown",i-1,line)
36
 
      elseif c == "o" then
37
 
         oxyd( i-1, line)
38
 
      elseif c == "a" then
39
 
         set_actor("ac-blackball", i-.5,line+.5)
40
 
         set_item("it-yinyang", i-1, line+.5)
41
 
      elseif c == "b" then
42
 
         set_actor("ac-whiteball", i-.5,line+.5)
43
 
         set_item("it-yinyang", i-1, line+.5)
44
 
        end
45
 
    end
46
 
end
47
 
renderLine(00, "                    ")
48
 
renderLine(01, "    o   o   o   o   ")
49
 
renderLine(02, " rrrnrrrNrrrnrrrNrr ")
50
 
renderLine(03, "oW r   e  S       eo")
51
 
renderLine(04, " r  h h W n rr r hr ")
52
 
renderLine(05, "ow r r rrNnr  w h Eo")
53
 
renderLine(06, " r h r  Wbae hr r r ")
54
 
renderLine(07, "oW rr r rsSrr  N  eo")
55
 
renderLine(08, " r  h  E h  r r h r ")
56
 
renderLine(09, "ow   rn   r   r   Eo")
57
 
renderLine(10, " rrrSrrrsrrrSrrrsrr ")
58
 
renderLine(11, "    o   o   o   o   ")
59
 
renderLine(12, "                    ")
60
 
 
61
 
oxyd_shuffle()