shithub: pokered

ref: 725b86ebbec23bd1f53fd60bf0201c904fee951d
dir: /scripts/SSAnneBow.asm/

View raw version
SSAnneBow_Script:
	call EnableAutoTextBoxDrawing
	ld hl, SSAnne5TrainerHeader0
	ld de, SSAnneBow_ScriptPointers
	ld a, [wSSAnneBowCurScript]
	call ExecuteCurMapScriptInTable
	ld [wSSAnneBowCurScript], a
	ret

SSAnneBow_ScriptPointers:
	dw CheckFightingMapTrainers
	dw DisplayEnemyTrainerTextAndStartBattle
	dw EndTrainerBattle

SSAnneBow_TextPointers:
	dw SSAnne5Text1
	dw SSAnne5Text2
	dw SSAnne5Text3
	dw SSAnne5Text4
	dw SSAnne5Text5

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 "@"