home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ss_esp74.lua < prev    next >
Text File  |  2003-10-03  |  1KB  |  42 lines
  1. -- Sven Siggelkow 2003
  2. -- ESPRIT #074
  3.  
  4. levelw = 20
  5. levelh = 13
  6. create_world(levelw, levelh)
  7. oxyd_default_flavor = "b"
  8. set_actor("ac-blackball", 10,4.5, {player=0})
  9. set_actor("ac-killerball", 3.5,8.5, {player=0, mouseforce=1, controllers=1})
  10. set_actor("ac-killerball", 16.5,8.5, {player=0, mouseforce=1, controllers=1})
  11. fill_floor("fl-space",0,0,levelw,levelh)
  12.  
  13. function renderLine( line, pattern)
  14.     for i=1, strlen(pattern) do
  15.       local c = strsub( pattern, i, i)
  16.       if c ==   "I" then
  17.          set_stone("st-invisible", i-1,line)
  18.       elseif c=="#" then
  19.          set_floor("fl-metal",  i-1,  line) 
  20.       elseif c=="O" then
  21.      oxyd(i-1,line)         
  22.         end
  23.     end  
  24. end
  25. --               01234567890123456789
  26. renderLine(00 , "IIIIIIIIIIIIIIIIIIII")
  27. renderLine(01 , "I                  I")
  28. renderLine(02 , "I                  I")
  29. renderLine(03 , "I                  I")
  30. renderLine(04 , "I  #  O  ##  O  #  I")  
  31. renderLine(05 , "I                  I")
  32. renderLine(06 , "IO       OO       OI")
  33. renderLine(07 , "I                  I")
  34. renderLine(08 , "I  #  O  ##  O  #  I")
  35. renderLine(09 , "I                  I")
  36. renderLine(10 , "I                  I")
  37. renderLine(11 , "I                  I")
  38. renderLine(12 , "IIIIIIIIIIIIIIIIIIII") 
  39. --               01234567890123456789
  40.  
  41. oxyd_shuffle()
  42.