home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / level1c.lua < prev    next >
Encoding:
Text File  |  2003-01-05  |  1.3 KB  |  58 lines
  1. -- Siegfried Fennig
  2. levelw = 39
  3. levelh = 13
  4.  
  5. create_world(levelw, levelh)
  6.  
  7. draw_border("st-greenbrown")
  8.  
  9. fill_floor("fl-leaves", 0,0, level_width,level_height)
  10. fill_floor("fl-abyss", 2,2, 5,9)
  11. fill_floor("fl-abyss", 31,2, 5,9)
  12. fill_floor("fl-abyss", 8,2, 10,6)
  13. fill_floor("fl-abyss", 9,8, 6,3)
  14. fill_floor("fl-abyss", 16,9, 3,3)
  15. abyss(7,2)
  16.  
  17. set_actor("ac-blackball", 26,10, {player=0})
  18.  
  19. draw_stones("st-greenbrown", {23,7}, {1,0},7)
  20. draw_stones("st-greenbrown", {19,1}, {0,1},7)
  21. draw_stones("st-greenbrown", {19,9}, {0,1},3)
  22. draw_stones("st-grate1", {7,1}, {0,1} ,11)
  23.  
  24. set_stone("st-swap", 21,6)
  25. set_stone("st-swap", 22,7)
  26. set_stone("st-greenbrown", 20,7)
  27.  
  28. set_stones("st-grate1", {{20,6},{21,7},{22,6}})
  29. set_stone("st-glass", 19,2)
  30.  
  31. puzzle(10,8,PUZ_0100)
  32. puzzle(11,8,PUZ_0101)
  33. puzzle(12,8,PUZ_0101)
  34. puzzle(13,8,PUZ_0101)
  35. puzzle(14,8,PUZ_0101)
  36. puzzle(15,8,PUZ_0101)
  37. puzzle(16,8,PUZ_0101)
  38. puzzle(17,8,PUZ_0101)
  39. puzzle(18,8,PUZ_0101)
  40. puzzle(19,8,PUZ_0101)
  41. puzzle(28,9,PUZ_0011)
  42. puzzle(28,8,PUZ_1000)
  43. puzzle(24,4,PUZ_0101)
  44.  
  45. mirrorp(36,2,0,0,2)
  46.  
  47. set_attrib(laser(0,2, TRUE, EAST), "name", "laser")
  48. set_stone("st-switch", 8,8, {action="onoff", target="laser"})
  49.  
  50. oxyd(1,1)
  51. oxyd(37,11)
  52. oxyd(1,11)
  53. oxyd(37,1)
  54.  
  55. --document(7,3, "Mit F3 kann man neu beginnen")
  56. document(7,3, "Restart with F3...")
  57.  
  58.