ref: 9dec80b07e3638c722b9768a1ca0184edea20392
dir: /maps/EcruteakTinTowerEntrance.asm/
const_def 2 ; object constants const ECRUTEAKTINTOWERENTRANCE_SAGE1 const ECRUTEAKTINTOWERENTRANCE_SAGE2 const ECRUTEAKTINTOWERENTRANCE_SAGE3 const ECRUTEAKTINTOWERENTRANCE_GRAMPS EcruteakTinTowerEntrance_MapScripts: db 2 ; scene scripts scene_script .DummyScene0 ; SCENE_DEFAULT scene_script .DummyScene1 ; SCENE_FINISHED db 1 ; callbacks callback MAPCALLBACK_OBJECTS, .InitializeSages .DummyScene0: end .DummyScene1: end .InitializeSages: checkevent EVENT_FOUGHT_SUICUNE iftrue .DontBlockTower checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER iftrue .DontBlockTower checkevent EVENT_CLEARED_RADIO_TOWER iftrue .BlockTower return .BlockTower: clearevent EVENT_RANG_CLEAR_BELL_1 setevent EVENT_RANG_CLEAR_BELL_2 setevent EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE checkitem CLEAR_BELL iftrue .NoClearBell setscene SCENE_DEFAULT .NoClearBell: return .DontBlockTower: clearevent EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE return EcruteakTinTowerEntrance_CoordEvent1: checkevent EVENT_RANG_CLEAR_BELL_2 iftrue EcruteakTinTowerEntrance_CoordEvent_DontMove applymovement ECRUTEAKTINTOWERENTRANCE_SAGE2, MovementData_0x980c7 moveobject ECRUTEAKTINTOWERENTRANCE_SAGE1, 4, 6 appear ECRUTEAKTINTOWERENTRANCE_SAGE1 pause 5 disappear ECRUTEAKTINTOWERENTRANCE_SAGE2 end EcruteakTinTowerEntrance_CoordEvent2: checkevent EVENT_RANG_CLEAR_BELL_1 iftrue EcruteakTinTowerEntrance_CoordEvent_DontMove applymovement ECRUTEAKTINTOWERENTRANCE_SAGE1, MovementData_0x980cc moveobject ECRUTEAKTINTOWERENTRANCE_SAGE2, 5, 6 appear ECRUTEAKTINTOWERENTRANCE_SAGE2 pause 5 disappear ECRUTEAKTINTOWERENTRANCE_SAGE1 end EcruteakTinTowerEntrance_CoordEvent_DontMove: end EcruteakTinTowerEntranceSageScript: faceplayer opentext checkevent EVENT_CLEARED_RADIO_TOWER iftrue .CheckForClearBell checkflag ENGINE_FOGBADGE iftrue .BlockPassage_GotFogBadge writetext EcruteakTinTowerEntranceSageText waitbutton closetext end .BlockPassage_GotFogBadge: writetext EcruteakTinTowerEntranceSageText_GotFogBadge waitbutton closetext end .CheckForClearBell: checkevent EVENT_KOJI_ALLOWS_YOU_PASSAGE_TO_TIN_TOWER iftrue .AllowedThrough checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1 iftrue .RangClearBell checkitem CLEAR_BELL iftrue .GotClearBell writetext EcruteakTinTowerEntranceSageText_NoClearBell waitbutton closetext end .GotClearBell: writetext EcruteakTinTowerEntranceSageText_HearsClearBell waitbutton closetext setscene SCENE_FINISHED setevent EVENT_RANG_CLEAR_BELL_2 clearevent EVENT_RANG_CLEAR_BELL_1 setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1 end .AllowedThrough: writetext EcruteakTinTowerEntranceSageText_PleaseDoGoOn waitbutton closetext end .RangClearBell: writetext EcruteakTinTowerEntranceSageText_HeardClearBell waitbutton closetext end EcruteakTinTowerEntranceWanderingSageScript: faceplayer opentext checkevent EVENT_GOT_CLEAR_BELL iftrue .GotClearBell writetext EcruteakTinTowerEntranceWanderingSageText waitbutton closetext end .GotClearBell: writetext EcruteakTinTowerEntranceWanderingSageText_GotClearBell waitbutton closetext end EcruteakTinTowerEntranceGrampsScript: jumptextfaceplayer EcruteakTinTowerEntranceGrampsText MovementData_0x980c7: fix_facing big_step LEFT remove_fixed_facing turn_head DOWN step_end MovementData_0x980cc: fix_facing big_step RIGHT remove_fixed_facing turn_head DOWN step_end EcruteakTinTowerEntranceSageText: text "TIN TOWER is off" line "limits to anyone" para "without ECRUTEAK" line "GYM's BADGE." para "Sorry, but you'll" line "have to leave." done EcruteakTinTowerEntranceSageText_GotFogBadge: text "TIN TOWER is off" line "limits to anyone" para "without ECRUTEAK" line "GYM's BADGE." para "Ah!" para "ECRUTEAK's GYM" line "BADGE! Please, go" cont "right through." done EcruteakTinTowerEntranceSageText_NoClearBell: text "A momentous event" line "has occurred." para "I beg your pardon," line "but I must ask you" cont "to leave." para "…What soothes the" line "soul…" para "The WISE TRIO say" line "things that are so" para "very difficult to" line "understand…" done EcruteakTinTowerEntranceSageText_HearsClearBell: text "A momentous event" line "has occurred." para "I beg your pardon," line "but I must ask you" cont "to leave." para "<……><……><……>" para "Ah!" para "The sound of that" line "CLEAR BELL!" para "It… It's sublime!" para "I've never heard" line "so beautiful a" cont "sound before!" para "That bell's chime" line "is indicative of" cont "the bearer's soul." para "You…" para "You may be able to" line "make it through" cont "TIN TOWER." para "Please, do go on." done EcruteakTinTowerEntranceSageText_PleaseDoGoOn: text "Please, do go on." done EcruteakTinTowerEntranceSageText_HeardClearBell: text "That bell's chime" line "is indicative of" cont "the bearer's soul." para "You…" para "You may be able to" line "make it through" cont "TIN TOWER." para "Please, do go on." done EcruteakTinTowerEntranceWanderingSageText: text "The TIN TOWER" line "ahead is a nine-" para "tier tower of" line "divine beauty." para "It soothes the" line "soul of all who" cont "see it." done EcruteakTinTowerEntranceWanderingSageText_GotClearBell: text "The TIN TOWER" line "shook! A #MON" para "must have returned" line "to the top!" done EcruteakTinTowerEntranceGrampsText: text "Two towers…" line "Two #MON…" para "But when one" line "burned down, both" para "#MON flew away," line "never to return." done EcruteakTinTowerEntrance_MapEvents: db 0, 0 ; filler db 5 ; warp events warp_event 4, 17, ECRUTEAK_CITY, 3 warp_event 5, 17, ECRUTEAK_CITY, 3 warp_event 5, 3, ECRUTEAK_TIN_TOWER_ENTRANCE, 4 warp_event 17, 15, ECRUTEAK_TIN_TOWER_ENTRANCE, 3 warp_event 17, 3, WISE_TRIOS_ROOM, 3 db 2 ; coord events coord_event 4, 7, SCENE_DEFAULT, EcruteakTinTowerEntrance_CoordEvent1 coord_event 5, 7, SCENE_DEFAULT, EcruteakTinTowerEntrance_CoordEvent2 db 0 ; bg events db 4 ; object events object_event 4, 6, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceSageScript, EVENT_RANG_CLEAR_BELL_1 object_event 5, 6, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceSageScript, EVENT_RANG_CLEAR_BELL_2 object_event 6, 9, SPRITE_SAGE, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceWanderingSageScript, EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE object_event 3, 11, SPRITE_GRAMPS, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, EcruteakTinTowerEntranceGrampsScript, EVENT_ECRUTEAK_TIN_TOWER_ENTRANCE_WANDERING_SAGE