home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / level9d.lua < prev    next >
Text File  |  2003-01-09  |  1KB  |  56 lines
  1. -- Siegfried Fennig 08.01.2003 Rev. 0
  2.  
  3. levelw = 20
  4. levelh = 13
  5.  
  6. create_world(levelw, levelh)
  7. draw_border("st-rock1")
  8.  
  9. oxyd(18, 2)
  10. oxyd(18,10)
  11. oxyd(14, 1)
  12. oxyd(14,11)
  13.  
  14. oxyd_shuffle()
  15.  
  16. fill_floor("fl-sahara", 0, 0, 10,level_height)
  17. fill_floor("fl-water",10, 0, 10,level_height)
  18. fill_floor("fl-samba", 15, 3, 3, 1)
  19. fill_floor("fl-samba", 15, 9, 3, 1)
  20. fill_floor("fl-samba", 17, 6, 2, 1)
  21. fill_floor("fl-samba", 18, 3, 1, 2)
  22. fill_floor("fl-samba", 18, 8, 1, 2)
  23. fill_floor("fl-samba", 13, 1, 1, 1)
  24. fill_floor("fl-samba", 14, 2, 1, 1)
  25. fill_floor("fl-samba", 13,11, 1, 1)
  26. fill_floor("fl-samba", 14,10, 1, 1)
  27.  
  28. draw_stones("st-block",  { 8, 2}, {0,1}, 9)
  29. draw_stones("st-grate1", { 1, 1}, {1,0},13)
  30. draw_stones("st-grate1", { 1,11}, {1,0},13)
  31. draw_stones("st-grate1", {18, 3}, {0,1}, 7)
  32. draw_stones("st-grate1", {15, 1}, {1,0}, 4)
  33. draw_stones("st-grate1", {15,11}, {1,0}, 4)
  34. draw_stones("st-grate1", { 1, 2}, {0,1}, 9)
  35. draw_stones("st-grate1", { 9, 2}, {0,1}, 4)
  36. draw_stones("st-grate1", { 9, 7}, {0,1}, 4)
  37. draw_stones("st-rock1",  { 3, 4}, {0,1}, 5)
  38. set_stones("st-rock1", {{4,4},{4,8}})
  39. set_stones("st-block", {{4,6}})
  40.  
  41. puzzle( 3, 3,PUZ_0100)
  42. puzzle( 4, 3,PUZ_0101)
  43. puzzle( 5, 3,PUZ_0101)
  44. puzzle( 6, 3,PUZ_0001)
  45. puzzle( 3, 9,PUZ_0100)
  46. puzzle( 4, 9,PUZ_0101)
  47. puzzle( 5, 9,PUZ_0101)
  48. puzzle( 6, 9,PUZ_0001)
  49.  
  50. set_item("it-seed", 1, 1)
  51. set_item("it-seed", 1,11)
  52.  
  53. set_item("it-spring1",17, 6)
  54.  
  55. set_actor("ac-blackball", 5.5,6.5 ,{player=0})
  56.