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

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

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

revision 1.1 by ant_39, Sat Jan 25 15:16:49 2003 UTC revision 1.2 by ant_39, Mon Feb 10 19:59:07 2003 UTC
# Line 2  Line 2 
2  -- (c) 2003 Petr Machata/ant_39  -- (c) 2003 Petr Machata/ant_39
3  -- Licensed under GPL v2.0 or above  -- Licensed under GPL v2.0 or above
4  -- 2003-01-24  -- 2003-01-24
5    -- 2003-02-09 -- fixes in object groups
6    -- 2003-02-10 -- change in interfacing parent functions in ant.lua, rubber band changed
7    
8  dofile(enigma.FindDataFile("levels/ant.lua"))  dofile(enigma.FindDataFile("levels/ant.lua"))
9    
10  -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --  -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
11    
12  num = 0  num = 0
13  function switchcell(tgt, x, y)  function switchcell(x, y, tgt)
14     num = num +1     num = num +1
15    
16     local funcn = "switch_"..num     local funcn = "switch_"..num
# Line 16  function switchcell(tgt, x, y) Line 18  function switchcell(tgt, x, y)
18        "function() "..        "function() "..
19        "   enigma.KillStone("..x..", "..y..") "..        "   enigma.KillStone("..x..", "..y..") "..
20        "   local obj = {set_stone('st-death', "..x..", "..y..", {})} "..        "   local obj = {set_stone('st-death', "..x..", "..y..", {})} "..
21        "   add_rubber_bands(actors, obj, 16) "        "   add_rubber_bands(actors, obj, 16, 0) "
22    
23     if (tgt) then     if (tgt) then
24        func0 = func0 ..        func0 = func0 ..
# Line 53  cells["*"]=cell{floor={face="fl-gradient Line 55  cells["*"]=cell{floor={face="fl-gradient
55  cells["D"]=cell{parent=cells[" "],stone={face="st-death"}}  cells["D"]=cell{parent=cells[" "],stone={face="st-death"}}
56    
57  doors = {};  doors = {};
58  cells["b"]=cell{parent={cells["_"],{add_multiitem, {"st-door_b", doors, {type="v"}}}}}  cells["b"]=cell{parent={cells["_"],{add_multistone, {"st-door_b", doors, {type="v"}}}}}
59  cells["B"]=cell{parent={cells["_"],{switchcell, "doors"}}}  cells["B"]=cell{parent={cells["_"],{switchcell, "doors"}}}
60    
61  cells["0"]=cell{parent=cells[" "],stone={face="st-oxyd", attr={flavor="b", color="0"}}}  cells["0"]=cell{parent={cells[" "], oxyd}}
 cells["1"]=cell{parent=cells[" "],stone={face="st-oxyd", attr={flavor="b", color="1"}}}  
 cells["2"]=cell{parent=cells[" "],stone={face="st-oxyd", attr={flavor="b", color="2"}}}  
 cells["3"]=cell{parent=cells[" "],stone={face="st-oxyd", attr={flavor="b", color="3"}}}  
62    
63  actors = {}  actors = {}
64  cells["O"]=cell{parent={cells[" "],{add_multiactor,{"ac-blackball", actors, {player=0}}}}}  cells["O"]=cell{parent={cells[" "],{add_multiactor,{"ac-blackball", actors, {player=0}}}}}
65    
66  level = {  level = {
67     "#0################3#",     "#0################0#",
68     "0bTVVVVVVVVVVVVVVRb3",     "0bTVVVVVVVVVVVVVVRb0",
69     "#T*              lR#",     "#T*              lR#",
70     "#>  O             <#",     "#>  O             <#",
71     "#>     _____      <#",     "#>     _____      <#",
# Line 76  level = { Line 75  level = {
75     "#>     _____      <#",     "#>     _____      <#",
76     "#>                <#",     "#>                <#",
77     "#Lr              t/#",     "#Lr              t/#",
78     "1bL^^^^^^^^^^^^^^/b2",     "0bL^^^^^^^^^^^^^^/b0",
79     "#1################2#"     "#0################0#"
80  }  }
81    
82  -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --  -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
 randomseed(enigma.GetTicks())  
83  create_world_by_map(level)  create_world_by_map(level)
84  oxyd_shuffle()  oxyd_shuffle()

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

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