Pull map scripts out of main.asm

1 files changed, 326 insertions, 0 deletions

diff --git a/scripts/route24.asm b/scripts/route24.asm
new file mode 100755
index 00000000..0e77c6f7
--- /dev/null
+++ b/scripts/route24.asm
@@ -0,0 +1,326 @@
+Route24Script: ; 513ad (14:53ad)
+	call EnableAutoTextBoxDrawing
+	ld hl, Route24TrainerHeaders
+	ld de, Route24ScriptPointers
+	ld a, [W_ROUTE24CURSCRIPT]
+	call ExecuteCurMapScriptInTable
+	ld [W_ROUTE24CURSCRIPT], a
+	ret
+
+Route24Script_513c0: ; 513c0 (14:53c0)
+	xor a
+	ld [wJoypadForbiddenButtonsMask], a
+	ld [W_ROUTE24CURSCRIPT], a
+	ld [W_CURMAPSCRIPT], a
+	ret
+
+Route24ScriptPointers: ; 513cb (14:53cb)
+	dw Route24Script0
+	dw Func_324c
+	dw EndTrainerBattle
+	dw Route24Script3
+	dw Route24Script4
+
+Route24Script0: ; 513d5 (14:53d5)
+	ld a, [$d7ef]
+	bit 0, a
+	jp nz, CheckFightingMapTrainers
+	ld hl, CoordsData_5140e ; $540e
+	call ArePlayerCoordsInArray
+	jp nc, CheckFightingMapTrainers
+	xor a
+	ld [H_CURRENTPRESSEDBUTTONS], a
+	ld a, $1
+	ld [H_DOWNARROWBLINKCNT2], a ; $ff8c
+	call DisplayTextID
+	ld hl, $d7f0
+	bit 1, [hl]
+	res 1, [hl]
+	ret z
+	ld a, $80
+	ld [$ccd3], a
+	ld a, $1
+	ld [$cd38], a
+	call Func_3486
+	ld a, $4
+	ld [W_ROUTE24CURSCRIPT], a
+	ld [W_CURMAPSCRIPT], a
+	ret
+
+CoordsData_5140e: ; 5140e (14:540e)
+	db $0F,$0A,$FF
+
+Route24Script4: ; 51411 (14:5411)
+	ld a, [$cd38]
+	and a
+	ret nz
+	call Delay3
+	ld a, $0
+	ld [W_ROUTE24CURSCRIPT], a
+	ld [W_CURMAPSCRIPT], a
+	ret
+
+Route24Script3: ; 51422 (14:5422)
+	ld a, [W_ISINBATTLE] ; $d057
+	cp $ff
+	jp z, Route24Script_513c0
+	call UpdateSprites
+	ld a, $f0
+	ld [wJoypadForbiddenButtonsMask], a
+	ld hl, $d7ef
+	set 1, [hl]
+	ld a, $1
+	ld [H_DOWNARROWBLINKCNT2], a ; $ff8c
+	call DisplayTextID
+	xor a
+	ld [wJoypadForbiddenButtonsMask], a
+	ld a, $0
+	ld [W_ROUTE24CURSCRIPT], a
+	ld [W_CURMAPSCRIPT], a
+	ret
+
+Route24TextPointers: ; 5144b (14:544b)
+	dw Route24Text1
+	dw Route24Text2
+	dw Route24Text3
+	dw Route24Text4
+	dw Route24Text5
+	dw Route24Text6
+	dw Route24Text7
+	dw Predef5CText
+
+Route24TrainerHeaders: ; 5145b (14:545b)
+Route24TrainerHeader0: ; 5145b (14:545b)
+	db $2 ; flag's bit
+	db ($4 << 4) ; trainer's view range
+	dw $d7ef ; flag's byte
+	dw Route24BattleText1 ; 0x5571 TextBeforeBattle
+	dw Route24AfterBattleText1 ; 0x557b TextAfterBattle
+	dw Route24EndBattleText1 ; 0x5576 TextEndBattle
+	dw Route24EndBattleText1 ; 0x5576 TextEndBattle
+
+Route24TrainerHeader2: ; 51467 (14:5467)
+	db $3 ; flag's bit
+	db ($1 << 4) ; trainer's view range
+	dw $d7ef ; flag's byte
+	dw Route24BattleText2 ; 0x5580 TextBeforeBattle
+	dw Route24AfterBattleText2 ; 0x558a TextAfterBattle
+	dw Route24EndBattleText2 ; 0x5585 TextEndBattle
+	dw Route24EndBattleText2 ; 0x5585 TextEndBattle
+
+Route24TrainerHeader3: ; 51473 (14:5473)
+	db $4 ; flag's bit
+	db ($1 << 4) ; trainer's view range
+	dw $d7ef ; flag's byte
+	dw Route24BattleText3 ; 0x558f TextBeforeBattle
+	dw Route24AfterBattleText3 ; 0x5599 TextAfterBattle
+	dw Route24EndBattleText3 ; 0x5594 TextEndBattle
+	dw Route24EndBattleText3 ; 0x5594 TextEndBattle
+
+Route24TrainerHeader4: ; 5147f (14:547f)
+	db $5 ; flag's bit
+	db ($1 << 4) ; trainer's view range
+	dw $d7ef ; flag's byte
+	dw Route24BattleText4 ; 0x559e TextBeforeBattle
+	dw Route24AfterBattleText4 ; 0x55a8 TextAfterBattle
+	dw Route24EndBattleText4 ; 0x55a3 TextEndBattle
+	dw Route24EndBattleText4 ; 0x55a3 TextEndBattle
+
+Route24TrainerHeader5: ; 5148b (14:548b)
+	db $6 ; flag's bit
+	db ($1 << 4) ; trainer's view range
+	dw $d7ef ; flag's byte
+	dw Route24BattleText5 ; 0x55ad TextBeforeBattle
+	dw Route24AfterBattleText5 ; 0x55b7 TextAfterBattle
+	dw Route24EndBattleText5 ; 0x55b2 TextEndBattle
+	dw Route24EndBattleText5 ; 0x55b2 TextEndBattle
+
+Route24TrainerHeader6: ; 51497 (14:5497)
+	db $7 ; flag's bit
+	db ($1 << 4) ; trainer's view range
+	dw $d7ef ; flag's byte
+	dw Route24BattleText6 ; 0x55bc TextBeforeBattle
+	dw Route24AfterBattleText6 ; 0x55c6 TextAfterBattle
+	dw Route24EndBattleText6 ; 0x55c1 TextEndBattle
+	dw Route24EndBattleText6 ; 0x55c1 TextEndBattle
+
+	db $ff
+
+Route24Text1: ; 514a4 (14:54a4)
+	db $8
+	ld hl, $d7f0
+	res 1, [hl]
+	ld a, [$d7ef]
+	bit 0, a
+	jr nz, .asm_a03f5 ; 0x514af $48
+	ld hl, Route24Text_51510
+	call PrintText
+	ld bc, (NUGGET << 8) | 1
+	call GiveItem
+	jr nc, .BagFull
+	ld hl, $d7ef
+	set 0, [hl]
+	ld hl, Route24Text_5151a
+	call PrintText
+	ld hl, Route24Text_51526
+	call PrintText
+	ld hl, $d72d
+	set 6, [hl]
+	set 7, [hl]
+	ld hl, Route24Text_5152b
+	ld de, Route24Text_5152b
+	call PreBattleSaveRegisters
+	ld a, [$ff8c]
+	ld [$cf13], a
+	call EngageMapTrainer
+	call InitBattleEnemyParameters
+	xor a
+	ld [H_CURRENTPRESSEDBUTTONS], a
+	ld a, $3
+	ld [W_ROUTE24CURSCRIPT], a
+	ld [W_CURMAPSCRIPT], a
+	jp TextScriptEnd
+.asm_a03f5 ; 0x514f9
+	ld hl, Route24Text_51530
+	call PrintText
+	jp TextScriptEnd
+.BagFull
+	ld hl, Route24Text_51521
+	call PrintText
+	ld hl, $d7f0
+	set 1, [hl]
+	jp TextScriptEnd
+
+Route24Text_51510: ; 51510 (14:5510)
+	TX_FAR _Route24Text_51510 ; 0x92721
+	db $0B
+	TX_FAR _Route24Text_51515 ; 0x92755
+	db "@"
+
+Route24Text_5151a: ; 5151a (14:551a)
+	TX_FAR _Route24Text_5151a ; 0x92779
+	db $0B, $6, "@"
+
+Route24Text_51521: ; 51521 (14:5521)
+	TX_FAR _Route24Text_51521
+	db "@"
+
+Route24Text_51526: ; 51526 (14:5526)
+	TX_FAR _Route24Text_51526
+	db "@"
+
+Route24Text_5152b: ; 5152b (14:552b)
+	TX_FAR _Route24Text_5152b
+	db "@"
+
+Route24Text_51530: ; 51530 (14:5530)
+	TX_FAR _Route24Text_51530
+	db "@"
+
+Route24Text2: ; 51535 (14:5535)
+	db $08 ; asm
+	ld hl, Route24TrainerHeader0
+	call TalkToTrainer
+	jp TextScriptEnd
+
+Route24Text3: ; 5153f (14:553f)
+	db $08 ; asm
+	ld hl, Route24TrainerHeader2
+	call TalkToTrainer
+	jp TextScriptEnd
+
+Route24Text4: ; 51549 (14:5549)
+	db $08 ; asm
+	ld hl, Route24TrainerHeader3
+	call TalkToTrainer
+	jp TextScriptEnd
+
+Route24Text5: ; 51553 (14:5553)
+	db $08 ; asm
+	ld hl, Route24TrainerHeader4
+	call TalkToTrainer
+	jp TextScriptEnd
+
+Route24Text6: ; 5155d (14:555d)
+	db $08 ; asm
+	ld hl, Route24TrainerHeader5
+	call TalkToTrainer
+	jp TextScriptEnd
+
+Route24Text7: ; 51567 (14:5567)
+	db $08 ; asm
+	ld hl, Route24TrainerHeader6
+	call TalkToTrainer
+	jp TextScriptEnd
+
+Route24BattleText1: ; 51571 (14:5571)
+	TX_FAR _Route24BattleText1
+	db "@"
+
+Route24EndBattleText1: ; 51576 (14:5576)
+	TX_FAR _Route24EndBattleText1
+	db "@"
+
+Route24AfterBattleText1: ; 5157b (14:557b)
+	TX_FAR _Route24AfterBattleText1
+	db "@"
+
+Route24BattleText2: ; 51580 (14:5580)
+	TX_FAR _Route24BattleText2
+	db "@"
+
+Route24EndBattleText2: ; 51585 (14:5585)
+	TX_FAR _Route24EndBattleText2
+	db "@"
+
+Route24AfterBattleText2: ; 5158a (14:558a)
+	TX_FAR _Route24AfterBattleText2
+	db "@"
+
+Route24BattleText3: ; 5158f (14:558f)
+	TX_FAR _Route24BattleText3
+	db "@"
+
+Route24EndBattleText3: ; 51594 (14:5594)
+	TX_FAR _Route24EndBattleText3
+	db "@"
+
+Route24AfterBattleText3: ; 51599 (14:5599)
+	TX_FAR _Route24AfterBattleText3
+	db "@"
+
+Route24BattleText4: ; 5159e (14:559e)
+	TX_FAR _Route24BattleText4
+	db "@"
+
+Route24EndBattleText4: ; 515a3 (14:55a3)
+	TX_FAR _Route24EndBattleText4
+	db "@"
+
+Route24AfterBattleText4: ; 515a8 (14:55a8)
+	TX_FAR _Route24AfterBattleText4
+	db "@"
+
+Route24BattleText5: ; 515ad (14:55ad)
+	TX_FAR _Route24BattleText5
+	db "@"
+
+Route24EndBattleText5: ; 515b2 (14:55b2)
+	TX_FAR _Route24EndBattleText5
+	db "@"
+
+Route24AfterBattleText5: ; 515b7 (14:55b7)
+	TX_FAR _Route24AfterBattleText5
+	db "@"
+
+Route24BattleText6: ; 515bc (14:55bc)
+	TX_FAR _Route24BattleText6
+	db "@"
+
+Route24EndBattleText6: ; 515c1 (14:55c1)
+	TX_FAR _Route24EndBattleText6
+	db "@"
+
+Route24AfterBattleText6: ; 515c6 (14:55c6)
+	TX_FAR _Route24AfterBattleText6
+	db "@"