Pull map scripts out of main.asm

1 files changed, 73 insertions, 0 deletions

diff --git a/scripts/celadonmansion3.asm b/scripts/celadonmansion3.asm
new file mode 100755
index 00000000..19342548
--- /dev/null
+++ b/scripts/celadonmansion3.asm
@@ -0,0 +1,73 @@
+CeladonMansion3Script: ; 48790 (12:4790)
+	jp EnableAutoTextBoxDrawing
+
+CeladonMansion3TextPointers: ; 48793 (12:4793)
+	dw ProgrammerText
+	dw GraphicArtistText
+	dw WriterText
+	dw DirectorText
+	dw GameFreakPCText1
+	dw GameFreakPCText2
+	dw GameFreakPCText3
+	dw GameFreakSignText
+
+ProgrammerText: ; 487a3 (12:47a3)
+	TX_FAR _ProgrammerText
+	db "@"
+
+GraphicArtistText: ; 487a8 (12:47a8)
+	TX_FAR _GraphicArtistText
+	db "@"
+
+WriterText: ; 487ad (12:47ad)
+	TX_FAR _WriterText
+	db "@"
+
+DirectorText: ; 487b2 (12:47b2)
+	db $08 ; asm
+
+	; check pokédex
+	ld hl, wPokedexOwned
+	ld b, wPokedexOwnedEnd - wPokedexOwned
+	call CountSetBits
+	ld a, [$d11e]
+	cp 150
+	jr nc, .CompletedDex
+	ld hl, .GameDesigner
+	jr .done
+.CompletedDex
+	ld hl, .CompletedDexText
+.done
+	call PrintText
+	jp TextScriptEnd
+
+.GameDesigner ; 487d0 (12:47d0)
+	TX_FAR _GameDesignerText
+	db "@"
+
+.CompletedDexText
+	TX_FAR _CompletedDexText
+	db $6
+	db $8 ; asm
+	ld hl, DisplayDiploma
+	ld b, BANK(DisplayDiploma)
+	call Bankswitch
+	ld a, $1
+	ld [$cc3c], a
+	jp TextScriptEnd
+
+GameFreakPCText1: ; 487eb (12:47eb)
+	TX_FAR _CeladonMansion3Text5
+	db "@"
+
+GameFreakPCText2: ; 487f0 (12:47f0)
+	TX_FAR _CeladonMansion3Text6
+	db "@"
+
+GameFreakPCText3: ; 487f5 (12:47f5)
+	TX_FAR _CeladonMansion3Text7
+	db "@"
+
+GameFreakSignText: ; 487fa (12:47fa)
+	TX_FAR _CeladonMansion3Text8
+	db "@"