home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / martin01.lua < prev    next >
Encoding:
Text File  |  2003-01-05  |  717 b   |  38 lines
  1. -- created by Martin Hawlisch
  2.  
  3. levelw = 58
  4. levelh = 13
  5.  
  6. create_world( levelw, levelh)
  7. draw_border("st-greenbrown")
  8. fill_floor("fl-sand", 0,0,levelw,levelh-3)
  9. fill_floor("fl-water", 0,levelh-3,levelw,3)
  10.  
  11. function createOxyd( x, y)
  12.     set_stone( "st-rock2", x-1, y)
  13.     set_stone( "st-rock2", x+1, y)
  14.     set_stone( "st-rock2", x,   y+1)
  15.     oxyd(x,y)
  16. end
  17.  
  18. set_stone( "st-greenbrown", 1, 4)
  19. set_stone( "st-greenbrown", 2, 4)
  20. set_stone( "st-greenbrown", 3, 4)
  21. set_stone( "st-greenbrown", 3, 3)
  22.  
  23. createOxyd( 3,8)
  24. createOxyd( 10,3)
  25. createOxyd( 12,8)
  26. createOxyd( 17,5)
  27. createOxyd( 24,7)
  28. createOxyd( 32,2)
  29. createOxyd( 40,8)
  30. createOxyd( 51,4)
  31.  
  32. oxyd_shuffle()
  33.  
  34. enigma.AddConstantForce(0,30)
  35.  
  36. set_actor("ac-blackball", 2, 2, {player=0})
  37.  
  38.