-- created by Martin Hawlisch levelw = 20 levelh = 13 create_world( levelw, levelh) function renderLine( line, pattern) for i=1, strlen(pattern) do local c = strsub( pattern, i, i) if c =="w" then set_floor( "fl-wood", i-1, line) set_stone( "st-wood", i-1, line) elseif c == "o" then set_floor( "fl-wood", i-1, line) oxyd( i-1, line) elseif c == "b" then set_floor( "fl-wood", i-1, line) set_stone( "st-greenbrown_move", i-1, line) elseif c == " " then set_floor( "fl-abyss", i-1, line) elseif c == "=" then set_floor( "fl-wood", i-1, line) end end end -- Abyss: " " -- Floor: "=" -- Wood: "w" -- Brownie "b" -- Oxyd: "o" renderLine( 0, " ") renderLine( 1, " o ") renderLine( 2, " ") renderLine( 3, " ==== = ") renderLine( 4, " ==w===== == ") renderLine( 5, " =====w==b== ===== ") renderLine( 6, " ==b=w==w== ===b= ") renderLine( 7, " ===b====w= ==bo ") renderLine( 8, " ===ww=bw ====b ") renderLine( 9, " o==ww== ====== ") renderLine( 10, " == === ") renderLine( 11, " o ") renderLine( 12, " ") oxyd_shuffle() set_actor("ac-blackball", 5.5, 4.5, {player=0})