home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ant25.lua < prev    next >
Text File  |  2003-02-21  |  2KB  |  56 lines
  1. -- Dependants -- the Enigma Level
  2. -- (c) 2003 Petr Machata/ant_39
  3. -- Licensed under GPL v2.0 or above
  4. -- 2003-02-08
  5. -- 2003-02-10 -- keeping up to date with latest additions to ant.lua
  6.  
  7. dofile(enigma.FindDataFile("levels/ant.lua"))
  8.  
  9. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
  10.  
  11. cells={}
  12.  
  13. cells[" "]=cell{floor={face="fl-sahara"}}
  14. cells["#"]=cell{stone={face="st-rock3"}}
  15.  
  16. puzzles = {}
  17. cells["*"]=cell{parent={{add_multicell, puzzles}}}
  18.  
  19. smallmarbles={}
  20. bigmarbles={}
  21. cells["y"]=cell{item={face="it-yinyang"}}
  22. cells["o"]=cell{parent={cells[" "],{add_multiactor, "ac-whiteball-small", smallmarbles, {player=0, mouseforce=0}}}}
  23. cells["O"]=cell{parent={cells["y"],{add_multiactor, "ac-blackball", bigmarbles, {player=0}}}}
  24. cells["Q"]=cell{parent={cells["y"],{add_multiactor, "ac-whiteball", bigmarbles, {player=1}}}}
  25.  
  26. cells["A"]=cell{stone={face="st-door", attr={name="doorA", type="h"}}}
  27. cells["B"]=cell{stone={face="st-door", attr={name="doorB", type="h"}}}
  28. cells["a"]=cell{item={face="it-trigger", attr={action="openclose", target="doorA"}}}
  29. cells["b"]=cell{item={face="it-trigger", attr={action="openclose", target="doorB"}}}
  30.  
  31. cells["0"]=oxyd
  32.  
  33. level = {
  34.    "##########################################################",
  35.    "#                  #O                 #                  #",
  36.    "#                  #                  #                  #",
  37.    "#                  #A##################                  #",
  38.    "#                  # a         ********************      #",
  39.    "#                  0           *   *  0                  #",
  40.    "#                  0           * o *  0                  #",
  41.    "#                  0           *   *  0                  #",
  42.    "#               ********************b #                  #",
  43.    "#                  ##################B#                  #",
  44.    "#                  #                  #                  #",
  45.    "#                  #                 Q#                  #",
  46.    "##########################################################"
  47. }
  48.  
  49. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
  50. set_default_parent(cells[" "])
  51. create_world_by_map(level)
  52. render_puzzles(puzzles);
  53. add_rubber_bands(smallmarbles, bigmarbles, 10)
  54. oxyd_shuffle()
  55. enigma.ConserveLevel = FALSE
  56.