home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / daniel5.lua < prev    next >
Encoding:
Text File  |  2003-01-12  |  1.1 KB  |  33 lines
  1. -- Copyright (C) 2003 Daniel Heck
  2. levelw = 20
  3. levelh = 13
  4.  
  5. create_world(levelw, levelh)
  6. enigma.ConserveLevel = FALSE
  7. fill_floor("fl-abyss", 0,0, level_width,level_height)
  8. fill_floor("fl-metal", 2,2,16,9)
  9.  
  10. set_item("it-hollow", 7,4)
  11. set_item("it-hollow", 5,7)
  12. set_item("it-hollow", 9,6)
  13. set_item("it-hollow", 13,5)
  14.  
  15. draw_floor("fl-gradient", {17,3}, {0,1}, 7, {type=3})
  16. draw_floor("fl-gradient", {2,3}, {0,1}, 7, {type=4})
  17. draw_floor("fl-gradient", {3,2}, {1,0}, 14, {type=2})
  18. draw_floor("fl-gradient", {3,10}, {1,0}, 14, {type=1})
  19. set_floor("fl-gradient", 17,10, {type=9})
  20. set_floor("fl-gradient", 17,2, {type=10})
  21. set_floor("fl-gradient", 2,10, {type=11})
  22. set_floor("fl-gradient", 2,2, {type=12})
  23.  
  24. local ac1=set_actor("ac-whiteball-small", 8,5, {player=0, mouseforce=1})
  25. local ac2=set_actor("ac-whiteball-small", 10,5, {player=0, mouseforce=1})
  26. local ac3=set_actor("ac-whiteball-small", 10,7, {player=0, mouseforce=1})
  27. local ac4=set_actor("ac-whiteball-small", 10,9, {player=0, mouseforce=1})
  28.  
  29. AddRubberBand(ac1, ac2, 6, 1)
  30. AddRubberBand(ac2, ac3, 6, 1)
  31. AddRubberBand(ac2, ac4, 6, 1)
  32.  
  33.