home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin43.lua < prev    next >
Text File  |  2003-01-05  |  896b  |  42 lines
  1. -- created by Martin Hawlisch
  2.  
  3. create_world( 20, 13)
  4.  
  5. fill_floor( "fl-wood", 0, 0, 20, 13)
  6.  
  7. draw_border( "st-greenbrown")
  8.  
  9. function oxyd_base( color, x, y)
  10.     stone = format( "st-%s4", color)
  11.     set_stone( stone, x-1, y-1)
  12.     set_stone( stone, x,   y-1)
  13.     set_stone( stone, x+1, y-1)
  14.     set_stone( stone, x-1, y)
  15.     set_stone( stone, x+1, y)
  16.     set_stone( stone, x-1, y+1)
  17.     set_stone( stone, x,   y+1)
  18.     set_stone( stone, x+1, y+1)
  19.     oxyd( x, y)
  20. end
  21.  
  22. oxyd_default_flavor = "d"
  23.  
  24. oxyd_base( "white", 2, 2)
  25. oxyd_base( "white", 8, 2)
  26. oxyd_base( "black",11, 2)
  27. oxyd_base( "black",17, 2)
  28. oxyd_base( "black", 5, 6)
  29. oxyd_base( "white",14, 6)
  30. oxyd_base( "black", 2,10)
  31. oxyd_base( "black", 8,10)
  32. oxyd_base( "white",11,10)
  33. oxyd_base( "white",17,10)
  34.  
  35. oxyd_shuffle()
  36.  
  37. set_item("it-yinyang", 8,6)
  38. set_item("it-yinyang", 11,6)
  39.  
  40. set_actor("ac-blackball", 11.5, 6.5, {player=0})
  41. set_actor("ac-whiteball",  8.5, 6.5, {player=1})
  42.