home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / rtest.lua < prev    next >
Text File  |  2003-06-07  |  1KB  |  49 lines
  1. Require("levels/ant.lua")
  2.  
  3. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
  4. cells={}
  5. multiplayer_mode()
  6. use_cells(cells, "1", "2")
  7.  
  8. cells[" "]=cell{floor="fl-sand"}
  9. cells["#"]=cell{stone="st-rock2"}
  10. --cells["n"]=cell{stone="st-turnstile-n"}
  11. cells["t"]=cell{stone="st-turnstile"}
  12. cells["s"]=cell{stone="st-turnstile-s"}
  13.  
  14. stone1={}
  15. stone2={}
  16. actor1={}
  17. actor2={}
  18. cells["n"]=cell{{{add_multistone, "st-turnstile-n", stone1}}}
  19. cells["N"]=cell{{{add_multistone, "st-turnstile-n", stone2}}}
  20. cells["1"]=cell{{{add_multiobject, actor1, cells["1"]}}}
  21. cells["2"]=cell{{{add_multiobject, actor2, cells["2"]}}}
  22.  
  23. level = {
  24.    "####################",
  25.    "#                  #",
  26.    "#                  #",
  27.    "#                  #",
  28.    "#                  #",
  29.    "#     1 n      N 2 #",
  30.    "#       t      t   #",
  31.    "#       s      s   #",
  32.    "#                  #",
  33.    "#                  #",
  34.    "#                  #",
  35.    "#                  #",
  36.    "####################"
  37. }
  38.  
  39. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
  40.  
  41. set_default_parent(" ")
  42. oxyd_default_flavor = "d"
  43. create_world_by_map(level)
  44.  
  45. add_rubber_band_pairs(actor1, stone1, 30, 0)
  46. add_rubber_band_pairs(actor2, stone2, 300, 0)
  47.  
  48. oxyd_shuffle()
  49.