~ubuntu-branches/ubuntu/hoary/enigma/hoary

« back to all changes in this revision

Viewing changes to data/levels/ss_esp31.lua

  • Committer: Bazaar Package Importer
  • Author(s): Erich Schubert
  • Date: 2004-04-09 23:55:15 UTC
  • Revision ID: james.westby@ubuntu.com-20040409235515-ld1mi1mkmkse35hs
Tags: upstream-0.81.1
ImportĀ upstreamĀ versionĀ 0.81.1

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
-- Sven Siggelkow 2003
 
2
-- ESPRIT #031
 
3
 
 
4
levelw = 20
 
5
levelh = 13
 
6
create_world(levelw, levelh)
 
7
enigma.ConserveLevel = FALSE
 
8
oxyd_default_flavor = "b"
 
9
set_actor("ac-blackball", 10,5.5, {player=0})
 
10
set_actor("ac-rotor", 10,11.5, {range=25, force=50})
 
11
fill_floor("fl-samba",0,0,levelw,levelh)
 
12
function renderLine( line, pattern)
 
13
    for i=1, strlen(pattern) do
 
14
      local c = strsub( pattern, i, i)
 
15
      if c ==   "#" then
 
16
         set_stone("st-bigbrick", i-1,line)
 
17
      elseif c=="." then
 
18
         set_floor("fl-leaves", i-1,line)
 
19
      elseif c=="O" then
 
20
         oxyd(i-1,line)
 
21
        end
 
22
    end  
 
23
end
 
24
--               01234567890123456789
 
25
renderLine(00 , "####################")
 
26
renderLine(01 , "#.   .   .   .   . #")
 
27
renderLine(02 , "# . . . O . . . . .#")
 
28
renderLine(03 , "#  .O  .   .   .   #")
 
29
renderLine(04 , "#.   .   .   O   . #")  
 
30
renderLine(05 , "# . . . . . . . . .#")
 
31
renderLine(06 , "#  .   .   .   .   #")
 
32
renderLine(07 , "#.   .   .   .   . #")
 
33
renderLine(08 , "# . .O. . . . . .O.#")
 
34
renderLine(09 , "#  .   .   .   .   #")
 
35
renderLine(10 , "#.   .   .  O.   . #")
 
36
renderLine(11 , "# . . . . . . . . .#")
 
37
renderLine(12 , "####################")
 
38
--               01234567890123456789
 
39
 
 
40
oxyd_shuffle()