shithub: pokecrystal

Download patch

ref: 78a3951d4718ba0822d76b172366c0d6c129821f
parent: 50232cc92bba60fea431e3709d0f56a04b88c72a
parent: 45e791bb42daffe60cd2ae9c0feec1b5af9124d8
author: Bryan Bishop <[email protected]>
date: Sun Sep 8 13:06:54 EDT 2013

Merge pull request #196 from yenatch/std-scripts

std scripts

--- a/engine/scripting.asm
+++ b/engine/scripting.asm
@@ -1787,15 +1787,15 @@
 	ld e, a
 	call GetScriptByte
 	ld d, a
-	ld hl, $4000 ; StdScripts
+	ld hl, StdScripts
 	add hl, de
 	add hl, de
 	add hl, de
-	ld a, $2f ; BANK(StdScripts)
+	ld a, BANK(StdScripts)
 	call GetFarByte
 	ld b, a
 	inc hl
-	ld a, $2f ; BANK(StdScripts)
+	ld a, BANK(StdScripts)
 	call GetFarHalfword
 	ret
 ; 0x97596
--- a/main.asm
+++ b/main.asm
@@ -18236,6 +18236,8 @@
 UnknownScript_0xcd29: ; 0xcd29
 	reloadmappart
 	special $0035
+
+UnknownScript_0xcd2d: ; 0xcd2d
 	3callasm BANK(Functioncd12), Functioncd12
 	2writetext UnknownText_0xcd41
 	copybytetovar $d1ef
@@ -18256,8 +18258,50 @@
 	db $50
 ; 0xcd4b
 
-INCBIN "baserom.gbc", $cd4b, $cd9d - $cd4b
+UnknownScript_0xcd4b: ; 0xcd4b
+	3callasm $03, $4d78
+	iffalse UnknownScript_0xcd5f
+	if_equal $1, UnknownScript_0xcd59
+	2jump UnknownScript_0xcd5c
+; 0xcd59
 
+UnknownScript_0xcd59: ; 0xcd59
+	jumptext UnknownText_0xcd73
+; 0xcd5c
+
+UnknownScript_0xcd5c: ; 0xcd5c
+	jumptext UnknownText_0xcd6e
+; 0xcd5f
+
+UnknownScript_0xcd5f: ; 0xcd5f
+	loadfont
+	2writetext UnknownText_0xcd69
+	yesorno
+	iftrue UnknownScript_0xcd2d
+	loadmovesprites
+	end
+; 0xcd69
+
+UnknownText_0xcd69: ; 0xcd69
+	; A #MON may be able to move this. Want to use STRENGTH?
+	text_jump UnknownText_0x1c07a0, BANK(UnknownText_0x1c07a0)
+	db "@"
+; 0xcd6e
+
+UnknownText_0xcd6e: ; 0xcd6e
+	; Boulders may now be moved!
+	text_jump UnknownText_0x1c07d8, BANK(UnknownText_0x1c07d8)
+	db "@"
+; 0xcd73
+
+UnknownText_0xcd73: ; 0xcd73
+	; A #MON may be able to move this.
+	text_jump UnknownText_0x1c07f4, BANK(UnknownText_0x1c07f4)
+	db "@"
+; 0xcd78
+
+INCBIN "baserom.gbc", $cd78, $cd9d - $cd78
+
 Functioncd9d: ; cd9d
 	call Functionc6ea
 .asm_cda0
@@ -18504,6 +18548,8 @@
 UnknownScript_0xcf2e: ; 0xcf2e
 	reloadmappart
 	special $0035
+
+UnknownScript_0xcf32: ; cf32
 	3callasm BANK(GetPartyNick), GetPartyNick
 	2writetext UnknownText_0xcf58
 	loadmovesprites
@@ -18531,9 +18577,36 @@
 	db $50
 ; 0xcf5d
 
-INCBIN "baserom.gbc", $cf5d, $cf8e - $cf5d
+UnknownScript_0xcf5d: ; 0xcf5d
+	3callasm $03, $4f7c
+	if_equal $1, UnknownScript_0xcf6f
+	loadfont
+	2writetext UnknownText_0xcf77
+	yesorno
+	iftrue UnknownScript_0xcf32
+	loadmovesprites
+	end
+; 0xcf6f
 
+UnknownScript_0xcf6f: ; 0xcf6f
+	jumptext UnknownText_0xcf72
+; 0xcf72
 
+UnknownText_0xcf72: ; 0xcf72
+	; Maybe a #MON can break this.
+	text_jump UnknownText_0x1c0906, BANK(UnknownText_0x1c0906)
+	db "@"
+; 0xcf77
+
+UnknownText_0xcf77: ; 0xcf77
+	; This rock looks breakable. Want to use ROCK SMASH?
+	text_jump UnknownText_0x1c0924, BANK(UnknownText_0x1c0924)
+	db "@"
+; 0xcf7c
+
+INCBIN "baserom.gbc", $cf7c, $cf8e - $cf7c
+
+
 Functioncf8e: ; cf8e
 	ld a, e
 	push af
@@ -72765,7 +72838,60 @@
 
 SECTION "bank2F",ROMX,BANK[$2F]
 
-INCBIN "baserom.gbc", $bc000, $bc09c - $bc000
+StdScripts: ; bc000
+	dbw BANK(PokeCenterNurseScript), PokeCenterNurseScript
+	dbw BANK(UnknownScript_0xbc162), UnknownScript_0xbc162
+	dbw BANK(UnknownScript_0xbc166), UnknownScript_0xbc166
+	dbw BANK(UnknownScript_0xbc16a), UnknownScript_0xbc16a
+	dbw BANK(UnknownScript_0xbc16e), UnknownScript_0xbc16e
+	dbw BANK(UnknownScript_0xbc172), UnknownScript_0xbc172
+	dbw BANK(UnknownScript_0xbc176), UnknownScript_0xbc176
+	dbw BANK(UnknownScript_0xbc17a), UnknownScript_0xbc17a
+	dbw BANK(UnknownScript_0xbc185), UnknownScript_0xbc185
+	dbw BANK(UnknownScript_0xbc189), UnknownScript_0xbc189
+	dbw BANK(UnknownScript_0xbc191), UnknownScript_0xbc191
+	dbw BANK(UnknownScript_0xbc195), UnknownScript_0xbc195
+	dbw BANK(UnknownScript_0xbc19d), UnknownScript_0xbc19d
+	dbw BANK(UnknownScript_0xbc1a5), UnknownScript_0xbc1a5
+	dbw BANK(UnknownScript_0xbc1b8), UnknownScript_0xbc1b8
+	dbw BANK(UnknownScript_0xbc1bc), UnknownScript_0xbc1bc
+	dbw BANK(UnknownScript_0xbc1c0), UnknownScript_0xbc1c0
+	dbw BANK(UnknownScript_0xbc1c4), UnknownScript_0xbc1c4
+	dbw BANK(UnknownScript_0xbc23e), UnknownScript_0xbc23e
+	dbw BANK(UnknownScript_0xbc242), UnknownScript_0xbc242
+	dbw BANK(UnknownScript_0xbc1af), UnknownScript_0xbc1af
+	dbw BANK(UnknownScript_0xbc1c8), UnknownScript_0xbc1c8
+	dbw BANK(UnknownScript_0xbc25c), UnknownScript_0xbc25c
+	dbw BANK(UnknownScript_0xbc274), UnknownScript_0xbc274
+	dbw BANK(UnknownScript_0xbc3db), UnknownScript_0xbc3db
+	dbw BANK(UnknownScript_0xbc574), UnknownScript_0xbc574
+	dbw BANK(UnknownScript_0xbc62d), UnknownScript_0xbc62d
+	dbw BANK(UnknownScript_0xbc6e6), UnknownScript_0xbc6e6
+	dbw BANK(UnknownScript_0xbc6f0), UnknownScript_0xbc6f0
+	dbw BANK(UnknownScript_0xbc7ce), UnknownScript_0xbc7ce
+	dbw BANK(UnknownScript_0xbc8ac), UnknownScript_0xbc8ac
+	dbw BANK(UnknownScript_0xbc98a), UnknownScript_0xbc98a
+	dbw BANK(UnknownScript_0xbca47), UnknownScript_0xbca47
+	dbw BANK(UnknownScript_0xbca8f), UnknownScript_0xbca8f
+	dbw BANK(UnknownScript_0xbcb0a), UnknownScript_0xbcb0a
+	dbw BANK(UnknownScript_0xbcb35), UnknownScript_0xbcb35
+	dbw BANK(UnknownScript_0xbcb7f), UnknownScript_0xbcb7f
+	dbw BANK(UnknownScript_0xbcbc9), UnknownScript_0xbcbc9
+	dbw BANK(UnknownScript_0xbcbd3), UnknownScript_0xbcbd3
+	dbw BANK(UnknownScript_0xbcc2d), UnknownScript_0xbcc2d
+	dbw BANK(UnknownScript_0xbcc87), UnknownScript_0xbcc87
+	dbw BANK(UnknownScript_0xbcce1), UnknownScript_0xbcce1
+	dbw BANK(UnknownScript_0xbcd30), UnknownScript_0xbcd30
+	dbw BANK(UnknownScript_0xbcd5a), UnknownScript_0xbcd5a
+	dbw BANK(UnknownScript_0xbcd93), UnknownScript_0xbcd93
+	dbw BANK(UnknownScript_0xbcda0), UnknownScript_0xbcda0
+	dbw BANK(UnknownScript_0xbcdaa), UnknownScript_0xbcdaa
+	dbw BANK(UnknownScript_0xbcdb9), UnknownScript_0xbcdb9
+	dbw BANK(UnknownScript_0xbcdc3), UnknownScript_0xbcdc3
+	dbw BANK(UnknownScript_0xbc1a9), UnknownScript_0xbc1a9
+	dbw BANK(UnknownScript_0xbcdcd), UnknownScript_0xbcdcd
+	dbw BANK(UnknownScript_0xbce7f), UnknownScript_0xbce7f
+; bc09c
 
 PokeCenterNurseScript: ; bc09c
 ; Talking to a nurse in a Pokemon Center
@@ -72898,7 +73024,2118 @@
 	end
 ; bc162
 
-INCBIN "baserom.gbc", $bc162, $bcea5-$bc162
+UnknownScript_0xbc162: ; 0xbc162
+	3jumptext $6c, $435a
+; 0xbc166
+
+UnknownScript_0xbc166: ; 0xbc166
+	3jumptext $6c, $4378
+; 0xbc16a
+
+UnknownScript_0xbc16a: ; 0xbc16a
+	3jumptext $6c, $43a3
+; 0xbc16e
+
+UnknownScript_0xbc16e: ; 0xbc16e
+	3jumptext $6c, $43d9
+; 0xbc172
+
+UnknownScript_0xbc172: ; 0xbc172
+	3jumptext $6c, $4448
+; 0xbc176
+
+UnknownScript_0xbc176: ; 0xbc176
+	3jumptext $6c, $4472
+; 0xbc17a
+
+UnknownScript_0xbc17a: ; 0xbc17a
+	loadfont
+	3writetext $6c, $448d
+	closetext
+	special $0026
+	loadmovesprites
+	end
+; 0xbc185
+
+UnknownScript_0xbc185: ; 0xbc185
+	3jumptext $6c, $44a0
+; 0xbc189
+
+UnknownScript_0xbc189: ; 0xbc189
+	loadfont
+	3writetext $6c, $44be
+	closetext
+	loadmovesprites
+	end
+; 0xbc191
+
+UnknownScript_0xbc191: ; 0xbc191
+	3jumptext $6c, $44c9
+; 0xbc195
+
+UnknownScript_0xbc195: ; 0xbc195
+	loadfont
+	writebyte $0
+	special $0028
+	loadmovesprites
+	end
+; 0xbc19d
+
+UnknownScript_0xbc19d: ; 0xbc19d
+	loadfont
+	writebyte $4
+	special $0028
+	loadmovesprites
+	end
+; 0xbc1a5
+
+UnknownScript_0xbc1a5: ; 0xbc1a5
+	3jumptext $6c, $4526
+; 0xbc1a9
+
+UnknownScript_0xbc1a9: ; 0xbc1a9
+	loadfont
+	special $001c
+	loadmovesprites
+	end
+; 0xbc1af
+
+UnknownScript_0xbc1af: ; 0xbc1af
+	playsound $0008
+	pause 15
+	playsound $0027
+	end
+; 0xbc1b8
+
+UnknownScript_0xbc1b8: ; 0xbc1b8
+	3jump BANK(UnknownScript_0xcd4b), UnknownScript_0xcd4b
+; 0xbc1bc
+
+UnknownScript_0xbc1bc: ; 0xbc1bc
+	3jump BANK(UnknownScript_0xcf5d), UnknownScript_0xcf5d
+; 0xbc1c0
+
+UnknownScript_0xbc1c0: ; 0xbc1c0
+	3jumptext $6c, $457f
+; 0xbc1c4
+
+UnknownScript_0xbc1c4: ; 0xbc1c4
+	3jumptext $6c, $459c
+; 0xbc1c8
+
+UnknownScript_0xbc1c8: ; 0xbc1c8
+	checkcode $b
+	if_equal $1, UnknownScript_0xbc1e7
+	if_equal $2, UnknownScript_0xbc1ec
+	if_equal $3, UnknownScript_0xbc1f1
+	if_equal $4, UnknownScript_0xbc1f6
+	if_equal $5, UnknownScript_0xbc1fb
+	if_equal $6, UnknownScript_0xbc200
+	stringtotext UnknownRawText_0xbc205, $0
+	end
+; 0xbc1e7
+
+UnknownScript_0xbc1e7: ; 0xbc1e7
+	stringtotext UnknownRawText_0xbc20c, $0
+	end
+; 0xbc1ec
+
+UnknownScript_0xbc1ec: ; 0xbc1ec
+	stringtotext UnknownRawText_0xbc213, $0
+	end
+; 0xbc1f1
+
+UnknownScript_0xbc1f1: ; 0xbc1f1
+	stringtotext UnknownRawText_0xbc21b, $0
+	end
+; 0xbc1f6
+
+UnknownScript_0xbc1f6: ; 0xbc1f6
+	stringtotext UnknownRawText_0xbc225, $0
+	end
+; 0xbc1fb
+
+UnknownScript_0xbc1fb: ; 0xbc1fb
+	stringtotext UnknownRawText_0xbc22e, $0
+	end
+; 0xbc200
+
+UnknownScript_0xbc200: ; 0xbc200
+	stringtotext UnknownRawText_0xbc235, $0
+	end
+; 0xbc205
+
+UnknownRawText_0xbc205: ; bc205
+	db "SUNDAY@"
+; bc20c
+
+UnknownRawText_0xbc20c: ; bc20c
+	db "MONDAY@"
+; bc213
+
+UnknownRawText_0xbc213: ; bc213
+	db "TUESDAY@"
+; bc21b
+
+UnknownRawText_0xbc21b: ; bc21b
+	db "WEDNESDAY@"
+; bc225
+
+UnknownRawText_0xbc225: ; bc225
+	db "THURSDAY@"
+; bc22e
+
+UnknownRawText_0xbc22e: ; bc22e
+	db "FRIDAY@"
+; bc235
+
+UnknownRawText_0xbc235: ; bc235
+	db "SATURDAY@"
+; bc23e
+
+UnknownScript_0xbc23e: ; 0xbc23e
+	clearbit1 $06cd
+	end
+; 0xbc242
+
+UnknownScript_0xbc242: ; 0xbc242
+	setbit2 $0013
+	setbit1 $06cf
+	setbit1 $06d1
+	clearbit1 $06ce
+	clearbit1 $0025
+	setbit1 $0756
+	specialphonecall $0004
+	domaptrigger GROUP_MAHOGANY_TOWN, MAP_MAHOGANY_TOWN, $1
+	end
+; 0xbc25c
+
+UnknownScript_0xbc25c: ; 0xbc25c
+	special $0034
+	2call UnknownScript_0xbc380
+	setbit1 $0747
+	clearbit1 $0748
+	setbit1 $02d2
+	warp GROUP_ROUTE_36_NATIONAL_PARK_GATE, MAP_ROUTE_36_NATIONAL_PARK_GATE, $0, $4
+	applymovement $0, MovementData_0xbcea1
+
+UnknownScript_0xbc274: ; bc274
+	clearbit2 $0011
+	clearbit1 $02d2
+	clearbit1 $0313
+	clearbit1 $0314
+	clearbit1 $0315
+	clearbit1 $0316
+	loadfont
+	3writetext $6c, $45bf
+	closetext
+	special $0014
+	RAM2MEM $0
+	if_equal $1, UnknownScript_0xbc31e
+	if_equal $2, UnknownScript_0xbc332
+	if_equal $3, UnknownScript_0xbc343
+	3writetext $6c, $4681
+	keeptextopen
+	waitbutton
+	verbosegiveitem BERRY, 1
+	iffalse UnknownScript_0xbc375
+	3writetext $6c, $46b7
+	keeptextopen
+	2jump $42b6
+; 0xbc2b1
+
+UnknownScript_0xbc2b1: ; 0xbc2b1
+	3writetext $6c, $465b
+	keeptextopen
+	checkbit1 $0308
+	iffalse $42c4
+	3writetext $6c, $46d9
+	closetext
+	special $0017
+	special $0015
+	if_equal $0, $42d4
+	if_equal $2, $42d4
+	3writetext $6c, $470d
+	closetext
+	loadmovesprites
+	dotrigger $0
+	domaptrigger GROUP_ROUTE_35_NATIONAL_PARK_GATE, MAP_ROUTE_35_NATIONAL_PARK_GATE, $0
+	setbit1 $0716
+	setbit1 $0717
+	setbit1 $0718
+	setbit1 $0719
+	setbit1 $071a
+	setbit1 $071b
+	setbit1 $071c
+	setbit1 $071d
+	setbit1 $071e
+	setbit1 $071f
+	setbit1 $0720
+	setbit1 $0721
+	setbit1 $0722
+	setbit1 $0723
+	setbit1 $0724
+	setbit1 $0725
+	setbit1 $0726
+	setbit1 $0727
+	setbit1 $0728
+	setbit1 $0729
+	setbit2 $0051
+	special $003c
+	end
+; 0xbc31e
+
+UnknownScript_0xbc31e: ; 0xbc31e
+	setbit1 $0000
+	itemtotext SUN_STONE, $1
+	3writetext $6c, $4621
+	closetext
+	verbosegiveitem SUN_STONE, 1
+	iffalse UnknownScript_0xbc354
+	2jump UnknownScript_0xbc2b1
+; 0xbc332
+
+UnknownScript_0xbc332: ; 0xbc332
+	itemtotext EVERSTONE, $1
+	3writetext $6c, $4621
+	closetext
+	verbosegiveitem EVERSTONE, 1
+	iffalse UnknownScript_0xbc35f
+	2jump UnknownScript_0xbc2b1
+; 0xbc343
+
+UnknownScript_0xbc343: ; 0xbc343
+	itemtotext GOLD_BERRY, $1
+	3writetext $6c, $4621
+	closetext
+	verbosegiveitem GOLD_BERRY, 1
+	iffalse UnknownScript_0xbc36a
+	2jump UnknownScript_0xbc2b1
+; 0xbc354
+
+UnknownScript_0xbc354: ; 0xbc354
+	3writetext $6c, $48cc
+	keeptextopen
+	setbit1 $0313
+	2jump UnknownScript_0xbc2b1
+; 0xbc35f
+
+UnknownScript_0xbc35f: ; 0xbc35f
+	3writetext $6c, $48cc
+	keeptextopen
+	setbit1 $0314
+	2jump UnknownScript_0xbc2b1
+; 0xbc36a
+
+UnknownScript_0xbc36a: ; 0xbc36a
+	3writetext $6c, $48cc
+	keeptextopen
+	setbit1 $0315
+	2jump UnknownScript_0xbc2b1
+; 0xbc375
+
+UnknownScript_0xbc375: ; 0xbc375
+	3writetext $6c, $48cc
+	keeptextopen
+	setbit1 $0316
+	2jump $42a9
+; 0xbc380
+
+UnknownScript_0xbc380: ; 0xbc380
+	checkbit1 $0716
+	iftrue $4389
+	clearbit1 $0720
+	checkbit1 $0717
+	iftrue $4392
+	clearbit1 $0721
+	checkbit1 $0718
+	iftrue $439b
+	clearbit1 $0722
+	checkbit1 $0719
+	iftrue $43a4
+	clearbit1 $0723
+	checkbit1 $071a
+	iftrue $43ad
+	clearbit1 $0724
+	checkbit1 $071b
+	iftrue $43b6
+	clearbit1 $0725
+	checkbit1 $071c
+	iftrue $43bf
+	clearbit1 $0726
+	checkbit1 $071d
+	iftrue $43c8
+	clearbit1 $0727
+	checkbit1 $071e
+	iftrue $43d1
+	clearbit1 $0728
+	checkbit1 $071f
+	iftrue $43da
+	clearbit1 $0729
+	end
+; 0xbc3db
+
+UnknownScript_0xbc3db: ; 0xbc3db
+	setbit1 $06cb
+	setbit1 $06ce
+	setbit1 $06cd
+	setbit1 $06d0
+	setbit1 $06f3
+	setbit1 $06e9
+	setbit1 $06f4
+	setbit1 $06d5
+	setbit1 $06de
+	setbit1 $06dd
+	setbit1 $06df
+	setbit1 $06c0
+	setbit1 $06e4
+	setbit1 $0025
+	setbit1 $06be
+	setbit1 $06bf
+	setbit1 $06c1
+	setbit1 $06f9
+	setbit1 $06fd
+	setbit1 $06ff
+	setbit1 $0700
+	setbit1 $0702
+	setbit1 $0703
+	setbit1 $0704
+	setbit1 $070d
+	setbit1 $070e
+	setbit1 $070f
+	setbit1 $0710
+	setbit1 $0715
+	setbit1 $0716
+	setbit1 $0717
+	setbit1 $0718
+	setbit1 $0719
+	setbit1 $071a
+	setbit1 $071b
+	setbit1 $071c
+	setbit1 $071d
+	setbit1 $071e
+	setbit1 $071f
+	setbit1 $0720
+	setbit1 $0721
+	setbit1 $0722
+	setbit1 $0723
+	setbit1 $0724
+	setbit1 $0725
+	setbit1 $0726
+	setbit1 $0727
+	setbit1 $0728
+	setbit1 $0729
+	setbit1 $072c
+	setbit1 $072f
+	setbit1 $072d
+	setbit1 $0735
+	setbit1 $0736
+	setbit1 $073c
+	setbit1 $073d
+	setbit1 $0741
+	setbit1 $0742
+	setbit1 $0743
+	setbit1 $0744
+	setbit1 $02a4
+	setbit1 $02af
+	setbit1 $0749
+	setbit1 $06d3
+	setbit1 $074d
+	setbit1 $0712
+	setbit1 $0713
+	setbit1 $0711
+	setbit1 $06d4
+	setbit1 $0304
+	setbit1 $0307
+	setbit1 $06d8
+	setbit1 $06c3
+	setbit1 $06c2
+	setbit1 $06c6
+	setbit1 $075f
+	setbit1 $0731
+	setbit1 $074a
+	setbit1 $0762
+	setbit1 $0738
+	setbit1 $073a
+	setbit1 $073b
+	setbit1 $0733
+	setbit1 $073f
+	setbit1 $078d
+	setbit1 $0766
+	setbit1 $0768
+	setbit1 $0769
+	setbit1 $076a
+	setbit1 $078e
+	setbit1 $078f
+	setbit1 $0790
+	setbit1 $0791
+	setbit1 $0793
+	setbit1 $07a4
+	setbit1 $07a4
+	setbit1 $07a5
+	setbit1 $06ec
+	setbit1 $06ed
+	setbit1 $06f0
+	setbit1 $07a9
+	setbit1 $07aa
+	setbit1 $06c8
+	setbit1 $07ac
+	setbit1 $07ad
+	setbit1 $07b5
+	setbit1 $07b6
+	setbit1 $07c5
+	setbit1 $07b7
+	setbit1 $07b0
+	setbit1 $07af
+	setbit1 $07ae
+	setbit1 $07cf
+	setbit2 $000e
+	setbit2 $0017
+	variablesprite $4, $52
+	variablesprite $5, $4
+	variablesprite $6, $35
+	variablesprite $7, $a
+	variablesprite $8, $a
+	variablesprite $9, $a
+	variablesprite $a, $a
+	variablesprite $b, $28
+	variablesprite $c, $28
+	setbit1 $00fb
+	setbit1 $076d
+	setbit1 $076c
+	setbit1 $076e
+	setbit1 $076f
+	setbit1 $0773
+	setbit1 $0776
+	setbit1 $0777
+	setbit1 $0779
+	setbit1 $0772
+	setbit1 $077b
+	setbit1 $0036
+	return
+; 0xbc574
+
+UnknownScript_0xbc574: ; 0xbc574
+	special $005d
+	checkcode $17
+	if_equal $5, $45c9
+	if_equal $7, UnknownScript_0xbc5ce
+	if_equal $b, UnknownScript_0xbc5d3
+	if_equal $d, UnknownScript_0xbc5d8
+	if_equal $f, UnknownScript_0xbc5dd
+	if_equal $10, UnknownScript_0xbc5e2
+	if_equal $11, UnknownScript_0xbc5e7
+	if_equal $13, UnknownScript_0xbc5ec
+	if_equal $14, UnknownScript_0xbc5f1
+	if_equal $16, UnknownScript_0xbc5f6
+	if_equal $17, UnknownScript_0xbc5fb
+	if_equal $18, UnknownScript_0xbc600
+	if_equal $1b, UnknownScript_0xbc605
+	if_equal $1c, UnknownScript_0xbc60a
+	if_equal $1d, UnknownScript_0xbc60f
+	if_equal $1e, UnknownScript_0xbc614
+	if_equal $20, UnknownScript_0xbc619
+	if_equal $21, UnknownScript_0xbc61e
+	if_equal $22, UnknownScript_0xbc623
+	if_equal $23, UnknownScript_0xbc628
+	3writetext $6c, $49fe
+	end
+; 0xbc5ce
+
+UnknownScript_0xbc5ce: ; 0xbc5ce
+	3writetext $6c, $4d9f
+	end
+; 0xbc5d3
+
+UnknownScript_0xbc5d3: ; 0xbc5d3
+	3writetext $6c, $502e
+	end
+; 0xbc5d8
+
+UnknownScript_0xbc5d8: ; 0xbc5d8
+	3writetext $6c, $542d
+	end
+; 0xbc5dd
+
+UnknownScript_0xbc5dd: ; 0xbc5dd
+	3writetext $6c, $5800
+	end
+; 0xbc5e2
+
+UnknownScript_0xbc5e2: ; 0xbc5e2
+	3writetext $6c, $5a71
+	end
+; 0xbc5e7
+
+UnknownScript_0xbc5e7: ; 0xbc5e7
+	3writetext $6c, $5cd5
+	end
+; 0xbc5ec
+
+UnknownScript_0xbc5ec: ; 0xbc5ec
+	3writetext $29, $4000
+	end
+; 0xbc5f1
+
+UnknownScript_0xbc5f1: ; 0xbc5f1
+	3writetext $29, $41c0
+	end
+; 0xbc5f6
+
+UnknownScript_0xbc5f6: ; 0xbc5f6
+	3writetext $29, $4642
+	end
+; 0xbc5fb
+
+UnknownScript_0xbc5fb: ; 0xbc5fb
+	3writetext $29, $4829
+	end
+; 0xbc600
+
+UnknownScript_0xbc600: ; 0xbc600
+	3writetext $29, $4a31
+	end
+; 0xbc605
+
+UnknownScript_0xbc605: ; 0xbc605
+	3writetext $29, $4ed4
+	end
+; 0xbc60a
+
+UnknownScript_0xbc60a: ; 0xbc60a
+	3writetext $29, $50d5
+	end
+; 0xbc60f
+
+UnknownScript_0xbc60f: ; 0xbc60f
+	3writetext $29, $52e2
+	end
+; 0xbc614
+
+UnknownScript_0xbc614: ; 0xbc614
+	3writetext $29, $5545
+	end
+; 0xbc619
+
+UnknownScript_0xbc619: ; 0xbc619
+	3writetext $29, $5937
+	end
+; 0xbc61e
+
+UnknownScript_0xbc61e: ; 0xbc61e
+	3writetext $29, $5bc4
+	end
+; 0xbc623
+
+UnknownScript_0xbc623: ; 0xbc623
+	3writetext $29, $5dc6
+	end
+; 0xbc628
+
+UnknownScript_0xbc628: ; 0xbc628
+	3writetext $29, $600c
+	end
+; 0xbc62d
+
+UnknownScript_0xbc62d: ; 0xbc62d
+	special $005d
+	checkcode $17
+	if_equal $5, $4682
+	if_equal $7, UnknownScript_0xbc687
+	if_equal $b, UnknownScript_0xbc68c
+	if_equal $d, UnknownScript_0xbc691
+	if_equal $f, UnknownScript_0xbc696
+	if_equal $10, UnknownScript_0xbc69b
+	if_equal $11, UnknownScript_0xbc6a0
+	if_equal $13, UnknownScript_0xbc6a5
+	if_equal $14, UnknownScript_0xbc6aa
+	if_equal $16, UnknownScript_0xbc6af
+	if_equal $17, UnknownScript_0xbc6b4
+	if_equal $18, UnknownScript_0xbc6b9
+	if_equal $1b, UnknownScript_0xbc6be
+	if_equal $1c, UnknownScript_0xbc6c3
+	if_equal $1d, UnknownScript_0xbc6c8
+	if_equal $1e, UnknownScript_0xbc6cd
+	if_equal $20, UnknownScript_0xbc6d2
+	if_equal $21, UnknownScript_0xbc6d7
+	if_equal $22, UnknownScript_0xbc6dc
+	if_equal $23, UnknownScript_0xbc6e1
+	3writetext $6c, $4a82
+	end
+; 0xbc687
+
+UnknownScript_0xbc687: ; 0xbc687
+	3writetext $6c, $4e2c
+	end
+; 0xbc68c
+
+UnknownScript_0xbc68c: ; 0xbc68c
+	3writetext $6c, $50d3
+	end
+; 0xbc691
+
+UnknownScript_0xbc691: ; 0xbc691
+	3writetext $6c, $54e4
+	end
+; 0xbc696
+
+UnknownScript_0xbc696: ; 0xbc696
+	3writetext $6c, $587b
+	end
+; 0xbc69b
+
+UnknownScript_0xbc69b: ; 0xbc69b
+	3writetext $6c, $5b1d
+	end
+; 0xbc6a0
+
+UnknownScript_0xbc6a0: ; 0xbc6a0
+	3writetext $6c, $5d85
+	end
+; 0xbc6a5
+
+UnknownScript_0xbc6a5: ; 0xbc6a5
+	3writetext $29, $40a9
+	end
+; 0xbc6aa
+
+UnknownScript_0xbc6aa: ; 0xbc6aa
+	3writetext $29, $426a
+	end
+; 0xbc6af
+
+UnknownScript_0xbc6af: ; 0xbc6af
+	3writetext $29, $470b
+	end
+; 0xbc6b4
+
+UnknownScript_0xbc6b4: ; 0xbc6b4
+	3writetext $29, $48fc
+	end
+; 0xbc6b9
+
+UnknownScript_0xbc6b9: ; 0xbc6b9
+	3writetext $29, $4b03
+	end
+; 0xbc6be
+
+UnknownScript_0xbc6be: ; 0xbc6be
+	3writetext $29, $4fc8
+	end
+; 0xbc6c3
+
+UnknownScript_0xbc6c3: ; 0xbc6c3
+	3writetext $29, $5175
+	end
+; 0xbc6c8
+
+UnknownScript_0xbc6c8: ; 0xbc6c8
+	3writetext $29, $5383
+	end
+; 0xbc6cd
+
+UnknownScript_0xbc6cd: ; 0xbc6cd
+	3writetext $29, $5621
+	end
+; 0xbc6d2
+
+UnknownScript_0xbc6d2: ; 0xbc6d2
+	3writetext $29, $59bc
+	end
+; 0xbc6d7
+
+UnknownScript_0xbc6d7: ; 0xbc6d7
+	3writetext $29, $5c4b
+	end
+; 0xbc6dc
+
+UnknownScript_0xbc6dc: ; 0xbc6dc
+	3writetext $29, $5e63
+	end
+; 0xbc6e1
+
+UnknownScript_0xbc6e1: ; 0xbc6e1
+	3writetext $29, $6076
+	end
+; 0xbc6e6
+
+UnknownScript_0xbc6e6: ; 0xbc6e6
+	3writetext $6c, $49c4
+	playsound $0093
+	waitbutton
+	keeptextopen
+	end
+; 0xbc6f0
+
+UnknownScript_0xbc6f0: ; 0xbc6f0
+	checkcode $17
+	if_equal $5, $4742
+	if_equal $7, UnknownScript_0xbc749
+	if_equal $b, UnknownScript_0xbc750
+	if_equal $d, UnknownScript_0xbc757
+	if_equal $f, UnknownScript_0xbc75e
+	if_equal $10, UnknownScript_0xbc765
+	if_equal $11, UnknownScript_0xbc76c
+	if_equal $13, UnknownScript_0xbc773
+	if_equal $14, UnknownScript_0xbc77a
+	if_equal $16, UnknownScript_0xbc781
+	if_equal $17, UnknownScript_0xbc788
+	if_equal $18, UnknownScript_0xbc78f
+	if_equal $1b, UnknownScript_0xbc796
+	if_equal $1c, UnknownScript_0xbc79d
+	if_equal $1d, UnknownScript_0xbc7a4
+	if_equal $1e, UnknownScript_0xbc7ab
+	if_equal $20, UnknownScript_0xbc7b2
+	if_equal $21, UnknownScript_0xbc7b9
+	if_equal $22, UnknownScript_0xbc7c0
+	if_equal $23, UnknownScript_0xbc7c7
+	3writetext $6c, $4adb
+	closetext
+	loadmovesprites
+	end
+; 0xbc749
+
+UnknownScript_0xbc749: ; 0xbc749
+	3writetext $6c, $4e89
+	closetext
+	loadmovesprites
+	end
+; 0xbc750
+
+UnknownScript_0xbc750: ; 0xbc750
+	3writetext $6c, $5136
+	closetext
+	loadmovesprites
+	end
+; 0xbc757
+
+UnknownScript_0xbc757: ; 0xbc757
+	3writetext $6c, $5553
+	closetext
+	loadmovesprites
+	end
+; 0xbc75e
+
+UnknownScript_0xbc75e: ; 0xbc75e
+	3writetext $6c, $58d7
+	closetext
+	loadmovesprites
+	end
+; 0xbc765
+
+UnknownScript_0xbc765: ; 0xbc765
+	3writetext $6c, $5b8e
+	closetext
+	loadmovesprites
+	end
+; 0xbc76c
+
+UnknownScript_0xbc76c: ; 0xbc76c
+	3writetext $6c, $5db9
+	closetext
+	loadmovesprites
+	end
+; 0xbc773
+
+UnknownScript_0xbc773: ; 0xbc773
+	3writetext $29, $40f8
+	closetext
+	loadmovesprites
+	end
+; 0xbc77a
+
+UnknownScript_0xbc77a: ; 0xbc77a
+	3writetext $29, $42ab
+	closetext
+	loadmovesprites
+	end
+; 0xbc781
+
+UnknownScript_0xbc781: ; 0xbc781
+	3writetext $29, $4730
+	closetext
+	loadmovesprites
+	end
+; 0xbc788
+
+UnknownScript_0xbc788: ; 0xbc788
+	3writetext $29, $494d
+	closetext
+	loadmovesprites
+	end
+; 0xbc78f
+
+UnknownScript_0xbc78f: ; 0xbc78f
+	3writetext $29, $4b47
+	closetext
+	loadmovesprites
+	end
+; 0xbc796
+
+UnknownScript_0xbc796: ; 0xbc796
+	3writetext $29, $502e
+	closetext
+	loadmovesprites
+	end
+; 0xbc79d
+
+UnknownScript_0xbc79d: ; 0xbc79d
+	3writetext $29, $51ac
+	closetext
+	loadmovesprites
+	end
+; 0xbc7a4
+
+UnknownScript_0xbc7a4: ; 0xbc7a4
+	3writetext $29, $53de
+	closetext
+	loadmovesprites
+	end
+; 0xbc7ab
+
+UnknownScript_0xbc7ab: ; 0xbc7ab
+	3writetext $29, $5666
+	closetext
+	loadmovesprites
+	end
+; 0xbc7b2
+
+UnknownScript_0xbc7b2: ; 0xbc7b2
+	3writetext $29, $5a28
+	closetext
+	loadmovesprites
+	end
+; 0xbc7b9
+
+UnknownScript_0xbc7b9: ; 0xbc7b9
+	3writetext $29, $5c8e
+	closetext
+	loadmovesprites
+	end
+; 0xbc7c0
+
+UnknownScript_0xbc7c0: ; 0xbc7c0
+	3writetext $29, $5ea8
+	closetext
+	loadmovesprites
+	end
+; 0xbc7c7
+
+UnknownScript_0xbc7c7: ; 0xbc7c7
+	3writetext $29, $60b5
+	closetext
+	loadmovesprites
+	end
+; 0xbc7ce
+
+UnknownScript_0xbc7ce: ; 0xbc7ce
+	checkcode $17
+	if_equal $5, $4820
+	if_equal $7, UnknownScript_0xbc827
+	if_equal $b, UnknownScript_0xbc82e
+	if_equal $d, UnknownScript_0xbc835
+	if_equal $f, UnknownScript_0xbc83c
+	if_equal $10, UnknownScript_0xbc843
+	if_equal $11, UnknownScript_0xbc84a
+	if_equal $13, UnknownScript_0xbc851
+	if_equal $14, UnknownScript_0xbc858
+	if_equal $16, UnknownScript_0xbc85f
+	if_equal $17, UnknownScript_0xbc866
+	if_equal $18, UnknownScript_0xbc86d
+	if_equal $1b, UnknownScript_0xbc874
+	if_equal $1c, UnknownScript_0xbc87b
+	if_equal $1d, UnknownScript_0xbc882
+	if_equal $1e, UnknownScript_0xbc889
+	if_equal $20, UnknownScript_0xbc890
+	if_equal $21, UnknownScript_0xbc897
+	if_equal $22, UnknownScript_0xbc89e
+	if_equal $23, UnknownScript_0xbc8a5
+	3writetext $6c, $4afd
+	closetext
+	loadmovesprites
+	end
+; 0xbc827
+
+UnknownScript_0xbc827: ; 0xbc827
+	3writetext $6c, $4ea2
+	closetext
+	loadmovesprites
+	end
+; 0xbc82e
+
+UnknownScript_0xbc82e: ; 0xbc82e
+	3writetext $6c, $517b
+	closetext
+	loadmovesprites
+	end
+; 0xbc835
+
+UnknownScript_0xbc835: ; 0xbc835
+	3writetext $6c, $5584
+	closetext
+	loadmovesprites
+	end
+; 0xbc83c
+
+UnknownScript_0xbc83c: ; 0xbc83c
+	3writetext $6c, $5908
+	closetext
+	loadmovesprites
+	end
+; 0xbc843
+
+UnknownScript_0xbc843: ; 0xbc843
+	3writetext $6c, $5bd2
+	closetext
+	loadmovesprites
+	end
+; 0xbc84a
+
+UnknownScript_0xbc84a: ; 0xbc84a
+	3writetext $6c, $5df4
+	closetext
+	loadmovesprites
+	end
+; 0xbc851
+
+UnknownScript_0xbc851: ; 0xbc851
+	3writetext $29, $4126
+	closetext
+	loadmovesprites
+	end
+; 0xbc858
+
+UnknownScript_0xbc858: ; 0xbc858
+	3writetext $29, $42f2
+	closetext
+	loadmovesprites
+	end
+; 0xbc85f
+
+UnknownScript_0xbc85f: ; 0xbc85f
+	3writetext $29, $4794
+	closetext
+	loadmovesprites
+	end
+; 0xbc866
+
+UnknownScript_0xbc866: ; 0xbc866
+	3writetext $29, $498a
+	closetext
+	loadmovesprites
+	end
+; 0xbc86d
+
+UnknownScript_0xbc86d: ; 0xbc86d
+	3writetext $29, $4b87
+	closetext
+	loadmovesprites
+	end
+; 0xbc874
+
+UnknownScript_0xbc874: ; 0xbc874
+	3writetext $29, $505f
+	closetext
+	loadmovesprites
+	end
+; 0xbc87b
+
+UnknownScript_0xbc87b: ; 0xbc87b
+	3writetext $29, $51ee
+	closetext
+	loadmovesprites
+	end
+; 0xbc882
+
+UnknownScript_0xbc882: ; 0xbc882
+	3writetext $29, $5412
+	closetext
+	loadmovesprites
+	end
+; 0xbc889
+
+UnknownScript_0xbc889: ; 0xbc889
+	3writetext $29, $56b6
+	closetext
+	loadmovesprites
+	end
+; 0xbc890
+
+UnknownScript_0xbc890: ; 0xbc890
+	3writetext $29, $5a5a
+	closetext
+	loadmovesprites
+	end
+; 0xbc897
+
+UnknownScript_0xbc897: ; 0xbc897
+	3writetext $29, $5cc5
+	closetext
+	loadmovesprites
+	end
+; 0xbc89e
+
+UnknownScript_0xbc89e: ; 0xbc89e
+	3writetext $29, $5ed6
+	closetext
+	loadmovesprites
+	end
+; 0xbc8a5
+
+UnknownScript_0xbc8a5: ; 0xbc8a5
+	3writetext $29, $60e2
+	closetext
+	loadmovesprites
+	end
+; 0xbc8ac
+
+UnknownScript_0xbc8ac: ; 0xbc8ac
+	checkcode $17
+	if_equal $5, $48fe
+	if_equal $7, UnknownScript_0xbc905
+	if_equal $b, UnknownScript_0xbc90c
+	if_equal $d, UnknownScript_0xbc913
+	if_equal $f, UnknownScript_0xbc91a
+	if_equal $10, UnknownScript_0xbc921
+	if_equal $11, UnknownScript_0xbc928
+	if_equal $13, UnknownScript_0xbc92f
+	if_equal $14, UnknownScript_0xbc936
+	if_equal $16, UnknownScript_0xbc93d
+	if_equal $17, UnknownScript_0xbc944
+	if_equal $18, UnknownScript_0xbc94b
+	if_equal $1b, UnknownScript_0xbc952
+	if_equal $1c, UnknownScript_0xbc959
+	if_equal $1d, UnknownScript_0xbc960
+	if_equal $1e, UnknownScript_0xbc967
+	if_equal $20, UnknownScript_0xbc96e
+	if_equal $21, UnknownScript_0xbc975
+	if_equal $22, UnknownScript_0xbc97c
+	if_equal $23, UnknownScript_0xbc983
+	3writetext $6c, $4b42
+	closetext
+	loadmovesprites
+	end
+; 0xbc905
+
+UnknownScript_0xbc905: ; 0xbc905
+	3writetext $6c, $4ebc
+	closetext
+	loadmovesprites
+	end
+; 0xbc90c
+
+UnknownScript_0xbc90c: ; 0xbc90c
+	3writetext $6c, $51c4
+	closetext
+	loadmovesprites
+	end
+; 0xbc913
+
+UnknownScript_0xbc913: ; 0xbc913
+	3writetext $6c, $55b6
+	closetext
+	loadmovesprites
+	end
+; 0xbc91a
+
+UnknownScript_0xbc91a: ; 0xbc91a
+	3writetext $6c, $5936
+	closetext
+	loadmovesprites
+	end
+; 0xbc921
+
+UnknownScript_0xbc921: ; 0xbc921
+	3writetext $6c, $5c06
+	closetext
+	loadmovesprites
+	end
+; 0xbc928
+
+UnknownScript_0xbc928: ; 0xbc928
+	3writetext $6c, $5e50
+	closetext
+	loadmovesprites
+	end
+; 0xbc92f
+
+UnknownScript_0xbc92f: ; 0xbc92f
+	3writetext $29, $4158
+	closetext
+	loadmovesprites
+	end
+; 0xbc936
+
+UnknownScript_0xbc936: ; 0xbc936
+	3writetext $29, $434a
+	closetext
+	loadmovesprites
+	end
+; 0xbc93d
+
+UnknownScript_0xbc93d: ; 0xbc93d
+	3writetext $29, $47eb
+	closetext
+	loadmovesprites
+	end
+; 0xbc944
+
+UnknownScript_0xbc944: ; 0xbc944
+	3writetext $29, $49bd
+	closetext
+	loadmovesprites
+	end
+; 0xbc94b
+
+UnknownScript_0xbc94b: ; 0xbc94b
+	3writetext $29, $4bcd
+	closetext
+	loadmovesprites
+	end
+; 0xbc952
+
+UnknownScript_0xbc952: ; 0xbc952
+	3writetext $29, $508c
+	closetext
+	loadmovesprites
+	end
+; 0xbc959
+
+UnknownScript_0xbc959: ; 0xbc959
+	3writetext $29, $5216
+	closetext
+	loadmovesprites
+	end
+; 0xbc960
+
+UnknownScript_0xbc960: ; 0xbc960
+	3writetext $29, $5446
+	closetext
+	loadmovesprites
+	end
+; 0xbc967
+
+UnknownScript_0xbc967: ; 0xbc967
+	3writetext $29, $56e2
+	closetext
+	loadmovesprites
+	end
+; 0xbc96e
+
+UnknownScript_0xbc96e: ; 0xbc96e
+	3writetext $29, $5aa6
+	closetext
+	loadmovesprites
+	end
+; 0xbc975
+
+UnknownScript_0xbc975: ; 0xbc975
+	3writetext $29, $5cfa
+	closetext
+	loadmovesprites
+	end
+; 0xbc97c
+
+UnknownScript_0xbc97c: ; 0xbc97c
+	3writetext $29, $5f06
+	closetext
+	loadmovesprites
+	end
+; 0xbc983
+
+UnknownScript_0xbc983: ; 0xbc983
+	3writetext $29, $6144
+	closetext
+	loadmovesprites
+	end
+; 0xbc98a
+
+UnknownScript_0xbc98a: ; 0xbc98a
+	checkcode $17
+	if_equal $5, $49d0
+	if_equal $7, UnknownScript_0xbc9d7
+	if_equal $b, UnknownScript_0xbc9de
+	if_equal $d, UnknownScript_0xbc9e5
+	if_equal $f, UnknownScript_0xbc9ec
+	if_equal $10, UnknownScript_0xbc9f3
+	if_equal $11, UnknownScript_0xbc9fa
+	if_equal $13, UnknownScript_0xbca01
+	if_equal $14, UnknownScript_0xbca08
+	if_equal $17, UnknownScript_0xbca0f
+	if_equal $18, UnknownScript_0xbca16
+	if_equal $1b, UnknownScript_0xbca1d
+	if_equal $1d, UnknownScript_0xbca24
+	if_equal $1e, UnknownScript_0xbca2b
+	if_equal $20, UnknownScript_0xbca32
+	if_equal $21, UnknownScript_0xbca39
+	if_equal $23, UnknownScript_0xbca40
+	3writetext $6c, $4b75
+	closetext
+	loadmovesprites
+	end
+; 0xbc9d7
+
+UnknownScript_0xbc9d7: ; 0xbc9d7
+	3writetext $6c, $4edc
+	closetext
+	loadmovesprites
+	end
+; 0xbc9de
+
+UnknownScript_0xbc9de: ; 0xbc9de
+	3writetext $6c, $51fe
+	closetext
+	loadmovesprites
+	end
+; 0xbc9e5
+
+UnknownScript_0xbc9e5: ; 0xbc9e5
+	3writetext $6c, $55d5
+	closetext
+	loadmovesprites
+	end
+; 0xbc9ec
+
+UnknownScript_0xbc9ec: ; 0xbc9ec
+	3writetext $6c, $5954
+	closetext
+	loadmovesprites
+	end
+; 0xbc9f3
+
+UnknownScript_0xbc9f3: ; 0xbc9f3
+	3writetext $6c, $5c32
+	closetext
+	loadmovesprites
+	end
+; 0xbc9fa
+
+UnknownScript_0xbc9fa: ; 0xbc9fa
+	3writetext $6c, $5e98
+	closetext
+	loadmovesprites
+	end
+; 0xbca01
+
+UnknownScript_0xbca01: ; 0xbca01
+	3writetext $29, $418d
+	closetext
+	loadmovesprites
+	end
+; 0xbca08
+
+UnknownScript_0xbca08: ; 0xbca08
+	3writetext $29, $4382
+	closetext
+	loadmovesprites
+	end
+; 0xbca0f
+
+UnknownScript_0xbca0f: ; 0xbca0f
+	3writetext $29, $49fc
+	closetext
+	loadmovesprites
+	end
+; 0xbca16
+
+UnknownScript_0xbca16: ; 0xbca16
+	3writetext $29, $4bec
+	closetext
+	loadmovesprites
+	end
+; 0xbca1d
+
+UnknownScript_0xbca1d: ; 0xbca1d
+	3writetext $29, $50b1
+	closetext
+	loadmovesprites
+	end
+; 0xbca24
+
+UnknownScript_0xbca24: ; 0xbca24
+	3writetext $29, $548c
+	closetext
+	loadmovesprites
+	end
+; 0xbca2b
+
+UnknownScript_0xbca2b: ; 0xbca2b
+	3writetext $29, $571e
+	closetext
+	loadmovesprites
+	end
+; 0xbca32
+
+UnknownScript_0xbca32: ; 0xbca32
+	3writetext $29, $5ada
+	closetext
+	loadmovesprites
+	end
+; 0xbca39
+
+UnknownScript_0xbca39: ; 0xbca39
+	3writetext $29, $5d1d
+	closetext
+	loadmovesprites
+	end
+; 0xbca40
+
+UnknownScript_0xbca40: ; 0xbca40
+	3writetext $29, $6175
+	closetext
+	loadmovesprites
+	end
+; 0xbca47
+
+UnknownScript_0xbca47: ; 0xbca47
+	checkcode $17
+	if_equal $d, $4a65
+	if_equal $10, UnknownScript_0xbca6b
+	if_equal $18, UnknownScript_0xbca71
+	if_equal $1c, UnknownScript_0xbca77
+	if_equal $1d, UnknownScript_0xbca7d
+	if_equal $21, UnknownScript_0xbca83
+	if_equal $22, UnknownScript_0xbca89
+	3writetext $6c, $5607
+	keeptextopen
+	end
+; 0xbca6b
+
+UnknownScript_0xbca6b: ; 0xbca6b
+	3writetext $6c, $5c57
+	keeptextopen
+	end
+; 0xbca71
+
+UnknownScript_0xbca71: ; 0xbca71
+	3writetext $29, $4c24
+	keeptextopen
+	end
+; 0xbca77
+
+UnknownScript_0xbca77: ; 0xbca77
+	3writetext $29, $523a
+	keeptextopen
+	end
+; 0xbca7d
+
+UnknownScript_0xbca7d: ; 0xbca7d
+	3writetext $29, $54e3
+	keeptextopen
+	end
+; 0xbca83
+
+UnknownScript_0xbca83: ; 0xbca83
+	3writetext $29, $5d4d
+	keeptextopen
+	end
+; 0xbca89
+
+UnknownScript_0xbca89: ; 0xbca89
+	3writetext $29, $5f37
+	keeptextopen
+	end
+; 0xbca8f
+
+UnknownScript_0xbca8f: ; 0xbca8f
+	checkcode $17
+	if_equal $7, $4abd
+	if_equal $d, UnknownScript_0xbcac4
+	if_equal $f, UnknownScript_0xbcacb
+	if_equal $10, UnknownScript_0xbcad2
+	if_equal $18, UnknownScript_0xbcad9
+	if_equal $1c, UnknownScript_0xbcae0
+	if_equal $1d, UnknownScript_0xbcae7
+	if_equal $20, UnknownScript_0xbcaee
+	if_equal $21, UnknownScript_0xbcaf5
+	if_equal $22, UnknownScript_0xbcafc
+	if_equal $23, UnknownScript_0xbcb03
+	3writetext $6c, $4eff
+	closetext
+	loadmovesprites
+	end
+; 0xbcac4
+
+UnknownScript_0xbcac4: ; 0xbcac4
+	3writetext $6c, $564d
+	closetext
+	loadmovesprites
+	end
+; 0xbcacb
+
+UnknownScript_0xbcacb: ; 0xbcacb
+	3writetext $6c, $5978
+	closetext
+	loadmovesprites
+	end
+; 0xbcad2
+
+UnknownScript_0xbcad2: ; 0xbcad2
+	3writetext $6c, $5c91
+	closetext
+	loadmovesprites
+	end
+; 0xbcad9
+
+UnknownScript_0xbcad9: ; 0xbcad9
+	3writetext $29, $4c47
+	closetext
+	loadmovesprites
+	end
+; 0xbcae0
+
+UnknownScript_0xbcae0: ; 0xbcae0
+	3writetext $29, $52a0
+	closetext
+	loadmovesprites
+	end
+; 0xbcae7
+
+UnknownScript_0xbcae7: ; 0xbcae7
+	3writetext $29, $5513
+	closetext
+	loadmovesprites
+	end
+; 0xbcaee
+
+UnknownScript_0xbcaee: ; 0xbcaee
+	3writetext $29, $5aff
+	closetext
+	loadmovesprites
+	end
+; 0xbcaf5
+
+UnknownScript_0xbcaf5: ; 0xbcaf5
+	3writetext $29, $5d9a
+	closetext
+	loadmovesprites
+	end
+; 0xbcafc
+
+UnknownScript_0xbcafc: ; 0xbcafc
+	3writetext $29, $5faa
+	closetext
+	loadmovesprites
+	end
+; 0xbcb03
+
+UnknownScript_0xbcb03: ; 0xbcb03
+	3writetext $29, $61c9
+	closetext
+	loadmovesprites
+	end
+; 0xbcb0a
+
+UnknownScript_0xbcb0a: ; 0xbcb0a
+	loadfont
+	checkcode $17
+	if_equal $7, $4b1d
+	if_equal $f, UnknownScript_0xbcb23
+	if_equal $20, UnknownScript_0xbcb29
+	if_equal $23, UnknownScript_0xbcb2f
+	3writetext $6c, $4f2f
+	keeptextopen
+	end
+; 0xbcb23
+
+UnknownScript_0xbcb23: ; 0xbcb23
+	3writetext $6c, $59be
+	keeptextopen
+	end
+; 0xbcb29
+
+UnknownScript_0xbcb29: ; 0xbcb29
+	3writetext $29, $5b3f
+	keeptextopen
+	end
+; 0xbcb2f
+
+UnknownScript_0xbcb2f: ; 0xbcb2f
+	3writetext $29, $6200
+	keeptextopen
+	end
+; 0xbcb35
+
+UnknownScript_0xbcb35: ; 0xbcb35
+	checkcode $17
+	if_equal $6, $4b57
+	if_equal $c, UnknownScript_0xbcb5c
+	if_equal $e, UnknownScript_0xbcb61
+	if_equal $12, UnknownScript_0xbcb66
+	if_equal $15, UnknownScript_0xbcb6b
+	if_equal $1a, UnknownScript_0xbcb70
+	if_equal $1f, UnknownScript_0xbcb75
+	if_equal $24, UnknownScript_0xbcb7a
+	3writetext $6c, $4bb6
+	end
+; 0xbcb5c
+
+UnknownScript_0xbcb5c: ; 0xbcb5c
+	3writetext $6c, $5239
+	end
+; 0xbcb61
+
+UnknownScript_0xbcb61: ; 0xbcb61
+	3writetext $6c, $5690
+	end
+; 0xbcb66
+
+UnknownScript_0xbcb66: ; 0xbcb66
+	3writetext $6c, $5ebe
+	end
+; 0xbcb6b
+
+UnknownScript_0xbcb6b: ; 0xbcb6b
+	3writetext $29, $4405
+	end
+; 0xbcb70
+
+UnknownScript_0xbcb70: ; 0xbcb70
+	3writetext $29, $4c8c
+	end
+; 0xbcb75
+
+UnknownScript_0xbcb75: ; 0xbcb75
+	3writetext $29, $574a
+	end
+; 0xbcb7a
+
+UnknownScript_0xbcb7a: ; 0xbcb7a
+	3writetext $29, $6295
+	end
+; 0xbcb7f
+
+UnknownScript_0xbcb7f: ; 0xbcb7f
+	checkcode $17
+	if_equal $6, $4ba1
+	if_equal $c, UnknownScript_0xbcba6
+	if_equal $e, UnknownScript_0xbcbab
+	if_equal $12, UnknownScript_0xbcbb0
+	if_equal $15, UnknownScript_0xbcbb5
+	if_equal $1a, UnknownScript_0xbcbba
+	if_equal $1f, UnknownScript_0xbcbbf
+	if_equal $24, UnknownScript_0xbcbc4
+	3writetext $6c, $4c37
+	end
+; 0xbcba6
+
+UnknownScript_0xbcba6: ; 0xbcba6
+	3writetext $6c, $5314
+	end
+; 0xbcbab
+
+UnknownScript_0xbcbab: ; 0xbcbab
+	3writetext $6c, $5710
+	end
+; 0xbcbb0
+
+UnknownScript_0xbcbb0: ; 0xbcbb0
+	3writetext $6c, $5f4e
+	end
+; 0xbcbb5
+
+UnknownScript_0xbcbb5: ; 0xbcbb5
+	3writetext $29, $44db
+	end
+; 0xbcbba
+
+UnknownScript_0xbcbba: ; 0xbcbba
+	3writetext $29, $4d36
+	end
+; 0xbcbbf
+
+UnknownScript_0xbcbbf: ; 0xbcbbf
+	3writetext $29, $57e3
+	end
+; 0xbcbc4
+
+UnknownScript_0xbcbc4: ; 0xbcbc4
+	3writetext $29, $6316
+	end
+; 0xbcbc9
+
+UnknownScript_0xbcbc9: ; 0xbcbc9
+	3writetext $6c, $49e1
+	playsound $0093
+	waitbutton
+	keeptextopen
+	end
+; 0xbcbd3
+
+UnknownScript_0xbcbd3: ; 0xbcbd3
+	checkcode $17
+	if_equal $6, $4bf5
+	if_equal $c, UnknownScript_0xbcbfc
+	if_equal $e, UnknownScript_0xbcc03
+	if_equal $12, UnknownScript_0xbcc0a
+	if_equal $15, UnknownScript_0xbcc11
+	if_equal $1a, UnknownScript_0xbcc18
+	if_equal $1f, UnknownScript_0xbcc1f
+	if_equal $24, UnknownScript_0xbcc26
+	3writetext $6c, $4c9b
+	closetext
+	loadmovesprites
+	end
+; 0xbcbfc
+
+UnknownScript_0xbcbfc: ; 0xbcbfc
+	3writetext $6c, $5392
+	closetext
+	loadmovesprites
+	end
+; 0xbcc03
+
+UnknownScript_0xbcc03: ; 0xbcc03
+	3writetext $6c, $5755
+	closetext
+	loadmovesprites
+	end
+; 0xbcc0a
+
+UnknownScript_0xbcc0a: ; 0xbcc0a
+	3writetext $6c, $5faa
+	closetext
+	loadmovesprites
+	end
+; 0xbcc11
+
+UnknownScript_0xbcc11: ; 0xbcc11
+	3writetext $29, $451d
+	closetext
+	loadmovesprites
+	end
+; 0xbcc18
+
+UnknownScript_0xbcc18: ; 0xbcc18
+	3writetext $29, $4d72
+	closetext
+	loadmovesprites
+	end
+; 0xbcc1f
+
+UnknownScript_0xbcc1f: ; 0xbcc1f
+	3writetext $29, $5820
+	closetext
+	loadmovesprites
+	end
+; 0xbcc26
+
+UnknownScript_0xbcc26: ; 0xbcc26
+	3writetext $29, $6359
+	closetext
+	loadmovesprites
+	end
+; 0xbcc2d
+
+UnknownScript_0xbcc2d: ; 0xbcc2d
+	checkcode $17
+	if_equal $6, $4c4f
+	if_equal $c, UnknownScript_0xbcc56
+	if_equal $e, UnknownScript_0xbcc5d
+	if_equal $12, UnknownScript_0xbcc64
+	if_equal $15, UnknownScript_0xbcc6b
+	if_equal $1a, UnknownScript_0xbcc72
+	if_equal $1f, UnknownScript_0xbcc79
+	if_equal $24, UnknownScript_0xbcc80
+	3writetext $6c, $4ce0
+	closetext
+	loadmovesprites
+	end
+; 0xbcc56
+
+UnknownScript_0xbcc56: ; 0xbcc56
+	3writetext $6c, $53af
+	closetext
+	loadmovesprites
+	end
+; 0xbcc5d
+
+UnknownScript_0xbcc5d: ; 0xbcc5d
+	3writetext $6c, $578a
+	closetext
+	loadmovesprites
+	end
+; 0xbcc64
+
+UnknownScript_0xbcc64: ; 0xbcc64
+	3writetext $6c, $5fdd
+	closetext
+	loadmovesprites
+	end
+; 0xbcc6b
+
+UnknownScript_0xbcc6b: ; 0xbcc6b
+	3writetext $29, $4542
+	closetext
+	loadmovesprites
+	end
+; 0xbcc72
+
+UnknownScript_0xbcc72: ; 0xbcc72
+	3writetext $29, $4dcd
+	closetext
+	loadmovesprites
+	end
+; 0xbcc79
+
+UnknownScript_0xbcc79: ; 0xbcc79
+	3writetext $29, $5842
+	closetext
+	loadmovesprites
+	end
+; 0xbcc80
+
+UnknownScript_0xbcc80: ; 0xbcc80
+	3writetext $29, $638c
+	closetext
+	loadmovesprites
+	end
+; 0xbcc87
+
+UnknownScript_0xbcc87: ; 0xbcc87
+	checkcode $17
+	if_equal $6, $4ca9
+	if_equal $c, UnknownScript_0xbccb0
+	if_equal $e, UnknownScript_0xbccb7
+	if_equal $12, UnknownScript_0xbccbe
+	if_equal $15, UnknownScript_0xbccc5
+	if_equal $1a, UnknownScript_0xbcccc
+	if_equal $1f, UnknownScript_0xbccd3
+	if_equal $24, UnknownScript_0xbccda
+	3writetext $6c, $4d0b
+	closetext
+	loadmovesprites
+	end
+; 0xbccb0
+
+UnknownScript_0xbccb0: ; 0xbccb0
+	3writetext $6c, $53e4
+	closetext
+	loadmovesprites
+	end
+; 0xbccb7
+
+UnknownScript_0xbccb7: ; 0xbccb7
+	3writetext $6c, $57ba
+	closetext
+	loadmovesprites
+	end
+; 0xbccbe
+
+UnknownScript_0xbccbe: ; 0xbccbe
+	3writetext $6c, $5ffa
+	closetext
+	loadmovesprites
+	end
+; 0xbccc5
+
+UnknownScript_0xbccc5: ; 0xbccc5
+	3writetext $29, $4573
+	closetext
+	loadmovesprites
+	end
+; 0xbcccc
+
+UnknownScript_0xbcccc: ; 0xbcccc
+	3writetext $29, $4e01
+	closetext
+	loadmovesprites
+	end
+; 0xbccd3
+
+UnknownScript_0xbccd3: ; 0xbccd3
+	3writetext $29, $5881
+	closetext
+	loadmovesprites
+	end
+; 0xbccda
+
+UnknownScript_0xbccda: ; 0xbccda
+	3writetext $29, $63cc
+	closetext
+	loadmovesprites
+	end
+; 0xbcce1
+
+UnknownScript_0xbcce1: ; 0xbcce1
+	checkcode $17
+	if_equal $c, $4cff
+	if_equal $e, UnknownScript_0xbcd06
+	if_equal $12, UnknownScript_0xbcd0d
+	if_equal $15, UnknownScript_0xbcd14
+	if_equal $1a, UnknownScript_0xbcd1b
+	if_equal $1f, UnknownScript_0xbcd22
+	if_equal $24, UnknownScript_0xbcd29
+	3writetext $6c, $5409
+	closetext
+	loadmovesprites
+	end
+; 0xbcd06
+
+UnknownScript_0xbcd06: ; 0xbcd06
+	3writetext $6c, $57de
+	closetext
+	loadmovesprites
+	end
+; 0xbcd0d
+
+UnknownScript_0xbcd0d: ; 0xbcd0d
+	3writetext $6c, $601f
+	closetext
+	loadmovesprites
+	end
+; 0xbcd14
+
+UnknownScript_0xbcd14: ; 0xbcd14
+	3writetext $29, $4595
+	closetext
+	loadmovesprites
+	end
+; 0xbcd1b
+
+UnknownScript_0xbcd1b: ; 0xbcd1b
+	3writetext $29, $4e21
+	closetext
+	loadmovesprites
+	end
+; 0xbcd22
+
+UnknownScript_0xbcd22: ; 0xbcd22
+	3writetext $29, $58a3
+	closetext
+	loadmovesprites
+	end
+; 0xbcd29
+
+UnknownScript_0xbcd29: ; 0xbcd29
+	3writetext $29, $63f1
+	closetext
+	loadmovesprites
+	end
+; 0xbcd30
+
+UnknownScript_0xbcd30: ; 0xbcd30
+	checkcode $17
+	if_equal $6, $4d42
+	if_equal $15, UnknownScript_0xbcd48
+	if_equal $1a, UnknownScript_0xbcd4e
+	if_equal $1f, UnknownScript_0xbcd54
+	3writetext $6c, $4d2c
+	keeptextopen
+	end
+; 0xbcd48
+
+UnknownScript_0xbcd48: ; 0xbcd48
+	3writetext $29, $45c9
+	keeptextopen
+	end
+; 0xbcd4e
+
+UnknownScript_0xbcd4e: ; 0xbcd4e
+	3writetext $29, $4e4c
+	keeptextopen
+	end
+; 0xbcd54
+
+UnknownScript_0xbcd54: ; 0xbcd54
+	3writetext $29, $58d5
+	keeptextopen
+	end
+; 0xbcd5a
+
+UnknownScript_0xbcd5a: ; 0xbcd5a
+	checkcode $17
+	if_equal $6, $4d70
+	if_equal $15, UnknownScript_0xbcd77
+	if_equal $1a, UnknownScript_0xbcd7e
+	if_equal $1f, UnknownScript_0xbcd85
+	if_equal $24, UnknownScript_0xbcd8c
+	3writetext $6c, $4d69
+	closetext
+	loadmovesprites
+	end
+; 0xbcd77
+
+UnknownScript_0xbcd77: ; 0xbcd77
+	3writetext $29, $4603
+	closetext
+	loadmovesprites
+	end
+; 0xbcd7e
+
+UnknownScript_0xbcd7e: ; 0xbcd7e
+	3writetext $29, $4e8f
+	closetext
+	loadmovesprites
+	end
+; 0xbcd85
+
+UnknownScript_0xbcd85: ; 0xbcd85
+	3writetext $29, $5914
+	closetext
+	loadmovesprites
+	end
+; 0xbcd8c
+
+UnknownScript_0xbcd8c: ; 0xbcd8c
+	3writetext $29, $6411
+	closetext
+	loadmovesprites
+	end
+; 0xbcd93
+
+UnknownScript_0xbcd93: ; 0xbcd93
+	checkcode $17
+	if_equal $24, $4d99
+	loadfont
+	3writetext $29, $6454
+	keeptextopen
+	end
+; 0xbcda0
+
+UnknownScript_0xbcda0: ; 0xbcda0
+	mapnametotext $0
+	loadfont
+	3writetext $6c, $474e
+	closetext
+	loadmovesprites
+	end
+; 0xbcdaa
+
+UnknownScript_0xbcdaa: ; 0xbcdaa
+	mapnametotext $0
+	loadfont
+	3writetext $6c, $474e
+	keeptextopen
+	3writetext $6c, $475c
+	closetext
+	loadmovesprites
+	end
+; 0xbcdb9
+
+UnknownScript_0xbcdb9: ; 0xbcdb9
+	waitbutton
+	3writetext $6c, $4648
+	playsound $0001
+	waitbutton
+	end
+; 0xbcdc3
+
+UnknownScript_0xbcdc3: ; 0xbcdc3
+	waitbutton
+	3writetext $6c, $4648
+	playsound $0096
+	waitbutton
+	end
+; 0xbcdcd
+
+UnknownScript_0xbcdcd: ; 0xbcdcd
+	faceplayer
+	loadfont
+	3writetext $6c, $477f
+	keeptextopen
+	checkitem COIN_CASE
+	iftrue UnknownScript_0xbcde0
+	3writetext $6c, $479c
+	closetext
+	loadmovesprites
+	end
+; 0xbcde0
+
+UnknownScript_0xbcde0: ; 0xbcde0
+	3writetext $6c, $47e3
+	special $0050
+	loadmenudata $4e54
+	interpretmenu2
+	writebackup
+	if_equal $1, UnknownScript_0xbcdf7
+	if_equal $2, UnknownScript_0xbce1b
+	2jump UnknownScript_0xbce4d
+; 0xbcdf7
+
+UnknownScript_0xbcdf7: ; 0xbcdf7
+	checkcoins 9949
+	if_equal $0, UnknownScript_0xbce46
+	checkmoney $0, 1000
+	if_equal $2, UnknownScript_0xbce3f
+	givecoins 50
+	takemoney $0, 1000
+	waitbutton
+	playsound $0022
+	3writetext $6c, $4830
+	closetext
+	2jump $4de4
+; 0xbce1b
+
+UnknownScript_0xbce1b: ; 0xbce1b
+	checkcoins 9499
+	if_equal $0, UnknownScript_0xbce46
+	checkmoney $0, 10000
+	if_equal $2, UnknownScript_0xbce3f
+	givecoins 500
+	takemoney $0, 10000
+	waitbutton
+	playsound $0022
+	3writetext $6c, $484f
+	closetext
+	2jump $4de4
+; 0xbce3f
+
+UnknownScript_0xbce3f: ; 0xbce3f
+	3writetext $6c, $486f
+	closetext
+	loadmovesprites
+	end
+; 0xbce46
+
+UnknownScript_0xbce46: ; 0xbce46
+	3writetext $6c, $488c
+	closetext
+	loadmovesprites
+	end
+; 0xbce4d
+
+UnknownScript_0xbce4d: ; 0xbce4d
+	3writetext $6c, $48ad
+	closetext
+	loadmovesprites
+	end
+; 0xbce54
+
+INCBIN "baserom.gbc", $bce54, $bce7f - $bce54
+
+UnknownScript_0xbce7f: ; 0xbce7f
+	faceplayer
+	loadfont
+	special $0059
+	if_greater_than $32, UnknownScript_0xbce9a
+	if_greater_than $96, UnknownScript_0xbce93
+	3writetext $6c, $492a
+	closetext
+	loadmovesprites
+	end
+; 0xbce93
+
+UnknownScript_0xbce93: ; 0xbce93
+	3writetext $6c, $4954
+	closetext
+	loadmovesprites
+	end
+; 0xbce9a
+
+UnknownScript_0xbce9a: ; 0xbce9a
+	3writetext $6c, $4989
+	closetext
+	loadmovesprites
+	end
+; 0xbcea1
+
+MovementData_0xbcea1: ; bcea1
+	step_right
+	step_down
+	turn_head_up
+	step_end
+; bcea5
 
 UnusedPhoneScript: ; 0xbcea5
 	3writetext BANK(UnusedPhoneText), UnusedPhoneText