-- Smutty Smurf 2003 -- ESPRIT #011 -- problem: gradient force could be stronger levelw = 20 levelh = 109 create_world(levelw, levelh) oxyd_default_flavor = "b" -- Default flavor for oxyd stones. set_actor("ac-blackball", 10.5,6.5, {player=0}) function renderLine( line, pattern) for i=1, strlen(pattern) do local c = strsub( pattern, i, i) if c == "W" then set_stone("st-greenbrown",i-1,line) elseif c=="h" then set_stone("st-greenbrown_hole",i-1,line) set_floor("fl-normal", i-1, line) elseif c=="g" then set_stone("st-grate2", i-1, line) set_floor("fl-gradient", i-1, line, {type=19}) elseif c=="G" then set_stone("st-grate2", i-1, line) set_floor("fl-gradient", i-1, line, {type=20}) elseif c=="r" then set_stone("st-grate2", i-1, line) set_floor("fl-gradient", i-1, line, {type=13}) elseif c=="R" then set_stone("st-grate2", i-1, line) set_floor("fl-gradient", i-1, line, {type=14}) elseif c=="s" then set_stone("st-grate2", i-1, line) set_floor("fl-gradient", i-1, line, {type=5}) elseif c=="S" then set_stone("st-grate2", i-1, line) set_floor("fl-gradient", i-1, line, {type=8}) elseif c=="t" then set_stone("st-grate2", i-1, line) set_floor("fl-gradient", i-1, line, {type=9}) elseif c=="T" then set_stone("st-grate2", i-1, line) set_floor("fl-gradient", i-1, line, {type=12}) elseif c=="D" then set_stone("st-death",i-1,line) elseif c=="1" then set_floor("fl-gradient", i-1, line, {type=19}) elseif c=="2" then set_floor("fl-gradient", i-1, line, {type=20}) elseif c=="3" then set_floor("fl-gradient", i-1, line, {type=13}) elseif c=="4" then set_floor("fl-gradient", i-1, line, {type=14}) 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=="9" then set_floor("fl-gradient", i-1, line, {type=15}) elseif c=="0" then set_floor("fl-gradient", i-1, line, {type=16}) 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) elseif c==" " then set_floor("fl-normal", i-1, line) elseif c=="." then set_floor("fl-abyss", i-1, line) elseif c=="x" then set_floor("fl-woven", i-1, line) elseif c=="X" then set_item("it-crack", i-1, line, {type=1}) set_floor("fl-woven", i-1, line) elseif c=="Y" then set_item("it-crack", i-1, line, {type=2}) set_floor("fl-woven", i-1, line) elseif c=="Z" then set_item("it-crack", i-1, line, {type=3}) set_floor("fl-woven", i-1, line) end end end -- 01234567890123456789 renderLine(00 , "WWWWWWWWWWWWWWWWWWWW") renderLine(01 , "W W") renderLine(02 , "W O W") renderLine(03 , "W W") renderLine(04 , "W O O W") renderLine(05 , "W W") renderLine(06 , "W W") renderLine(07 , "W W") renderLine(08 , "W W") renderLine(09 , "W O O W") renderLine(10 , "W W") renderLine(11 , "W W") renderLine(12 , "WWWWWWWWWhhWWWWWWWWW") renderLine(13 , "xxxxxxxxW12Wxxxxxxxx") renderLine(14 , "xxxxxxxxW12Wxxxxxxxx") renderLine(15 , "xxxxxxxxW12Wxxxxxxxx") renderLine(16 , "xxxxxxxxW12Wxxxxxxxx") renderLine(17 , "xxxxxxxxW12Wxxxxxxxx") renderLine(18 , "xxxxxxxxW12Wxxxxxxxx") renderLine(19 , "xxxxZxxxW12Wxxxxxxxx") renderLine(20 , "xxxxxxxxW12Wxxxxxxxx") renderLine(21 , "xxxxxxxxW12Wxxxxxxxx") renderLine(22 , "xXxYxZxYW12WxxZxXZxX") renderLine(23 , "........W12W........") renderLine(24 , "........W12W........") renderLine(25 , "........W12W........") renderLine(26 , "........W12W........") renderLine(27 , "........W12W........") renderLine(28 , "........W12W........") renderLine(29 , "........W12W........") renderLine(30 , "........W12W........") renderLine(31 , "........W12W........") renderLine(32 , "........W12W........") renderLine(33 , "........W12W........") renderLine(34 , "........W12W........") renderLine(35 , "........W12W........") renderLine(36 , "........WgGW........") renderLine(37 , "........WgGW........") renderLine(38 , "........WgGW........") renderLine(39 , "........WgGW........") renderLine(40 , "........WgGW........") renderLine(41 , "WWWWWWWWWgGW........") renderLine(42 , "WsrrrrrrrtGW........") renderLine(43 , "WgTRRRRRRRSW........") renderLine(44 , "WgGWWWWWWWWW........") renderLine(45 , "WgGW................") renderLine(46 , "W12W................") renderLine(47 , "W12W................") renderLine(48 , "W12WWWWWWWWWWWWWWWWW") renderLine(49 , "W1c9999999999999996W") renderLine(50 , "W7000000000000000b2W") renderLine(51 , "WWWWWWWWWWWWWWWWW12W") renderLine(52 , "................W12W") renderLine(53 , "................W12W") renderLine(54 , "................W12W") renderLine(55 , "................W12W") renderLine(56 , "................W12W") renderLine(57 , "................W12W") renderLine(58 , "................W12W") renderLine(59 , "................W12W") renderLine(60 , "................W12W") renderLine(61 , "................W12W") renderLine(62 , "................W12W") renderLine(63 , "................W12W") renderLine(64 , "................W12W") renderLine(65 , "WWWWWWWWWWWWWWWWW12W") renderLine(66 , "W5333333333333333d2W") renderLine(67 , "W1a4444444444444448W") renderLine(68 , "W12WWWWWWWWWWWWWWWWW") renderLine(69 , "W12W................") renderLine(70 , "W12W................") renderLine(71 , "W12W................") renderLine(72 , "W12W................") renderLine(73 , "W12W................") renderLine(74 , "W12W................") renderLine(75 , "W12W................") renderLine(76 , "W12W................") renderLine(77 , "W12W................") renderLine(78 , "W12W................") renderLine(79 , "W12W................") renderLine(80 , "W12W................") renderLine(81 , "W12W................") renderLine(82 , "W12W................") renderLine(83 , "W12W................") renderLine(84 , "W12W................") renderLine(85 , "W12W................") renderLine(86 , "W12W................") renderLine(87 , "W12W................") renderLine(88 , "W12W................") renderLine(89 , "W12W................") renderLine(90 , "W12W................") renderLine(91 , "W12W................") renderLine(92 , "W12W................") renderLine(93 , "W12W................") renderLine(94 , "W12W................") renderLine(95 , "W12W................") renderLine(96 , "W12WWWWWWWWWWWWWWWWW") renderLine(97 , "W12W W") renderLine(98 , "W12W W") renderLine(99 , "W12W W") renderLine(100, "W12W W") renderLine(101, "W12W W") renderLine(102, "W12W O W") renderLine(103, "W12W W") renderLine(104, "W12 W") renderLine(105, "W12 W") renderLine(106, "W12W W") renderLine(107, "W12W W") renderLine(108, "WDDWWWWWWWWWWWWWWWWW") -- 01234567890123456789 oxyd_shuffle()