pokered/scripts/ViridianGym.asm

443 lines
12 KiB
NASM
Raw Normal View History

ViridianGym_Script:
2020-07-18 18:01:13 +00:00
ld hl, .CityName
ld de, .LeaderName
2014-05-18 18:19:10 +00:00
call LoadGymLeaderAndCityName
call EnableAutoTextBoxDrawing
ld hl, ViridianGymTrainerHeaders
ld de, ViridianGym_ScriptPointers
2015-08-31 02:38:41 +00:00
ld a, [wViridianGymCurScript]
2014-05-18 18:19:10 +00:00
call ExecuteCurMapScriptInTable
2015-08-31 02:38:41 +00:00
ld [wViridianGymCurScript], a
2014-05-18 18:19:10 +00:00
ret
2020-07-18 18:01:13 +00:00
.CityName:
2014-05-18 18:19:10 +00:00
db "VIRIDIAN CITY@"
2020-07-18 18:01:13 +00:00
.LeaderName:
2014-05-18 18:19:10 +00:00
db "GIOVANNI@"
ViridianGymResetScripts:
2014-05-18 18:19:10 +00:00
xor a
2014-05-25 17:51:53 +00:00
ld [wJoyIgnore], a
2015-08-31 02:38:41 +00:00
ld [wViridianGymCurScript], a
ld [wCurMapScript], a
2014-05-18 18:19:10 +00:00
ret
ViridianGym_ScriptPointers:
def_script_pointers
dw_const ViridianGymDefaultScript, SCRIPT_VIRIDIANGYM_DEFAULT
dw_const DisplayEnemyTrainerTextAndStartBattle, SCRIPT_VIRIDIANGYM_START_BATTLE
dw_const EndTrainerBattle, SCRIPT_VIRIDIANGYM_END_BATTLE
dw_const ViridianGymGiovanniPostBattle, SCRIPT_VIRIDIANGYM_GIOVANNI_POST_BATTLE
dw_const ViridianGymPlayerSpinningScript, SCRIPT_VIRIDIANGYM_PLAYER_SPINNING
ViridianGymDefaultScript:
2015-08-31 02:38:41 +00:00
ld a, [wYCoord]
2014-05-18 18:19:10 +00:00
ld b, a
2015-08-31 02:38:41 +00:00
ld a, [wXCoord]
2014-05-18 18:19:10 +00:00
ld c, a
ld hl, ViridianGymArrowTilePlayerMovement
2014-09-14 18:29:18 +00:00
call DecodeArrowMovementRLE
2014-05-18 18:19:10 +00:00
cp $ff
jp z, CheckFightingMapTrainers
call StartSimulatingJoypadStates
ld hl, wd736
2014-05-18 18:19:10 +00:00
set 7, [hl]
2015-07-19 08:46:12 +00:00
ld a, SFX_ARROW_TILES
2014-05-18 18:19:10 +00:00
call PlaySound
ld a, A_BUTTON | B_BUTTON | SELECT | START | D_RIGHT | D_LEFT | D_UP | D_DOWN
2014-05-25 17:51:53 +00:00
ld [wJoyIgnore], a
ld a, SCRIPT_VIRIDIANGYM_PLAYER_SPINNING
2015-08-31 02:38:41 +00:00
ld [wCurMapScript], a
2014-05-18 18:19:10 +00:00
ret
2016-06-12 00:24:04 +00:00
ViridianGymArrowTilePlayerMovement:
map_coord_movement 19, 11, ViridianGymArrowMovement1
map_coord_movement 19, 1, ViridianGymArrowMovement2
map_coord_movement 18, 2, ViridianGymArrowMovement3
map_coord_movement 11, 2, ViridianGymArrowMovement4
map_coord_movement 16, 10, ViridianGymArrowMovement5
map_coord_movement 4, 6, ViridianGymArrowMovement6
map_coord_movement 5, 13, ViridianGymArrowMovement7
map_coord_movement 4, 14, ViridianGymArrowMovement8
map_coord_movement 0, 15, ViridianGymArrowMovement9
map_coord_movement 1, 15, ViridianGymArrowMovement10
map_coord_movement 13, 16, ViridianGymArrowMovement11
map_coord_movement 13, 17, ViridianGymArrowMovement12
db -1 ; end
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement1:
db D_UP, 9
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement2:
db D_LEFT, 8
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement3:
db D_DOWN, 9
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement4:
db D_RIGHT, 6
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement5:
db D_DOWN, 2
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement6:
db D_DOWN, 7
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement7:
db D_RIGHT, 8
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement8:
db D_RIGHT, 9
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement9:
db D_UP, 8
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement10:
db D_UP, 6
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement11:
db D_LEFT, 6
db -1 ; end
2014-05-18 18:19:10 +00:00
2016-06-12 00:24:04 +00:00
ViridianGymArrowMovement12:
db D_LEFT, 12
db -1 ; end
2014-05-18 18:19:10 +00:00
ViridianGymPlayerSpinningScript:
ld a, [wSimulatedJoypadStatesIndex]
2014-05-18 18:19:10 +00:00
and a
jr nz, .ViridianGymLoadSpinnerArrow
2014-05-18 18:19:10 +00:00
xor a
2014-05-25 17:51:53 +00:00
ld [wJoyIgnore], a
ld hl, wd736
2014-05-18 18:19:10 +00:00
res 7, [hl]
ld a, SCRIPT_VIRIDIANGYM_DEFAULT
2015-08-31 02:38:41 +00:00
ld [wCurMapScript], a
2014-05-18 18:19:10 +00:00
ret
.ViridianGymLoadSpinnerArrow
farjp LoadSpinnerArrowTiles
2014-05-18 18:19:10 +00:00
ViridianGymGiovanniPostBattle:
2015-08-31 02:38:41 +00:00
ld a, [wIsInBattle]
2014-05-18 18:19:10 +00:00
cp $ff
jp z, ViridianGymResetScripts
ld a, D_RIGHT | D_LEFT | D_UP | D_DOWN
2014-05-25 17:51:53 +00:00
ld [wJoyIgnore], a
; fallthrough
ViridianGymReceiveTM27:
ld a, TEXT_VIRIDIANGYM_GIOVANNI_EARTH_BADGE_INFO
ldh [hSpriteIndexOrTextID], a
2014-05-18 18:19:10 +00:00
call DisplayTextID
2015-07-21 02:41:23 +00:00
SetEvent EVENT_BEAT_VIRIDIAN_GYM_GIOVANNI
2020-07-06 02:52:27 +00:00
lb bc, TM_FISSURE, 1
2014-05-18 18:19:10 +00:00
call GiveItem
jr nc, .bag_full
ld a, TEXT_VIRIDIANGYM_GIOVANNI_RECEIVED_TM27
ldh [hSpriteIndexOrTextID], a
2014-05-18 18:19:10 +00:00
call DisplayTextID
2015-07-21 02:41:23 +00:00
SetEvent EVENT_GOT_TM27
jr .gym_victory
.bag_full
ld a, TEXT_VIRIDIANGYM_GIOVANNI_TM27_NO_ROOM
ldh [hSpriteIndexOrTextID], a
2014-05-18 18:19:10 +00:00
call DisplayTextID
.gym_victory
2015-08-31 02:38:41 +00:00
ld hl, wObtainedBadges
set BIT_EARTHBADGE, [hl]
2015-07-26 02:26:54 +00:00
ld hl, wBeatGymFlags
set BIT_EARTHBADGE, [hl]
2014-05-18 18:19:10 +00:00
; deactivate gym trainers
2015-07-21 01:32:02 +00:00
SetEventRange EVENT_BEAT_VIRIDIAN_GYM_TRAINER_0, EVENT_BEAT_VIRIDIAN_GYM_TRAINER_7
2014-05-18 18:19:10 +00:00
ld a, HS_ROUTE_22_RIVAL_2
2015-07-25 03:27:59 +00:00
ld [wMissableObjectIndex], a
predef ShowObject
SetEvents EVENT_2ND_ROUTE22_RIVAL_BATTLE, EVENT_ROUTE22_RIVAL_WANTS_BATTLE
jp ViridianGymResetScripts
2014-05-18 18:19:10 +00:00
ViridianGym_TextPointers:
def_text_pointers
dw_const ViridianGymGiovanniText, TEXT_VIRIDIANGYM_GIOVANNI
dw_const ViridianGymCooltrainerM1Text, TEXT_VIRIDIANGYM_COOLTRAINER_M1
dw_const ViridianGymHiker1Text, TEXT_VIRIDIANGYM_HIKER1
dw_const ViridianGymRocker1Text, TEXT_VIRIDIANGYM_ROCKER1
dw_const ViridianGymHiker2Text, TEXT_VIRIDIANGYM_HIKER2
dw_const ViridianGymCooltrainerM2Text, TEXT_VIRIDIANGYM_COOLTRAINER_M2
dw_const ViridianGymHiker3Text, TEXT_VIRIDIANGYM_HIKER3
dw_const ViridianGymRocker2Text, TEXT_VIRIDIANGYM_ROCKER2
dw_const ViridianGymCooltrainerM3Text, TEXT_VIRIDIANGYM_COOLTRAINER_M3
dw_const ViridianGymGymGuideText, TEXT_VIRIDIANGYM_GYM_GUIDE
dw_const PickUpItemText, TEXT_VIRIDIANGYM_REVIVE
dw_const ViridianGymGiovanniEarthBadgeInfoText, TEXT_VIRIDIANGYM_GIOVANNI_EARTH_BADGE_INFO
dw_const ViridianGymGiovanniReceivedTM27Text, TEXT_VIRIDIANGYM_GIOVANNI_RECEIVED_TM27
dw_const ViridianGymGiovanniTM27NoRoomText, TEXT_VIRIDIANGYM_GIOVANNI_TM27_NO_ROOM
2014-05-18 18:19:10 +00:00
ViridianGymTrainerHeaders:
def_trainers 2
2016-06-12 00:24:04 +00:00
ViridianGymTrainerHeader0:
trainer EVENT_BEAT_VIRIDIAN_GYM_TRAINER_0, 4, ViridianGymCooltrainerM1BattleText, ViridianGymCooltrainerM1EndBattleText, ViridianGymCooltrainerM1AfterBattleText
2016-06-12 00:24:04 +00:00
ViridianGymTrainerHeader1:
trainer EVENT_BEAT_VIRIDIAN_GYM_TRAINER_1, 4, ViridianGymHiker1BattleText, ViridianGymHiker1EndBattleText, ViridianGymHiker1AfterBattleText
2016-06-12 00:24:04 +00:00
ViridianGymTrainerHeader2:
trainer EVENT_BEAT_VIRIDIAN_GYM_TRAINER_2, 4, ViridianGymRocker1BattleText, ViridianGymRocker1EndBattleText, ViridianGymRocker1AfterBattleText
2016-06-12 00:24:04 +00:00
ViridianGymTrainerHeader3:
trainer EVENT_BEAT_VIRIDIAN_GYM_TRAINER_3, 2, ViridianGymHiker2BattleText, ViridianGymHiker2EndBattleText, ViridianGymHiker2AfterBattleText
2016-06-12 00:24:04 +00:00
ViridianGymTrainerHeader4:
trainer EVENT_BEAT_VIRIDIAN_GYM_TRAINER_4, 3, ViridianGymCooltrainerM2BattleText, ViridianGymCooltrainerM2EndBattleText, ViridianGymCooltrainerM2AfterBattleText
2016-06-12 00:24:04 +00:00
ViridianGymTrainerHeader5:
trainer EVENT_BEAT_VIRIDIAN_GYM_TRAINER_5, 4, ViridianGymHiker3BattleText, ViridianGymHiker3EndBattleText, ViridianGymHiker3AfterBattleText
2016-06-12 00:24:04 +00:00
ViridianGymTrainerHeader6:
trainer EVENT_BEAT_VIRIDIAN_GYM_TRAINER_6, 3, ViridianGymRocker2BattleText, ViridianGymRocker2EndBattleText, ViridianGymRocker2AfterBattleText
2016-06-12 00:24:04 +00:00
ViridianGymTrainerHeader7:
trainer EVENT_BEAT_VIRIDIAN_GYM_TRAINER_7, 4, ViridianGymCooltrainerM3BattleText, ViridianGymCooltrainerM3EndBattleText, ViridianGymCooltrainerM3AfterBattleText
db -1 ; end
2014-05-18 18:19:10 +00:00
ViridianGymGiovanniText:
text_asm
2015-07-21 02:41:23 +00:00
CheckEvent EVENT_BEAT_VIRIDIAN_GYM_GIOVANNI
jr z, .beforeBeat
2015-07-21 02:41:23 +00:00
CheckEventReuseA EVENT_GOT_TM27
jr nz, .afterBeat
call z, ViridianGymReceiveTM27
2014-05-18 18:19:10 +00:00
call DisableWaitingAfterTextDisplay
jr .text_script_end
.afterBeat
2014-05-18 18:19:10 +00:00
ld a, $1
2014-09-13 07:50:56 +00:00
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
ld hl, .PostBattleAdviceText
2014-05-18 18:19:10 +00:00
call PrintText
2014-09-13 07:50:56 +00:00
call GBFadeOutToBlack
ld a, HS_VIRIDIAN_GYM_GIOVANNI
2015-07-25 03:27:59 +00:00
ld [wMissableObjectIndex], a
predef HideObject
2014-05-18 18:19:10 +00:00
call UpdateSprites
call Delay3
2014-09-13 07:50:56 +00:00
call GBFadeInFromBlack
jr .text_script_end
.beforeBeat
ld hl, .PreBattleText
2014-05-18 18:19:10 +00:00
call PrintText
ld hl, wd72d
2014-05-18 18:19:10 +00:00
set 6, [hl]
set 7, [hl]
ld hl, .ReceivedEarthBadgeText
ld de, .ReceivedEarthBadgeText
2014-09-14 18:29:18 +00:00
call SaveEndBattleTextPointers
ldh a, [hSpriteIndex]
2014-09-13 07:50:56 +00:00
ld [wSpriteIndex], a
2014-05-18 18:19:10 +00:00
call EngageMapTrainer
call InitBattleEnemyParameters
ld a, $8
2015-08-31 02:38:41 +00:00
ld [wGymLeaderNo], a
ld a, SCRIPT_VIRIDIANGYM_GIOVANNI_POST_BATTLE
2015-08-31 02:38:41 +00:00
ld [wViridianGymCurScript], a
.text_script_end
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
.PreBattleText:
text_far _ViridianGymGiovanniPreBattleText
text_end
2014-05-18 18:19:10 +00:00
.ReceivedEarthBadgeText:
text_far _ViridianGymGiovanniReceivedEarthBadgeText
sound_level_up ; probably supposed to play SFX_GET_ITEM_1 but the wrong music bank is loaded
text_end
2014-05-18 18:19:10 +00:00
.PostBattleAdviceText:
text_far _ViridianGymGiovanniPostBattleAdviceText
text_waitbutton
text_end
2014-05-18 18:19:10 +00:00
ViridianGymGiovanniEarthBadgeInfoText:
text_far _ViridianGymGiovanniEarthBadgeInfoText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymGiovanniReceivedTM27Text:
text_far _ViridianGymGiovanniReceivedTM27Text
sound_get_item_1
2014-05-18 18:19:10 +00:00
ViridianGymGiovanniTM27ExplanationText:
text_far _ViridianGymGiovanniTM27ExplanationText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymGiovanniTM27NoRoomText:
text_far _ViridianGymGiovanniTM27NoRoomText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM1Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, ViridianGymTrainerHeader0
call TalkToTrainer
jp TextScriptEnd
ViridianGymCooltrainerM1BattleText:
text_far _ViridianGymCooltrainerM1BattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM1EndBattleText:
text_far _ViridianGymCooltrainerM1EndBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM1AfterBattleText:
text_far _ViridianGymCooltrainerM1AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker1Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, ViridianGymTrainerHeader1
call TalkToTrainer
jp TextScriptEnd
ViridianGymHiker1BattleText:
text_far _ViridianGymHiker1BattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker1EndBattleText:
text_far _ViridianGymHiker1EndBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker1AfterBattleText:
text_far _ViridianGymHiker1AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymRocker1Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, ViridianGymTrainerHeader2
call TalkToTrainer
jp TextScriptEnd
ViridianGymRocker1BattleText:
text_far _ViridianGymRocker1BattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymRocker1EndBattleText:
text_far _ViridianGymRocker1EndBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymRocker1AfterBattleText:
text_far _ViridianGymRocker1AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker2Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, ViridianGymTrainerHeader3
call TalkToTrainer
jp TextScriptEnd
ViridianGymHiker2BattleText:
text_far _ViridianGymHiker2BattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker2EndBattleText:
text_far _ViridianGymHiker2EndBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker2AfterBattleText:
text_far _ViridianGymHiker2AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM2Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, ViridianGymTrainerHeader4
call TalkToTrainer
jp TextScriptEnd
ViridianGymCooltrainerM2BattleText:
text_far _ViridianGymCooltrainerM2BattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM2EndBattleText:
text_far _ViridianGymCooltrainerM2EndBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM2AfterBattleText:
text_far _ViridianGymCooltrainerM2AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker3Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, ViridianGymTrainerHeader5
call TalkToTrainer
jp TextScriptEnd
ViridianGymHiker3BattleText:
text_far _ViridianGymHiker3BattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker3EndBattleText:
text_far _ViridianGymHiker3EndBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymHiker3AfterBattleText:
text_far _ViridianGymHiker3AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymRocker2Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, ViridianGymTrainerHeader6
call TalkToTrainer
jp TextScriptEnd
ViridianGymRocker2BattleText:
text_far _ViridianGymRocker2BattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymRocker2EndBattleText:
text_far _ViridianGymRocker2EndBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymRocker2AfterBattleText:
text_far _ViridianGymRocker2AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM3Text:
text_asm
2014-05-18 18:19:10 +00:00
ld hl, ViridianGymTrainerHeader7
call TalkToTrainer
jp TextScriptEnd
ViridianGymCooltrainerM3BattleText:
text_far _ViridianGymCooltrainerM3BattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM3EndBattleText:
text_far _ViridianGymCooltrainerM3EndBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymCooltrainerM3AfterBattleText:
text_far _ViridianGymCooltrainerM3AfterBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymGymGuideText:
text_asm
2015-07-21 02:41:23 +00:00
CheckEvent EVENT_BEAT_VIRIDIAN_GYM_GIOVANNI
jr nz, .afterBeat
ld hl, ViridianGymGuidePreBattleText
2014-05-18 18:19:10 +00:00
call PrintText
jr .done
.afterBeat
ld hl, ViridianGymGuidePostBattleText
2014-05-18 18:19:10 +00:00
call PrintText
.done
2014-05-18 18:19:10 +00:00
jp TextScriptEnd
ViridianGymGuidePreBattleText:
text_far _ViridianGymGuidePreBattleText
text_end
2014-05-18 18:19:10 +00:00
ViridianGymGuidePostBattleText:
text_far _ViridianGymGuidePostBattleText
text_end