← Back to branch summary

~ubuntu-branches/ubuntu/edgy/enigma/edgy-backports

« back to all changes in this revision

Viewing changes to data/levels/martin84.lua

  • Committer: Bazaar Package Importer
  • Author(s): Erich Schubert
  • Date: 2005-06-20 20:48:19 UTC
  • Revision ID: james.westby@ubuntu.com-20050620204819-ggqswr2gh3w9hhyr
Tags: upstream-0.92
Import upstream version 0.92

Show diffs side-by-side

added added

removed removed

Lines of Context:
data/levels/martin84.lua
 
1
--
 
2
-- A level for Enigma
 
3
--
 
4
-- Copyright (c) 2003 Martin Hawlisch
 
5
-- Licensed under the GPL version 2.
 
6
 
 
7
levelw = 20
 
8
levelh = 13
 
9
 
 
10
create_world(levelw, levelh)
 
11
 
 
12
oxyd_default_flavor = "b"
 
13
 
 
14
function renderLine( line, pattern)
 
15
    for i=1, strlen(pattern) do
 
16
      local c = strsub( pattern, i, i)
 
17
      if c =="#" then
 
18
         set_floor("fl-samba",i-1,line)
 
19
         set_stone("st-death",i-1,line)
 
20
      elseif c == "O" then
 
21
         set_floor("fl-samba",i-1,line)
 
22
         oxyd( i-1, line)
 
23
      elseif c == "." then
 
24
         set_floor("fl-water",i-1,line)
 
25
      elseif c == "+" then
 
26
         set_floor("fl-samba",i-1,line)
 
27
         set_stone("st-wood",i-1,line)
 
28
      elseif c == "-" then
 
29
         set_floor("fl-samba",i-1,line)
 
30
      else
 
31
         set_floor("fl-abyss",i-1,line)
 
32
      end
 
33
    end
 
34
end
 
35
 
 
36
renderLine( 0, "        #O#         ")
 
37
renderLine( 1, "        #.#         ")
 
38
renderLine( 2, "        #-#         ")
 
39
renderLine( 3, "        #-#         ")
 
40
renderLine( 4, "        #-#         ")
 
41
renderLine( 5, "        #+##########")
 
42
renderLine( 6, "#########--+------.O")
 
43
renderLine( 7, "O.------+--#########")
 
44
renderLine( 8, "##########+#        ")
 
45
renderLine( 9, "         #-#        ")
 
46
renderLine(10, "         #-#        ")
 
47
renderLine(11, "         #.#        ")
 
48
renderLine(12, "         #O#        ")
 
49
 
 
50
oxyd_shuffle()
 
51
 
 
52
set_actor("ac-blackball", 10, 7)