home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ant10.lua < prev    next >
Text File  |  2003-02-21  |  2KB  |  75 lines
  1. -- Circularity -- the Enigma Level
  2. -- (c) 2003 Petr Machata/ant_39
  3. -- Licensed under GPL v2.0 or above
  4. -- 2003-01-07
  5. -- 2003-02-20 -- major rewrite
  6.  
  7. dofile(enigma.FindDataFile("levels/ant.lua"))
  8.  
  9. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
  10. function construct0(x, y) set_floor("fl-wood", x, y)  end
  11. function construct1(x, y) set_floor("fl-samba", x, y) end
  12. function destruct(x, y)   set_floor("fl-abyss", x, y) end
  13.  
  14. function tick()
  15.    rail0()
  16.    rail1()
  17. end
  18. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
  19.  
  20. cells={}
  21. cells[";"]=cell{floor="fl-tigris"}
  22. cells[","]=cell{floor="fl-sahara"}
  23. cells["."]=cell{floor="fl-abyss"}
  24.  
  25. cells["train0"]=cell{floor="fl-wood"}
  26. cells["train1"]=cell{floor="fl-samba"}
  27.  
  28. cells[" "]=cell{{{checkerfloor,{cells[","], cells[";"]}}}}
  29. cells["="]=cell{parent=cells[" "],stone="st-rock5"}
  30. cells["O"]=cell{parent=cells[" "],actor={"ac-blackball", {player=0}}}
  31.  
  32. path0 = {}
  33. loco0 = {}
  34. cells["!"]=cell{parent={cells["."], {add_multicell, path0, 0}}}
  35. cells["_"]=cell{parent={cells["!"], {add_multicell, path0, 1}, cells["train0"]}}
  36. cells["c"]=cell{parent={cells["_"], {add_multicell, loco0, construct0}}}
  37. cells["d"]=cell{parent={cells["!"], {add_multicell, loco0, destruct}}}
  38. cells["C"]=cell{parent={cells["_"], cells["="]}}
  39. cells["D"]=cell{parent={cells["!"], cells["="]}}
  40. rail0 = new_rail(loco0, path0)
  41.  
  42. path1 = {}
  43. loco1 = {}
  44. cells["?"]=cell{parent={cells["."], {add_multicell, path1, 0}}}
  45. cells["-"]=cell{parent={cells["?"], {add_multicell, path1, 1}, cells["train1"]}}
  46. cells["a"]=cell{parent={cells["-"], {add_multicell, loco1, construct1}}}
  47. cells["b"]=cell{parent={cells["?"], {add_multicell, loco1, destruct}}}
  48. cells["A"]=cell{parent=cells["-"], stone="st-grate1"}
  49. cells["B"]=cell{parent=cells["?"], stone="st-grate1"}
  50. rail1 = new_rail(loco1, path1)
  51.  
  52. cells["~"]=cell{parent=cells[" "], stone={"st-timer", {action="callback", target="tick", interval=0.20}}}
  53. cells["0"]=oxyd
  54.  
  55. level = {
  56.    "====================",
  57.    "=   !c___CC___d!   =",
  58.    "= 0 !b---AA---a! 0 =",
  59.    "=   !?___CC___?!   =",
  60.    "=   !?c------d?!   =",
  61.    "=   !?!-__d!-!?!   =",
  62.    "=...!?!b_ O!a!?!...=",
  63.    "=   !?!?_c!!?!?!   =",
  64.    "=   !?!??????!?!   =",
  65.    "=   !?!!!DD!!!?!   =",
  66.    "= 0 !????BB????! 0 =",
  67.    "=   !!!!!DD!!!!!   =",
  68.    "~==================="
  69. }
  70.  
  71. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
  72. oxyd_default_flavor = "b"
  73. create_world_by_map(level)
  74. oxyd_shuffle()
  75.