home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / level9c.lua < prev    next >
Encoding:
Text File  |  2003-01-06  |  5.0 KB  |  143 lines
  1. -- Siegfried Fennig 05.01.2003 Rev. 0
  2.  
  3. levelw = 58
  4. levelh = 37
  5.  
  6. create_world(levelw, levelh)
  7. draw_border( "st-greenbrown")
  8. fill_floor("fl-abyss", 0,0, levelw,levelh)
  9.  
  10. oxyd_default_flavor = "d"
  11.  
  12. oxyd ( 7, 5)
  13. oxyd ( 7,30)
  14. oxyd (13,10)
  15. oxyd (22,14)
  16. oxyd (27,14)
  17. oxyd (22,17)
  18. oxyd (27,17)
  19. oxyd (53,30)
  20.  
  21. oxyd_shuffle()
  22.  
  23. fill_floor("fl-metal",  6, 8,  3, 7)
  24. fill_floor("fl-metal",  2,15, 16, 3)
  25. fill_floor("fl-metal", 12, 7,  3, 1)
  26. fill_floor("fl-metal",  2,18,  2,13)
  27. fill_floor("fl-normal", 4,30,  1, 1)
  28. fill_floor("fl-metal", 13,13,  1,2)
  29. fill_floor("fl-metal", 17,16,  3,1)
  30. fill_floor("fl-normal", 51, 2, 5,24)
  31. fill_floor("fl-normal", 53,26, 1, 2)
  32. fill_floor("fl-normal", 10,29, 8, 1)
  33. fill_floor("fl-normal", 10,31, 8, 1)
  34. fill_floor("fl-normal", 37, 2,14, 3)
  35. fill_floor("fl-normal", 37, 5, 2, 2)
  36. fill_floor("fl-metal", 38, 8, 11,19)
  37. fill_floor("fl-normal", 43, 6, 1, 2)
  38. fill_floor("fl-normal", 43,27, 1, 3)
  39. fill_floor("fl-normal", 27,29, 6, 1)
  40. fill_floor("fl-normal", 27,31, 6, 1)
  41. fill_floor("fl-metal", 10,30, 41, 1)
  42. fill_floor("fl-metal", 10, 4,  8, 3)
  43. fill_floor("fl-metal", 27, 4, 10, 3)
  44.  
  45. set_stone( "st-actorimpulse",24,15)
  46. set_stone( "st-actorimpulse",25,15)
  47. set_stone( "st-actorimpulse",24,16)
  48. set_stone( "st-actorimpulse",25,16)
  49.  
  50. draw_stones( "st-grate1", {33,30}, {1,0},17)
  51. draw_stones( "st-grate1", {43,27}, {0,1}, 3)
  52. draw_stones( "st-grate2", {18,16}, {1,0}, 1)
  53.  
  54. draw_stones( "st-rock6", {33,29}, {1,0},10)
  55. draw_stones( "st-rock6", {44,29}, {1,0}, 7)
  56. draw_stones( "st-rock6", {33,31}, {1,0},18)
  57. draw_stones( "st-rock6", {12,13}, {0,1}, 2)
  58. draw_stones( "st-rock6", {14,13}, {0,1}, 2)
  59. draw_stones( "st-rock6", {38, 8}, {0,1},19)
  60. draw_stones( "st-rock6", {48, 8}, {0,1},19)
  61. draw_stones( "st-rock6", {40,10}, {0,1},15)
  62. draw_stones( "st-rock6", {46,10}, {0,1},15)
  63. draw_stones( "st-rock6", {42,12}, {0,1},11)
  64. draw_stones( "st-rock6", {44,12}, {0,1},11)
  65. draw_stones( "st-rock6", {42,26}, {0,1}, 3)
  66. draw_stones( "st-rock6", {44,26}, {0,1}, 3)
  67. draw_stones( "st-rock6", {39, 8}, {1,0}, 4)
  68. draw_stones( "st-rock6", {44, 8}, {1,0}, 4)
  69. draw_stones( "st-rock6", {39,26}, {1,0}, 3)
  70. draw_stones( "st-rock6", {45,26}, {1,0}, 3)
  71. draw_stones( "st-rock6", {41,10}, {1,0}, 2)
  72. draw_stones( "st-rock6", {44,10}, {1,0}, 2)
  73. draw_stones( "st-rock6", {41,24}, {1,0}, 2)
  74. draw_stones( "st-rock6", {44,24}, {1,0}, 2)
  75. draw_stones( "st-greenbrown_hole", {51, 8}, {0,1}, 13)
  76. draw_stones( "st-greenbrown_hole", {52, 8}, {0,1}, 13)
  77. draw_stones( "st-greenbrown_hole", {53, 8}, {0,1}, 13)
  78. draw_stones( "st-greenbrown_hole", {54, 8}, {0,1}, 13)
  79. draw_stones( "st-greenbrown_hole", {55, 8}, {0,1}, 13)
  80.  
  81. set_stone("st-oneway",10, 5, {orientation=enigma.EAST})
  82. set_stone("st-oneway",13,13, {orientation=enigma.SOUTH})
  83. set_stone("st-oneway",13,14, {orientation=enigma.SOUTH})
  84. set_stone("st-oneway",39,16, {orientation=enigma.SOUTH})
  85. set_stone("st-oneway",41,16, {orientation=enigma.SOUTH})
  86. set_stone("st-oneway",43,16, {orientation=enigma.SOUTH})
  87. set_stone("st-oneway",45,16, {orientation=enigma.SOUTH})
  88. set_stone("st-oneway",47,16, {orientation=enigma.SOUTH})
  89. set_stone("st-oneway",53,26, {orientation=enigma.SOUTH})
  90. set_stone("st-oneway",50,30, {orientation=enigma.WEST})
  91.  
  92. function basis1( x, y)
  93.        draw_floor("fl-gradient", {x-1,y}, {0,1}, 3, {type=3})
  94.        draw_floor("fl-gradient", {x,y-1}, {1,0}, 3, {type=1})
  95.        draw_floor("fl-gradient", {x+3,y}, {0,1}, 3, {type=4})
  96.        set_floor("fl-gradient",   x-1, y-1,         {type=5})
  97.        set_floor("fl-gradient",   x+3, y-1,         {type=6})
  98.        set_floor("fl-gradient",   x-1, y+3,         {type=7})
  99.        set_floor("fl-gradient",   x+3, y+3,         {type=8})
  100.        draw_floor("fl-gradient", {x,y+3}, {1,0}, 3, {type=2})
  101.        fill_floor("fl-normal",    x,y, 3, 3)
  102. end
  103.  
  104. basis1 ( 6, 4)
  105. basis1 ( 6,29)
  106. basis1 (12, 9)
  107. basis1 (52,29)
  108.  
  109. function basis2( x, y)
  110.        draw_floor("fl-gradient", {x-1,y}, {0,1}, 6, {type=3})
  111.        draw_floor("fl-gradient", {x,y-1}, {1,0}, 8, {type=1})
  112.        draw_floor("fl-gradient", {x+8,y}, {0,1}, 6, {type=4})
  113.        set_floor("fl-gradient",   x-1, y-1,         {type=5})
  114.        set_floor("fl-gradient",   x+8, y-1,         {type=6})
  115.        set_floor("fl-gradient",   x-1, y+6,         {type=7})
  116.        set_floor("fl-gradient",   x+8, y+6,         {type=8})
  117.        draw_floor("fl-gradient", {x,y+6}, {1,0}, 8, {type=2})
  118.        fill_floor("fl-normal",    x,y, 8, 6)
  119. end
  120.  
  121. basis2 (21,13)
  122.  
  123. function basis3( x, y)
  124.        draw_floor("fl-gradient", {x-1,y}, {0,1}, 3, {type=4})
  125.        draw_floor("fl-gradient", {x,y-1}, {1,0}, 7, {type=2})
  126.        draw_floor("fl-gradient", {x+7,y}, {0,1}, 3, {type=3})
  127.        set_floor("fl-gradient",   x-1, y-1,         {type=12})
  128.        set_floor("fl-gradient",   x+7, y-1,         {type=10})
  129.        set_floor("fl-gradient",   x-1, y+3,         {type=11})
  130.        set_floor("fl-gradient",   x+7, y+3,         {type=9})
  131.        draw_floor("fl-gradient", {x,y+3}, {1,0}, 7, {type=1})
  132.        fill_floor("fl-ice_001",   x,y, 7, 3)
  133. end
  134.  
  135. basis3 (19, 4)
  136.  
  137. set_item( "it-spring2", 37, 5)
  138. set_item( "it-spring2", 43, 6)
  139.  
  140. document(43,26, " ")
  141.  
  142. set_actor("ac-blackball",55.5,32.5,{player=0})
  143.