home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ss_esp75.lua < prev    next >
Text File  |  2003-10-03  |  2KB  |  52 lines
  1. -- Sven Siggelkow 2003
  2. -- ESPRIT #075
  3.  
  4. levelw = 20
  5. levelh = 13
  6. create_world(levelw, levelh)
  7. oxyd_default_flavor = "a"
  8. set_actor("ac-blackball", 3.5, 6.5, {player=0})
  9. fill_floor("fl-ice_001", 0,0, level_width,level_height)
  10.  
  11. function renderLine( line, pattern)
  12.     for i=1, strlen(pattern) do
  13.       local c = strsub( pattern, i, i)
  14.       if c ==   "#" then
  15.          set_stone("st-door_a",i-1,line)
  16.       elseif c=="D" then                                                                
  17.          set_stone("st-death", i-1,  line)
  18.       elseif c=="1" then                                                                
  19.          set_stone("st-door_a", i-1,  line,{name="door1"})
  20.       elseif c=="2" then                                                                
  21.          set_stone("st-door_a", i-1,  line,{name="door2"})
  22.       elseif c =="t" then
  23.          set_item("it-trigger", i-1,line, {invisible=1,action="callback", target="s1"})
  24.       elseif c=="M" then
  25.          set_item("it-magnet",i-1,line,{on=1})
  26.       elseif c=="." then                 
  27.          set_item("it-extralife", i-1,line)
  28.       elseif c=="k" then
  29.      set_actor("ac-killerball", i-1+0.5,line+0.5, {mouseforce=1, controllers=1}) 
  30.       elseif c=="O" then
  31.      oxyd(i-1,line) 
  32.         end
  33.     end
  34. end
  35. --              01234567890123456789
  36. renderLine(00, "####################")
  37. renderLine(01, "#                  #")
  38. renderLine(02, "#                k #")
  39. renderLine(03, "#                  #")
  40. renderLine(04, "#                  #")  
  41. renderLine(05, "#        OO        #")
  42. renderLine(06, "#     c OMMO c     #")
  43. renderLine(07, "#        OO        #")
  44. renderLine(08, "#                  #")
  45. renderLine(09, "#                  #")
  46. renderLine(10, "#                k #")
  47. renderLine(11, "#                  #")
  48. renderLine(12, "####################")
  49. --              01234567890123456789
  50.  
  51. oxyd_shuffle()
  52.