home *** CD-ROM | disk | FTP | other *** search
/ GameStar Special 2004 August / GSSH0804.iso / Geschicklichkeit / Enigma / Enigma-081.exe / data / levels / ss_esp29.lua < prev    next >
Encoding:
Text File  |  2003-08-06  |  3.4 KB  |  92 lines
  1. -- Smutty Smurf 2003
  2. -- ESPRIT #029
  3.  
  4. levelw = 39
  5. levelh = 25
  6. create_world(levelw, levelh)
  7. oxyd_default_flavor = "b"
  8. set_actor("ac-blackball", 14.5,5.5, {player=0})
  9.  
  10. fill_floor("fl-abyss",0,0,levelw,levelh)
  11.  
  12. function renderLine( line, pattern)
  13.     for i=1, strlen(pattern) do
  14.       local c = strsub( pattern, i, i)
  15.       if c ==   "#" then
  16.          set_floor("fl-normal", i-1,line)
  17.       elseif c=="I" then
  18.          set_floor("fl-ice_001", i-1,line)
  19.       elseif c=="L" then
  20.          set_item("it-extralife",i-1,line)
  21.          set_floor("fl-normal", i-1,line)      
  22.       elseif c=="1" then
  23.      set_floor("fl-gradient",  i-1,  line, {type=3})         
  24.       elseif c=="2" then
  25.      set_floor("fl-gradient",  i-1,  line, {type=4})   
  26.       elseif c=="3" then
  27.      set_floor("fl-gradient",  i-1,  line, {type=1})   
  28.       elseif c=="4" then
  29.      set_floor("fl-gradient",  i-1,  line, {type=2})         
  30.       elseif c=="5" then
  31.          set_floor("fl-gradient",  i-1,  line, {type=5})   
  32.       elseif c=="6" then
  33.          set_floor("fl-gradient",  i-1,  line, {type=6})       
  34.       elseif c=="7" then
  35.          set_floor("fl-gradient",  i-1,  line, {type=7})         
  36.       elseif c=="8" then
  37.          set_floor("fl-gradient",  i-1,  line, {type=8})   
  38.       elseif c=="a" then
  39.          set_floor("fl-gradient",  i-1,  line, {type=12})   
  40.       elseif c=="b" then
  41.          set_floor("fl-gradient",  i-1,  line, {type=10})         
  42.       elseif c=="c" then
  43.          set_floor("fl-gradient",  i-1,  line, {type=11})   
  44.       elseif c=="d" then
  45.          set_floor("fl-gradient",  i-1,  line, {type=9})   
  46.       elseif c=="O" then
  47.      oxyd(i-1,line)         
  48.         end
  49.     end  
  50. end
  51. --               012345678901234567890123456789012345678
  52. renderLine(00 , "                                       ")
  53. renderLine(01 , "                                       ")
  54. renderLine(02 , "  O333333333336              53333336  ")
  55. renderLine(03 , "  1###########2              1###O##2  ")
  56. renderLine(04 , "  1#a4444444b#c6IIIII5336    1#a44b#2  ")  
  57. renderLine(05 , "  1#2       1##2IIOII1##2    1#2  1#2  ")
  58. renderLine(06 , "  1#2       7448IIIII7b#2    1#2  1#2  ")
  59. renderLine(07 , "  1#2                 1#2    1#2  1#2  ")
  60. renderLine(08 , "  1#2                 1#2    1#2  1#2  ")
  61. renderLine(09 , "  1#2                 1#2    1#2  1#2  ")
  62. renderLine(10 , "  1#c33333333333336   1#2    1#2  1#2  ")
  63. renderLine(11 , "  1###############2   1#2    1#2  1#2  ")
  64. renderLine(12 , "  1#a44444444444b#2   1#2    1#2  1#2  ") 
  65.  
  66. renderLine(13 , "  1#2           1#2   1#2    1#2  1#2  ")
  67. renderLine(14 , "  1#2       5333d#2   1#2    1#2  1#2  ")
  68. renderLine(15 , "  1#2       1#####2   1#2    1#2  1#2  ")
  69. renderLine(16 , "  1#2       1#a4448   1#c3333d#2  1#2  ")
  70. renderLine(17 , "  1#2       1#2       1L###O###2  1#2  ")  
  71. renderLine(18 , "  1#2       1#2       1#a4444448  1#2  ")
  72. renderLine(19 , "  1#2       1#2       1#2         1#2  ")
  73. renderLine(20 , "  1#c3333333d#2       1#c333333333d#2  ")
  74. renderLine(21 , "  1##########O2       1#############2  ")
  75. renderLine(22 , "  7444444444448       74444444444444O  ")
  76. renderLine(23 , "                                       ")
  77. renderLine(24 , "                                       ")
  78. --               012345678901234567890123456789012345678
  79. set_item("it-crack0",2,7)
  80. set_item("it-crack0",30,8)
  81. set_item("it-crack0",29,22)
  82. set_item("it-crack0",14,15)
  83. set_item("it-crack0",3,18)
  84. oxyd_shuffle()
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.