home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / level8f.lua < prev    next >
Encoding:
Text File  |  2003-01-05  |  2.3 KB  |  66 lines
  1. -- Siegfried Fennig 03.01.2003 Rev. 0
  2.  
  3. create_world( 20, 13)
  4. draw_border("st-rock4")
  5. fill_floor("fl-himalaya", 0,0, level_width,level_height)
  6.  
  7. oxyd_default_flavor = "d"
  8.  
  9. oxyd( 1, 0)
  10. oxyd(12, 0)
  11. oxyd(18, 0)
  12. oxyd( 1,12)
  13. oxyd( 4,12)
  14. oxyd(18,12)
  15.  
  16. oxyd_shuffle()
  17.  
  18. fill_floor("fl-water", 4, 8, 1,1)
  19. fill_floor("fl-water", 8, 6, 1,1)
  20. fill_floor("fl-water",11, 4, 1,1)
  21. fill_floor("fl-water",13,10, 1,2)
  22. fill_floor("fl-water",14, 3, 1,1)
  23.  
  24. draw_stones( "st-stoneimpulse", { 2, 5}, {0,1}, 4)
  25. draw_stones( "st-stoneimpulse", { 2, 9}, {1,0}, 2)
  26. draw_stones( "st-stoneimpulse", { 4, 3}, {0,1}, 5)
  27. draw_stones( "st-stoneimpulse", { 4, 9}, {0,1}, 2)
  28. draw_stones( "st-stoneimpulse", { 6, 3}, {1,0}, 2)
  29. draw_stones( "st-stoneimpulse", { 6, 5}, {0,1}, 4)
  30. draw_stones( "st-stoneimpulse", { 6,10}, {0,1}, 2)
  31. draw_stones( "st-stoneimpulse", { 7,10}, {1,0}, 2)
  32. draw_stones( "st-stoneimpulse", { 8, 2}, {0,1}, 2)
  33. draw_stones( "st-stoneimpulse", { 8, 5}, {1,0}, 2)
  34. draw_stones( "st-stoneimpulse", { 8, 7}, {0,1}, 3)
  35. draw_stones( "st-stoneimpulse", {10, 7}, {1,0}, 4)
  36. draw_stones( "st-stoneimpulse", {10, 9}, {1,0}, 5)
  37. draw_stones( "st-stoneimpulse", {11, 1}, {0,1}, 3)
  38. draw_stones( "st-stoneimpulse", {13, 1}, {0,1}, 6)
  39. draw_stones( "st-stoneimpulse", {15, 4}, {0,1}, 5)
  40. draw_stones( "st-stoneimpulse", {17, 2}, {0,1},10)
  41. set_stones("st-stoneimpulse", {{2,1},{2,11},{6,1},{11,5}})
  42. draw_stones( "st-rock4", { 2, 3}, {1,0}, 2)
  43. set_stones("st-rock4", {{10,5},{12,10},{15,3},{15,9}})
  44. set_stones("st-wood", {{5,4},{8,4},{9,3},{10,2},{15,10}})
  45. set_stones("st-block", {{5,3},{12,4},{12,11},{14,4}})
  46.  
  47. set_stone("st-door", 1, 1, {name="door1", type="h"})
  48. set_item("it-trigger", 1, 9, {action="openclose", target="door1"})
  49. set_stone("st-door", 2, 2, {name="door2", type="v"})
  50. set_item("it-trigger",14, 8, {action="openclose", target="door2"})
  51. set_stone("st-door",18,11, {name="door3", type="h"})
  52. set_item("it-trigger",15,11, {action="callback", target="xx1"})
  53. set_floor("fl-bridge",16, 3, {name="bridge1", type="y"})
  54. set_floor("fl-bridge",18, 4, {name="bridge2", type="y"})
  55.  
  56. function xx1()
  57.        doora=enigma.GetNamedObject("door3")
  58.        bridgea=enigma.GetNamedObject("bridge1")
  59.        bridgeb=enigma.GetNamedObject("bridge2")
  60.        enigma.SendMessage(doora, "openclose", nil)
  61.        enigma.SendMessage(bridgea, "openclose", nil)
  62.        enigma.SendMessage(bridgeb, "openclose", nil)
  63. end
  64.  
  65. set_actor("ac-blackball", 3.5, 1.5, {player=0})
  66.