home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ss_esp68.lua < prev    next >
Text File  |  2003-08-05  |  3KB  |  71 lines
  1. -- Smutty Smurf 2003
  2. -- ESPRIT #054
  3.  
  4. levelw = 20
  5. levelh = 13
  6. create_world(levelw, levelh)
  7. oxyd_default_flavor = "b"
  8. set_actor("ac-blackball", 10,6.5, {player=0})
  9. fill_floor("fl-space",0,0,levelw,levelh)
  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-metal", i-1,line)
  16.       elseif c=="D" then
  17.      set_stone("st-death",i-1,line)
  18.       elseif c=="F" then
  19.      set_floor("fl-metal",i-1,line)     
  20.       elseif c=="L" then
  21.      set_item("it-extralife",i-1,line)         
  22.       elseif c=="1" then                                                                
  23.      set_item("it-magnet",i-1,line,{name="magnet1", on=0})
  24.      set_floor("fl-metal",i-1,line)
  25.       elseif c=="2" then                                                                
  26.          set_item("it-magnet",i-1,line,{name="magnet2", on=0})
  27.          set_floor("fl-metal",i-1,line)
  28.       elseif c=="3" then                                                                
  29.          set_item("it-magnet",i-1,line,{name="magnet3", on=0})
  30.          set_floor("fl-metal",i-1,line)
  31.       elseif c=="4" then                                                                
  32.          set_item("it-magnet",i-1,line,{name="magnet4", on=0})   
  33.          set_floor("fl-metal",i-1,line)
  34.       elseif c=="a" then
  35.      set_stone("st-switch_black",i-1,line, {action="onoff", target="magnet1"})         
  36.       elseif c=="b" then
  37.      set_stone("st-switch_black",i-1,line, {action="onoff", target="magnet2"})   
  38.       elseif c=="c" then
  39.      set_stone("st-switch_black",i-1,line, {action="onoff", target="magnet3"})          
  40.       elseif c=="d" then
  41.          set_stone("st-switch_black",i-1,line, {action="onoff", target="magnet4"}) 
  42.       elseif c=="O" then
  43.      oxyd(i-1,line)         
  44.         end
  45.     end  
  46. end
  47. --               01234567890123456789
  48. renderLine(00 , "###O##O######O##O###")
  49. renderLine(01 , "#1  FFFFFDDFFFFF  2#")
  50. renderLine(02 , "b     F      F     d")
  51. renderLine(03 , "#F    L           F#")
  52. renderLine(04 , "#F                F#")  
  53. renderLine(05 , "#F                F#")
  54. renderLine(06 , "#D       FF       D#")
  55. renderLine(07 , "#F                F#")
  56. renderLine(08 , "#F                F#")
  57. renderLine(09 , "#F           L    F#")
  58. renderLine(10 , "a     F      F     c")
  59. renderLine(11 , "#3  FFFFFDDFFFFF  4#")
  60. renderLine(12 , "###O##O######O##O###") 
  61. --               01234567890123456789
  62.  
  63. oxyd_shuffle()
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70.  
  71.