levelw=50 levelh=30 create_world( levelw, levelh) fill_floor("fl-bluegreen", 0,0,levelw,levelh) function renderLine( line, pattern) for i=1, strlen(pattern) do local c = strsub( pattern, i, i) if c =="#" then set_stone( "st-greenbrown", i-1, line) elseif c == "o" then oxyd( i-1, line) elseif c == "!" then abyss(i-1,line) elseif c == "=" then fill_floor("fl-bluegreen", i-1,line, 1,1) elseif c == "+" then fill_floor("fl-space", i-1,line, 1,1) elseif c == "a" then set_stone("st-switch", i-1,line, {action="openclose", target="door1"}) elseif c == "A" then set_stone("st-door", i-1, line , {name="door1", type="h"}) elseif c == "z" then set_actor("ac-blackball", i-1-.5,line+.5, {player=0}) elseif c == "d" then --1-d set_floor("fl-gradient", i-1, line, {type=1}) elseif c == "u" then --2-u set_floor("fl-gradient", i-1, line, {type=2}) elseif c == "r" then --3-r set_floor("fl-gradient", i-1, line, {type=3}) elseif c == "l" then --4-l set_floor("fl-gradient", i-1, line, {type=4}) elseif c == "1" then --ur set_floor("fl-gradient", i-1, line, {type=11}) elseif c == "3" then --dl set_floor("fl-gradient", i-1, line, {type=9}) elseif c == "7" then --dr set_floor("fl-gradient", i-1, line, {type=12}) elseif c == "9" then --ul set_floor("fl-gradient", i-1, line, {type=10}) end end end -- Floor: " " -- Border: "#" -- Oxyd: "o" renderLine(00,"#######################################") renderLine(01,"#!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!#") renderLine(02,"#!a+==llrr==rr++ll=======r==rr++ll===!#") renderLine(03,"#!!!!!!!!!!!!!!!!!!!!!!==r==rr++ll=+=!#") renderLine(04,"#!3ddd1!!3ddddd!!dddd1!!!r==rr++ll+++!#") renderLine(05,"#!r===1dd3++++++++===l!!!!!#A#!!!!rul!#") renderLine(06,"#!r=z=++++++++++++===l!3dd3#=#1d1!rul!#") renderLine(07,"#!r===7uu9++++++++===l!r++++++++l!rul!#") renderLine(08,"#!9uuu7!!9uuuuu!!9+++7!!u9++3d1+!!rul!#") renderLine(09,"#!!!!!!!!!!!!!!!!99+77!!+r++r+l+!!rul!#") renderLine(10,"#!==r=l+=r+llll=!!r+l!!!d3++9u7r!!rul!#") renderLine(11,"#!=!!!!!!!!!!!!=!!r+l!!!+3d1++7u!!rul!#") renderLine(12,"#!===!!!!3dddd3+l!r+l!!!+r+l++l+!!rul!#") renderLine(13,"#!===!!!!r++++++l!r+l!!!+9u7++1d!!rul!#") renderLine(14,"#!===!!!!r+7uuuu7!r+l!!!++3dd1++!!rul!#") renderLine(15,"#!9+7!!!!r+l!!!!!!r+l!!!l+r++l+r!!rul!#") renderLine(16,"#!r+l!!!!3+1!!!!!!!+!!!!l+9uu7+r!!rul!#") renderLine(17,"#!r+l!!!!===!##!d3===9!!++++++++!!rul!#") renderLine(18,"#!r+l!!!!===ddu+++===r!r========l!rul!#") renderLine(19,"#!r+l!!!!===uud+++===3!o========o!rul!#") renderLine(20,"#!r+1dd1!!!!!!!!!!!!!!!!!!!!!!!!!!rul!#") renderLine(21,"#!r++++1ddddddlllddddudddduudddudd3ul!#") renderLine(22,"#!9uuuuuuuuuuullluuuuduuuudduuuuuduu7!#") renderLine(23,"#!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!#") renderLine(24,"#######################################") oxyd_shuffle()