shithub: pokered

ref: 6bd86e10c32cd7b464425adfc01621f3ff6726aa
dir: /scripts/SSAnneB1FRooms.asm/

View raw version
SSAnneB1FRooms_Script:
	call EnableAutoTextBoxDrawing
	ld hl, SSAnne10TrainerHeader0
	ld de, SSAnneB1FRooms_ScriptPointers
	ld a, [wSSAnneB1FRoomsCurScript]
	call ExecuteCurMapScriptInTable
	ld [wSSAnneB1FRoomsCurScript], a
	ret

SSAnneB1FRooms_ScriptPointers:
	dw CheckFightingMapTrainers
	dw DisplayEnemyTrainerTextAndStartBattle
	dw EndTrainerBattle

SSAnneB1FRooms_TextPointers:
	dw SSAnne10Text1
	dw SSAnne10Text2
	dw SSAnne10Text3
	dw SSAnne10Text4
	dw SSAnne10Text5
	dw SSAnne10Text6
	dw SSAnne10Text7
	dw SSAnne10Text8
	dw PickUpItemText
	dw PickUpItemText
	dw PickUpItemText

SSAnne10TrainerHeader0:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_10_TRAINER_0
	db ($2 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_10_TRAINER_0
	dw SSAnne10BattleText1 ; TextBeforeBattle
	dw SSAnne10AfterBattleText1 ; TextAfterBattle
	dw SSAnne10EndBattleText1 ; TextEndBattle
	dw SSAnne10EndBattleText1 ; TextEndBattle

SSAnne10TrainerHeader1:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_10_TRAINER_1
	db ($3 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_10_TRAINER_1
	dw SSAnne10BattleText2 ; TextBeforeBattle
	dw SSAnne10AfterBattleText2 ; TextAfterBattle
	dw SSAnne10EndBattleText2 ; TextEndBattle
	dw SSAnne10EndBattleText2 ; TextEndBattle

SSAnne10TrainerHeader2:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_10_TRAINER_2
	db ($2 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_10_TRAINER_2
	dw SSAnne10BattleText3 ; TextBeforeBattle
	dw SSAnne10AfterBattleText3 ; TextAfterBattle
	dw SSAnne10EndBattleText3 ; TextEndBattle
	dw SSAnne10EndBattleText3 ; TextEndBattle

SSAnne10TrainerHeader3:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_10_TRAINER_3
	db ($2 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_10_TRAINER_3
	dw SSAnne10BattleText4 ; TextBeforeBattle
	dw SSAnne10AfterBattleText4 ; TextAfterBattle
	dw SSAnne10EndBattleText4 ; TextEndBattle
	dw SSAnne10EndBattleText4 ; TextEndBattle

SSAnne10TrainerHeader4:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_10_TRAINER_4
	db ($2 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_10_TRAINER_4
	dw SSAnne10BattleText5 ; TextBeforeBattle
	dw SSAnne10AfterBattleText5 ; TextAfterBattle
	dw SSAnne10EndBattleText5 ; TextEndBattle
	dw SSAnne10EndBattleText5 ; TextEndBattle

SSAnne10TrainerHeader5:
	dbEventFlagBit EVENT_BEAT_SS_ANNE_10_TRAINER_5
	db ($3 << 4) ; trainer's view range
	dwEventFlagAddress EVENT_BEAT_SS_ANNE_10_TRAINER_5
	dw SSAnne10BattleText6 ; TextBeforeBattle
	dw SSAnne10AfterBattleText6 ; TextAfterBattle
	dw SSAnne10EndBattleText6 ; TextEndBattle
	dw SSAnne10EndBattleText6 ; TextEndBattle

	db $ff

SSAnne10Text1:
	TX_ASM
	ld hl, SSAnne10TrainerHeader0
	call TalkToTrainer
	jp TextScriptEnd

SSAnne10Text2:
	TX_ASM
	ld hl, SSAnne10TrainerHeader1
	call TalkToTrainer
	jp TextScriptEnd

SSAnne10Text3:
	TX_ASM
	ld hl, SSAnne10TrainerHeader2
	call TalkToTrainer
	jp TextScriptEnd

SSAnne10Text4:
	TX_ASM
	ld hl, SSAnne10TrainerHeader3
	call TalkToTrainer
	jp TextScriptEnd

SSAnne10Text5:
	TX_ASM
	ld hl, SSAnne10TrainerHeader4
	call TalkToTrainer
	jp TextScriptEnd

SSAnne10Text6:
	TX_ASM
	ld hl, SSAnne10TrainerHeader5
	call TalkToTrainer
	jp TextScriptEnd

SSAnne10Text8:
	TX_FAR _SSAnne10Text8
	TX_ASM
	ld a, MACHOKE
	call PlayCry
	jp TextScriptEnd

SSAnne10BattleText1:
	TX_FAR _SSAnne10BattleText1
	db "@"

SSAnne10EndBattleText1:
	TX_FAR _SSAnne10EndBattleText1
	db "@"

SSAnne10AfterBattleText1:
	TX_FAR _SSAnne10AfterBattleText1
	db "@"

SSAnne10BattleText2:
	TX_FAR _SSAnne10BattleText2
	db "@"

SSAnne10EndBattleText2:
	TX_FAR _SSAnne10EndBattleText2
	db "@"

SSAnne10AfterBattleText2:
	TX_FAR _SSAnne10AfterBattleText2
	db "@"

SSAnne10BattleText3:
	TX_FAR _SSAnne10BattleText3
	db "@"

SSAnne10EndBattleText3:
	TX_FAR _SSAnne10EndBattleText3
	db "@"

SSAnne10AfterBattleText3:
	TX_FAR _SSAnne10AfterBattleText3
	db "@"

SSAnne10BattleText4:
	TX_FAR _SSAnne10BattleText4
	db "@"

SSAnne10EndBattleText4:
	TX_FAR _SSAnne10EndBattleText4
	db "@"

SSAnne10AfterBattleText4:
	TX_FAR _SSAnne10AfterBattleText4
	db "@"

SSAnne10BattleText5:
	TX_FAR _SSAnne10BattleText5
	db "@"

SSAnne10EndBattleText5:
	TX_FAR _SSAnne10EndBattleText5
	db "@"

SSAnne10AfterBattleText5:
	TX_FAR _SSAnne10AfterBattleText5
	db "@"

SSAnne10BattleText6:
	TX_FAR _SSAnne10BattleText6
	db "@"

SSAnne10EndBattleText6:
	TX_FAR _SSAnne10EndBattleText6
	db "@"

SSAnne10AfterBattleText6:
	TX_FAR _SSAnne10AfterBattleText6
	db "@"

SSAnne10Text7:
	TX_FAR _SSAnne10Text7
	db "@"