123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104 |
- VictoryRoad1Script:
- ld hl, wCurrentMapScriptFlags
- bit 5, [hl]
- res 5, [hl]
- call nz, .next
- call EnableAutoTextBoxDrawing
- ld hl, VictoryRoad1TrainerHeader0
- ld de, VictoryRoad1ScriptPointers
- ld a, [wVictoryRoad1CurScript]
- call ExecuteCurMapScriptInTable
- ld [wVictoryRoad1CurScript], a
- ret
- .next
- CheckEvent EVENT_VICTORY_ROAD_1_BOULDER_ON_SWITCH
- ret z
- ld a, $1d
- ld [wNewTileBlockID], a
- lb bc, 6, 4
- predef_jump ReplaceTileBlock
- VictoryRoad1ScriptPointers:
- dw VictoryRoad1Script0
- dw DisplayEnemyTrainerTextAndStartBattle
- dw EndTrainerBattle
- VictoryRoad1Script0:
- CheckEvent EVENT_VICTORY_ROAD_1_BOULDER_ON_SWITCH
- jp nz, CheckFightingMapTrainers
- ld hl, CoordsData_5da5c
- call CheckBoulderCoords
- jp nc, CheckFightingMapTrainers
- ld hl, wCurrentMapScriptFlags
- set 5, [hl]
- SetEvent EVENT_VICTORY_ROAD_1_BOULDER_ON_SWITCH
- ret
- CoordsData_5da5c:
- db $0D,$11,$FF
- VictoryRoad1TextPointers:
- dw VictoryRoad1Text1
- dw VictoryRoad1Text2
- dw PickUpItemText
- dw PickUpItemText
- dw BoulderText
- dw BoulderText
- dw BoulderText
- VictoryRoad1TrainerHeader0:
- dbEventFlagBit EVENT_BEAT_VICTORY_ROAD_1_TRAINER_0
- db ($2 << 4) ; trainer's view range
- dwEventFlagAddress EVENT_BEAT_VICTORY_ROAD_1_TRAINER_0
- dw VictoryRoad1BattleText1 ; TextBeforeBattle
- dw VictoryRoad1AfterBattleText1 ; TextAfterBattle
- dw VictoryRoad1EndBattleText1 ; TextEndBattle
- dw VictoryRoad1EndBattleText1 ; TextEndBattle
- VictoryRoad1TrainerHeader1:
- dbEventFlagBit EVENT_BEAT_VICTORY_ROAD_1_TRAINER_1
- db ($2 << 4) ; trainer's view range
- dwEventFlagAddress EVENT_BEAT_VICTORY_ROAD_1_TRAINER_1
- dw VictoryRoad1BattleText2 ; TextBeforeBattle
- dw VictoryRoad1AfterBattleText2 ; TextAfterBattle
- dw VictoryRoad1EndBattleText2 ; TextEndBattle
- dw VictoryRoad1EndBattleText2 ; TextEndBattle
- db $ff
- VictoryRoad1Text1:
- TX_ASM
- ld hl, VictoryRoad1TrainerHeader0
- call TalkToTrainer
- jp TextScriptEnd
- VictoryRoad1Text2:
- TX_ASM
- ld hl, VictoryRoad1TrainerHeader1
- call TalkToTrainer
- jp TextScriptEnd
- VictoryRoad1BattleText1:
- TX_FAR _VictoryRoad1BattleText1
- db "@"
- VictoryRoad1EndBattleText1:
- TX_FAR _VictoryRoad1EndBattleText1
- db "@"
- VictoryRoad1AfterBattleText1:
- TX_FAR _VictoryRoad1AfterBattleText1
- db "@"
- VictoryRoad1BattleText2:
- TX_FAR _VictoryRoad1BattleText2
- db "@"
- VictoryRoad1EndBattleText2:
- TX_FAR _VictoryRoad1EndBattleText2
- db "@"
- VictoryRoad1AfterBattleText2:
- TX_FAR _VictoryRoad1AfterBattleText2
- db "@"
|