RedsHouse2F_Object: db $a ; border block def_warps warp 7, 1, 2, REDS_HOUSE_1F def_signs def_objects ; warp-to warp_to 7, 1, REDS_HOUSE_2F_WIDTH