shithub: pokered

ref: bfaabd08be0a790dff961276d76af3e1af4e6e24
dir: /scripts/ssanne9.asm/

View raw version
SSAnne9Script:
	ld a, $1
	ld [wAutoTextBoxDrawingControl], a
	xor a
	ld [wDoNotWaitForButtonPressAfterDisplayingText], a
	ld hl, SSAnne9TrainerHeaders
	ld de, SSAnne9ScriptPointers
	ld a, [wSSAnne9CurScript]
	call ExecuteCurMapScriptInTable
	ld [wSSAnne9CurScript], a
	ret

SSAnne9ScriptPointers:
	dw CheckFightingMapTrainers
	dw DisplayEnemyTrainerTextAndStartBattle
	dw EndTrainerBattle

SSAnne9TextPointers:
	dw SSAnne9Text1
	dw SSAnne9Text2
	dw SSAnne9Text3
	dw SSAnne9Text4
	dw SSAnne9Text5
	dw PickUpItemText
	dw SSAnne9Text7
	dw SSAnne9Text8
	dw PickUpItemText
	dw SSAnne9Text10
	dw SSAnne9Text11
	dw SSAnne9Text12
	dw SSAnne9Text13

SSAnne9TrainerHeaders:
SSAnne9TrainerHeader0:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_9_TRAINER_0
	db ($2 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_9_TRAINER_0
	dw SSAnne9BattleText1 ; TextBeforeBattle
	dw SSAnne9AfterBattleText1 ; TextAfterBattle
	dw SSAnne9EndBattleText1 ; TextEndBattle
	dw SSAnne9EndBattleText1 ; TextEndBattle

SSAnne9TrainerHeader1:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_9_TRAINER_1
	db ($3 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_9_TRAINER_1
	dw SSAnne9BattleText2 ; TextBeforeBattle
	dw SSAnne9AfterBattleText2 ; TextAfterBattle
	dw SSAnne9EndBattleText2 ; TextEndBattle
	dw SSAnne9EndBattleText2 ; TextEndBattle

SSAnne9TrainerHeader2:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_9_TRAINER_2
	db ($3 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_9_TRAINER_2
	dw SSAnne9BattleText3 ; TextBeforeBattle
	dw SSAnne9AfterBattleText3 ; TextAfterBattle
	dw SSAnne9EndBattleText3 ; TextEndBattle
	dw SSAnne9EndBattleText3 ; TextEndBattle

SSAnne9TrainerHeader3:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_9_TRAINER_3
	db ($2 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_9_TRAINER_3
	dw SSAnne9BattleText4 ; TextBeforeBattle
	dw SSAnne9AfterBattleText4 ; TextAfterBattle
	dw SSAnne9EndBattleText4 ; TextEndBattle
	dw SSAnne9EndBattleText4 ; TextEndBattle

	db $ff

SSAnne9Text1:
	TX_ASM
	ld hl, SSAnne9TrainerHeader0
	call TalkToTrainer
	jp TextScriptEnd

SSAnne9Text2:
	TX_ASM
	ld hl, SSAnne9TrainerHeader1
	call TalkToTrainer
	jp TextScriptEnd

SSAnne9Text3:
	TX_ASM
	ld hl, SSAnne9TrainerHeader2
	call TalkToTrainer
	jp TextScriptEnd

SSAnne9Text4:
	TX_ASM
	ld hl, SSAnne9TrainerHeader3
	call TalkToTrainer
	jp TextScriptEnd

SSAnne9Text5:
	TX_ASM
	call SaveScreenTilesToBuffer1
	ld hl, SSAnne9Text_61bf2
	call PrintText
	call LoadScreenTilesFromBuffer1
	ld a, SNORLAX
	call DisplayPokedex
	jp TextScriptEnd

SSAnne9Text_61bf2:
	TX_FAR _SSAnne9Text_61bf2
	db "@"

SSAnne9Text7:
	TX_ASM
	ld hl, SSAnne9Text_61c01
	call PrintText
	jp TextScriptEnd

SSAnne9Text_61c01:
	TX_FAR _SSAnne9Text_61c01
	db "@"

SSAnne9Text8:
	TX_ASM
	ld hl, SSAnne9Text_61c10
	call PrintText
	jp TextScriptEnd

SSAnne9Text_61c10:
	TX_FAR _SSAnne9Text_61c10
	db "@"

SSAnne9Text10:
	TX_ASM
	ld hl, SSAnne9Text_61c1f
	call PrintText
	jp TextScriptEnd

SSAnne9Text_61c1f:
	TX_FAR _SSAnne9Text_61c1f
	db "@"

SSAnne9Text11:
	TX_ASM
	ld hl, SSAnne9Text_61c2e
	call PrintText
	jp TextScriptEnd

SSAnne9Text_61c2e:
	TX_FAR _SSAnne9Text_61c2e
	db "@"

SSAnne9Text12:
	TX_ASM
	ld hl, SSAnne9Text_61c3d
	call PrintText
	jp TextScriptEnd

SSAnne9Text_61c3d:
	TX_FAR _SSAnne9Text_61c3d
	db "@"

SSAnne9Text13:
	TX_ASM
	ld hl, SSAnne9Text_61c4c
	call PrintText
	jp TextScriptEnd

SSAnne9Text_61c4c:
	TX_FAR _SSAnne9Text_61c4c
	db "@"

SSAnne9BattleText1:
	TX_FAR _SSAnne9BattleText1
	db "@"

SSAnne9EndBattleText1:
	TX_FAR _SSAnne9EndBattleText1
	db "@"

SSAnne9AfterBattleText1:
	TX_FAR _SSAnne9AfterBattleText1
	db "@"

SSAnne9BattleText2:
	TX_FAR _SSAnne9BattleText2
	db "@"

SSAnne9EndBattleText2:
	TX_FAR _SSAnne9EndBattleText2
	db "@"

SSAnne9AfterBattleText2:
	TX_FAR _SSAnne9AfterBattleText2
	db "@"

SSAnne9BattleText3:
	TX_FAR _SSAnne9BattleText3
	db "@"

SSAnne9EndBattleText3:
	TX_FAR _SSAnne9EndBattleText3
	db "@"

SSAnne9AfterBattleText3:
	TX_FAR _SSAnne9AfterBattleText3
	db "@"

SSAnne9BattleText4:
	TX_FAR _SSAnne9BattleText4
	db "@"

SSAnne9EndBattleText4:
	TX_FAR _SSAnne9EndBattleText4
	db "@"

SSAnne9AfterBattleText4:
	TX_FAR _SSAnne9AfterBattleText4
	db "@"