home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / level8a.lua < prev    next >
Encoding:
Text File  |  2003-01-05  |  1.6 KB  |  57 lines
  1. -- Siegfried Fennig 25.12.2002 Rev. 0
  2.  
  3. levelw = 20
  4. levelh = 13
  5.  
  6. create_world(levelw, levelh)
  7. draw_border("st-rock4")
  8. fill_floor("fl-tigris", 0,0, level_width,level_height)
  9.  
  10. oxyd_default_flavor = "d"
  11.  
  12. oxyd ( 19, 1)
  13. oxyd ( 19,11)
  14.  
  15. set_stones("st-rock4", {{3,3},{5,3},{7,3},{9,3},{11,3},{13,3},{15,3}})
  16. set_stones("st-rock4", {{3,5},{5,5},{7,5},{9,5},{11,5},{13,5},{15,5}})
  17. set_stones("st-rock4", {{3,7},{5,7},{7,7},{9,7},{11,7},{13,7},{15,7}})
  18. set_stones("st-rock4", {{3,9},{5,9},{7,9},{9,9},{11,9},{13,9},{15,9}})
  19. draw_stones("st-rock4", { 3, 1}, {1,0},13)
  20. draw_stones("st-rock4", { 3,11}, {1,0},13)
  21. set_stones("st-wood", {{4,2},{4,4},{4,6},{4,8},{4,10}})
  22. set_stones("st-wood", {{10,2},{10,4},{10,6},{10,8},{10,10}})
  23.  
  24. function yy1( color, x, y)
  25.         stone = format( "st-%s4", color)
  26.         set_stone( stone, x, y)
  27. end
  28.  
  29. yy1( "white",  3, 2)
  30. yy1( "white",  3, 6)
  31. yy1( "white",  3,10)
  32. yy1( "white",  9, 4)
  33. yy1( "white",  9, 8)
  34. yy1( "white", 15, 2)
  35. yy1( "white", 15, 6)
  36. yy1( "white", 15,10)
  37. yy1( "white", 18,11)
  38. yy1( "black",  3, 4)
  39. yy1( "black",  3, 8)
  40. yy1( "black",  9, 2)
  41. yy1( "black",  9, 6)
  42. yy1( "black",  9,10)
  43. yy1( "black", 15, 4)
  44. yy1( "black", 15, 8)
  45. yy1( "black", 18, 1)
  46.  
  47. set_stones("st-yinyang1", {{4,3},{6,3},{8,3},{10,3},{12,3},{14,3}})
  48. set_stones("st-yinyang1", {{4,5},{6,5},{8,5},{10,5},{12,5},{14,5}})
  49. set_stones("st-yinyang1", {{4,7},{6,7},{8,7},{10,7},{12,7},{14,7}})
  50. set_stones("st-yinyang1", {{4,9},{6,9},{8,9},{10,9},{12,9},{14,9}})
  51.  
  52. set_item("it-yinyang", 2,5)
  53. set_item("it-yinyang", 2,7)
  54.  
  55. set_actor("ac-blackball", 2.5, 5.5, {player=0})
  56. set_actor("ac-whiteball", 2.5, 7.5, {player=1})
  57.