-- created by Martin Hawlisch levelw = 20 levelh = 13 create_world(levelw, levelh) fill_floor("fl-rough") oxyd_default_flavor = "b" function renderLine( line, pattern) for i=1, strlen(pattern) do local c = strsub( pattern, i, i) if c =="#" then set_stone("st-door_b",i-1,line,{type="v"}) elseif c == "~" then set_stone("st-door_b",i-1,line,{type="v"}) elseif c == "O" then oxyd( i-1, line) elseif c == "+" then set_stone("st-shogun",i-1,line, {holes=1}) elseif c == " " then set_floor("fl-sand", i-1, line) end end end set_stone("st-door_b", 1,7, {type="v", name="door1"}) set_stone("st-door_b", 6,9, {type="v", name="door2"}) set_stone("st-door_b",14,7, {type="v", name="door3"}) set_stone("st-door_b",11,4, {type="v", name="door4"}) set_stone("st-door_b", 8,2, {type="v", name="floor8"}) set_stone("st-door_b", 8,3, {type="v", name="floor11"}) set_stone("st-door_b", 8,4, {type="v", name="floor15"}) set_stone("st-door_b", 8,5, {type="v", name="floor5"}) set_stone("st-door_b", 8,6, {type="v", name="floor10"}) set_stone("st-door_b", 8,7, {type="v", name="floor14"}) set_stone("st-door_b", 9,7, {type="v", name="floor3"}) set_stone("st-door_b",10,7, {type="v", name="floor9"}) set_stone("st-door_b",10,6, {type="v", name="floor13"}) set_stone("st-door_b",10,5, {type="v", name="floor16"}) set_stone("st-door_b",10,4, {type="v", name="floor7"}) set_stone("st-door_b",10,3, {type="v", name="floor12"}) set_stone("st-door_b", 9,10, {type="v", name="floor1"}) set_stone("st-door_b", 8,10, {type="v", name="floor2"}) set_stone("st-door_b", 7,10, {type="v", name="floor4"}) set_stone("st-door_b", 7, 9, {type="v", name="floor6"}) shogundot1( 2, 2, {target="door1", action="openclose"}) shogundot1( 2, 1, {target="floor1", action="openclose"}) shogundot1( 4, 1, {target="floor2", action="openclose"}) shogundot1( 5, 1, {target="floor3", action="openclose"}) shogundot1( 5, 2, {target="floor4", action="openclose"}) shogundot1( 1,11, {target="floor5", action="openclose"}) shogundot1( 2,11, {target="floor6", action="openclose"}) shogundot1( 3,11, {target="door2", action="openclose"}) shogundot1( 4,11, {target="floor7", action="openclose"}) shogundot1(16,10, {target="floor8", action="openclose"}) shogundot1(16,11, {target="floor9", action="openclose"}) shogundot1(17,11, {target="floor10", action="openclose"}) shogundot1(18,11, {target="door3", action="openclose"}) shogundot1(18,10, {target="floor11", action="openclose"}) shogundot1(14,3, {target="floor12", action="openclose"}) shogundot1(14,4, {target="floor13", action="openclose"}) shogundot1(15,3, {target="floor14", action="openclose"}) shogundot1(15,4, {target="floor15", action="openclose"}) shogundot1(16,3, {target="door4", action="openclose"}) shogundot1(16,4, {target="floor16", action="openclose"}) renderLine( 0, "~######~~~~~~~#####~") renderLine( 1, "~#----#~O~~####---##") renderLine( 2, "~#--+-#O O~#-+-+---#") renderLine( 3, "###--+## ~~#-#-+-#-#") renderLine( 4, "#-+--+-# ~ -#-+-#-#") renderLine( 5, "#-#+##-# ~ #---+-+-#") renderLine( 6, "#------# O ##---####") renderLine( 7, "# ###### ### #####") renderLine( 8, "#-----#~~~##-------#") renderLine( 9, "##+-+- ~~#---#+#+-#") renderLine(10, "#--++## -++---+-#") renderLine(11, "#----#~~~~#--###---#") renderLine(12, "##############~#####") oxyd_shuffle() set_actor("ac-blackball", 4.5, 6.5, {player=0})