/[enigma]/enigma/data/levels/ss_esp75.lua
ViewVC logotype

Diff of /enigma/data/levels/ss_esp75.lua

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.2.1 by dheck, Fri Sep 19 17:38:18 2003 UTC revision 1.1.2.2 by mhawlisch, Thu Oct 2 19:47:57 2003 UTC
# Line 1  Line 1 
1  -- Sven Siggelkow 2003  -- Sven Siggelkow 2003
2  -- ESPRIT #075  -- ESPRIT #075
3    
4  levelw = 20  levelw = 20
5  levelh = 13  levelh = 13
6  create_world(levelw, levelh)  create_world(levelw, levelh)
7  oxyd_default_flavor = "a"  oxyd_default_flavor = "a"
8  set_actor("ac-blackball", 3.5, 6.5, {player=0})  set_actor("ac-blackball", 3.5, 6.5, {player=0})
9  fill_floor("fl-ice_001", 0,0, level_width,level_height)  fill_floor("fl-ice_001", 0,0, level_width,level_height)
10    
11  function renderLine( line, pattern)  function renderLine( line, pattern)
12      for i=1, strlen(pattern) do      for i=1, strlen(pattern) do
13        local c = strsub( pattern, i, i)        local c = strsub( pattern, i, i)
14        if c ==   "#" then        if c ==   "#" then
15           set_stone("st-door_a",i-1,line)           set_stone("st-door_a",i-1,line)
16        elseif c=="D" then                                                                        elseif c=="D" then                                                                
17           set_stone("st-death", i-1,  line)           set_stone("st-death", i-1,  line)
18        elseif c=="1" then                                                                        elseif c=="1" then                                                                
19           set_stone("st-door_a", i-1,  line,{name="door1"})           set_stone("st-door_a", i-1,  line,{name="door1"})
20        elseif c=="2" then                                                                        elseif c=="2" then                                                                
21           set_stone("st-door_a", i-1,  line,{name="door2"})           set_stone("st-door_a", i-1,  line,{name="door2"})
22        elseif c =="t" then        elseif c =="t" then
23           set_item("it-trigger", i-1,line, {invisible=1,action="callback", target="s1"})           set_item("it-trigger", i-1,line, {invisible=1,action="callback", target="s1"})
24        elseif c=="M" then        elseif c=="M" then
25           set_item("it-magnet",i-1,line,{on=1})           set_item("it-magnet",i-1,line,{on=1})
26        elseif c=="." then                        elseif c=="." then                
27           set_item("it-extralife", i-1,line)           set_item("it-extralife", i-1,line)
28        elseif c=="k" then        elseif c=="k" then
29           set_actor("ac-whiteball-small", i-1+0.5,line+0.5, {mouseforce=1, controllers=1})           set_actor("ac-killerball", i-1+0.5,line+0.5, {mouseforce=1, controllers=1})
30        elseif c=="O" then        elseif c=="O" then
31           oxyd(i-1,line)           oxyd(i-1,line)
32          end          end
33      end      end
34  end  end
35  --              01234567890123456789  --              01234567890123456789
36  renderLine(00, "####################")  renderLine(00, "####################")
37  renderLine(01, "#                  #")  renderLine(01, "#                  #")
38  renderLine(02, "#                k #")  renderLine(02, "#                k #")
39  renderLine(03, "#                  #")  renderLine(03, "#                  #")
40  renderLine(04, "#                  #")    renderLine(04, "#                  #")  
41  renderLine(05, "#        OO        #")  renderLine(05, "#        OO        #")
42  renderLine(06, "#     c OMMO c     #")  renderLine(06, "#     c OMMO c     #")
43  renderLine(07, "#        OO        #")  renderLine(07, "#        OO        #")
44  renderLine(08, "#                  #")  renderLine(08, "#                  #")
45  renderLine(09, "#                  #")  renderLine(09, "#                  #")
46  renderLine(10, "#                k #")  renderLine(10, "#                k #")
47  renderLine(11, "#                  #")  renderLine(11, "#                  #")
48  renderLine(12, "####################")  renderLine(12, "####################")
49  --              01234567890123456789  --              01234567890123456789
50    
51  oxyd_shuffle()  oxyd_shuffle()

Legend:
Removed from v.1.1.2.1  
changed lines
  Added in v.1.1.2.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26