ref: 674b4dcc4aabde8b5556c0ed32383c32b11a4f0e
dir: /scripts/route22.asm/
Route22Script: ; 50eb2 (14:4eb2) call EnableAutoTextBoxDrawing ld hl, Route22ScriptPointers ld a, [wRoute22CurScript] jp CallFunctionInTable Route22ScriptPointers: ; 50ebe (14:4ebe) dw Route22Script0 dw Route22Script1 dw Route22Script2 dw Route22Script3 dw Route22Script4 dw Route22Script5 dw Route22Script6 dw Route22Script7 Route22Script_50ece: ; 50ece (14:4ece) xor a ld [wJoyIgnore], a ld [wRoute22CurScript], a Route22Script7: ; 50ed5 (14:4ed5) ret Route22Script_50ed6: ; 50ed6 (14:4ed6) ld a, [wRivalStarter] ld b, a .asm_50eda ld a, [hli] cp b jr z, .asm_50ee1 inc hl jr .asm_50eda .asm_50ee1 ld a, [hl] ld [wTrainerNo], a ret Route22MoveRivalSprite: ; 50ee6 (14:4ee6) ld de, Route22RivalMovementData ld a, [wcf0d] cp $1 jr z, .asm_50ef1 inc de .asm_50ef1 call MoveSprite ld a, SPRITE_FACING_RIGHT ld [hSpriteFacingDirection], a jp SetSpriteFacingDirectionAndDelay Route22RivalMovementData: ; 50efb (14:4efb) db NPC_MOVEMENT_RIGHT db NPC_MOVEMENT_RIGHT db NPC_MOVEMENT_RIGHT db NPC_MOVEMENT_RIGHT db $FF Route22Script0: ; 50f00 (14:4f00) CheckEvent EVENT_ROUTE22_RIVAL_WANTS_BATTLE ret z ld hl, .Route22RivalBattleCoords call ArePlayerCoordsInArray ret nc ld a, [wCoordIndex] ld [wcf0d], a xor a ld [hJoyHeld], a ld a, $f0 ld [wJoyIgnore], a ld a, PLAYER_DIR_LEFT ld [wPlayerMovingDirection], a CheckEvent EVENT_1ST_ROUTE22_RIVAL_BATTLE jr nz, .firstRivalBattle CheckEventReuseA EVENT_2ND_ROUTE22_RIVAL_BATTLE ; is this the rival at the end of the game? jp nz, Route22Script_5104e ret .Route22RivalBattleCoords db $04, $1D db $05, $1D db $FF .firstRivalBattle ld a, $1 ld [wEmotionBubbleSpriteIndex], a xor a ; EXCLAMATION_BUBBLE ld [wWhichEmotionBubble], a predef EmotionBubble ld a, [wWalkBikeSurfState] and a jr z, .asm_50f4e ld a, $ff ld [wNewSoundID], a call PlaySound .asm_50f4e ld c, BANK(Music_MeetRival) ld a, MUSIC_MEET_RIVAL call PlayMusic ld a, $1 ld [H_SPRITEINDEX], a call Route22MoveRivalSprite ld a, $1 ld [wRoute22CurScript], a ret Route22Script1: ; 50f62 (14:4f62) ld a, [wd730] bit 0, a ret nz ld a, [wcf0d] cp $1 jr nz, .asm_50f78 ld a, PLAYER_DIR_DOWN ld [wPlayerMovingDirection], a ld a, SPRITE_FACING_UP jr .asm_50f7a .asm_50f78 ld a, SPRITE_FACING_RIGHT .asm_50f7a ld [hSpriteFacingDirection], a ld a, $1 ld [H_SPRITEINDEX], a call SetSpriteFacingDirectionAndDelay xor a ld [wJoyIgnore], a ld a, $1 ld [hSpriteIndexOrTextID], a call DisplayTextID ld hl, wd72d set 6, [hl] set 7, [hl] ld hl, Route22RivalDefeatedText1 ld de, Route22Text_511bc call SaveEndBattleTextPointers ld a, OPP_SONY1 ld [wCurOpponent], a ld hl, StarterMons_50faf call Route22Script_50ed6 ld a, $2 ld [wRoute22CurScript], a ret StarterMons_50faf: ; 50faf (14:4faf) ; starter the rival picked, rival trainer number db STARTER2,$04 db STARTER3,$05 db STARTER1,$06 Route22Script2: ; 50fb5 (14:4fb5) ld a, [wIsInBattle] cp $ff jp z, Route22Script_50ece ld a, [wSpriteStateData1 + 9] and a ; cp SPRITE_FACING_DOWN jr nz, .notDown ld a, SPRITE_FACING_UP jr .done .notDown ld a, SPRITE_FACING_RIGHT .done ld [hSpriteFacingDirection], a ld a, $1 ld [H_SPRITEINDEX], a call SetSpriteFacingDirectionAndDelay ld a, $f0 ld [wJoyIgnore], a SetEvent EVENT_BEAT_ROUTE22_RIVAL_1ST_BATTLE ld a, $1 ld [hSpriteIndexOrTextID], a call DisplayTextID ld a, $ff ld [wNewSoundID], a call PlaySound callba Music_RivalAlternateStart ld a, [wcf0d] cp $1 jr nz, .asm_50fff call Route22Script_51008 jr .asm_51002 .asm_50fff call Route22Script_5100d .asm_51002 ld a, $3 ld [wRoute22CurScript], a ret Route22Script_51008: ; 51008 (14:5008) ld de, Route22RivalExitMovementData1 jr Route22MoveRival1 Route22Script_5100d: ; 5100d (14:500d) ld de, Route22RivalExitMovementData2 Route22MoveRival1: ; 51010 (14:5010) ld a, $1 ld [H_SPRITEINDEX], a jp MoveSprite Route22RivalExitMovementData1: ; 51017 (14:5017) db NPC_MOVEMENT_RIGHT db NPC_MOVEMENT_RIGHT db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db $FF Route22RivalExitMovementData2: ; 5101f (14:501f) db NPC_MOVEMENT_UP db NPC_MOVEMENT_RIGHT db NPC_MOVEMENT_RIGHT db NPC_MOVEMENT_RIGHT db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db NPC_MOVEMENT_DOWN db $FF Route22Script3: ; 5102a (14:502a) ld a, [wd730] bit 0, a ret nz xor a ld [wJoyIgnore], a ld a, HS_ROUTE_22_RIVAL_1 ld [wMissableObjectIndex], a predef HideObject call PlayDefaultMusic ResetEvents EVENT_1ST_ROUTE22_RIVAL_BATTLE, EVENT_ROUTE22_RIVAL_WANTS_BATTLE ld a, $0 ld [wRoute22CurScript], a ret Route22Script_5104e: ; 5104e (14:504e) ld a, $2 ld [wEmotionBubbleSpriteIndex], a xor a ; EXCLAMATION_BUBBLE ld [wWhichEmotionBubble], a predef EmotionBubble ld a, [wWalkBikeSurfState] and a jr z, .skipYVisibilityTesta ld a, $ff ld [wNewSoundID], a call PlaySound .skipYVisibilityTesta ld a, $ff ld [wNewSoundID], a call PlaySound callba Music_RivalAlternateTempo ld a, $2 ld [H_SPRITEINDEX], a call Route22MoveRivalSprite ld a, $4 ld [wRoute22CurScript], a ret Route22Script4: ; 51087 (14:5087) ld a, [wd730] bit 0, a ret nz ld a, $2 ld [H_SPRITEINDEX], a ld a, [wcf0d] cp $1 jr nz, .asm_510a1 ld a, PLAYER_DIR_DOWN ld [wPlayerMovingDirection], a ld a, SPRITE_FACING_UP jr .asm_510a8 .asm_510a1 ld a, PLAYER_DIR_LEFT ld [wPlayerMovingDirection], a ld a, SPRITE_FACING_RIGHT .asm_510a8 ld [hSpriteFacingDirection], a call SetSpriteFacingDirectionAndDelay xor a ld [wJoyIgnore], a ld a, $2 ld [hSpriteIndexOrTextID], a call DisplayTextID ld hl, wd72d set 6, [hl] set 7, [hl] ld hl, Route22RivalDefeatedText2 ld de, Route22Text_511d0 call SaveEndBattleTextPointers ld a, OPP_SONY2 ld [wCurOpponent], a ld hl, StarterMons_510d9 call Route22Script_50ed6 ld a, $5 ld [wRoute22CurScript], a ret StarterMons_510d9: ; 510d9 (14:50d9) db STARTER2,$0a db STARTER3,$0b db STARTER1,$0c Route22Script5: ; 510df (14:50df) ld a, [wIsInBattle] cp $ff jp z, Route22Script_50ece ld a, $2 ld [H_SPRITEINDEX], a ld a, [wcf0d] cp $1 jr nz, .asm_510fb ld a, PLAYER_DIR_DOWN ld [wPlayerMovingDirection], a ld a, SPRITE_FACING_UP jr .asm_51102 .asm_510fb ld a, PLAYER_DIR_LEFT ld [wPlayerMovingDirection], a ld a, SPRITE_FACING_RIGHT .asm_51102 ld [hSpriteFacingDirection], a call SetSpriteFacingDirectionAndDelay ld a, $f0 ld [wJoyIgnore], a SetEvent EVENT_BEAT_ROUTE22_RIVAL_2ND_BATTLE ld a, $2 ld [hSpriteIndexOrTextID], a call DisplayTextID ld a, $ff ld [wNewSoundID], a call PlaySound callba Music_RivalAlternateStartAndTempo ld a, [wcf0d] cp $1 jr nz, .asm_51134 call Route22Script_5113d jr .asm_51137 .asm_51134 call Route22Script_51142 .asm_51137 ld a, $6 ld [wRoute22CurScript], a ret Route22Script_5113d: ; 5113d (14:513d) ld de, MovementData_5114c jr Route22MoveRival2 Route22Script_51142: ; 51142 (14:5142) ld de, MovementData_5114d Route22MoveRival2: ; 51145 (14:5145) ld a, $2 ld [H_SPRITEINDEX], a jp MoveSprite MovementData_5114c: ; 5114c (14:514c) db NPC_MOVEMENT_LEFT MovementData_5114d: ; 5114d (14:514d) db NPC_MOVEMENT_LEFT db NPC_MOVEMENT_LEFT db NPC_MOVEMENT_LEFT db $FF Route22Script6: ; 51151 (14:5151) ld a, [wd730] bit 0, a ret nz xor a ld [wJoyIgnore], a ld a, HS_ROUTE_22_RIVAL_2 ld [wMissableObjectIndex], a predef HideObject call PlayDefaultMusic ResetEvents EVENT_2ND_ROUTE22_RIVAL_BATTLE, EVENT_ROUTE22_RIVAL_WANTS_BATTLE ld a, $7 ld [wRoute22CurScript], a ret Route22TextPointers: ; 51175 (14:5175) dw Route22Text1 dw Route22Text2 dw Route22FrontGateText Route22Text1: ; 5117b (14:517b) TX_ASM CheckEvent EVENT_BEAT_ROUTE22_RIVAL_1ST_BATTLE jr z, .asm_5118b ld hl, Route22RivalAfterBattleText1 call PrintText jr .asm_51191 .asm_5118b ld hl, Route22RivalBeforeBattleText1 call PrintText .asm_51191 jp TextScriptEnd Route22Text2: ; 51194 (14:5194) TX_ASM CheckEvent EVENT_BEAT_ROUTE22_RIVAL_2ND_BATTLE jr z, .asm_511a4 ld hl, Route22RivalAfterBattleText2 call PrintText jr .asm_511aa .asm_511a4 ld hl, Route22RivalBeforeBattleText2 call PrintText .asm_511aa jp TextScriptEnd Route22RivalBeforeBattleText1: ; 511ad (14:51ad) TX_FAR _Route22RivalBeforeBattleText1 db "@" Route22RivalAfterBattleText1: ; 511b2 (14:51b2) TX_FAR _Route22RivalAfterBattleText1 db "@" Route22RivalDefeatedText1: ; 511b7 (14:51b7) TX_FAR _Route22RivalDefeatedText1 db "@" Route22Text_511bc: ; 511bc (14:51bc) TX_FAR _Route22Text_511bc db "@" Route22RivalBeforeBattleText2: ; 511c1 (14:51c1) TX_FAR _Route22RivalBeforeBattleText2 db "@" Route22RivalAfterBattleText2: ; 511c6 (14:51c6) TX_FAR _Route22RivalAfterBattleText2 db "@" Route22RivalDefeatedText2: ; 511cb (14:51cb) TX_FAR _Route22RivalDefeatedText2 db "@" Route22Text_511d0: ; 511d0 (14:51d0) TX_FAR _Route22Text_511d0 db "@" Route22FrontGateText: ; 511d5 (14:51d5) TX_FAR _Route22FrontGateText db "@"