home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ss_esp65.lua < prev    next >
Text File  |  2003-08-14  |  2KB  |  48 lines
  1. -- Sven Siggelkow 2003
  2. -- ESPRIT #65
  3.  
  4. levelw = 20
  5. levelh = 13
  6.  
  7. create_world(levelw, levelh)
  8. oxyd_default_flavor = "d"
  9. set_actor("ac-blackball", 10,1.5, {player=0})
  10.  
  11. fill_floor("fl-samba", 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 ==   "#" then
  17.          set_stone("st-rock1", i-1,line)
  18.       elseif c ==">" then
  19.          set_stone("st-oneway_black-e",i-1,line)
  20.       elseif c =="<" then
  21.          set_stone("st-oneway_black-w",i-1,line)
  22.       elseif c =="v" then                                                               
  23.          set_item("it-wormhole",i-1,line, {name="warp",targetx="3.5",targety="3.5",strength=0})
  24.       elseif c =="w" then                                                               
  25.          set_item("it-wormhole",i-1,line, {name="warp",targetx="16.5",targety="11.5",strength=0})
  26.       elseif c=="O" then                                                               
  27.      oxyd(i-1,line) 
  28.         end
  29.     end  
  30. end
  31. --               01234567890123456789
  32. renderLine(00 , "####################")
  33. renderLine(01 , "#     >      <     #")
  34. renderLine(02 , "O     >      <     O")
  35. renderLine(03 , "#     >      <     #")
  36. renderLine(04 , "######>      <######")  
  37. renderLine(05 , "#     >      <     #")
  38. renderLine(06 , "O     >  vw  <     O")
  39. renderLine(07 , "#     >      <     #")
  40. renderLine(08 , "######>      <######")
  41. renderLine(09 , "#     >      <     #")
  42. renderLine(10 , "O     >      <     O")
  43. renderLine(11 , "#     >      <     #")
  44. renderLine(12 , "####################") 
  45. --               01234567890123456789
  46.  
  47. oxyd_shuffle()
  48.