home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ss9.lua < prev    next >
Encoding:
Text File  |  2003-09-12  |  1.6 KB  |  52 lines
  1. -- Sven Siggelkow 2003
  2.  
  3. levelw = 20
  4. levelh = 13
  5.  
  6. create_world(levelw, levelh)
  7. oxyd_default_flavor = "a"
  8. set_actor("ac-blackball", 8.5,6.5, {player=0})
  9. enigma.ConserveLevel=FALSE
  10.  
  11. fill_floor("fl-himalaya", 0,0, levelw,levelh)
  12. fill_floor("fl-leaves", 14,7, 4,3)
  13. fill_items( "it-burnable", 1, 1, 18, 11)
  14. enigma.KillItem(16,7)
  15. enigma.KillItem(17,8)
  16. enigma.KillItem(16,9)
  17.  
  18. function renderLine( line, pattern)
  19.     for i=1, strlen(pattern) do
  20.       local c = strsub( pattern, i, i)
  21.       if c ==   "#" then
  22.          set_stone("st-wood", i-1,line)
  23.       elseif c =="P" then
  24.          set_stone("st-pull", i-1,line)
  25.       elseif c =="f" then
  26.          set_item("it-burnable-ignited", i-1,line)
  27.       elseif c=="O" then                                                               
  28.      oxyd(i-1,line) 
  29.       elseif c=="." then
  30.      set_item("it-seed", i-1,line) 
  31.       elseif c=="o" then
  32.      set_item("it-seed_nowood", i-1,line)
  33.         end
  34.     end  
  35. end
  36. --               01234567890123456789
  37. renderLine(00 , "####################")
  38. renderLine(01 , "#Of     #   #     O#")
  39. renderLine(02 , "#f      ###    o   #")
  40. renderLine(03 , "#  #  o       P    #")
  41. renderLine(04 , "#                  #")  
  42. renderLine(05 , "#      #           #")
  43. renderLine(06 , "#               #. #")
  44. renderLine(07 , "#      .    .      #")
  45. renderLine(08 , "#           P      #")
  46. renderLine(09 , "#       #          #")
  47. renderLine(10 , "#       o .   #  o #")
  48. renderLine(11 , "#O               .O#")
  49. renderLine(12 , "####################") 
  50. --               01234567890123456789
  51.  
  52.