home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ss_esp82.lua < prev    next >
Text File  |  2003-09-19  |  2KB  |  48 lines
  1. -- Sven Siggelkow 2003
  2. -- Esprit #82
  3.  
  4. levelw = 58
  5. levelh = 13
  6. create_world(levelw, levelh)
  7. display.SetFollowMode(display.FOLLOW_SCROLLING)
  8. oxyd_default_flavor = "b"
  9. set_actor("ac-rotor", 3, 10.5, {mouseforce=0, range=70, force=50})
  10. set_actor("ac-blackball", 51.5, 10.5, {player=0})
  11.  
  12. fill_floor("fl-bluegray", 0,0, levelw,levelh)
  13. enigma.AddConstantForce(0,40)
  14.  
  15. function renderLine( line, pattern)
  16.     for i=1, strlen(pattern) do
  17.       local c = strsub( pattern, i, i)
  18.       if c ==   "#" then
  19.          set_stone("st-glass2", i-1,line)
  20.       elseif c =="b" then
  21.          set_stone("st-actorimpulse", i-1,line)
  22.       elseif c =="c" then
  23.          set_item("it-coffee", i-1,line)
  24.       elseif c =="." then
  25.          set_item("it-extralife", i-1,line)
  26.       elseif c=="O" then                                                               
  27.      oxyd(i-1,line)         
  28.         end
  29.     end  
  30. end
  31. --               0123456789012345678901234567890123456789012345678901234567
  32. renderLine(00 , "##########################################################")
  33. renderLine(01 , "#                                                        #")
  34. renderLine(02 , "#  O  c   O   c  O   .  c     O       c    O     c    O  #")
  35. renderLine(03 , "#                                                        #")
  36. renderLine(04 , "#                                                        #")  
  37. renderLine(05 , "#                                                        #")
  38. renderLine(06 , "#                                                        #")
  39. renderLine(07 , "#                                                        #")
  40. renderLine(08 , "#                                                        #")
  41. renderLine(09 , "#                                                        #")
  42. renderLine(10 , "#                                                        #")
  43. renderLine(11 , "#                                                        #")
  44. renderLine(12 , "#bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb#") 
  45. --               0123456789012345678901234567890123456789012345678901234567
  46.  
  47. oxyd_shuffle()
  48.