home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / level2f.lua < prev    next >
Text File  |  2003-01-05  |  1KB  |  56 lines
  1. levelw = 20
  2. levelh = 13
  3.  
  4. create_world(levelw, levelh)
  5. draw_border("st-marble")
  6. fill_floor("fl-wood", 0,0, level_width,level_height)
  7.  
  8. oxyd(3,2)
  9. oxyd(8,3)
  10. oxyd(13,4)
  11. oxyd(16,3)
  12. oxyd(12,8)
  13. oxyd(8,6)
  14. oxyd(9,10)
  15. oxyd(18,11)
  16. oxyd_shuffle()
  17.  
  18. draw_stones("st-marble", {7,8}, {1,0},3)
  19. draw_stones("st-marble", {11,6}, {1,0},5)
  20. draw_stones("st-marble", {13,8}, {1,0},6)
  21. draw_stones("st-marble", {13,1}, {0,1},3)
  22. draw_stones("st-marble", {16,4}, {0,1},2)
  23. draw_stones("st-marble", {10,4}, {0,1},2)
  24. draw_stones("st-marble", {10,7}, {0,1},4)
  25. draw_stones("st-marble", {6,1}, {0,1},2)
  26. draw_stones("st-marble", {6,4}, {0,1},2)
  27. draw_stones("st-marble", {3,3}, {0,1},5)
  28. draw_stones("st-marble", {11,10}, {1,0},8)
  29. set_stones("st-marble", {{7,6},{9,3},{7,10}})
  30.  
  31. set_item("it-hollow", 2,9)
  32. set_item("it-hollow", 2,11)
  33. set_item("it-hollow", 3,11)
  34. set_item("it-hollow", 4,11)
  35. set_item("it-hollow", 5,11)
  36. set_item("it-hollow", 6,11)
  37. set_item("it-hollow", 7,11)
  38. set_item("it-hollow", 7,9)
  39.  
  40. oneway(3,9, enigma.EAST)
  41. oneway(4,9, enigma.EAST)
  42. oneway(5,9, enigma.EAST)
  43. oneway(6,9, enigma.EAST)
  44. oneway(1,10, enigma.NORTH)
  45.  
  46. draw_stones("st-death", {3,8}, {1,0},4)
  47. draw_stones("st-death", {2,10}, {1,0},5)
  48. set_stone("st-death", 6,3)
  49. set_stone("st-death", 6,6)
  50. set_stone("st-death", 10,3)
  51. set_stone("st-death", 10,6)
  52. set_stone("st-death", 16,6)
  53. set_stone("st-death", 9,9)
  54.  
  55. set_actor("ac-blackball", 18.5,9.5, {player=0})
  56.