home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ralf14.lua < prev    next >
Text File  |  2003-08-16  |  1KB  |  50 lines
  1. -- A level for Enigma
  2. -- Name:        Escape?
  3. -- Filename:    ralf14.lua
  4. -- Copyright:     (C) Jul 2003 Ralf Westram
  5. -- Contact:     amgine@reallysoft.de
  6. -- License:     GPL v2.0 or above
  7.  
  8. dofile(enigma.FindDataFile("levels/ralf.lua"))
  9.  
  10. --debug_mode()
  11.  
  12. level={
  13.    "####################",
  14.    "#osssssssssssssssso#",
  15.    "#s________________s#",
  16.    "#s____%%%%%%%%____s#",
  17.    "#s____%  a   %____s#",
  18.    "#s____%lxiixr%____s#",
  19.    "#s____% pggp %____s#",
  20.    "#s____% xiix %____s#",
  21.    "#s____%      %____s#",
  22.    "#s____%%%%%%%%____s#",
  23.    "#s________________s#",
  24.    "#osssssssssssssssso#",
  25.    "####################",
  26. }
  27.  
  28. cells={}
  29.  
  30. cells[" "] = cell{floor="fl-normal"}
  31. cells["_"] = cell{floor="fl-leaves"}
  32. cells["#"] = cell{floor="fl-water"}
  33. cells["s"] = cell{floor="fl-sand"}
  34. cells["%"] = cell{parent=cells[" "],stone="st-rock1"}
  35. cells["o"] = cell{parent={cells["s"],oxyd}}
  36.  
  37. cells["x"] = cell{parent=cells[" "],stone="st-swap"}
  38. cells["p"] = cell{parent=cells[" "],stone="st-pull"}
  39. cells["l"] = cell{parent=cells[" "],stone="st-rotator_move-left"}
  40. cells["r"] = cell{parent=cells[" "],stone="st-rotator_move-right"}
  41. cells["g"] = cell{parent=cells[" "],stone="st-grate1"}
  42. cells["i"] = cell{parent=cells[" "],stone="st-stoneimpulse_movable"}
  43.  
  44. cells["a"] = cell{parent=cells[" "],actor={"ac-blackball", {player=0}}}
  45.  
  46. rs_create_world(level,cells)
  47. oxyd_shuffle()
  48.  
  49. enigma.ConserveLevel=FALSE
  50.