pokered/scripts/VermilionGym.asm

VermilionGym_Script:
	ld hl, wCurrentMapScriptFlags
	bit 5, [hl]
	res 5, [hl]
	push hl
	call nz, .LoadNames
	pop hl
	bit 6, [hl]
	res 6, [hl]
	call nz, VermilionGymSetDoorTile
	call EnableAutoTextBoxDrawing
	ld hl, VermilionGymTrainerHeader0
	ld de, VermilionGym_ScriptPointers
	ld a, [wVermilionGymCurScript]
	call ExecuteCurMapScriptInTable
	ld [wVermilionGymCurScript], a
	ret

.LoadNames:
	ld hl, .CityName
	ld de, .LeaderName
	jp LoadGymLeaderAndCityName

.CityName:
	db "VERMILION CITY@"

.LeaderName:
	db "LT.SURGE@"

VermilionGymSetDoorTile:
	CheckEvent EVENT_2ND_LOCK_OPENED
	jr nz, .doorsOpen
	ld a, $24 ; double door tile ID
	jr .replaceTile
.doorsOpen
	ld a, SFX_GO_INSIDE
	call PlaySound
	ld a, $5 ; clear floor tile ID
.replaceTile
	ld [wNewTileBlockID], a
	lb bc, 2, 2
	predef_jump ReplaceTileBlock

VermilionGymResetScripts:
	xor a
	ld [wJoyIgnore], a
	ld [wVermilionGymCurScript], a
	ld [wCurMapScript], a
	ret

VermilionGym_ScriptPointers:
	dw CheckFightingMapTrainers
	dw DisplayEnemyTrainerTextAndStartBattle
	dw EndTrainerBattle
	dw VermilionGymLTSurgePostBattle

VermilionGymLTSurgePostBattle:
	ld a, [wIsInBattle]
	cp $ff ; did we lose?
	jp z, VermilionGymResetScripts
	ld a, D_RIGHT | D_LEFT | D_UP | D_DOWN
	ld [wJoyIgnore], a

VermilionGymReceiveTM24:
	ld a, $6
	ldh [hSpriteIndexOrTextID], a
	call DisplayTextID
	SetEvent EVENT_BEAT_LT_SURGE
	lb bc, TM_THUNDERBOLT, 1
	call GiveItem
	jr nc, .BagFull
	ld a, $7
	ldh [hSpriteIndexOrTextID], a
	call DisplayTextID
	SetEvent EVENT_GOT_TM24
	jr .gymVictory
.BagFull
	ld a, $8
	ldh [hSpriteIndexOrTextID], a
	call DisplayTextID
.gymVictory
	ld hl, wObtainedBadges
	set BIT_THUNDERBADGE, [hl]
	ld hl, wBeatGymFlags
	set BIT_THUNDERBADGE, [hl]

	; deactivate gym trainers
	SetEventRange EVENT_BEAT_VERMILION_GYM_TRAINER_0, EVENT_BEAT_VERMILION_GYM_TRAINER_2

	jp VermilionGymResetScripts

VermilionGym_TextPointers:
	dw LTSurgeText
	dw VermilionGymTrainerText1
	dw VermilionGymTrainerText2
	dw VermilionGymTrainerText3
	dw VermilionGymFanText
	dw LTSurgeThunderbadgeInfoText
	dw ReceivedTM24Text
	dw TM24NoRoomText

VermilionGymTrainerHeader0:
	trainer EVENT_BEAT_VERMILION_GYM_TRAINER_0, 3, VermilionGymBattleText1, VermilionGymEndBattleText1, VermilionGymAfterBattleText1
VermilionGymTrainerHeader1:
	trainer EVENT_BEAT_VERMILION_GYM_TRAINER_1, 2, VermilionGymBattleText2, VermilionGymEndBattleText2, VermilionGymAfterBattleText2
VermilionGymTrainerHeader2:
	trainer EVENT_BEAT_VERMILION_GYM_TRAINER_2, 3, VermilionGymBattleText3, VermilionGymEndBattleText3, VermilionGymAfterBattleText3
	db -1 ; end

LTSurgeText:
	text_asm
	CheckEvent EVENT_BEAT_LT_SURGE
	jr z, .beforeBeat
	CheckEventReuseA EVENT_GOT_TM24
	jr nz, .afterBeat
	call z, VermilionGymReceiveTM24
	call DisableWaitingAfterTextDisplay
	jr .done
.afterBeat
	ld hl, LTSurgePostBattleAdviceText
	call PrintText
	jr .done
.beforeBeat
	ld hl, LTSurgePreBattleText
	call PrintText
	ld hl, wd72d
	set 6, [hl]
	set 7, [hl]
	ld hl, ReceivedThunderbadgeText
	ld de, ReceivedThunderbadgeText
	call SaveEndBattleTextPointers
	ldh a, [hSpriteIndex]
	ld [wSpriteIndex], a
	call EngageMapTrainer
	call InitBattleEnemyParameters
	ld a, $3
	ld [wGymLeaderNo], a
	xor a
	ldh [hJoyHeld], a
	ld a, $3 ; set script index to LT Surge post-battle script
	ld [wVermilionGymCurScript], a
	ld [wCurMapScript], a
.done
	jp TextScriptEnd

LTSurgePreBattleText:
	text_far _LTSurgePreBattleText
	text_end

LTSurgePostBattleAdviceText:
	text_far _LTSurgePostBattleAdviceText
	text_end

LTSurgeThunderbadgeInfoText:
	text_far _LTSurgeThunderbadgeInfoText
	text_end

ReceivedTM24Text:
	text_far _ReceivedTM24Text
	sound_get_key_item
	text_far _TM24ExplanationText
	text_end

TM24NoRoomText:
	text_far _TM24NoRoomText
	text_end

ReceivedThunderbadgeText:
	text_far _ReceivedThunderbadgeText
	text_end

VermilionGymTrainerText1:
	text_asm
	ld hl, VermilionGymTrainerHeader0
	call TalkToTrainer
	jp TextScriptEnd

VermilionGymBattleText1:
	text_far _VermilionGymBattleText1
	text_end

VermilionGymEndBattleText1:
	text_far _VermilionGymEndBattleText1
	text_end

VermilionGymAfterBattleText1:
	text_far _VermilionGymAfterBattleText1
	text_end

VermilionGymTrainerText2:
	text_asm
	ld hl, VermilionGymTrainerHeader1
	call TalkToTrainer
	jp TextScriptEnd

VermilionGymBattleText2:
	text_far _VermilionGymBattleText2
	text_end

VermilionGymEndBattleText2:
	text_far _VermilionGymEndBattleText2
	text_end

VermilionGymAfterBattleText2:
	text_far _VermilionGymAfterBattleText2
	text_end

VermilionGymTrainerText3:
	text_asm
	ld hl, VermilionGymTrainerHeader2
	call TalkToTrainer
	jp TextScriptEnd

VermilionGymBattleText3:
	text_far _VermilionGymBattleText3
	text_end

VermilionGymEndBattleText3:
	text_far _VermilionGymEndBattleText3
	text_end

VermilionGymAfterBattleText3:
	text_far _VermilionGymAfterBattleText3
	text_end

VermilionGymFanText:
	text_asm
	ld a, [wBeatGymFlags]
	bit BIT_THUNDERBADGE, a
	jr nz, .afterBeat
	ld hl, VermilionGymFanPreBattleText
	call PrintText
	jr .done
.afterBeat
	ld hl, VermilionGymFanPostBattleText
	call PrintText
.done
	jp TextScriptEnd

VermilionGymFanPreBattleText:
	text_far _VermilionGymFanPreBattleText
	text_end

VermilionGymFanPostBattleText:
	text_far _VermilionGymFanPostBattleText
	text_end
Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`VermilionGym_Script:`
Fix game time labels 2016-01-03 19:17:10 +00:00			`ld hl, wCurrentMapScriptFlags`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`bit 5, [hl]`
			`res 5, [hl]`
			`push hl`
Consistent labels for Gym name scripts 2020-07-18 18:01:13 +00:00			`call nz, .LoadNames`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`pop hl`
			`bit 6, [hl]`
			`res 6, [hl]`
document vermilion gym 2020-05-06 01:28:19 +00:00			`call nz, VermilionGymSetDoorTile`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call EnableAutoTextBoxDrawing`
			`ld hl, VermilionGymTrainerHeader0`
Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`ld de, VermilionGym_ScriptPointers`
No more W_ 2015-08-31 02:38:41 +00:00			`ld a, [wVermilionGymCurScript]`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call ExecuteCurMapScriptInTable`
No more W_ 2015-08-31 02:38:41 +00:00			`ld [wVermilionGymCurScript], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ret`

Consistent labels for Gym name scripts 2020-07-18 18:01:13 +00:00			`.LoadNames:`
			`ld hl, .CityName`
			`ld de, .LeaderName`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`jp LoadGymLeaderAndCityName`

Consistent labels for Gym name scripts 2020-07-18 18:01:13 +00:00			`.CityName:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`db "VERMILION CITY@"`

Consistent labels for Gym name scripts 2020-07-18 18:01:13 +00:00			`.LeaderName:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`db "LT.SURGE@"`

document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymSetDoorTile:`
enumerate events 2015-07-21 01:32:02 +00:00			`CheckEvent EVENT_2ND_LOCK_OPENED`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`jr nz, .doorsOpen`
document vermilion gym 2020-05-06 01:28:19 +00:00			`ld a, $24 ; double door tile ID`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`jr .replaceTile`
			`.doorsOpen`
Name sound effects 2015-07-19 08:46:12 +00:00			`ld a, SFX_GO_INSIDE`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call PlaySound`
document vermilion gym 2020-05-06 01:28:19 +00:00			`ld a, $5 ; clear floor tile ID`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`.replaceTile`
named animation functions/variables 2015-07-24 21:39:45 +00:00			`ld [wNewTileBlockID], a`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, 2, 2`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`predef_jump ReplaceTileBlock`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymResetScripts:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`xor a`
Rename joypad registers. 2014-05-25 17:51:53 +00:00			`ld [wJoyIgnore], a`
No more W_ 2015-08-31 02:38:41 +00:00			`ld [wVermilionGymCurScript], a`
			`ld [wCurMapScript], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ret`

Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`VermilionGym_ScriptPointers:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`dw CheckFightingMapTrainers`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`dw DisplayEnemyTrainerTextAndStartBattle`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`dw EndTrainerBattle`
document vermilion gym 2020-05-06 01:28:19 +00:00			`dw VermilionGymLTSurgePostBattle`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymLTSurgePostBattle:`
No more W_ 2015-08-31 02:38:41 +00:00			`ld a, [wIsInBattle]`
document vermilion gym 2020-05-06 01:28:19 +00:00			`cp $ff ; did we lose?`
			`jp z, VermilionGymResetScripts`
change input hex to constants 2020-05-06 01:42:40 +00:00			`ld a, D_RIGHT \| D_LEFT \| D_UP \| D_DOWN`
Rename joypad registers. 2014-05-25 17:51:53 +00:00			`ld [wJoyIgnore], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymReceiveTM24:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld a, $6`
Specify the ldh instruction, don't turn ld into ldh 2020-07-06 23:03:05 +00:00			`ldh [hSpriteIndexOrTextID], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call DisplayTextID`
gym leader events 2015-07-21 02:41:23 +00:00			`SetEvent EVENT_BEAT_LT_SURGE`
TM/HM constants named after moves 2020-07-06 02:52:27 +00:00			`lb bc, TM_THUNDERBOLT, 1`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call GiveItem`
			`jr nc, .BagFull`
			`ld a, $7`
Specify the ldh instruction, don't turn ld into ldh 2020-07-06 23:03:05 +00:00			`ldh [hSpriteIndexOrTextID], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call DisplayTextID`
gym leader events 2015-07-21 02:41:23 +00:00			`SetEvent EVENT_GOT_TM24`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`jr .gymVictory`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`.BagFull`
			`ld a, $8`
Specify the ldh instruction, don't turn ld into ldh 2020-07-06 23:03:05 +00:00			`ldh [hSpriteIndexOrTextID], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call DisplayTextID`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`.gymVictory`
No more W_ 2015-08-31 02:38:41 +00:00			`ld hl, wObtainedBadges`
Clean up some data, using macros for multiline list entries 2020-07-14 14:21:18 +00:00			`set BIT_THUNDERBADGE, [hl]`
yet more naming 2015-07-26 02:26:54 +00:00			`ld hl, wBeatGymFlags`
Clean up some data, using macros for multiline list entries 2020-07-14 14:21:18 +00:00			`set BIT_THUNDERBADGE, [hl]`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
			`; deactivate gym trainers`
enumerate events 2015-07-21 01:32:02 +00:00			`SetEventRange EVENT_BEAT_VERMILION_GYM_TRAINER_0, EVENT_BEAT_VERMILION_GYM_TRAINER_2`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`jp VermilionGymResetScripts`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`VermilionGym_TextPointers:`
document vermilion gym 2020-05-06 01:28:19 +00:00			`dw LTSurgeText`
			`dw VermilionGymTrainerText1`
			`dw VermilionGymTrainerText2`
			`dw VermilionGymTrainerText3`
			`dw VermilionGymFanText`
			`dw LTSurgeThunderbadgeInfoText`
			`dw ReceivedTM24Text`
			`dw TM24NoRoomText`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymTrainerHeader0:`
Use a 'trainer' macro for trainers in scripts/ 2020-07-14 19:45:36 +00:00			`trainer EVENT_BEAT_VERMILION_GYM_TRAINER_0, 3, VermilionGymBattleText1, VermilionGymEndBattleText1, VermilionGymAfterBattleText1`
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymTrainerHeader1:`
Use a 'trainer' macro for trainers in scripts/ 2020-07-14 19:45:36 +00:00			`trainer EVENT_BEAT_VERMILION_GYM_TRAINER_1, 2, VermilionGymBattleText2, VermilionGymEndBattleText2, VermilionGymAfterBattleText2`
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymTrainerHeader2:`
Use a 'trainer' macro for trainers in scripts/ 2020-07-14 19:45:36 +00:00			`trainer EVENT_BEAT_VERMILION_GYM_TRAINER_2, 3, VermilionGymBattleText3, VermilionGymEndBattleText3, VermilionGymAfterBattleText3`
			`db -1 ; end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`LTSurgeText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_asm`
gym leader events 2015-07-21 02:41:23 +00:00			`CheckEvent EVENT_BEAT_LT_SURGE`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`jr z, .beforeBeat`
gym leader events 2015-07-21 02:41:23 +00:00			`CheckEventReuseA EVENT_GOT_TM24`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`jr nz, .afterBeat`
document vermilion gym 2020-05-06 01:28:19 +00:00			`call z, VermilionGymReceiveTM24`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call DisableWaitingAfterTextDisplay`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`jr .done`
			`.afterBeat`
document vermilion gym 2020-05-06 01:28:19 +00:00			`ld hl, LTSurgePostBattleAdviceText`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call PrintText`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`jr .done`
			`.beforeBeat`
document vermilion gym 2020-05-06 01:28:19 +00:00			`ld hl, LTSurgePreBattleText`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call PrintText`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld hl, wd72d`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`set 6, [hl]`
			`set 7, [hl]`
			`ld hl, ReceivedThunderbadgeText`
			`ld de, ReceivedThunderbadgeText`
Commented/labelled misc functions 2014-09-14 18:29:18 +00:00			`call SaveEndBattleTextPointers`
Specify the ldh instruction, don't turn ld into ldh 2020-07-06 23:03:05 +00:00			`ldh a, [hSpriteIndex]`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`ld [wSpriteIndex], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call EngageMapTrainer`
			`call InitBattleEnemyParameters`
			`ld a, $3`
No more W_ 2015-08-31 02:38:41 +00:00			`ld [wGymLeaderNo], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`xor a`
Specify the ldh instruction, don't turn ld into ldh 2020-07-06 23:03:05 +00:00			`ldh [hJoyHeld], a`
document vermilion gym 2020-05-06 01:28:19 +00:00			`ld a, $3 ; set script index to LT Surge post-battle script`
No more W_ 2015-08-31 02:38:41 +00:00			`ld [wVermilionGymCurScript], a`
			`ld [wCurMapScript], a`
Deobfuscate gyms consistently 2019-10-07 05:23:57 +00:00			`.done`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`jp TextScriptEnd`

document vermilion gym 2020-05-06 01:28:19 +00:00			`LTSurgePreBattleText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _LTSurgePreBattleText`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`LTSurgePostBattleAdviceText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _LTSurgePostBattleAdviceText`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`LTSurgeThunderbadgeInfoText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _LTSurgeThunderbadgeInfoText`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`ReceivedTM24Text:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _ReceivedTM24Text`
			`sound_get_key_item`
			`text_far _TM24ExplanationText`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`TM24NoRoomText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _TM24NoRoomText`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`ReceivedThunderbadgeText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _ReceivedThunderbadgeText`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymTrainerText1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_asm`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, VermilionGymTrainerHeader0`
			`call TalkToTrainer`
			`jp TextScriptEnd`

remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymBattleText1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymBattleText1`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymEndBattleText1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymEndBattleText1`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymAfterBattleText1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymAfterBattleText1`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymTrainerText2:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_asm`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, VermilionGymTrainerHeader1`
			`call TalkToTrainer`
			`jp TextScriptEnd`

remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymBattleText2:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymBattleText2`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymEndBattleText2:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymEndBattleText2`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymAfterBattleText2:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymAfterBattleText2`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymTrainerText3:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_asm`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, VermilionGymTrainerHeader2`
			`call TalkToTrainer`
			`jp TextScriptEnd`

remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymBattleText3:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymBattleText3`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymEndBattleText3:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymEndBattleText3`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionGymAfterBattleText3:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymAfterBattleText3`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymFanText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_asm`
yet more naming 2015-07-26 02:26:54 +00:00			`ld a, [wBeatGymFlags]`
Clean up some data, using macros for multiline list entries 2020-07-14 14:21:18 +00:00			`bit BIT_THUNDERBADGE, a`
document vermilion gym 2020-05-06 01:28:19 +00:00			`jr nz, .afterBeat`
			`ld hl, VermilionGymFanPreBattleText`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call PrintText`
document vermilion gym 2020-05-06 01:28:19 +00:00			`jr .done`
			`.afterBeat`
			`ld hl, VermilionGymFanPostBattleText`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call PrintText`
document vermilion gym 2020-05-06 01:28:19 +00:00			`.done`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`jp TextScriptEnd`

document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymFanPreBattleText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymFanPreBattleText`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
document vermilion gym 2020-05-06 01:28:19 +00:00			`VermilionGymFanPostBattleText:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionGymFanPostBattleText`
			`text_end`