home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / test.lua < prev    next >
Encoding:
Text File  |  2003-10-11  |  3.9 KB  |  147 lines
  1. levelw = 39
  2. levelh = 37
  3.  
  4. -- create a new level and set some general options
  5. create_world(levelw, levelh)
  6. oxyd(8,3)
  7. oxyd(11,1)
  8. oxyd(3,1)
  9. oxyd(12,20)
  10. oxyd_shuffle()
  11.  
  12. fill_floor("fl-samba", 0,0, levelw,levelh)
  13. draw_border("st-brownie")
  14.  
  15. set_stone("st-bolder", 1, 3, {direction=EAST})
  16. set_stone("st-bolder", 2, 3, {direction=EAST})
  17. set_stone("st-blocker", 3, 3, {name="blocker1"})
  18.  
  19. set_stone("st-switch", 1,5, {action="callback", target="bl1"})
  20.  
  21. function bl1()
  22.         b1=enigma.GetNamedObject("blocker1")
  23.         enigma.SendMessage(b1, "trigger", nil)
  24. end
  25.  
  26. set_stone("st-bolder",18, 3, {direction=WEST})
  27. set_stone("st-bolder",17, 3, {direction=WEST})
  28. set_stone("st-blocker",10, 3)
  29. set_item("it-blocker", 8, 4, {name="blocker2"})
  30.  
  31. set_stone("st-switch", 8, 6, {action="callback", target="bl2"})
  32.  
  33. function bl2()
  34.         b1=enigma.GetNamedObject("blocker2")
  35.         enigma.SendMessage(b1, "signal", nil)
  36. end
  37.  
  38. set_stone("st-bolder", 1, 9, {direction=EAST})
  39. set_stone("st-rock4", 2, 9)
  40. set_stone("st-stoneimpulse", 1, 10)
  41. set_stone("st-blocker", 2, 8)
  42.  
  43. set_stone ("st-mail-n", 4, 20)
  44. set_stone ("st-mail-e", 5, 21)
  45. set_stone ("st-mail-s", 6, 22)
  46. set_stone ("st-mail-w", 7, 23)
  47.  
  48. set_item ("it-pipe-h", 10, 21)
  49. set_item ("it-pipe-h", 11, 21)
  50. set_item ("it-pipe-v", 12, 21)
  51. set_item ("it-pipe-ne", 13, 21)
  52. set_item ("it-pipe-es", 14, 21)
  53. set_item ("it-pipe-sw", 15, 21)
  54. -- set_item("it-spring1", 2,5);
  55. -- set_item("it-spring2", 2,6);
  56.  
  57. set_stone("st-switch", 1,15, {action="onoff", target="laser"})
  58. set_attrib(laser(1,14, FALSE, EAST), "name", "laser")
  59. --fill_floor("fl-abyss", 3,4, 2 ,1)
  60.  
  61. --set_item("it-blackbomb",9,4)
  62. --set_item("it-blackbomb",10,4)
  63. --set_item("it-blackbomb",11,4)
  64. --set_item("it-hammer",12,4)
  65. --set_stone("st-magic", 1,1)
  66. --dynamite(9,5)
  67.  
  68. --set_item("it-hollow",10,5)
  69. set_item("it-seed", 5,14)
  70. --set_item("it-seed", 6,7)
  71. --set_item("it-seed", 6,8)
  72.  
  73. --set_stone("st-grate1", 6,10)
  74.  
  75. --for i=1,10 do
  76. --    set_item("it-pipe", 6+i,7, {type=i})
  77. --end
  78.  
  79. --set_attrib (mirrorp ( 5, 4, 1, 0,1), "name", "mirror01")
  80.  
  81. --set_stone("st-fourswitch", 7,5, {action="callback", target="ms1"})
  82.  
  83. -- function ms1()
  84. --        mir1=enigma.GetNamedObject("mirror01")
  85. --        enigma.SendMessage(mir1, "trigger", nil)
  86. -- end
  87.  
  88. -- set_item("it-wormhole", 20,14, {targetx="25", targety="20"})
  89.  
  90. set_stone("st-scissors", 17,10)
  91. set_stone("st-rubberband", 10,10)
  92. set_stone("st-rubberband", 12,12)
  93. set_stone("st-rubberband", 14,14)
  94. set_item("it-magicwand", 10,9)
  95.  
  96. set_item("it-flagwhite", 10,8)
  97.  
  98. -- set_item("it-puller", 10,21, {orientation=NORTH})
  99. -- set_item("it-puller", 11,21, {orientation=EAST})
  100. -- set_item("it-puller", 12,21, {orientation=SOUTH})
  101. -- set_item("it-puller", 13,21, {orientation=WEST})
  102.  
  103. local ac=set_actor("ac-blackball", 3.5,16.5, {player=0})
  104. local st=set_stone("st-brownie", 10,6)
  105. --AddRubberBand(ac, st)
  106.  
  107. set_stone("st-rotator-left", 20,20)
  108. set_stone("st-rotator-right", 20, 22)
  109.  
  110. set_actor("ac-top", 10,10)
  111.  
  112. set_item("it-glasses", 5, 27)
  113. set_item("it-glasses", 5, 28)
  114. set_stone("st-marble_hole", 4, 29)
  115. set_stone("st-rock1_hole", 5, 29)
  116. set_stone("st-rock2_hole", 6, 29)
  117. set_stone("st-rock3_hole", 4, 30)
  118. set_item("it-glasses", 5, 30)
  119. set_stone("st-greenbrown_hole", 6, 30)
  120. set_stone("st-bluegray_hole", 4, 31)
  121. set_stone("st-grate1", 5, 31)
  122. set_stone("st-grate2", 6, 31)
  123.  
  124. set_stone("st-death_invisible", 7, 29)
  125. set_stone("st-death_invisible", 7, 30)
  126. set_stone("st-death_invisible", 7, 31)
  127.  
  128.  
  129. set_item("it-seed", 10, 30)
  130. set_item("it-seed_wood", 11, 30)
  131. set_item("it-seed_nowood", 12, 30)
  132. set_item("it-seed_volcano", 13, 30)
  133.  
  134.  
  135. set_stone("st-switch", 19, 24, {action="trigger", target="burnable1"})
  136. set_item("it-brush", 18, 21)
  137. fill_items( "it-burnable", 20, 25, 10, 10)
  138. set_item( "it-extinguisher", 18, 25)
  139. set_item("it-burnable", 19, 27, {name="burnable1"})
  140. set_item("it-dynamite", 22, 27)
  141. set_item("it-blackbomb", 25, 27)
  142. set_item("it-blackbomb", 28, 27)
  143. document(22,32,"Burn me")
  144. set_item("it-extinguisher", 24, 32)
  145.  
  146. display.SetFollowMode(display.FOLLOW_SCROLLING)
  147.