ref: bcb251261dae3cd9ba423fc139c7db4433a1a802
dir: /scripts/route23.asm/
Route23Script: call Route23Script_511e9 call EnableAutoTextBoxDrawing ld hl, Route23ScriptPointers ld a, [wRoute23CurScript] jp CallFunctionInTable Route23Script_511e9: ld hl, wCurrentMapScriptFlags bit 6, [hl] res 6, [hl] ret z ResetEvents EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH1, EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH2 ResetEvents EVENT_VICTORY_ROAD_3_BOULDER_ON_SWITCH1, EVENT_VICTORY_ROAD_3_BOULDER_ON_SWITCH2 ld a, HS_VICTORY_ROAD_3_BOULDER ld [wMissableObjectIndex], a predef ShowObject ld a, HS_VICTORY_ROAD_2_BOULDER ld [wMissableObjectIndex], a predef_jump HideObject Route23ScriptPointers: dw Route23Script0 dw Route23Script1 dw Route23Script2 Route23Script0: ld hl, YCoordsData_51255 ld a, [wYCoord] ld b, a ld e, $0 EventFlagBit c, EVENT_PASSED_EARTHBADGE_CHECK + 1, EVENT_PASSED_CASCADEBADGE_CHECK .asm_51224 ld a, [hli] cp $ff ret z inc e dec c cp b jr nz, .asm_51224 cp $23 jr nz, .asm_51237 ld a, [wXCoord] cp $e ret nc .asm_51237 ld a, e ld [hSpriteIndexOrTextID], a ld a, c ld [wWhichBadge], a ld b, FLAG_TEST EventFlagAddress hl, EVENT_PASSED_CASCADEBADGE_CHECK predef FlagActionPredef ld a, c and a ret nz call Route23Script_5125d call DisplayTextID xor a ld [hJoyHeld], a ret YCoordsData_51255: db $23,$38,$55,$60,$69,$77,$88,$FF Route23Script_5125d: ld hl, BadgeTextPointers ld a, [wWhichBadge] ld c, a ld b, 0 add hl, bc add hl, bc ld a, [hli] ld h, [hl] ld l, a ld de, wcd6d .copyTextLoop ld a, [hli] ld [de], a inc de cp "@" jr nz, .copyTextLoop ret BadgeTextPointers: dw CascadeBadgeText dw ThunderBadgeText dw RainbowBadgeText dw SoulBadgeText dw MarshBadgeText dw VolcanoBadgeText dw EarthBadgeText EarthBadgeText: db "EARTHBADGE@" VolcanoBadgeText: db "VOLCANOBADGE@" MarshBadgeText: db "MARSHBADGE@" SoulBadgeText: db "SOULBADGE@" RainbowBadgeText: db "RAINBOWBADGE@" ThunderBadgeText: db "THUNDERBADGE@" CascadeBadgeText: db "CASCADEBADGE@" Route23Script_512d8: ld a, $1 ld [wSimulatedJoypadStatesIndex], a ld a, D_DOWN ld [wSimulatedJoypadStatesEnd], a xor a ld [wSpriteStateData1 + 9], a ld [wJoyIgnore], a jp StartSimulatingJoypadStates Route23Script1: ld a, [wSimulatedJoypadStatesIndex] and a ret nz Route23Script2: ld a, $0 ld [wRoute23CurScript], a ret Route23TextPointers: dw Route23Text1 dw Route23Text2 dw Route23Text3 dw Route23Text4 dw Route23Text5 dw Route23Text6 dw Route23Text7 dw Route23Text8 Route23Text1: TX_ASM EventFlagBit a, EVENT_PASSED_EARTHBADGE_CHECK, EVENT_PASSED_CASCADEBADGE_CHECK call Route23Script_51346 jp TextScriptEnd Route23Text2: TX_ASM EventFlagBit a, EVENT_PASSED_VOLCANOBADGE_CHECK, EVENT_PASSED_CASCADEBADGE_CHECK call Route23Script_51346 jp TextScriptEnd Route23Text3: TX_ASM EventFlagBit a, EVENT_PASSED_MARSHBADGE_CHECK, EVENT_PASSED_CASCADEBADGE_CHECK call Route23Script_51346 jp TextScriptEnd Route23Text4: TX_ASM EventFlagBit a, EVENT_PASSED_SOULBADGE_CHECK, EVENT_PASSED_CASCADEBADGE_CHECK call Route23Script_51346 jp TextScriptEnd Route23Text5: TX_ASM EventFlagBit a, EVENT_PASSED_RAINBOWBADGE_CHECK, EVENT_PASSED_CASCADEBADGE_CHECK call Route23Script_51346 jp TextScriptEnd Route23Text6: TX_ASM EventFlagBit a, EVENT_PASSED_THUNDERBADGE_CHECK, EVENT_PASSED_CASCADEBADGE_CHECK call Route23Script_51346 jp TextScriptEnd Route23Text7: TX_ASM EventFlagBit a, EVENT_PASSED_CASCADEBADGE_CHECK call Route23Script_51346 jp TextScriptEnd Route23Script_51346: ld [wWhichBadge], a call Route23Script_5125d ld a, [wWhichBadge] inc a ld c, a ld b, FLAG_TEST ld hl, wObtainedBadges predef FlagActionPredef ld a, c and a jr nz, .asm_5136e ld hl, VictoryRoadGuardText1 call PrintText call Route23Script_512d8 ld a, $1 ld [wRoute23CurScript], a ret .asm_5136e ld hl, VictoryRoadGuardText2 call PrintText ld a, [wWhichBadge] ld c, a ld b, FLAG_SET EventFlagAddress hl, EVENT_PASSED_CASCADEBADGE_CHECK predef FlagActionPredef ld a, $2 ld [wRoute23CurScript], a ret Route23Script_51388: ld hl, VictoryRoadGuardText2 jp PrintText VictoryRoadGuardText1: TX_FAR _VictoryRoadGuardText1 TX_ASM ld a, SFX_DENIED call PlaySoundWaitForCurrent call WaitForSoundToFinish jp TextScriptEnd VictoryRoadGuardText2: TX_FAR _VictoryRoadGuardText2 db $b TX_FAR _VictoryRoadGuardText_513a3 db "@" Route23Text8: TX_FAR _Route23Text8 db "@"