home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / level2d.lua < prev    next >
Text File  |  2003-01-05  |  7KB  |  228 lines
  1. levelw = 39
  2. levelh = 49
  3.  
  4. create_world(levelw, levelh)
  5. draw_border("st-greenbrown")
  6. fill_floor("fl-leaves", 0,0, level_width,level_height)
  7.  
  8. draw_stones("st-glass", {1,12},{1,0}, 18)
  9. draw_stones("st-glass", {1,24},{1,0}, 1)
  10. draw_stones("st-glass", {3,24},{1,0}, 16)
  11. draw_stones("st-greenbrown", {2,21}, {1,0}, 3)
  12. draw_stones("st-greenbrown", {2,15}, {0,1}, 6)
  13. draw_stones("st-greenbrown", {4,15}, {0,1}, 6)
  14. draw_stones("st-greenbrown", {14,20}, {1,0}, 5)
  15. draw_stones("st-greenbrown", {14,22}, {1,0}, 5)
  16. draw_stones("st-greenbrown", {14,14}, {1,0}, 4)
  17. draw_stones("st-greenbrown", {14,16}, {1,0}, 5)
  18. draw_stones("st-greenbrown", {14,15}, {0,1}, 1)
  19. set_stones("st-grate1", {{8,16},{8,18},{11,17},{11,18},{15,15},{18,14}})
  20. set_stones("st-greenbrown",  {{6,13},{6,15},{6,17},{6,19},{6,21},{6,23}})
  21. draw_stones("st-grate1",{10,16}, {1,0}, 4)
  22. draw_stones("st-grate1",{10,19}, {1,0}, 2)
  23. draw_stones("st-grate1",{13,19}, {1,0}, 5)
  24. draw_stones("st-grate1",{12,17}, {1,0}, 5)
  25. draw_stones("st-greenbrown", {2,46}, {1,0}, 16)
  26. draw_stones("st-greenbrown", {20,36}, {1,0}, 14)
  27. draw_stones("st-greenbrown", {35,36}, {1,0}, 3)
  28.  
  29. draw_stones("st-greenbrown", {2,26}, {0,1}, 17)
  30. draw_stones("st-greenbrown", {4,28}, {0,1}, 15)
  31. draw_stones("st-greenbrown", {7,27}, {0,1}, 19)
  32. draw_stones("st-greenbrown", {9,28}, {0,1}, 16)
  33. draw_stones("st-greenbrown", {11,28}, {0,1}, 14)
  34. draw_stones("st-greenbrown", {13,27}, {0,1}, 13)
  35. draw_stones("st-greenbrown", {13,44}, {0,1}, 2)
  36. draw_stones("st-greenbrown", {15,28}, {0,1}, 10)
  37. draw_stones("st-greenbrown", {17,27}, {0,1}, 9)
  38.  
  39. draw_stones("st-greenbrown", {3,26}, {1,0}, 15)
  40. draw_stones("st-greenbrown", {16,37}, {1,0}, 3)
  41. draw_stones("st-greenbrown", {14,39}, {1,0}, 4)
  42. draw_stones("st-greenbrown", {12,41}, {1,0}, 7)
  43. draw_stones("st-greenbrown", {10,43}, {1,0}, 4)
  44. draw_stones("st-greenbrown", {1,44}, {1,0}, 5)
  45. draw_stones("st-greenbrown", {5,42}, {1,0}, 2)
  46.  
  47. draw_stones("st-greenbrown", {20,24}, {1,0}, 3)
  48. draw_stones("st-greenbrown", {24,24}, {1,0}, 14)
  49.  
  50. draw_stones("st-brownie", {20,25}, {1,1}, 11)
  51. draw_stones("st-brownie", {22,25}, {1,1}, 11)
  52. draw_stones("st-brownie", {24,25}, {1,1}, 11)
  53. draw_stones("st-brownie", {26,25}, {1,1}, 11)
  54. draw_stones("st-brownie", {28,25}, {1,1}, 10)
  55. draw_stones("st-brownie", {30,25}, {1,1}, 8)
  56. draw_stones("st-brownie", {32,25}, {1,1}, 6)
  57. draw_stones("st-brownie", {34,25}, {1,1}, 4)
  58. draw_stones("st-brownie", {36,25}, {1,1}, 2)
  59. draw_stones("st-brownie", {20,27}, {1,1}, 9)
  60. draw_stones("st-brownie", {20,29}, {1,1}, 7)
  61. draw_stones("st-brownie", {20,31}, {1,1}, 5)
  62. draw_stones("st-brownie", {20,33}, {1,1}, 3)
  63. draw_stones("st-brownie", {20,35}, {1,1}, 1)
  64.  
  65. puzzle(13,13,PUZ_0110)
  66. puzzle(14,13,PUZ_0101)
  67. puzzle(15,13,PUZ_0101)
  68. puzzle(16,13,PUZ_0101)
  69. puzzle(17,13,PUZ_0101)
  70. puzzle(18,13,PUZ_0101)
  71. puzzle(20,13,PUZ_0101)
  72. puzzle(21,13,PUZ_0101)
  73. puzzle(22,13,PUZ_0101)
  74. puzzle(23,13,PUZ_0101)
  75. puzzle(24,13,PUZ_0001)
  76. puzzle(7,18,PUZ_0100)
  77. puzzle(13,14,PUZ_1001)
  78. puzzle(19,18,PUZ_0100)
  79. puzzle(20,18,PUZ_0001)
  80.  
  81. set_stones("st-brownie", {{21,18}})
  82.  
  83. set_stones("st-swap", {{17,17}})
  84. set_stone("st-shogun", 16,15,{holes=1})
  85. doorh(2,24, {name="door9"})
  86.  
  87. function sdot6()
  88.     doora=enigma.GetNamedObject("door9")
  89.     enigma.SendMessage(doora, "openclose", nil)
  90. end
  91.  
  92. shogundot1(15,15, {action="callback", target="sdot6"})
  93.  
  94. draw_stones("st-greenbrown", {19,1}, {0,1}, 12)
  95. draw_stones("st-greenbrown", {19,14}, {0,1}, 4)
  96. draw_stones("st-greenbrown", {19,19}, {0,1}, 28)
  97.  
  98. set_attrib(laser(12,5, TRUE, WEST), "name", "laser")
  99.  
  100. mirror3(7,5,0,1,1)
  101. mirror3(6,5,0,1,1)
  102. mirror3(5,5,0,1,1)
  103. mirror3(4,5,0,1,1)
  104. mirror3(3,5,0,1,1)
  105. mirror3(2,5,0,1,1)
  106. mirror3(1,5,0,1,1)
  107.  
  108. oxyd(18,21)
  109. oxyd(18,15)
  110. oxyd(6,41)
  111. oxyd(12,45)
  112. fakeoxyd(8,45)
  113. fakeoxyd(16,44)
  114. oxyd_shuffle()
  115.  
  116. shogundot3(5,35)
  117. shogundot1(14,33)
  118. shogundot3(18,42)
  119. shogundot2(12,47)
  120.  
  121. set_stone("st-shogun", 5,38,{holes=2})
  122. set_stone("st-shogun", 14,43,{holes=4})
  123. set_stone("st-shogun", 12,47,{holes=1})
  124.  
  125.  
  126. -- these are the doors that hold back the laser beam
  127. doorv(11,5, {name="door1"})
  128. doorv(10,5, {name="door2"})
  129. doorv(9,5,  {name="door3"})
  130. doorv(8,5,  {name="door4"})
  131.  
  132. function sdot1()
  133.     doora=enigma.GetNamedObject("door8")
  134.     enigma.SendMessage(doora, "openclose", nil)
  135. end
  136.  
  137. shogundot1(4,47, {action="callback", target="sdot1"})
  138. set_stone("st-shogun", 21,45,{holes=1})
  139.  
  140. fill_floor("fl-water", 21,44, 1,1)
  141. fill_floor("fl-water", 21,46, 1,1)
  142.  
  143. -- these are the doors that protect the oxyd stone on the first screen
  144. doorv(14,21,  {name="door5"})
  145. doorv(15,21,  {name="door6"})
  146. doorv(16,21,  {name="door7"})
  147. doorv(17,21,  {name="door8"})
  148.  
  149. function sdot2()
  150.     doora=enigma.GetNamedObject("door1")
  151.     enigma.SendMessage(doora, "open", nil)
  152.     doorb=enigma.GetNamedObject("door5")
  153.     enigma.SendMessage(doorb, "open", nil)
  154. end
  155.  
  156. shogundot3(3,19, {action="callback", target="sdot2"})
  157.  
  158. function sdot3()
  159.     doora=enigma.GetNamedObject("door2")
  160.     enigma.SendMessage(doora, "open", nil)
  161.     doorb=enigma.GetNamedObject("door6")
  162.     enigma.SendMessage(doorb, "open", nil)
  163. end
  164.  
  165. shogundot3(3,18, {action="callback", target="sdot3"})
  166.  
  167. function sdot4()
  168.     doora=enigma.GetNamedObject("door3")
  169.     enigma.SendMessage(doora, "open", nil)
  170.     doorb=enigma.GetNamedObject("door7")
  171.     enigma.SendMessage(doorb, "open", nil)
  172. end
  173.  
  174. shogundot3(3,17, {action="callback", target="sdot4"})
  175.  
  176. -- this topmost shogun dot unleashes the laser beam!
  177. shogundot3(3,16, {action="open", target="door4"})
  178.  
  179. set_stone("st-shogun", 8,15,{holes=2})
  180. set_stone("st-shogun", 7,16,{holes=4})
  181. set_stone("st-shogun", 9,16,{holes=5})
  182. set_stone("st-shogun", 8,17,{holes=6})
  183. set_stone("st-shogun", 10,17,{holes=3})
  184. set_stone("st-shogun", 9,18,{holes=5})
  185. set_stone("st-shogun", 8,19,{holes=2})
  186.  
  187. draw_stones("st-glass", {23,40},{1,0}, 11)
  188. draw_stones("st-glass", {35,40},{1,0}, 3)
  189. draw_stones("st-glass", {23,41},{0,1}, 1)
  190. draw_stones("st-glass", {23,43},{0,1}, 4)
  191.  
  192. oneway(23,42, enigma.WEST)
  193. oneway(34,40, enigma.SOUTH)
  194.  
  195. mirrorp(22,41,TRUE,FALSE, 1)
  196. mirrorp(29,47,0,0,4)
  197. mirror3(25,47,0,1,2)
  198.  
  199. set_attrib(laser(23,47, TRUE, EAST), "name", "laser1")
  200. set_stone("st-switch", 27,46, {action="onoff", target="laser1"})
  201.  
  202. fill_floor("fl-water", 24,41, 10,1)
  203. fill_floor("fl-water", 24,43, 10,3)
  204. fill_floor("fl-water", 35,41, 3,7)
  205. fill_floor("fl-water", 24,47, 11,1)
  206. fill_floor("fl-water", 35,37, 3,3)
  207. fill_floor("fl-water", 31,37, 3,1)
  208. fill_floor("fl-water", 24,39, 9,1)
  209. fill_floor("fl-water", 20,37, 1,6)
  210. fill_floor("fl-water", 21,37, 4,1)
  211.  
  212. draw_stones("st-glass", {20,12},{1,0}, 18)
  213.  
  214. draw_stones("st-greenbrown", {22,15}, {0,1}, 8)
  215. draw_stones("st-greenbrown", {21,16}, {0,1}, 1)
  216. draw_stones("st-greenbrown", {21,21}, {0,1}, 1)
  217. draw_stones("st-grate1",{23,20}, {1,0}, 7)
  218. draw_stones("st-grate1",{31,20}, {1,0}, 7)
  219. draw_stones("st-grate1",{30,15}, {1,0}, 5)
  220. draw_stones("st-grate1",{36,15}, {1,0}, 2)
  221. draw_stones("st-grate1",{30,16}, {0,1}, 4)
  222. draw_stones("st-grate1",{24,21}, {0,1}, 2)
  223.  
  224. set_stones("st-brownie", {{25,17}})
  225.  
  226. set_stones("st-swap", {{35,15}})
  227.  
  228. set_actor("ac-blackball", 13.5, 19.5, {player=0})