home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin13.lua < prev    next >
Text File  |  2003-01-05  |  1KB  |  56 lines
  1. -- created by Martin Hawlisch
  2.  
  3. levelw =  20
  4. levelh = 121
  5.  
  6. create_world( levelw, levelh)
  7.  
  8. fill_floor("fl-gray", 0,0,levelw,levelh)
  9. stone = "st-rock2"
  10.  
  11. draw_border( stone)
  12. oxyd(  2,72)
  13. oxyd(  4,93)
  14. oxyd( 14,40)
  15. oxyd( 17,58)
  16.  
  17. oxyd_shuffle()
  18.  
  19. set_stone( stone, 5, levelh-3)
  20. set_stone( stone,14, levelh-3)
  21.  
  22. oneway( 3, 1, enigma.WEST)
  23. oneway( 6, 1, enigma.WEST)
  24. oneway(13, 1, enigma.EAST)
  25. oneway(16, 1, enigma.EAST)
  26. oneway( 4, levelh-3, enigma.SOUTH)
  27. oneway( 3, levelh-2, enigma.EAST)
  28. oneway(15, levelh-3, enigma.SOUTH)
  29. oneway(16, levelh-2, enigma.WEST)
  30.  
  31. draw_stones( stone, { 3,2}, {0,1}, levelh-4)
  32. draw_stones( stone, { 6,2}, {0,1}, levelh-4)
  33. draw_stones( stone, {13,2}, {0,1}, levelh-4)
  34. draw_stones( stone, {16,2}, {0,1}, levelh-4)
  35.  
  36. set_stone( "st-death", 7, 10)
  37. set_stone( "st-death",12, 23)
  38. set_stone( "st-death", 7, 45)
  39. set_stone( "st-death",12, 57)
  40. set_stone( "st-death", 7, 71)
  41. set_stone( "st-death",12, 84)
  42. set_stone( "st-death", 7, 96)
  43.  
  44. set_item( "it-hollow", 9, 35)
  45. set_item( "it-hollow",11, 65)
  46. set_item( "it-hollow",10, 77)
  47. set_item( "it-hollow", 8, 90)
  48. set_item( "it-hill",  10,107)
  49. set_item( "it-hill",   8,117)
  50.  
  51.  
  52.  
  53. enigma.AddConstantForce(0,25)
  54. set_actor("ac-blackball", 9, levelh-2, {player=0})
  55.  
  56.