pokered/scripts/VictoryRoad1F.asm

VictoryRoad1F_Script:
	ld hl, wCurrentMapScriptFlags
	bit 5, [hl]
	res 5, [hl]
	call nz, .next
	call EnableAutoTextBoxDrawing
	ld hl, VictoryRoad1TrainerHeaders
	ld de, VictoryRoad1F_ScriptPointers
	ld a, [wVictoryRoad1FCurScript]
	call ExecuteCurMapScriptInTable
	ld [wVictoryRoad1FCurScript], 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

VictoryRoad1F_ScriptPointers:
	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:
	dbmapcoord 17, 13
	db -1 ; end

VictoryRoad1F_TextPointers:
	dw VictoryRoad1Text1
	dw VictoryRoad1Text2
	dw PickUpItemText
	dw PickUpItemText
	dw BoulderText
	dw BoulderText
	dw BoulderText

VictoryRoad1TrainerHeaders:
	def_trainers
VictoryRoad1TrainerHeader0:
	trainer EVENT_BEAT_VICTORY_ROAD_1_TRAINER_0, 2, VictoryRoad1BattleText1, VictoryRoad1EndBattleText1, VictoryRoad1AfterBattleText1
VictoryRoad1TrainerHeader1:
	trainer EVENT_BEAT_VICTORY_ROAD_1_TRAINER_1, 2, VictoryRoad1BattleText2, VictoryRoad1EndBattleText2, VictoryRoad1AfterBattleText2
	db -1 ; end

VictoryRoad1Text1:
	text_asm
	ld hl, VictoryRoad1TrainerHeader0
	call TalkToTrainer
	jp TextScriptEnd

VictoryRoad1Text2:
	text_asm
	ld hl, VictoryRoad1TrainerHeader1
	call TalkToTrainer
	jp TextScriptEnd

VictoryRoad1BattleText1:
	text_far _VictoryRoad1BattleText1
	text_end

VictoryRoad1EndBattleText1:
	text_far _VictoryRoad1EndBattleText1
	text_end

VictoryRoad1AfterBattleText1:
	text_far _VictoryRoad1AfterBattleText1
	text_end

VictoryRoad1BattleText2:
	text_far _VictoryRoad1BattleText2
	text_end

VictoryRoad1EndBattleText2:
	text_far _VictoryRoad1EndBattleText2
	text_end

VictoryRoad1AfterBattleText2:
	text_far _VictoryRoad1AfterBattleText2
	text_end
Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`VictoryRoad1F_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]`
			`call nz, .next`
			`call EnableAutoTextBoxDrawing`
The 'def_trainers' macro checks that trainers' event flag bits are correct (#318) 2021-04-13 22:24:37 +00:00			`ld hl, VictoryRoad1TrainerHeaders`
Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`ld de, VictoryRoad1F_ScriptPointers`
			`ld a, [wVictoryRoad1FCurScript]`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call ExecuteCurMapScriptInTable`
Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`ld [wVictoryRoad1FCurScript], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ret`
			`.next`
named most of the used events 2015-07-21 17:36:03 +00:00			`CheckEvent EVENT_VICTORY_ROAD_1_BOULDER_ON_SWITCH`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ret z`
			`ld a, $1d`
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, 6, 4`
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
Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`VictoryRoad1F_ScriptPointers:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`dw VictoryRoad1Script0`
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`

Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1Script0:`
named most of the used events 2015-07-21 17:36:03 +00:00			`CheckEvent EVENT_VICTORY_ROAD_1_BOULDER_ON_SWITCH`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`jp nz, CheckFightingMapTrainers`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`ld hl, CoordsData_5da5c`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call CheckBoulderCoords`
			`jp nc, CheckFightingMapTrainers`
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			`set 5, [hl]`
named most of the used events 2015-07-21 17:36:03 +00:00			`SetEvent EVENT_VICTORY_ROAD_1_BOULDER_ON_SWITCH`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ret`

Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`CoordsData_5da5c:`
Reformat map scripts' coordinate and movement data 'dbmapcoord' has X, Y order like other coordinate-related data macros 2020-07-16 16:32:19 +00:00			`dbmapcoord 17, 13`
			`db -1 ; end`
$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			`VictoryRoad1F_TextPointers:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`dw VictoryRoad1Text1`
			`dw VictoryRoad1Text2`
fix variable naming 2015-07-18 15:17:29 +00:00			`dw PickUpItemText`
			`dw PickUpItemText`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`dw BoulderText`
			`dw BoulderText`
			`dw BoulderText`

The 'def_trainers' macro checks that trainers' event flag bits are correct (#318) 2021-04-13 22:24:37 +00:00			`VictoryRoad1TrainerHeaders:`
			`def_trainers`
Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1TrainerHeader0:`
Use a 'trainer' macro for trainers in scripts/ 2020-07-14 19:45:36 +00:00			`trainer EVENT_BEAT_VICTORY_ROAD_1_TRAINER_0, 2, VictoryRoad1BattleText1, VictoryRoad1EndBattleText1, VictoryRoad1AfterBattleText1`
Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1TrainerHeader1:`
Use a 'trainer' macro for trainers in scripts/ 2020-07-14 19:45:36 +00:00			`trainer EVENT_BEAT_VICTORY_ROAD_1_TRAINER_1, 2, VictoryRoad1BattleText2, VictoryRoad1EndBattleText2, VictoryRoad1AfterBattleText2`
			`db -1 ; end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1Text1:`
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, VictoryRoad1TrainerHeader0`
			`call TalkToTrainer`
			`jp TextScriptEnd`

Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1Text2:`
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, VictoryRoad1TrainerHeader1`
			`call TalkToTrainer`
			`jp TextScriptEnd`

Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1BattleText1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VictoryRoad1BattleText1`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1EndBattleText1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VictoryRoad1EndBattleText1`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1AfterBattleText1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VictoryRoad1AfterBattleText1`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1BattleText2:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VictoryRoad1BattleText2`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1EndBattleText2:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VictoryRoad1EndBattleText2`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
Clean up labels and trainer headers for overworld Pokémon. 2016-04-07 02:58:45 +00:00			`VictoryRoad1AfterBattleText2:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VictoryRoad1AfterBattleText2`
			`text_end`