123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320 |
- Route24Script:
- call EnableAutoTextBoxDrawing
- ld hl, Route24TrainerHeader0
- ld de, Route24ScriptPointers
- ld a, [wRoute24CurScript]
- call ExecuteCurMapScriptInTable
- ld [wRoute24CurScript], a
- ret
- Route24Script_513c0:
- xor a
- ld [wJoyIgnore], a
- ld [wRoute24CurScript], a
- ld [wCurMapScript], a
- ret
- Route24ScriptPointers:
- dw Route24Script0
- dw DisplayEnemyTrainerTextAndStartBattle
- dw EndTrainerBattle
- dw Route24Script3
- dw Route24Script4
- Route24Script0:
- CheckEvent EVENT_GOT_NUGGET
- jp nz, CheckFightingMapTrainers
- ld hl, CoordsData_5140e
- call ArePlayerCoordsInArray
- jp nc, CheckFightingMapTrainers
- xor a
- ld [hJoyHeld], a
- ld a, $1
- ld [hSpriteIndexOrTextID], a
- call DisplayTextID
- CheckAndResetEvent EVENT_NUGGET_REWARD_AVAILABLE
- ret z
- ld a, D_DOWN
- ld [wSimulatedJoypadStatesEnd], a
- ld a, $1
- ld [wSimulatedJoypadStatesIndex], a
- call StartSimulatingJoypadStates
- ld a, $4
- ld [wRoute24CurScript], a
- ld [wCurMapScript], a
- ret
- CoordsData_5140e:
- db $0F,$0A,$FF
- Route24Script4:
- ld a, [wSimulatedJoypadStatesIndex]
- and a
- ret nz
- call Delay3
- ld a, $0
- ld [wRoute24CurScript], a
- ld [wCurMapScript], a
- ret
- Route24Script3:
- ld a, [wIsInBattle]
- cp $ff
- jp z, Route24Script_513c0
- call UpdateSprites
- ld a, $f0
- ld [wJoyIgnore], a
- SetEvent EVENT_BEAT_ROUTE24_ROCKET
- ld a, $1
- ld [hSpriteIndexOrTextID], a
- call DisplayTextID
- xor a
- ld [wJoyIgnore], a
- ld a, $0
- ld [wRoute24CurScript], a
- ld [wCurMapScript], a
- ret
- Route24TextPointers:
- dw Route24Text1
- dw Route24Text2
- dw Route24Text3
- dw Route24Text4
- dw Route24Text5
- dw Route24Text6
- dw Route24Text7
- dw PickUpItemText
- Route24TrainerHeader0:
- dbEventFlagBit EVENT_BEAT_ROUTE_24_TRAINER_0
- db ($4 << 4) ; trainer's view range
- dwEventFlagAddress EVENT_BEAT_ROUTE_24_TRAINER_0
- dw Route24BattleText1 ; TextBeforeBattle
- dw Route24AfterBattleText1 ; TextAfterBattle
- dw Route24EndBattleText1 ; TextEndBattle
- dw Route24EndBattleText1 ; TextEndBattle
- Route24TrainerHeader1:
- dbEventFlagBit EVENT_BEAT_ROUTE_24_TRAINER_1
- db ($1 << 4) ; trainer's view range
- dwEventFlagAddress EVENT_BEAT_ROUTE_24_TRAINER_1
- dw Route24BattleText2 ; TextBeforeBattle
- dw Route24AfterBattleText2 ; TextAfterBattle
- dw Route24EndBattleText2 ; TextEndBattle
- dw Route24EndBattleText2 ; TextEndBattle
- Route24TrainerHeader2:
- dbEventFlagBit EVENT_BEAT_ROUTE_24_TRAINER_2
- db ($1 << 4) ; trainer's view range
- dwEventFlagAddress EVENT_BEAT_ROUTE_24_TRAINER_2
- dw Route24BattleText3 ; TextBeforeBattle
- dw Route24AfterBattleText3 ; TextAfterBattle
- dw Route24EndBattleText3 ; TextEndBattle
- dw Route24EndBattleText3 ; TextEndBattle
- Route24TrainerHeader3:
- dbEventFlagBit EVENT_BEAT_ROUTE_24_TRAINER_3
- db ($1 << 4) ; trainer's view range
- dwEventFlagAddress EVENT_BEAT_ROUTE_24_TRAINER_3
- dw Route24BattleText4 ; TextBeforeBattle
- dw Route24AfterBattleText4 ; TextAfterBattle
- dw Route24EndBattleText4 ; TextEndBattle
- dw Route24EndBattleText4 ; TextEndBattle
- Route24TrainerHeader4:
- dbEventFlagBit EVENT_BEAT_ROUTE_24_TRAINER_4
- db ($1 << 4) ; trainer's view range
- dwEventFlagAddress EVENT_BEAT_ROUTE_24_TRAINER_4
- dw Route24BattleText5 ; TextBeforeBattle
- dw Route24AfterBattleText5 ; TextAfterBattle
- dw Route24EndBattleText5 ; TextEndBattle
- dw Route24EndBattleText5 ; TextEndBattle
- Route24TrainerHeader5:
- dbEventFlagBit EVENT_BEAT_ROUTE_24_TRAINER_5
- db ($1 << 4) ; trainer's view range
- dwEventFlagAddress EVENT_BEAT_ROUTE_24_TRAINER_5
- dw Route24BattleText6 ; TextBeforeBattle
- dw Route24AfterBattleText6 ; TextAfterBattle
- dw Route24EndBattleText6 ; TextEndBattle
- dw Route24EndBattleText6 ; TextEndBattle
- db $ff
- Route24Text1:
- TX_ASM
- ResetEvent EVENT_NUGGET_REWARD_AVAILABLE
- CheckEvent EVENT_GOT_NUGGET
- jr nz, .asm_514f9
- ld hl, Route24Text_51510
- call PrintText
- lb bc, NUGGET, 1
- call GiveItem
- jr nc, .BagFull
- SetEvent EVENT_GOT_NUGGET
- ld hl, Route24Text_5151a
- call PrintText
- ld hl, Route24Text_51526
- call PrintText
- ld hl, wd72d
- set 6, [hl]
- set 7, [hl]
- ld hl, Route24Text_5152b
- ld de, Route24Text_5152b
- call SaveEndBattleTextPointers
- ld a, [hSpriteIndexOrTextID]
- ld [wSpriteIndex], a
- call EngageMapTrainer
- call InitBattleEnemyParameters
- xor a
- ld [hJoyHeld], a
- ld a, $3
- ld [wRoute24CurScript], a
- ld [wCurMapScript], a
- jp TextScriptEnd
- .asm_514f9
- ld hl, Route24Text_51530
- call PrintText
- jp TextScriptEnd
- .BagFull
- ld hl, Route24Text_51521
- call PrintText
- SetEvent EVENT_NUGGET_REWARD_AVAILABLE
- jp TextScriptEnd
- Route24Text_51510:
- TX_FAR _Route24Text_51510
- TX_SFX_ITEM_1
- TX_FAR _Route24Text_51515
- db "@"
- Route24Text_5151a:
- TX_FAR _Route24Text_5151a
- TX_SFX_ITEM_1
- TX_BLINK
- db "@"
- Route24Text_51521:
- TX_FAR _Route24Text_51521
- db "@"
- Route24Text_51526:
- TX_FAR _Route24Text_51526
- db "@"
- Route24Text_5152b:
- TX_FAR _Route24Text_5152b
- db "@"
- Route24Text_51530:
- TX_FAR _Route24Text_51530
- db "@"
- Route24Text2:
- TX_ASM
- ld hl, Route24TrainerHeader0
- call TalkToTrainer
- jp TextScriptEnd
- Route24Text3:
- TX_ASM
- ld hl, Route24TrainerHeader1
- call TalkToTrainer
- jp TextScriptEnd
- Route24Text4:
- TX_ASM
- ld hl, Route24TrainerHeader2
- call TalkToTrainer
- jp TextScriptEnd
- Route24Text5:
- TX_ASM
- ld hl, Route24TrainerHeader3
- call TalkToTrainer
- jp TextScriptEnd
- Route24Text6:
- TX_ASM
- ld hl, Route24TrainerHeader4
- call TalkToTrainer
- jp TextScriptEnd
- Route24Text7:
- TX_ASM
- ld hl, Route24TrainerHeader5
- call TalkToTrainer
- jp TextScriptEnd
- Route24BattleText1:
- TX_FAR _Route24BattleText1
- db "@"
- Route24EndBattleText1:
- TX_FAR _Route24EndBattleText1
- db "@"
- Route24AfterBattleText1:
- TX_FAR _Route24AfterBattleText1
- db "@"
- Route24BattleText2:
- TX_FAR _Route24BattleText2
- db "@"
- Route24EndBattleText2:
- TX_FAR _Route24EndBattleText2
- db "@"
- Route24AfterBattleText2:
- TX_FAR _Route24AfterBattleText2
- db "@"
- Route24BattleText3:
- TX_FAR _Route24BattleText3
- db "@"
- Route24EndBattleText3:
- TX_FAR _Route24EndBattleText3
- db "@"
- Route24AfterBattleText3:
- TX_FAR _Route24AfterBattleText3
- db "@"
- Route24BattleText4:
- TX_FAR _Route24BattleText4
- db "@"
- Route24EndBattleText4:
- TX_FAR _Route24EndBattleText4
- db "@"
- Route24AfterBattleText4:
- TX_FAR _Route24AfterBattleText4
- db "@"
- Route24BattleText5:
- TX_FAR _Route24BattleText5
- db "@"
- Route24EndBattleText5:
- TX_FAR _Route24EndBattleText5
- db "@"
- Route24AfterBattleText5:
- TX_FAR _Route24AfterBattleText5
- db "@"
- Route24BattleText6:
- TX_FAR _Route24BattleText6
- db "@"
- Route24EndBattleText6:
- TX_FAR _Route24EndBattleText6
- db "@"
- Route24AfterBattleText6:
- TX_FAR _Route24AfterBattleText6
- db "@"
|