1 2 3 4 5 6 7 8 9 10 11 12 13 14
CeladonMansionRoofHouse_Object: db $a ; border block def_warps warp 2, 7, 2, CELADON_MANSION_ROOF warp 3, 7, 2, CELADON_MANSION_ROOF def_signs def_objects object SPRITE_HIKER, 2, 2, STAY, DOWN, 1 ; person object SPRITE_POKE_BALL, 4, 3, STAY, NONE, 2 ; person def_warps_to CELADON_MANSION_ROOF_HOUSE