shithub: pokered

ref: bcb251261dae3cd9ba423fc139c7db4433a1a802
dir: /scripts/ssanne5.asm/

View raw version
SSAnne5Script:
	call EnableAutoTextBoxDrawing
	ld hl, SSAnne5TrainerHeader0
	ld de, SSAnne5ScriptPointers
	ld a, [wSSAnne5CurScript]
	call ExecuteCurMapScriptInTable
	ld [wSSAnne5CurScript], a
	ret

SSAnne5ScriptPointers:
	dw CheckFightingMapTrainers
	dw DisplayEnemyTrainerTextAndStartBattle
	dw EndTrainerBattle

SSAnne5TextPointers:
	dw SSAnne5Text1
	dw SSAnne5Text2
	dw SSAnne5Text3
	dw SSAnne5Text4
	dw SSAnne5Text5

SSAnne5TrainerHeaders:
SSAnne5TrainerHeader0:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_5_TRAINER_0
	db ($3 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_5_TRAINER_0
	dw SSAnne5BattleText1 ; TextBeforeBattle
	dw SSAnne5AfterBattleText1 ; TextAfterBattle
	dw SSAnne5EndBattleText1 ; TextEndBattle
	dw SSAnne5EndBattleText1 ; TextEndBattle

SSAnne5TrainerHeader1:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_5_TRAINER_1
	db ($3 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_5_TRAINER_1
	dw SSAnne5BattleText2 ; TextBeforeBattle
	dw SSAnne5AfterBattleText2 ; TextAfterBattle
	dw SSAnne5EndBattleText2 ; TextEndBattle
	dw SSAnne5EndBattleText2 ; TextEndBattle

	db $ff

SSAnne5Text1:
	TX_FAR _SSAnne5Text1
	db "@"

SSAnne5Text2:
	TX_FAR _SSAnne5Text2
	db "@"

SSAnne5Text3:
	TX_FAR _SSAnne5Text3
	db "@"

SSAnne5Text4:
	TX_ASM
	ld hl, SSAnne5TrainerHeader0
	call TalkToTrainer
	jp TextScriptEnd

SSAnne5BattleText1:
	TX_FAR _SSAnne5BattleText1
	db "@"

SSAnne5EndBattleText1:
	TX_FAR _SSAnne5EndBattleText1
	db "@"

SSAnne5AfterBattleText1:
	TX_FAR _SSAnne5AfterBattleText1
	db "@"

SSAnne5Text5:
	TX_ASM
	ld hl, SSAnne5TrainerHeader1
	call TalkToTrainer
	jp TextScriptEnd

SSAnne5BattleText2:
	TX_FAR _SSAnne5BattleText2
	db "@"

SSAnne5EndBattleText2:
	TX_FAR _SSAnne5EndBattleText2
	db "@"

SSAnne5AfterBattleText2:
	TX_FAR _SSAnne5AfterBattleText2
	db "@"