home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / christophanita_runningstone.lua < prev    next >
Encoding:
Text File  |  2003-01-30  |  3.4 KB  |  95 lines
  1. create_world(20,25)
  2. fill_floor("fl-bluegreen", 0,0, level_width, level_height)
  3. draw_border("st-greenbrown")
  4.  
  5. -- floors
  6. fill_floor("fl-leaves",      1,  1, 18,  3)
  7. fill_floor("fl-water",      14,  1,  5,  5)
  8. fill_floor("fl-leaves",     16,  2,  2,  2)
  9. fill_floor("fl-water",       1, 13, 12, 11)
  10. fill_floor("fl-hay",         1,  5, 14,  7)
  11. draw_floor("fl-gradient", { 15,  5}, {1, 0}, 4, {type=1})
  12. draw_floor("fl-gradient", { 15,  6}, {1, 0}, 4, {type=2})
  13. draw_floor("fl-gradient", { 15,  7}, {1, 0}, 4, {type=2})
  14. draw_floor("fl-gradient", { 15,  8}, {1, 0}, 4, {type=2})
  15. draw_floor("fl-gradient", { 15,  9}, {1, 0}, 4, {type=2})
  16. draw_floor("fl-gradient", { 15, 10}, {1, 0}, 4, {type=2})
  17. draw_floor("fl-gradient", { 15, 11}, {1, 0}, 4, {type=2})
  18. fill_floor("fl-water",       1, 13, 12, 11)
  19. fill_floor("fl-dunes",       4, 17,  5,  5)
  20. fill_floor("fl-sand",       13, 13,  6, 11)
  21. fill_floor("fl-water",      13, 21,  1,  2)
  22. fill_floor("fl-sand",        4, 13,  9,  2)
  23. fill_floor("fl-sand",        4, 15,  2,  2)
  24.  
  25. -- general walls
  26. draw_stones("st-brick",      {  1,  4}, {1, 0}, 13)
  27. draw_stones("st-greenbrown", {  1, 12}, {1, 0}, 18)
  28. draw_stones("st-greenbrown", { 14,  5}, {0, 1}, 13)
  29. enigma.KillStone(14, 8)
  30. draw_stones("st-greenbrown", { 17, 17}, {1, 0},  2)
  31. draw_stones("st-glass",      { 14, 21}, {1, 0},  5)
  32. draw_stones("st-glass",      { 14, 22}, {0, 1},  2)
  33.  
  34. -- labirynth
  35. draw_stones("st-greenbrown", {  1,  6}, {1, 0}, 12)
  36. set_stone("st-greenbrown",      2,  7)
  37. set_stone("st-greenbrown",      7,  8)
  38. set_stone("st-greenbrown",      5,  9)
  39. draw_stones("st-greenbrown", {  2,  8}, {1, 0},  4)
  40. draw_stones("st-greenbrown", {  5, 10}, {1, 0},  3)
  41. draw_stones("st-greenbrown", {  7,  9}, {1, 0},  3)
  42. draw_stones("st-greenbrown", { 10,  8}, {0, 1},  3)
  43. draw_stones("st-greenbrown", { 12,  8}, {0, 1},  3)
  44. set_stone("st-greenbrown",     11,  8)
  45. draw_stones("st-greenbrown", {  1, 10}, {1, 0},  3)
  46. draw_stones("st-greenbrown", {  1, 11}, {1, 0},  2)
  47.  
  48. -- functional walls
  49. set_stone("st-fart",             2,  1)
  50. set_stone("st-bolder",           1,  2, {direction=EAST})
  51. set_stone("st-greenbrown_move",  2,  2)
  52. set_stone("st-greenbrown_move",  7,  2)
  53. set_stone("st-greenbrown_move", 12,  2)
  54. set_stone("st-key_a",            3,  4, {action="open", target="door1"})
  55. doorh(4, 4, {name="door1"})
  56. set_stone("st-invisible",        5,  5)
  57. set_stone("st-greenbrown_hole",  2,  6)
  58. set_stone("st-greenbrown_move",  4, 11)
  59. set_stone("st-greenbrown_hole",  7, 11)
  60. set_stone("st-greenbrown_hole", 16, 12)
  61. set_stone("st-laser",           13, 13, {dir=SOUTH, name="laser1", on=0})
  62. draw_stones("st-death",       { 16, 15}, {1, 0},  2)
  63. set_stone("st-switch",          18, 15, {action="onoff", target="laser1"})
  64. doorv(16, 16, {name="door2"})
  65. set_stone("st-key_b",           16, 17, {action="open", target="door2"})
  66. mirrorp(13, 23, FALSE, FALSE, 2)
  67.  
  68. -- items
  69. set_item("it-trigger",          3, 11, {action="callback", target="kill_stone"})
  70. set_item("it-key_b",            1,  3)
  71. set_item("it-key_a",            4, 20)
  72. set_item("it-hammer",           8, 20)
  73. set_item("it-spring2",         11,  9)
  74.  
  75. -- oxyds
  76. oxyd( 17,  2)
  77. oxyd( 18,  7)
  78. oxyd(  8, 10)
  79. oxyd( 18, 14)
  80. oxyd(  6, 19)
  81. oxyd( 18, 19)
  82. oxyd(  4, 23)
  83. oxyd( 15, 23)
  84. oxyd_shuffle()
  85. set_actor("ac-blackball", 14.5, 8.5, {player=0})
  86.  
  87. -- documents
  88. document(4,2, "A hammer destroys some black stones.")
  89. document(8,11, "Watch out for a disappearing stone.")
  90.  
  91. -- functions
  92. function kill_stone()
  93.     enigma.KillStone(2, 7)
  94. end
  95.