ref: e0d07fba3fbc5e5923d3f523afe386ad3fab1393
dir: /maps/RadioTower5F.asm/
object_const_def ; object_event constants const RADIOTOWER5F_DIRECTOR const RADIOTOWER5F_ROCKET const RADIOTOWER5F_ROCKET_GIRL const RADIOTOWER5F_ROCKER const RADIOTOWER5F_POKE_BALL RadioTower5F_MapScripts: db 3 ; scene scripts scene_script .DummyScene0 ; SCENE_DEFAULT scene_script .DummyScene1 ; SCENE_RADIOTOWER5F_ROCKET_BOSS scene_script .DummyScene2 ; SCENE_RADIOTOWER5F_NOTHING db 0 ; callbacks .DummyScene0: end .DummyScene1: end .DummyScene2: end FakeDirectorScript: turnobject RADIOTOWER5F_DIRECTOR, UP showemote EMOTE_SHOCK, RADIOTOWER5F_DIRECTOR, 15 opentext writetext FakeDirectorTextBefore1 waitbutton closetext applymovement RADIOTOWER5F_DIRECTOR, FakeDirectorMovement playmusic MUSIC_ROCKET_ENCOUNTER opentext writetext FakeDirectorTextBefore2 waitbutton closetext winlosstext FakeDirectorWinText, 0 setlasttalked RADIOTOWER5F_DIRECTOR loadtrainer EXECUTIVEM, EXECUTIVEM_3 startbattle reloadmapafterbattle opentext writetext FakeDirectorTextAfter promptbutton verbosegiveitem BASEMENT_KEY closetext setscene SCENE_RADIOTOWER5F_ROCKET_BOSS setevent EVENT_BEAT_ROCKET_EXECUTIVEM_3 end Director: faceplayer opentext checkevent EVENT_CLEARED_RADIO_TOWER iftrue .TrueDirector writetext FakeDirectorTextAfter waitbutton closetext end .TrueDirector: writetext RadioTower5FDirectorText waitbutton closetext end TrainerExecutivef1: trainer EXECUTIVEF, EXECUTIVEF_1, EVENT_BEAT_ROCKET_EXECUTIVEF_1, Executivef1SeenText, Executivef1BeatenText, 0, .Script .Script: endifjustbattled opentext writetext Executivef1AfterBattleText waitbutton closetext end RadioTower5FRocketBossScene: applymovement PLAYER, RadioTower5FPlayerTwoStepsLeftMovement playmusic MUSIC_ROCKET_ENCOUNTER turnobject RADIOTOWER5F_ROCKET, RIGHT opentext writetext RadioTower5FRocketBossBeforeText waitbutton closetext winlosstext RadioTower5FRocketBossWinText, 0 setlasttalked RADIOTOWER5F_ROCKET loadtrainer EXECUTIVEM, EXECUTIVEM_1 startbattle reloadmapafterbattle opentext writetext RadioTower5FRocketBossAfterText waitbutton closetext special FadeBlackQuickly special ReloadSpritesNoPalettes disappear RADIOTOWER5F_ROCKET disappear RADIOTOWER5F_ROCKET_GIRL pause 15 special FadeInQuickly setevent EVENT_BEAT_ROCKET_EXECUTIVEM_1 setevent EVENT_CLEARED_RADIO_TOWER clearflag ENGINE_ROCKETS_IN_RADIO_TOWER setevent EVENT_GOLDENROD_CITY_ROCKET_SCOUT setevent EVENT_GOLDENROD_CITY_ROCKET_TAKEOVER setevent EVENT_RADIO_TOWER_ROCKET_TAKEOVER clearevent EVENT_MAHOGANY_MART_OWNERS clearflag ENGINE_ROCKETS_IN_MAHOGANY clearevent EVENT_GOLDENROD_CITY_CIVILIANS clearevent EVENT_RADIO_TOWER_CIVILIANS_AFTER setevent EVENT_BLACKTHORN_CITY_SUPER_NERD_BLOCKS_GYM clearevent EVENT_BLACKTHORN_CITY_SUPER_NERD_DOES_NOT_BLOCK_GYM special PlayMapMusic disappear RADIOTOWER5F_DIRECTOR moveobject RADIOTOWER5F_DIRECTOR, 12, 0 appear RADIOTOWER5F_DIRECTOR applymovement RADIOTOWER5F_DIRECTOR, RadioTower5FDirectorWalksIn turnobject PLAYER, RIGHT opentext writetext RadioTower5FDirectorThankYouText promptbutton verbosegiveitem CLEAR_BELL writetext RadioTower5FDirectorDescribeClearBellText waitbutton closetext setscene SCENE_RADIOTOWER5F_NOTHING setmapscene ECRUTEAK_TIN_TOWER_ENTRANCE, SCENE_DEFAULT setevent EVENT_GOT_CLEAR_BELL setevent EVENT_TEAM_ROCKET_DISBANDED sjump .UselessJump .UselessJump: applymovement RADIOTOWER5F_DIRECTOR, RadioTower5FDirectorWalksOut playsound SFX_EXIT_BUILDING disappear RADIOTOWER5F_DIRECTOR end Ben: jumptextfaceplayer BenText RadioTower5FUltraBall: itemball ULTRA_BALL RadioTower5FDirectorsOfficeSign: jumptext RadioTower5FDirectorsOfficeSignText RadioTower5FStudio1Sign: jumptext RadioTower5FStudio1SignText RadioTower5FBookshelf: jumpstd MagazineBookshelfScript FakeDirectorMovement: step LEFT step LEFT step LEFT step UP step UP step_end RadioTower5FDirectorWalksIn: step DOWN step DOWN step RIGHT step RIGHT step RIGHT step RIGHT step DOWN step DOWN step DOWN step LEFT step_end RadioTower5FDirectorWalksOut: step RIGHT step UP step UP step UP step LEFT step LEFT step LEFT step LEFT step UP step UP step_end RadioTower5FPlayerTwoStepsLeftMovement: step LEFT step LEFT step_end FakeDirectorTextBefore1: text "Y-you! You came to" line "rescue me?" done FakeDirectorTextBefore2: text "Is that what you" line "were expecting?" para "Wrong!" line "I'm an imposter!" para "I pretended to be" line "the real thing to" para "prepare for our" line "takeover." para "Do you want to" line "know where we hid" cont "the real DIRECTOR?" para "Sure, I'll tell" line "you. But only if" cont "you can beat me!" done FakeDirectorWinText: text "OK, OK. I'll tell" line "you where he is." done FakeDirectorTextAfter: text "We stashed the" line "real DIRECTOR in" para "the UNDERGROUND" line "WAREHOUSE." para "It's at the far" line "end of the UNDER-" cont "GROUND." para "But I doubt you'll" line "get that far." done Executivef1SeenText: text "Remember me from" line "the HIDEOUT in" cont "MAHOGANY TOWN?" para "I lost then, but I" line "won't this time." done Executivef1BeatenText: text "This can't be" line "happening!" para "I fought hard, but" line "I still lost…" done Executivef1AfterBattleText: text "<PLAYER>, isn't it?" para "A brat like you" line "won't appreciate" para "the magnificence" line "of TEAM ROCKET." para "That's too bad." line "I really admire" cont "your power." done RadioTower5FRocketBossBeforeText: text "Oh? You managed to" line "get this far?" para "You must be quite" line "the trainer." para "We intend to take" line "over this RADIO" para "STATION and an-" line "nounce our come-" cont "back." para "That should bring" line "our boss GIOVANNI" para "back from his solo" line "training." para "We are going to" line "regain our former" cont "glory." para "I won't allow you" line "to interfere with" cont "our plans." done RadioTower5FRocketBossWinText: text "No! Forgive me," line "GIOVANNI!" done RadioTower5FRocketBossAfterText: text "How could this be?" para "Our dreams have" line "come to naught." para "I wasn't up to the" line "task after all." para "Like GIOVANNI did" line "before me, I will" para "disband TEAM" line "ROCKET here today." para "Farewell." done RadioTower5FDirectorThankYouText: text "DIRECTOR: <PLAY_G>," line "thank you!" para "Your courageous" line "actions have saved" para "#MON nation-" line "wide." para "I know it's not" line "much, but please" cont "take this." done RadioTower5FDirectorDescribeClearBellText: text "There used to be a" line "tower right here" cont "in GOLDENROD CITY." para "But it was old and" line "creaky." para "So we replaced it" line "with our RADIO" cont "TOWER." para "We dug up that" line "bell during" cont "construction." para "I heard that all" line "sorts of #MON" para "lived in GOLDENROD" line "in the past." para "Perhaps…" para "That bell has some" line "connection to the" para "TIN TOWER in" line "ECRUTEAK CITY…" para "Ah!" para "That reminds me…" para "I overheard TEAM" line "ROCKET whispering." para "Apparently, some-" line "thing is going on" cont "at the TIN TOWER." para "I have no idea" line "what is happening," para "but you might look" line "into it." para "OK, I better go to" line "my OFFICE." done RadioTower5FDirectorText: text "DIRECTOR: Hello," line "<PLAY_G>!" para "You know, I love" line "#MON." para "I built this RADIO" line "TOWER so I could" para "express my love" line "of #MON." para "It would be nice" line "if people enjoyed" cont "our programs." done BenText: text "BEN: Do you listen" line "to our music?" done RadioTower5FDirectorsOfficeSignText: text "5F DIRECTOR'S" line " OFFICE" done RadioTower5FStudio1SignText: text "5F STUDIO 1" done RadioTower5F_MapEvents: db 0, 0 ; filler db 2 ; warp events warp_event 0, 0, RADIO_TOWER_4F, 1 warp_event 12, 0, RADIO_TOWER_4F, 3 db 2 ; coord events coord_event 0, 3, SCENE_DEFAULT, FakeDirectorScript coord_event 16, 5, SCENE_RADIOTOWER5F_ROCKET_BOSS, RadioTower5FRocketBossScene db 5 ; bg events bg_event 3, 0, BGEVENT_READ, RadioTower5FDirectorsOfficeSign bg_event 11, 0, BGEVENT_READ, RadioTower5FStudio1Sign bg_event 15, 0, BGEVENT_READ, RadioTower5FStudio1Sign bg_event 16, 1, BGEVENT_READ, RadioTower5FBookshelf bg_event 17, 1, BGEVENT_READ, RadioTower5FBookshelf db 5 ; object events object_event 3, 6, SPRITE_GENTLEMAN, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Director, -1 object_event 13, 5, SPRITE_ROCKET, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_RADIO_TOWER_ROCKET_TAKEOVER object_event 17, 2, SPRITE_ROCKET_GIRL, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerExecutivef1, EVENT_RADIO_TOWER_ROCKET_TAKEOVER object_event 13, 5, SPRITE_ROCKER, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, Ben, EVENT_RADIO_TOWER_CIVILIANS_AFTER object_event 8, 5, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, RadioTower5FUltraBall, EVENT_RADIO_TOWER_5F_ULTRA_BALL