home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin65.lua < prev    next >
Encoding:
Text File  |  2003-01-05  |  1.1 KB  |  54 lines
  1. -- created by Martin Hawlisch
  2.  
  3. create_world( 39, 13)
  4. oxyd_default_flavor = "d"
  5.  
  6. fill_floor( "fl-wood")
  7.  
  8. stone = "st-rock3"
  9.  
  10. draw_border( stone)
  11.  
  12. draw_stones( stone, {19, 1}, {0,1}, 11)
  13.  
  14. function oxbase1( x, y, a, b)
  15.     oxyd( x, y)
  16.     draw_stones( stone, {x-2,y-1}, {1,0}, 4)
  17.     draw_stones( stone, {x-2,y+1}, {1,0}, 4)
  18.     set_stone( stone, x+1, y)
  19.     doorv(x-1,y, {name="door"..a})
  20.     set_item("it-trigger", x-2,y, {invisible=1, action="open", target="door"..b})
  21. end
  22.  
  23. function oxbase2( x, y, a, b)
  24.     oxyd( x, y)
  25.     draw_stones( stone, {x-1,y-1}, {1,0}, 4)
  26.     draw_stones( stone, {x-1,y+1}, {1,0}, 4)
  27.     set_stone( stone, x-1, y)
  28.     doorv(x+1,y, {name="door"..a})
  29.     set_item("it-trigger", x+2, y, {invisible=1, action="open", target="door"..b})
  30. end
  31.  
  32.  
  33. oxbase1( 7, 4, 1, 5)
  34. oxbase1( 7, 8, 2, 6)
  35. oxbase2(11, 4, 3, 7)
  36. oxbase2(11, 8, 4, 8)
  37. oxbase1(26, 4, 5, 1)
  38. oxbase1(26, 8, 6, 2)
  39. oxbase2(30, 4, 7, 3)
  40. oxbase2(30, 8, 8, 4)
  41.  
  42. oxyd(17, 4)
  43. oxyd(17, 8)
  44. oxyd(36, 4)
  45. oxyd(36, 8)
  46.  
  47. oxyd_shuffle()
  48.  
  49. set_item( "it-yinyang", 9, 6)
  50. set_item( "it-yinyang",28, 6)
  51. set_actor("ac-blackball", 9.5, 6.5, {player=0})
  52. set_actor("ac-whiteball",28.5, 6.5, {player=1})
  53.  
  54.