ref: 3ab3f4273b1288883a43b64cae4191dfa6d2313e
dir: /scripts/pokemontower5.asm/
PokemonTower5Script: call EnableAutoTextBoxDrawing ld hl, PokemonTower5TrainerHeaders ld de, PokemonTower5ScriptPointers ld a, [wPokemonTower5CurScript] call ExecuteCurMapScriptInTable ld [wPokemonTower5CurScript], a ret PokemonTower5ScriptPointers: dw PokemonTower5Script0 dw DisplayEnemyTrainerTextAndStartBattle dw EndTrainerBattle PokemonTower5Script0: ld hl, CoordsData_60992 call ArePlayerCoordsInArray jr c, .asm_60960 ld hl, wd72e res 4, [hl] ResetEvent EVENT_IN_PURIFIED_ZONE jp CheckFightingMapTrainers .asm_60960 CheckAndSetEvent EVENT_IN_PURIFIED_ZONE ret nz xor a ld [hJoyHeld], a ld a, $f0 ld [wJoyIgnore], a ld hl, wd72e set 4, [hl] predef HealParty call GBFadeOutToWhite call Delay3 call Delay3 call GBFadeInFromWhite ld a, $7 ld [hSpriteIndexOrTextID], a call DisplayTextID xor a ld [wJoyIgnore], a ret CoordsData_60992: db $08,$0A db $08,$0B db $09,$0A db $09,$0B db $FF PokemonTower5TextPointers: dw PokemonTower5Text1 dw PokemonTower5Text2 dw PokemonTower5Text3 dw PokemonTower5Text4 dw PokemonTower5Text5 dw PickUpItemText dw PokemonTower5Text7 PokemonTower5TrainerHeaders: PokemonTower5TrainerHeader0: dbEventFlagBit EVENT_BEAT_POKEMONTOWER_5_TRAINER_0 db ($2 << 4) ; trainer's view range dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_5_TRAINER_0 dw PokemonTower5BattleText1 ; TextBeforeBattle dw PokemonTower5AfterBattleText1 ; TextAfterBattle dw PokemonTower5EndBattleText1 ; TextEndBattle dw PokemonTower5EndBattleText1 ; TextEndBattle PokemonTower5TrainerHeader1: dbEventFlagBit EVENT_BEAT_POKEMONTOWER_5_TRAINER_1 db ($3 << 4) ; trainer's view range dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_5_TRAINER_1 dw PokemonTower5BattleText2 ; TextBeforeBattle dw PokemonTower5AfterBattleText2 ; TextAfterBattle dw PokemonTower5EndBattleText2 ; TextEndBattle dw PokemonTower5EndBattleText2 ; TextEndBattle PokemonTower5TrainerHeader2: dbEventFlagBit EVENT_BEAT_POKEMONTOWER_5_TRAINER_2 db ($2 << 4) ; trainer's view range dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_5_TRAINER_2 dw PokemonTower5BattleText3 ; TextBeforeBattle dw PokemonTower5AfterBattleText3 ; TextAfterBattle dw PokemonTower5EndBattleText3 ; TextEndBattle dw PokemonTower5EndBattleText3 ; TextEndBattle PokemonTower5TrainerHeader3: dbEventFlagBit EVENT_BEAT_POKEMONTOWER_5_TRAINER_3 db ($2 << 4) ; trainer's view range dwEventFlagAddress EVENT_BEAT_POKEMONTOWER_5_TRAINER_3 dw PokemonTower5BattleText4 ; TextBeforeBattle dw PokemonTower5AfterBattleText4 ; TextAfterBattle dw PokemonTower5EndBattleText4 ; TextEndBattle dw PokemonTower5EndBattleText4 ; TextEndBattle db $ff PokemonTower5Text1: TX_FAR _PokemonTower5Text1 db "@" PokemonTower5Text2: TX_ASM ld hl, PokemonTower5TrainerHeader0 call TalkToTrainer jp TextScriptEnd PokemonTower5BattleText1: TX_FAR _PokemonTower5BattleText1 db "@" PokemonTower5EndBattleText1: TX_FAR _PokemonTower5EndBattleText1 db "@" PokemonTower5AfterBattleText1: TX_FAR _PokemonTower5AfterBattleText1 db "@" PokemonTower5Text3: TX_ASM ld hl, PokemonTower5TrainerHeader1 call TalkToTrainer jp TextScriptEnd PokemonTower5BattleText2: TX_FAR _PokemonTower5BattleText2 db "@" PokemonTower5EndBattleText2: TX_FAR _PokemonTower5EndBattleText2 db "@" PokemonTower5AfterBattleText2: TX_FAR _PokemonTower5AfterBattleText2 db "@" PokemonTower5Text4: TX_ASM ld hl, PokemonTower5TrainerHeader2 call TalkToTrainer jp TextScriptEnd PokemonTower5BattleText3: TX_FAR _PokemonTower5BattleText3 db "@" PokemonTower5EndBattleText3: TX_FAR _PokemonTower5EndBattleText3 db "@" PokemonTower5AfterBattleText3: TX_FAR _PokemonTower5AfterBattleText3 db "@" PokemonTower5Text5: TX_ASM ld hl, PokemonTower5TrainerHeader3 call TalkToTrainer jp TextScriptEnd PokemonTower5BattleText4: TX_FAR _PokemonTower5BattleText4 db "@" PokemonTower5EndBattleText4: TX_FAR _PokemonTower5EndBattleText4 db "@" PokemonTower5AfterBattleText4: TX_FAR _PokemonTower5AfterBattleText4 db "@" PokemonTower5Text7: TX_FAR _PokemonTower5Text7 db "@"