home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / mirrors.lua < prev    next >
Text File  |  2003-01-05  |  2KB  |  80 lines
  1. levelw = 20
  2. levelh = 13
  3.  
  4. create_world(levelw, levelh)
  5. draw_border("st-glass")
  6. fill_floor("fl-gray", 0,0, level_width,level_height)
  7. -- draw_stones("st-glass", {1,1}, {1,0}, level_width-2)
  8. -- draw_stones("st-glass", {1,1}, {0,1}, level_height-2)
  9. -- draw_stones("st-glass", {1,levelh-2},{1,0}, levelw-2)
  10. -- draw_stones("st-glass", {levelw-2,1},{0,1}, levelh-2)
  11.  
  12. draw_stones("st-glass", {1,5},{1,0},4)
  13. draw_stones("st-glass", {1,7},{1,0},4)
  14. doorv(1,6, {name="door1"})
  15. doorv(2,6, {name="door2"})
  16. doorv(3,6, {name="door3"})
  17. doorv(4,6, {name="door4"})
  18.  
  19.  
  20. function sdot1()
  21.     doora=enigma.GetNamedObject("door1")
  22.     doorb=enigma.GetNamedObject("door3")
  23.     enigma.SendMessage(doora, "openclose", nil)
  24.     enigma.SendMessage(doorb, "openclose", nil)
  25. end
  26. function sdot2()
  27.     doora=enigma.GetNamedObject("door1")
  28.     doorb=enigma.GetNamedObject("door2")
  29. --    enigma.SendMessage(doora, "openclose", nil)
  30.     enigma.SendMessage(doorb, "openclose", nil)
  31. end
  32. function sdot3()
  33.     doora=enigma.GetNamedObject("door1")
  34.     doorb=enigma.GetNamedObject("door4")
  35.     enigma.SendMessage(doora, "openclose", nil)
  36.     enigma.SendMessage(doorb, "openclose", nil)
  37. end
  38. function sdot4()
  39.     doora=enigma.GetNamedObject("door3")
  40.     doorb=enigma.GetNamedObject("door4")
  41.     enigma.SendMessage(doora, "openclose", nil)
  42.     enigma.SendMessage(doorb, "openclose", nil)
  43. end
  44.  
  45. shogundot1(10,8, {action="callback", target="sdot1"})
  46. shogundot1(7,4, {action="callback", target="sdot2"})
  47. shogundot1(7,8, {action="open", target="door2"})
  48. shogundot1(13,4, {action="close", target="door4"})
  49. shogundot1(13,8, {action="callback", target="sdot3"})
  50. shogundot1(10,4, {action="callback", target="sdot4"})
  51.  
  52. set_stone("st-shogun", 7,6)
  53. set_stone("st-shogun", 10,6)
  54. set_stone("st-shogun", 13,6)
  55.  
  56. mirrorp(16,6,0,0,3)
  57. mirror3(16,5,0,1,3)
  58. mirror3(16,7,0,1,1)
  59.  
  60. mirrorp(19,1,0,0,2)
  61. mirrorp(19,11,0,0,4)
  62. mirrorp(0,1,0,0,4)
  63. mirrorp(0,5,0,0,2)
  64. mirrorp(0,7,0,0,4)
  65. mirrorp(0,11,0,0,2)
  66.  
  67. mirrorp(19,11,0,0,4)
  68.  
  69. laser(0,6, TRUE, EAST)
  70.  
  71.  
  72. oxyd(0,0)
  73. oxyd(level_width-1,level_height-1)
  74. oxyd(level_width-1, 0)
  75. oxyd(0,level_height-1)
  76. --oxyd_shuffle()
  77.  
  78. set_actor("ac-blackball", 10,8.5, {player=0})
  79.  
  80.