Sync with pokered

1 files changed, 206 insertions, 0 deletions

diff --git a/scripts/ViridianForest.asm b/scripts/ViridianForest.asm
new file mode 100755
index 00000000..fb9a71e3
--- /dev/null
+++ b/scripts/ViridianForest.asm
@@ -0,0 +1,206 @@
+ViridianForest_Script:
+	call EnableAutoTextBoxDrawing
+	ld hl, ViridianForestTrainerHeader0
+	ld de, ViridianForest_ScriptPointers
+	ld a, [wViridianForestCurScript]
+	call ExecuteCurMapScriptInTable
+	ld [wViridianForestCurScript], a
+	ret
+
+ViridianForest_ScriptPointers:
+	dw CheckFightingMapTrainers
+	dw DisplayEnemyTrainerTextAndStartBattle
+	dw EndTrainerBattle
+
+ViridianForest_TextPointers:
+	dw ViridianForestText1
+	dw ViridianForestText2
+	dw ViridianForestText3
+	dw ViridianForestText4
+	dw ViridianForestText5
+	dw ViridianForestText6
+	dw PickUpItemText
+	dw PickUpItemText
+	dw PickUpItemText
+	dw ViridianForestText10
+	dw ViridianForestText11
+	dw ViridianForestText12
+	dw ViridianForestText13
+	dw ViridianForestText14
+	dw ViridianForestText15
+	dw ViridianForestText16
+
+ViridianForestTrainerHeader0:
+	dbEventFlagBit EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_0
+	db ($4 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_0
+	dw ViridianForestBattleText1 ; TextBeforeBattle
+	dw ViridianForestAfterBattleText1 ; TextAfterBattle
+	dw ViridianForestEndBattleText1 ; TextEndBattle
+	dw ViridianForestEndBattleText1 ; TextEndBattle
+
+ViridianForestTrainerHeader1:
+	dbEventFlagBit EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_1
+	db ($4 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_1
+	dw ViridianForestBattleText2 ; TextBeforeBattle
+	dw ViridianForestAfterBattleText2 ; TextAfterBattle
+	dw ViridianForestEndBattleText2 ; TextEndBattle
+	dw ViridianForestEndBattleText2 ; TextEndBattle
+
+ViridianForestTrainerHeader2:
+	dbEventFlagBit EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_2
+	db ($1 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_2
+	dw ViridianForestBattleText3 ; TextBeforeBattle
+	dw ViridianForestAfterBattleText3 ; TextAfterBattle
+	dw ViridianForestEndBattleText3 ; TextEndBattle
+	dw ViridianForestEndBattleText3 ; TextEndBattle
+
+ViridianForestTrainerHeader3:
+	dbEventFlagBit EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_3
+	db ($0 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_3
+	dw ViridianForestBattleText4 ; TextBeforeBattle
+	dw ViridianForestAfterBattleText4 ; TextAfterBattle
+	dw ViridianForestEndBattleText4 ; TextEndBattle
+	dw ViridianForestEndBattleText4 ; TextEndBattle
+
+ViridianForestTrainerHeader4:
+	dbEventFlagBit EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_4
+	db ($4 << 4) ; trainer's view range
+	dwEventFlagAddress EVENT_BEAT_VIRIDIAN_FOREST_TRAINER_4
+	dw ViridianForestBattleText5 ; TextBeforeBattle
+	dw ViridianForestAfterBattleText5 ; TextAfterBattle
+	dw ViridianForestEndBattleText5 ; TextEndBattle
+	dw ViridianForestEndBattleText5 ; TextEndBattle
+
+	db $ff
+
+ViridianForestText1:
+	TX_FAR _ViridianForestText1
+	db "@"
+
+ViridianForestText2:
+	TX_ASM
+	ld hl, ViridianForestTrainerHeader0
+	jr ViridianForestTalkToTrainer
+
+ViridianForestText3:
+	TX_ASM
+	ld hl, ViridianForestTrainerHeader1
+	jr ViridianForestTalkToTrainer
+
+ViridianForestText4:
+	TX_ASM
+	ld hl, ViridianForestTrainerHeader2
+	jr ViridianForestTalkToTrainer
+
+ViridianForestText5:
+	TX_ASM
+	ld hl, ViridianForestTrainerHeader3
+	jr ViridianForestTalkToTrainer
+
+ViridianForestText6:
+	TX_ASM
+	ld hl, ViridianForestTrainerHeader4
+ViridianForestTalkToTrainer:
+	call TalkToTrainer
+	jp TextScriptEnd
+
+ViridianForestBattleText1:
+	TX_FAR _ViridianForestBattleText1
+	db "@"
+
+ViridianForestEndBattleText1:
+	TX_FAR _ViridianForestEndBattleText1
+	db "@"
+
+ViridianForestAfterBattleText1:
+	TX_FAR _ViridianFrstAfterBattleText1
+	db "@"
+
+ViridianForestBattleText2:
+	TX_FAR _ViridianForestBattleText2
+	db "@"
+
+ViridianForestEndBattleText2:
+	TX_FAR _ViridianForestEndBattleText2
+	db "@"
+
+ViridianForestAfterBattleText2:
+	TX_FAR _ViridianFrstAfterBattleText2
+	db "@"
+
+ViridianForestBattleText3:
+	TX_FAR _ViridianForestBattleText3
+	db "@"
+
+ViridianForestEndBattleText3:
+	TX_FAR _ViridianForestEndBattleText3
+	db "@"
+
+ViridianForestAfterBattleText3:
+	TX_FAR _ViridianFrstAfterBattleText3
+	db "@"
+
+ViridianForestBattleText4:
+	TX_FAR _ViridianForestBattleTextPikaGirl
+	db "@"
+
+ViridianForestEndBattleText4:
+	TX_FAR _ViridianForestEndBattleTextPikaGirl
+	db "@"
+
+ViridianForestAfterBattleText4:
+	TX_FAR _ViridianForestAfterBattleTextPikaGirl
+	db "@"
+
+ViridianForestBattleText5:
+	TX_FAR _ViridianForestBattleTextSamurai
+	db "@"
+
+ViridianForestEndBattleText5:
+	TX_FAR _ViridianForestEndBattleTextSamurai
+	db "@"
+
+ViridianForestAfterBattleText5:
+	TX_FAR _ViridianForestAfterBattleTextSamurai
+	db "@"
+
+ViridianForestText10:
+	TX_FAR _ViridianForestText8
+	db "@"
+
+ViridianForestText11:
+	TX_ASM
+	ld hl, Func_f2528
+	jp ViridianForestScript_6120d
+
+ViridianForestText12:
+	TX_ASM
+	ld hl, Func_f2534
+	jp ViridianForestScript_6120d
+
+ViridianForestText13:
+	TX_ASM
+	ld hl, Func_f2540
+	jp ViridianForestScript_6120d
+
+ViridianForestText14:
+	TX_ASM
+	ld hl, Func_f254c
+	jp ViridianForestScript_6120d
+
+ViridianForestText15:
+	TX_ASM
+	ld hl, Func_f2558
+	jp ViridianForestScript_6120d
+
+ViridianForestText16:
+	TX_ASM
+	ld hl, Func_f2528
+ViridianForestScript_6120d
+	ld b, BANK(Func_f2528)
+	call Bankswitch
+	jp TextScriptEnd