home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ant12.lua < prev    next >
Text File  |  2003-02-21  |  2KB  |  62 lines
  1. -- Black Lava -- the Enigma Level
  2. -- (c) 2003 Petr Machata/ant_39
  3. -- Licensed under GPL v2.0 or above
  4. -- 2003-01-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["n"]=cell{floor={face="fl-normal"}}
  14.  
  15. grada1=cell{{{gradient, 5}}}
  16. grada2=cell{{{gradient, 6}}}
  17. grada3=cell{{{gradient, 7}}}
  18. grada4=cell{{{gradient, 8}}}
  19. gradb1=cell{{{gradient, 9}}}
  20. gradb2=cell{{{gradient, 10}}}
  21. gradb3=cell{{{gradient, 11}}}
  22. gradb4=cell{{{gradient, 12}}}
  23. gradc1=cell{{{gradient, 21}}}
  24. gradc2=cell{{{gradient, 22}}}
  25. gradc3=cell{{{gradient, 23}}}
  26. gradc4=cell{{{gradient, 24}}}
  27.  
  28. gradaa=cell{{{randomfloor,{grada1, grada2, grada3, grada4}}}}
  29. gradbb=cell{{{randomfloor,{gradb1, gradb2, gradb3, gradb4}}}}
  30. gradcc=cell{{{randomfloor,{gradc1, gradc2, gradc3, gradc4}}}}
  31.  
  32. cells[" "]=cell{{{randomfloor,{gradaa, gradbb, gradcc}}}}
  33.  
  34. cells["#"]=cell{stone="st-rock6"}
  35. cells["D"]=cell{stone="st-death"}
  36. cells["0"]=oxyd
  37. cells["O"]=cell{parent=cells["n"],actor={"ac-blackball", {player=0}}}
  38.  
  39. level = {
  40.    "####################",
  41.    "#O       ##       n#",
  42.    "#        ##        #",
  43.    "0  D  D  DD  D  D  0",
  44.    "#                  #",
  45.    "#                  #",
  46.    "0  D  D      D  D  0",
  47.    "#                  #",
  48.    "#                  #",
  49.    "0  D  D  DD  D  D  0",
  50.    "#        ##        #",
  51.    "#n       ##       n#",
  52.    "####################"
  53. }
  54.  
  55. -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
  56. randomseed(666)
  57. oxyd_default_flavor = "b"
  58. set_default_parent(cells[" "])
  59. create_world_by_map(level)
  60. randomseed(enigma.GetTicks())
  61. oxyd_shuffle()
  62.