home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin61.lua < prev    next >
Encoding:
Text File  |  2003-01-05  |  1.1 KB  |  53 lines
  1. -- created by Martin Hawlisch
  2.  
  3. create_world( 20, 13)
  4. oxyd_default_flavor = "b"
  5.  
  6. draw_checkerboard_floor( "fl-normal", "fl-metal", 0, 0, 20, 13)
  7. draw_border("st-fakeoxyd")
  8.  
  9. draw_stones("st-fakeoxyd", { 2,1}, {0,1}, 5)
  10. draw_stones("st-fakeoxyd", {17,1}, {0,1}, 5)
  11. draw_stones("st-fakeoxyd", { 2,7}, {0,1}, 5)
  12. draw_stones("st-fakeoxyd", {17,7}, {0,1}, 5)
  13.  
  14. draw_stones("st-fakeoxyd", {15,1}, {0,1}, 2)
  15.  
  16. set_stone( "st-fakeoxyd", 5, 6)
  17. set_stone( "st-fakeoxyd",14, 6)
  18.  
  19. doorv( 2,6, {name="door1"})
  20. doorv(17,6, {name="door2"})
  21.  
  22. set_stone( "st-laserswitch",  5, 0, {action="openclose", target="door2"})
  23. set_stone( "st-laserswitch", 14,12, {action="openclose", target="door1"})
  24.  
  25. laser( 5,12, 1, NORTH)
  26. laser(14, 0, 1, SOUTH)
  27.  
  28. mirrorp( 5, 5, 0, 0, 1)
  29. mirrorp( 5, 7, 0, 0, 1)
  30. mirror3( 9, 5, 0, 0, 1)
  31. mirror3( 9, 6, 0, 0, 4)
  32. mirror3( 9, 7, 0, 0, 3)
  33. mirror3(10, 5, 0, 0, 1)
  34. mirror3(10, 6, 0, 0, 2)
  35. mirror3(10, 7, 0, 0, 3)
  36. mirrorp(14, 5, 0, 0, 1)
  37. mirrorp(14, 7, 0, 0, 1)
  38.  
  39.  
  40. oxyd( 0, 4)
  41. oxyd( 0, 8)
  42. oxyd(19, 4)
  43. oxyd(19, 8)
  44. oxyd( 9, 0)
  45. oxyd(10, 0)
  46. oxyd( 9,12)
  47. oxyd(10,12)
  48.  
  49. oxyd_shuffle()
  50.  
  51. set_actor("ac-blackball", 16.5, 1.5, {player=0})
  52.  
  53.