-- Smutty Smurf 2003 -- ESPRIT #018 levelw = 20 levelh = 25 create_world(levelw, levelh) oxyd_default_flavor = "b" -- Default flavor for oxyd stones. set_actor("ac-blackball", 4.5,22, {player=0}) set_item("it-extralife",13,1) fill_floor("fl-abyss",0,0,levelw,levelh) function renderLine( line, pattern) for i=1, strlen(pattern) do local c = strsub( pattern, i, i) if c == "G" then set_stone("st-oneway-e", i-1,line) set_floor("fl-normal", i-1, line) elseif c=="1" then set_floor("fl-gradient", i-1, line, {type=3}) elseif c=="2" then set_floor("fl-gradient", i-1, line, {type=4}) elseif c=="3" then set_floor("fl-gradient", i-1, line, {type=1}) elseif c=="4" then set_floor("fl-gradient", i-1, line, {type=2}) elseif c=="5" then set_floor("fl-gradient", i-1, line, {type=5}) elseif c=="6" then set_floor("fl-gradient", i-1, line, {type=6}) elseif c=="7" then set_floor("fl-gradient", i-1, line, {type=7}) elseif c=="8" then set_floor("fl-gradient", i-1, line, {type=8}) elseif c=="a" then set_floor("fl-gradient", i-1, line, {type=12}) elseif c=="b" then set_floor("fl-gradient", i-1, line, {type=10}) elseif c=="c" then set_floor("fl-gradient", i-1, line, {type=11}) elseif c=="d" then set_floor("fl-gradient", i-1, line, {type=9}) elseif c=="O" then oxyd(i-1,line) end end end -- 01234567890123456789 renderLine(00 , " ") renderLine(01 , " 53333 33336 ") renderLine(02 , " 1a444 444b2 ") renderLine(03 , " 12 O O 12 ") renderLine(04 , " O12 12 ") renderLine(05 , " 12 5333G336 12 ") renderLine(06 , " 12 1a44G4b2 12 ") renderLine(07 , " 12O 12 O 12O 12 ") renderLine(08 , " 12 12 12 12 ") renderLine(09 , " 12 12 12 12 ") renderLine(10 , " 12 12 12 12 ") renderLine(11 , " 12 12 12 12 ") renderLine(12 , " 12 12 12 12 ") renderLine(13 , " 12 12 12 12 ") renderLine(14 , " 12 12 12 12 ") renderLine(15 , " 12 12 12 12 ") renderLine(16 , " 12 12O 12 12 ") renderLine(17 , " 12 12 12 O12 ") renderLine(18 , " 12O 12 O12 12 ") renderLine(19 , " 12 12 12 12 ") renderLine(20 , " 12 12 12 12 ") renderLine(21 , " 1c33d2 1c33d2O ") renderLine(22 , " 744448 744448 ") renderLine(23 , " O ") renderLine(24 , " ") -- 01234567890123456789 oxyd_shuffle()