Another attempt at splitting Red/Blue versions.

hg-commit-id: bd7cb987f964

1 files changed, 41477 insertions, 0 deletions

diff --git a/common.asm b/common.asm
new file mode 100644
index 00000000..6830b5a0
--- /dev/null
+++ b/common.asm
@@ -0,0 +1,41477 @@
+INCLUDE "constants.asm"
+
+; the rst vectors are unused
+SECTION "rst00",HOME[0]
+	db $FF
+SECTION "rst08",HOME[8]
+	db $FF
+SECTION "rst10",HOME[$10]
+	db $FF
+SECTION "rst18",HOME[$18]
+	db $FF
+SECTION "rst20",HOME[$20]
+	db $FF
+SECTION "rst28",HOME[$28]
+	db $FF
+SECTION "rst30",HOME[$30]
+	db $FF
+SECTION "rst38",HOME[$38]
+	db $FF
+
+; interrupts
+SECTION "vblank",HOME[$40]
+	jp $2024
+SECTION "lcdc",HOME[$48]
+	db $FF
+SECTION "timer",HOME[$50]
+	jp $2306
+SECTION "serial",HOME[$58]
+	jp $2125
+SECTION "joypad",HOME[$60]
+	reti
+
+SECTION "bank0",HOME[$61]
+DisableLCD:
+;$0061
+	xor a
+	ld [$ff0f],a
+	ld a,[$ffff]
+	ld b,a
+	res 0,a
+	ld [$ffff],a
+.jr0\@
+	ld a,[$ff44]
+	cp a,$91
+	jr nz,.jr0\@
+	ld a,[$ff40]
+	and a,$7f	; res 7,a
+	ld [$ff40],a
+	ld a,b
+	ld [$ffff],a
+	ret
+
+EnableLCD:
+;$007b
+	ld a,[$ff40]
+	set 7,a
+	ld [$ff40],a
+	ret
+
+CleanLCD_OAM:
+;$0082
+	xor a
+	ld hl,$c300
+	ld b,$a0
+.jr0\@
+	ld [hli],a
+	dec b
+	jr nz,.jr0\@
+	ret
+
+ResetLCD_OAM:
+;$008d
+	ld a,$a0
+	ld hl,$c300
+	ld de,$0004
+	ld b,$28
+.jr0\@
+	ld [hl],a
+	add hl,de
+	dec b
+	jr nz,.jr0\@
+	ret
+
+FarCopyData: ; 009D
+; copy bc bytes of data from a:hl to de
+	ld [$CEE9],a ; save future bank # for later
+	ld a,[$FFB8] ; get current bank #
+	push af
+	ld a,[$CEE9] ; get future bank #, switch
+	ld [$FFB8],a
+	ld [$2000],a
+	call CopyData
+	pop af       ; okay, done, time to switch back
+	ld [$FFB8],a
+	ld [$2000],a
+	ret
+CopyData: ; 00B5
+; copy bc bytes of data from hl to de
+	ld a,[hli]
+	ld [de],a
+	inc de
+	dec bc
+	ld a,c
+	or b
+	jr nz,CopyData
+	ret
+
+SECTION "romheader",HOME[$100]
+nop
+jp Start
+
+Section "start",HOME[$150]
+Start:
+INCBIN "baserom.gbc",$150,$1AE - $150
+; see also MapHeaderBanks
+MapHeaderPointers: ; $01AE
+	dw PalletTown_h ; PALLET_TOWN
+	dw ViridianCity_h ; VIRIDIAN_CITY
+	dw PewterCity_h ; PEWTER_CITY
+	dw CeruleanCity_h ; CERULEAN_CITY
+	dw LavenderTown_h ; LAVENDER_TOWN
+	dw VermilionCity_h ; VERMILION_CITY
+	dw CeladonCity_h ; CELADON_CITY
+	dw FuchsiaCity_h ; FUCHSIA_CITY
+	dw CinnabarIsland_h ; CINNABAR_ISLAND
+	dw IndigoPlateau_h ; INDIGO_PLATEAU
+	dw SaffronCity_h ; SAFFRON_CITY
+	dw SaffronCity_h ; unused
+	dw Route1_h ; ROUTE_1
+	dw $4000 ; ROUTE_2
+	dw Route3_h ; ROUTE_3
+	dw Route4_h ; ROUTE_4
+	dw Route5_h ; ROUTE_5
+	dw Route6_h ; ROUTE_6
+	dw Route7_h ; ROUTE_7
+	dw Route8_h ; ROUTE_8
+	dw Route9_h ; ROUTE_9
+	dw Route10_h ; ROUTE_10
+	dw Route11_h ; ROUTE_11
+	dw Route12_h ; ROUTE_12
+	dw Route13_h ; ROUTE_13
+	dw Route14_h ; ROUTE_14
+	dw Route15_h ; ROUTE_15
+	dw Route16_h ; ROUTE_16
+	dw Route17_h ; ROUTE_17
+	dw Route18_h ; ROUTE_18
+	dw Route19_h ; ROUTE_19
+	dw Route20_h ; ROUTE_20
+	dw Route21_h ; ROUTE_21
+	dw Route22_h ; ROUTE_22
+	dw Route23_h ; ROUTE_23
+	dw Route24_h ; ROUTE_24
+	dw Route25_h ; ROUTE_25
+	dw RedsHouse1F_h
+	dw RedsHouse2F_h
+	dw BluesHouse_h
+	dw OaksLab_h
+	dw ViridianPokecenter_h
+	dw ViridianMart_h
+	dw School_h
+	dw ViridianHouse_h
+	dw ViridianGym_h
+	dw DiglettsCaveRoute2_h
+	dw ViridianForestexit_h
+	dw Route2House_h
+	dw Route2Gate_h
+	dw ViridianForestEntrance_h
+	dw ViridianForest_h
+	dw MuseumF1_h
+	dw MuseumF2_h
+	dw PewterGym_h
+	dw PewterHouse1_h
+	dw PewterMart_h
+	dw PewterHouse2_h
+	dw PewterPokecenter_h
+	dw MtMoon1_h
+	dw MtMoon2_h
+	dw MtMoon3_h
+	dw CeruleanHouseTrashed_h
+	dw CeruleanHouse2_h
+	dw CeruleanPokecenter_h
+	dw CeruleanGym_h
+	dw BikeShop_h
+	dw CeruleanMart_h
+	dw MtMoonPokecenter_h
+	dw CeruleanHouseTrashed_h ; copy of map 62
+	dw Route5Gate_h
+	dw UndergroundTunnelEntranceRoute5_h
+	dw DayCareM_h
+	dw Route6Gate_h
+	dw UndergroundTunnelEntranceRoute6_h
+	dw $56e3 ; id=75
+	dw Route7Gate_h
+	dw UndergroundPathEntranceRoute7_h
+	dw $575d
+	dw Route8Gate_h
+	dw UndergroundPathEntranceRoute8_h
+	dw RockTunnelPokecenter_h
+	dw RockTunnel1_h
+	dw PowerPlant_h
+	dw Route11Gate_h
+	dw DiglettsCaveEntranceRoute11_h
+	dw Route11GateUpstairs_h
+	dw Route12Gate_h
+	dw BillsHouse_h
+	dw VermilionPokecenter_h
+	dw FanClub_h
+	dw VermilionMart_h
+	dw VermilionGym_h
+	dw VermilionHouse1_h
+	dw VermilionDock_h
+	dw SSAnne1_h
+	dw SSAnne2_h
+	dw SSAnne3_h
+	dw SSAnne4_h
+	dw SSAnne5_h
+	dw SSAnne6_h
+	dw SSAnne7_h
+	dw SSAnne8_h
+	dw SSAnne9_h
+	dw SSAnne10_h ; id=104
+	dw Lance_h ; unused
+	dw Lance_h ; unused
+	dw Lance_h ; unused
+	dw VictoryRoad1_h ; id=108
+	dw Lance_h ; unused
+	dw Lance_h ; unused
+	dw Lance_h ; unused
+	dw Lance_h ; unused
+	dw Lance_h
+	dw Lance_h ; unused
+	dw Lance_h ; unused
+	dw Lance_h ; unused
+	dw Lance_h ; unused
+	dw $6492
+	dw UndergroundPathNS_h
+	dw $5f11
+	dw UndergroundPathWE_h
+	dw CeladonMart1_h
+	dw CeladonMart2_h
+	dw CeladonMart3_h
+	dw CeladonMart4_h
+	dw CeladonMartRoof_h
+	dw CeladonMartElevator_h
+	dw CeladonMansion1_h
+	dw CeladonMansion2_h
+	dw CeladonMansion3_h
+	dw CeladonMansion4_h
+	dw CeladonMansion5_h
+	dw CeladonPokecenter_h
+	dw CeladonGym_h
+	dw CeladonGameCorner_h
+	dw CeladonMart5_h
+	dw CeladonPrizeRoom_h
+	dw CeladonDiner_h
+	dw CeladonHouse_h
+	dw CeladonHotel_h
+	dw LavenderPokecenter_h
+	dw PokemonTower1_h
+	dw PokemonTower2_h
+	dw PokemonTower3_h
+	dw PokemonTower4_h
+	dw PokemonTower5_h
+	dw PokemonTower6_h
+	dw PokemonTower7_h
+	dw LavenderHouse1_h
+	dw LavenderMart_h
+	dw LavenderHouse2_h
+	dw FuchsiaMart_h
+	dw FuchsiaHouse1_h
+	dw FuchsiaPokecenter_h
+	dw FuchsiaHouse2_h
+	dw SafariZoneEntrance_h
+	dw FuchsiaGym_h
+	dw FuchsiaMeetingRoom_h
+	dw SeafoamIslands2_h
+	dw SeafoamIslands3_h
+	dw SeafoamIslands4_h
+	dw SeafoamIslands5_h
+	dw VermilionHouse2_h
+	dw FuchsiaHouse3_h
+	dw Mansion1_h
+	dw CinnabarGym_h
+	dw Lab1_h
+	dw Lab2_h
+	dw Lab3_h
+	dw Lab4_h
+	dw CinnabarPokecenter_h
+	dw CinnabarMart_h
+	dw $5e72
+	dw IndigoPlateauLobby_h
+	dw CopycatsHouseF1_h
+	dw CopycatsHouseF2_h
+	dw FightingDojo_h
+	dw SaffronGym_h
+	dw SaffronHouse1_h
+	dw SaffronMart_h
+	dw SilphCo1_h
+	dw SaffronPokecenter_h
+	dw SaffronHouse2_h
+	dw Route15Gate_h
+	dw $563e
+	dw Route16GateMap_h
+	dw Route16GateUpstairs_h
+	dw Route16House_h
+	dw Route12House_h
+	dw Route18Gate_h
+	dw Route18GateHeader_h
+	dw SeafoamIslands1_h
+	dw Route22Gate_h
+	dw VictoryRoad2_h
+	dw Route12GateUpstairs_h
+	dw VermilionHouse3_h
+	dw DiglettsCave_h
+	dw VictoryRoad3_h
+	dw RocketHideout1_h
+	dw RocketHideout2_h
+	dw RocketHideout3_h
+	dw RocketHideout4_h
+	dw RocketHideoutElevator_h
+	dw $5704
+	dw $5704
+	dw $5704
+	dw SilphCo2_h
+	dw SilphCo3_h ; id=208
+	dw SilphCo4_h
+	dw SilphCo5_h
+	dw SilphCo6_h
+	dw SilphCo7_h
+	dw SilphCo8_h
+	dw Mansion2_h
+	dw Mansion3_h
+	dw Mansion4_h
+	dw SafariZoneEast_h
+	dw SafariZoneNorth_h
+	dw SafariZoneWest_h
+	dw SafariZoneCenter_h
+	dw SafariZoneRestHouse1_h
+	dw SafariZoneSecretHouse_h
+	dw SafariZoneRestHouse2_h
+	dw SafariZoneRestHouse3_h
+	dw SafariZoneRestHouse4_h
+	dw UnknownDungeon2_h
+	dw UnknownDungeon3_h
+	dw UnknownDungeon1_h
+	dw NameRater_h
+	dw CeruleanHouse3_h
+	dw $56b2
+	dw RockTunnel2_h
+	dw SilphCo9_h
+	dw SilphCo10_h
+	dw SilphCo11_h
+	dw SilphCoElevator_h
+	dw $5ce5
+	dw $5ce5
+	dw BattleCenterM_h
+	dw TradeCenterM_h
+	dw $5CE5
+	dw $5CE5
+	dw $5CE5
+	dw $5CE5
+	dw Lorelei_h
+	dw Bruno_h
+	dw Agatha_h
+
+INCBIN "baserom.gbc",$39E,$1627 - $39E
+
+;XXX what does this do
+;XXX what points to this
+; offset 1627
+	ld bc,$D0B8
+	add hl,bc
+	ld a,[hli]
+	ld [$D0AB],a
+	ld a,[hl]
+	ld [$D0AC],a
+
+; offset 1633
+; define (by index number) the bank that a pokemon's image is in
+; index = Mew, bank 1
+; index = Kabutops fossil, bank $B
+;	index < $1F, bank 9
+; $1F ≤ index < $4A, bank $A
+; $4A ≤ index < $74, bank $B
+; $74 ≤ index < $99, bank $C
+; $99 ≤ index,       bank $D
+	ld a,[$CF91] ; XXX name for this ram location
+	ld b,a
+	cp $15
+	ld a,$01
+	jr z,.GotBank\@
+	ld a,b
+	cp $B6
+	ld a,$0B
+	jr z,.GotBank\@
+	ld a,b
+	cp $1F
+	ld a,$09
+	jr c,.GotBank\@
+	ld a,b
+	cp $4A
+	ld a,$0A
+	jr c,.GotBank\@
+	ld a,b
+	cp $74
+	ld a,$0B
+	jr c,.GotBank\@
+	ld a,b
+	cp $99
+	ld a,$0C
+	jr c,.GotBank\@
+	ld a,$0D
+.GotBank\@
+	jp $24FD
+
+INCBIN "baserom.gbc",$1665,$172F - $1665
+
+Tset0B_Coll:
+	INCBIN "baserom.gbc",$172F,$1735-$172F
+Tset00_Coll:
+	INCBIN "baserom.gbc",$1735,$1749-$1735
+Tset01_Coll:
+	INCBIN "baserom.gbc",$1749,$1753-$1749
+Tset02_Coll:
+	INCBIN "baserom.gbc",$1753,$1759-$1753
+Tset05_Coll:
+	INCBIN "baserom.gbc",$1759,$1765-$1759
+Tset03_Coll:
+	INCBIN "baserom.gbc",$1765,$1775-$1765
+Tset08_Coll:
+	INCBIN "baserom.gbc",$1775,$177F-$1775
+Tset09_Coll:
+	INCBIN "baserom.gbc",$177F,$178A-$177F
+Tset0D_Coll:
+	INCBIN "baserom.gbc",$178A,$1795-$178A
+Tset0E_Coll:
+	INCBIN "baserom.gbc",$1795,$179A-$1795
+Tset0F_Coll:
+	INCBIN "baserom.gbc",$179A,$17A2-$179A
+Tset10_Coll:
+	INCBIN "baserom.gbc",$17A2,$17AC-$17A2
+Tset11_Coll:
+	INCBIN "baserom.gbc",$17AC,$17B8-$17AC
+Tset12_Coll:
+	INCBIN "baserom.gbc",$17B8,$17C0-$17B8
+Tset13_Coll:
+	INCBIN "baserom.gbc",$17C0,$17CA-$17C0
+Tset14_Coll:
+	INCBIN "baserom.gbc",$17CA,$17D1-$17CA
+Tset15_Coll:
+	INCBIN "baserom.gbc",$17D1,$17DD-$17D1
+Tset16_Coll:
+	INCBIN "baserom.gbc",$17DD,$17F0-$17DD
+Tset17_Coll:
+	INCBIN "baserom.gbc",$17F0,$190F-$17F0
+
+ClearScreen: ; 190F
+; clears all tiles in the tilemap,
+; then wait three frames
+	ld bc,$0168 ; tilemap size
+	inc b
+	ld hl,$C3A0 ; TILEMAP_START
+	ld a,$7F    ; $7F is blank tile
+.loop\@
+	ld [hli],a
+	dec c
+	jr nz,.loop\@
+	dec b
+	jr nz,.loop\@
+	jp Delay3
+
+TextBoxBorder: ; 1922
+; draw a text box
+; upper-left corner at coordinates hl
+; height b
+; width c
+
+	; first row
+	push hl
+	ld a,"┌"
+	ld [hli],a
+	inc a    ; horizontal border ─
+	call NPlaceChar
+	inc a    ; upper-right border ┐
+	ld [hl],a
+
+	; middle rows
+	pop hl
+	ld de,20
+	add hl,de ; skip the top row
+
+.PlaceRow\@
+	push hl
+	ld a,"│"
+	ld [hli],a
+	ld a," "
+	call NPlaceChar
+	ld [hl],"│"
+
+	pop hl
+	ld de,20
+	add hl,de ; move to next row
+	dec b
+	jr nz,.PlaceRow\@
+
+	; bottom row
+	ld a,"└"
+	ld [hli],a
+	ld a,"─"
+	call NPlaceChar
+	ld [hl],"┘"
+	ret
+;
+NPlaceChar:
+; place a row of width c of identical characters
+	ld d,c
+.loop\@
+	ld [hli],a
+	dec d
+	jr nz,.loop\@
+	ret
+
+PlaceString: ; 1955
+	push hl
+PlaceNextChar: ; 1956
+	ld a,[de]
+
+	cp "@"
+	jr nz,.PlaceText\@
+	ld b,h
+	ld c,l
+	pop hl
+	ret
+
+.PlaceText\@
+	cp $4E
+	jr nz,.next\@
+	ld bc,$0028
+	ld a,[$FFF6]
+	bit 2,a
+	jr z,.next2\@
+	ld bc,$14
+.next2\@
+	pop hl
+	add hl,bc
+	push hl
+	jp Next19E8
+
+.next\@
+	cp $4F
+	jr nz,.next3\@
+	pop hl
+	ld hl,$C4E1
+	push hl
+	jp Next19E8
+
+.next3\@ ; Check against a dictionary
+	and a
+	jp z,Char00
+	cp $4C
+	jp z,$1B0A
+	cp $4B
+	jp z,Char4B
+	cp $51
+	jp z,Char51
+	cp $49
+	jp z,Char49
+	cp $52
+	jp z,Char52
+	cp $53
+	jp z,Char53
+	cp $54
+	jp z,Char54
+	cp $5B
+	jp z,Char5B
+	cp $5E
+	jp z,Char5E
+	cp $5C
+	jp z,Char5C
+	cp $5D
+	jp z,Char5D
+	cp $55
+	jp z,$1A7C
+	cp $56
+	jp z,Char56
+	cp $57
+	jp z,$1AAD
+	cp $58
+	jp z,Char58
+	cp $4A
+	jp z,Char4A
+	cp $5F
+	jp z,Char5F
+	cp $59
+	jp z,Char59
+	cp $5A
+	jp z,Char5A
+	ld [hli],a
+	call $38D3
+Next19E8:
+	inc de
+	jp PlaceNextChar
+
+Char00:
+	ld b,h
+	ld c,l
+	pop hl
+	ld de,Char00Text
+	dec de
+	ret
+
+Char00Text: ; “%d ERROR.”
+	TX_FAR _Char00Text
+	db "@"
+
+Char52: ; player’s name
+	push de
+	ld de,W_PLAYERNAME
+	jr FinishDTE
+
+Char53: ; rival’s name
+	push de
+	ld de,W_RIVALNAME
+	jr FinishDTE
+
+Char5D: ; TRAINER
+	push de
+	ld de,Char5DText
+	jr FinishDTE
+
+Char5C: ; TM
+	push de
+	ld de,Char5CText
+	jr FinishDTE
+
+Char5B: ; PC
+	push de
+	ld de,Char5BText
+	jr FinishDTE
+
+Char5E: ; ROCKET
+	push de
+	ld de,Char5EText
+	jr FinishDTE
+
+Char54: ; POKé
+	push de
+	ld de,Char54Text
+	jr FinishDTE
+
+Char56: ; ……
+	push de
+	ld de,Char56Text
+	jr FinishDTE
+
+Char4A: ; PKMN
+	push de
+	ld de,Char4AText
+	jr FinishDTE
+
+Char59:
+; depending on whose turn it is, print
+; enemy active monster’s name, prefixed with “Enemy ”
+; or
+; player active monster’s name
+; (like Char5A but flipped)
+	ld a,[H_WHOSETURN]
+	xor 1
+	jr MonsterNameCharsCommon
+
+Char5A:
+; depending on whose turn it is, print
+; player active monster’s name
+; or
+; enemy active monster’s name, prefixed with “Enemy ”
+	ld a,[H_WHOSETURN]
+MonsterNameCharsCommon:
+	push de
+	and a
+	jr nz,.Enemy\@
+	ld de,$D009 ; player active monster name
+	jr FinishDTE
+
+.Enemy\@ ; 1A40
+	; print “Enemy ”
+	ld de,Char5AText
+	call PlaceString
+
+	ld h,b
+	ld l,c
+	ld de,$CFDA ; enemy active monster name
+
+FinishDTE:
+	call PlaceString
+	ld h,b
+	ld l,c
+	pop de
+	inc de
+	jp PlaceNextChar
+
+Char5CText:
+	db "TM@"
+Char5DText:
+	db "TRAINER@"
+Char5BText:
+	db "PC@"
+Char5EText:
+	db "ROCKET@"
+Char54Text:
+	db "POKé@"
+Char56Text:
+	db "……@"
+Char5AText:
+	db "Enemy @"
+Char4AText:
+	db $E1,$E2,"@" ; PKMN
+
+Char55:
+	push de
+	ld b,h
+	ld c,l
+	ld hl,Char55Text
+	call $1B40
+	ld h,b
+	ld l,c
+	pop de
+	inc de
+	jp PlaceNextChar
+
+Char55Text:
+; equivalent to Char4B
+	TX_FAR _Char55Text
+	db "@"
+
+Char5F:
+; ends a Pokédex entry
+	ld [hl],"."
+	pop hl
+	ret
+
+Char58:
+	ld a,[$D12B]
+	cp 4
+	jp z,Next1AA2
+	ld a,$EE
+	ld [$C4F2],a
+Next1AA2:
+	call ProtectedDelay3
+	call $3898
+	ld a,$7F
+	ld [$C4F2],a
+	pop hl
+	ld de,Char58Text
+	dec de
+	ret
+
+Char58Text:
+	db "@"
+
+Char51:
+	push de
+	ld a,$EE
+	ld [$C4F2],a
+	call ProtectedDelay3
+	call $3898
+	ld hl,$C4A5
+	ld bc,$0412
+	call $18C4
+	ld c,$14
+	call DelayFrames
+	pop de
+	ld hl,$C4B9
+	jp Next19E8
+
+Char49:
+	push de
+	ld a,$EE
+	ld [$C4F2],a
+	call ProtectedDelay3
+	call $3898
+	ld hl,$C469
+	ld bc,$0712
+	call $18C4
+	ld c,$14
+	call DelayFrames
+	pop de
+	pop hl
+	ld hl,$C47D
+	push hl
+	jp Next19E8
+
+Char4B:
+	ld a,$EE
+	ld [$C4F2],a
+	call ProtectedDelay3
+	push de
+	call $3898
+	pop de
+	ld a,$7F
+	ld [$C4F2],a
+	push de
+	call Next1B18
+	call Next1B18
+	ld hl,$C4E1
+	pop de
+	jp Next19E8
+
+Next1B18:
+	ld hl,$C4B8
+	ld de,$C4A4
+	ld b,$3C
+.next\@
+	ld a,[hli]
+	ld [de],a
+	inc de
+	dec b
+	jr nz,.next\@
+	ld hl,$C4E1
+	ld a,$7F
+	ld b,$12
+.next2\@
+	ld [hli],a
+	dec b
+	jr nz,.next2\@
+
+	; wait five frames
+	ld b,5
+.WaitFrame\@
+	call DelayFrame
+	dec b
+	jr nz,.WaitFrame\@
+
+	ret
+
+ProtectedDelay3:
+	push bc
+	call Delay3
+	pop bc
+	ret
+
+INCBIN "baserom.gbc",$1B40,$20AF - $1B40
+
+DelayFrame: ; 20AF
+; delay for one frame
+	ld a,1
+	ld [$FFD6],a
+
+; wait for the next Vblank, halting to conserve battery
+.halt\@
+	db $76 ; XXX this is a hack--rgbasm adds a nop after this instr
+	       ; even when ints are enabled
+	ld a,[$FFD6]
+	and a
+	jr nz,.halt\@
+
+	ret
+
+; These routines manage gradual fading
+; (e.g., entering a doorway)
+LoadGBPal: ; 20BA
+	ld a,[$d35d]		;tells if cur.map is dark
+	ld b,a			;(requires HM5_FLASH?)
+	ld hl,GBPalTable_00	;16
+	ld a,l
+	sub b
+	ld l,a
+	jr nc,.jr0\@
+	dec h
+.jr0\@
+	ld a,[hli]
+	ld [rBGP],a
+	ld a,[hli]
+	ld [rOBP0],a
+	ld a,[hli]
+	ld [rOBP1],a
+	ret
+
+GBFadeOut1: ; 20D1
+	ld hl,IncGradGBPalTable_01	;0d
+	ld b,$04
+	jr GBFadeOutCommon
+
+GBFadeOut2: ; 20D8
+	ld hl,IncGradGBPalTable_02	;1c
+	ld b,$03
+
+GBFadeOutCommon:
+	ld a,[hli]
+	ld [rBGP],a
+	ld a,[hli]
+	ld [rOBP0],a
+	ld a,[hli]
+	ld [rOBP1],a
+	ld c,8
+	call DelayFrames
+	dec b
+	jr nz,GBFadeOutCommon
+	ret
+
+GBFadeIn1: ; 20EF
+	ld hl,DecGradGBPalTable_01	;18
+	ld b,$04
+	jr GBFadeInCommon
+
+GBFadeIn2: ; 20F6
+	ld hl,DecGradGBPalTable_02	;21
+	ld b,$03
+
+GBFadeInCommon:
+	ld a,[hld]
+	ld [rOBP1],a
+	ld a,[hld]
+	ld [rOBP0],a
+	ld a,[hld]
+	ld [rBGP],a
+	ld c,8
+	call DelayFrames
+	dec b
+	jr nz,GBFadeInCommon
+	ret
+
+IncGradGBPalTable_01: ; 210D
+	db %11111111	;BG Pal
+	db %11111111	;OBJ Pal 1
+	db %11111111	;OBJ Pal 2
+			;and so on...
+	db %11111110
+	db %11111110
+	db %11111000
+
+	db %11111001
+	db %11100100
+	db %11100100
+GBPalTable_00:		;16
+	db %11100100
+	db %11010000
+DecGradGBPalTable_01:	;18
+	db %11100000
+	;19
+	db %11100100
+	db %11010000
+	db %11100000
+IncGradGBPalTable_02:	;1c
+	db %10010000
+	db %10000000
+	db %10010000
+
+	db %01000000
+	db %01000000
+DecGradGBPalTable_02:	;21
+	db %01000000
+
+	db %00000000
+	db %00000000
+	db %00000000
+
+INCBIN "baserom.gbc",$2125,$2442 - $2125
+
+; XXX where is the pointer to this data?
+MartInventories: ; 2442
+	; first byte $FE, next byte # of items, last byte $FF
+
+; Viridian
+ViridianMartText4: ; XXX confirm
+	db $FE,4,POKE_BALL,ANTIDOTE,PARLYZ_HEAL,BURN_HEAL,$FF
+
+; Pewter
+PewterMartText1:
+	db $FE,7,POKE_BALL,POTION,ESCAPE_ROPE,ANTIDOTE,BURN_HEAL,AWAKENING
+	db PARLYZ_HEAL,$FF
+
+; Cerulean
+CeruleanMartText1:
+	db $FE,7,POKE_BALL,POTION,REPEL,ANTIDOTE,BURN_HEAL,AWAKENING
+	db PARLYZ_HEAL,$FF
+
+; Bike shop
+	db $FE,1,BICYCLE,$FF
+
+; Vermilion
+VermilionMartText1:
+	db $FE,6,POKE_BALL,SUPER_POTION,ICE_HEAL,AWAKENING,PARLYZ_HEAL
+	db REPEL,$FF
+
+; Lavender
+LavenderMartText1:
+	db $FE,9,GREAT_BALL,SUPER_POTION,REVIVE,ESCAPE_ROPE,SUPER_REPEL
+	db ANTIDOTE,BURN_HEAL,ICE_HEAL,PARLYZ_HEAL,$FF
+
+; Celadon Dept. Store 2F (1)
+CeladonMart2Text1:
+	db $FE,9,GREAT_BALL,SUPER_POTION,REVIVE,SUPER_REPEL,ANTIDOTE
+	db BURN_HEAL,ICE_HEAL,AWAKENING,PARLYZ_HEAL,$FF
+
+; Celadon Dept. Store 2F (2)
+CeladonMart2Text2:
+	db $FE,9,TM_32,TM_33,TM_02,TM_07,TM_37,TM_01,TM_05,TM_09,TM_17,$FF
+
+; Celadon Dept. Store 4F
+CeladonMart4Text1:
+	db $FE,5,POKE_DOLL,FIRE_STONE,THUNDER_STONE,WATER_STONE,LEAF_STONE,$FF
+
+; Celadon Dept. Store 5F (1)
+CeladonMart5Text3:
+	db $FE,7,X_ACCURACY,GUARD_SPEC_,DIRE_HIT,X_ATTACK,X_DEFEND,X_SPEED
+	db X_SPECIAL,$FF
+
+; Celadon Dept. Store 5F (2)
+CeladonMart5Text4:
+	db $FE,5,HP_UP,PROTEIN,IRON,CARBOS,CALCIUM,$FF
+
+; Fuchsia
+FuchsiaMartText1:
+	db $FE,6,ULTRA_BALL,GREAT_BALL,SUPER_POTION,REVIVE,FULL_HEAL
+	db SUPER_REPEL,$FF
+
+; unused?
+	db $FE,5,GREAT_BALL,HYPER_POTION,SUPER_POTION,FULL_HEAL,REVIVE,$FF
+
+; Cinnabar
+CinnabarMartText1:
+	db $FE,7,ULTRA_BALL,GREAT_BALL,HYPER_POTION,MAX_REPEL,ESCAPE_ROPE
+	db FULL_HEAL,REVIVE,$FF
+
+; Saffron
+SaffronMartText1:
+	db $FE,6,GREAT_BALL,HYPER_POTION,MAX_REPEL,ESCAPE_ROPE,FULL_HEAL
+	db REVIVE,$FF
+
+; Indigo
+IndigoPlateauLobbyText4:
+	db $FE,7,ULTRA_BALL,GREAT_BALL,FULL_RESTORE,MAX_POTION,FULL_HEAL
+	db REVIVE,MAX_REPEL,$FF
+
+TextScriptEndingChar:
+        db "@"
+TextScriptEnd: ; 24D7 24d7
+        ld hl,TextScriptEndingChar
+        ret
+
+INCBIN "baserom.gbc",$24DB,$24E5 - $24DB
+
+VictoryRoad3Text10:
+VictoryRoad3Text9:
+VictoryRoad3Text8:
+VictoryRoad3Text7:
+VictoryRoad2Text13:
+VictoryRoad2Text12:
+VictoryRoad2Text11:
+SeafoamIslands1Text2:
+SeafoamIslands1Text1:
+SeafoamIslands5Text2:
+SeafoamIslands5Text1:
+SeafoamIslands4Text6:
+SeafoamIslands4Text5:
+SeafoamIslands4Text4:
+SeafoamIslands4Text3:
+SeafoamIslands4Text2:
+SeafoamIslands4Text1:
+SeafoamIslands3Text2:
+SeafoamIslands3Text1:
+SeafoamIslands2Text2:
+SeafoamIslands2Text1:
+FuchsiaHouse2Text3:
+VictoryRoad1Text7:
+VictoryRoad1Text6: ; _VictoryRoad1Text6
+VictoryRoad1Text5: ; 0x24e5
+    TX_FAR _VictoryRoad1Text5
+    db $50
+
+SaffronCityText19:
+CinnabarIslandText4:
+FuchsiaCityText14:
+VermilionCityText9:
+LavenderTownText6:
+CeruleanCityText14:
+PewterCityText8:
+ViridianCityText11: ; 0x24ea
+    TX_FAR _ViridianCityText11
+    db $50
+
+PewterCityText9:
+CeruleanCityText15:
+LavenderTownText7:
+VermilionCityText10:
+CeladonCityText12:
+FuchsiaCityText15:
+CinnabarIslandText5:
+SaffronCityText23:
+Route4Text4:
+Route10Text8:
+ViridianCityText12: ; 0x24ef
+    TX_FAR _ViridianCityText12
+    db $50
+
+Route2Text1:
+Route4Text3:
+Route9Text10:
+Route12Text9:
+Route12Text10:
+Route15Text11:
+Route24Text8:
+Route25Text10:
+ViridianGymText11:
+ViridianForestText5:
+ViridianForestText6:
+ViridianForestText7:
+MtMoon1Text8:
+MtMoon1Text9:
+MtMoon1Text10:
+MtMoon1Text11:
+MtMoon1Text12:
+MtMoon1Text13:
+MtMoon3Text8:
+MtMoon3Text9:
+PowerPlantText10:
+PowerPlantText11:
+PowerPlantText12:
+PowerPlantText13:
+PowerPlantText14:
+SSAnne8Text10:
+SSAnne9Text6:
+SSAnne9Text9:
+SSAnne10Text9:
+SSAnne10Text10:
+SSAnne10Text11:
+VictoryRoad1Text3:
+VictoryRoad1Text4:
+PokemonTower3Text4:
+PokemonTower4Text4:
+PokemonTower4Text5:
+PokemonTower4Text6:
+PokemonTower5Text6:
+PokemonTower6Text4:
+PokemonTower6Text5:
+FuchsiaHouse2Text2:
+VictoryRoad2Text7:
+VictoryRoad2Text8:
+VictoryRoad2Text9:
+VictoryRoad2Text10:
+VictoryRoad3Text5:
+VictoryRoad3Text6:
+RocketHideout1Text6:
+RocketHideout1Text7:
+RocketHideout2Text2:
+RocketHideout2Text3:
+RocketHideout2Text4:
+RocketHideout2Text5:
+RocketHideout3Text3:
+RocketHideout3Text4:
+RocketHideout4Text5:
+RocketHideout4Text6:
+RocketHideout4Text7:
+RocketHideout4Text8:
+RocketHideout4Text9:
+SilphCo3Text4:
+SilphCo4Text5:
+SilphCo4Text6:
+SilphCo4Text7:
+SilphCo5Text6:
+SilphCo5Text7:
+SilphCo5Text8:
+SilphCo6Text9:
+SilphCo6Text10:
+SilphCo7Text10:
+SilphCo7Text11:
+SilphCo7Text12:
+Mansion1Text2:
+Mansion1Text3:
+Mansion2Text2:
+Mansion3Text3:
+Mansion3Text4:
+Mansion4Text3:
+Mansion4Text4:
+Mansion4Text5:
+Mansion4Text6:
+Mansion4Text8:
+SafariZoneEastText1:
+SafariZoneEastText2:
+SafariZoneEastText3:
+SafariZoneEastText4:
+SafariZoneNorthText1:
+SafariZoneNorthText2:
+SafariZoneWestText1:
+SafariZoneWestText2:
+SafariZoneWestText3:
+SafariZoneWestText4:
+SafariZoneCenterText1:
+UnknownDungeon2Text1:
+UnknownDungeon2Text2:
+UnknownDungeon2Text3:
+UnknownDungeon3Text2:
+UnknownDungeon3Text3:
+UnknownDungeon1Text1:
+UnknownDungeon1Text2:
+UnknownDungeon1Text3:
+SilphCo10Text4:
+SilphCo10Text5:
+SilphCo10Text6:
+Route2Text2: ; 24f4 0x424f4
+    db $08 ; asm
+    ld a, $5c
+    call Predef
+    jp $24d7
+
+INCBIN "baserom.gbc",$24fd,$2f9e - $24fd
+
+GetMonName: ; 2F9E
+	push hl
+	ld a,[$ffb8]
+	push af
+	ld a,BANK(MonsterNames) ; 07
+	ld [$ffb8],a
+	ld [$2000],a
+	ld a,[$d11e]
+	dec a
+	ld hl,MonsterNames ; 421E
+	ld c,10
+	ld b,0
+	call AddNTimes
+	ld de,$cd6d
+	push de
+	ld bc,10
+	call CopyData
+	ld hl,$cd77
+	ld [hl],$50
+	pop de
+	pop af
+	ld [$ffb8],a
+	ld [$2000],a
+	pop hl
+	ret
+
+GetItemName: ; 2FCF
+; given an item ID at [$D11E], store the name of the item into a string
+;     starting at $CD6D
+	push hl
+	push bc
+	ld a,[$D11E]
+	cp HM_01 ; is this a TM/HM?
+	jr nc,.Machine\@
+
+	ld [$D0B5],a
+	ld a,ITEM_NAME
+	ld [$D0B6],a
+	ld a,BANK(ItemNames)
+	ld [$D0B7],a
+	call GetName
+	jr .Finish\@
+
+.Machine\@
+	call GetMachineName
+.Finish\@
+	ld de,$CD6D ; pointer to where item name is stored in RAM
+	pop bc
+	pop hl
+	ret
+
+GetMachineName:
+; copies the name of the TM/HM in [$D11E] to $CD6D
+	push hl
+	push de
+	push bc
+	ld a,[$D11E]
+	push af
+	cp TM_01 ; is this a TM? [not HM]
+	jr nc,.WriteTM\@
+; if HM, then write "HM" and add 5 to the item ID, so we can reuse the
+; TM printing code
+	add 5
+	ld [$D11E],a
+	ld hl,HiddenPrefix ; points to "HM"
+	ld bc,2
+	jr .WriteMachinePrefix\@
+.WriteTM\@
+	ld hl,TechnicalPrefix ; points to "TM"
+	ld bc,2
+.WriteMachinePrefix\@
+	ld de,$CD6D
+	call CopyData
+
+; now get the machine number and convert it to text
+	ld a,[$D11E]
+	sub TM_01 - 1
+	ld b,$F6 ; "0"
+.FirstDigit\@
+	sub 10
+	jr c,.SecondDigit\@
+	inc b
+	jr .FirstDigit\@
+.SecondDigit\@
+	add 10
+	push af
+	ld a,b
+	ld [de],a
+	inc de
+	pop af
+	ld b,$F6 ; "0"
+	add b
+	ld [de],a
+	inc de
+	ld a,"@"
+	ld [de],a
+
+	pop af
+	ld [$D11E],a
+	pop bc
+	pop de
+	pop hl
+	ret
+
+TechnicalPrefix:
+	db "TM"
+HiddenPrefix:
+	db "HM"
+
+INCBIN "baserom.gbc",$3040,$31cc - $3040
+
+LoadTrainerHeader: ; 0x31cc
+    call $3157
+    xor a
+    call $3193
+    ld a, $2
+    call $3193
+    ld a, [$cc55]
+    ld c, a
+    ld b, $2
+    call $31c7
+    ld a, c
+    and a
+    jr z, .asm_c2964 ; 0x31e3 $8
+    ld a, $6
+    call $3193
+    jp PrintText
+.asm_c2964 ; 0x31ed
+    ld a, $4
+    call $3193
+    call PrintText
+    ld a, $a
+    call $3193
+    push de
+    ld a, $8
+    call $3193
+    pop de
+    call $3354
+    ld hl, $d733
+    set 4, [hl]
+    ld hl, $cd60
+    bit 0, [hl]
+    ret nz
+    call $336a
+    ld hl, $da39
+    inc [hl]
+    jp $325d
+    call $3306
+    ld a, [$cf13]
+    cp $ff
+    jr nz, .asm_76c22 ; 0x3221 $8
+    xor a
+    ld [$cf13], a
+    ld [$cc55], a
+    ret
+.asm_76c22 ; 0x322b
+    ld hl, $d733
+    set 3, [hl]
+    ld [$cd4f], a
+    xor a
+    ld [$cd50], a
+    ld a, $4c
+    call Predef
+    ld a, $f0
+    ld [$cd6b], a
+    xor a
+    ldh [$b4], a
+    call $32cf
+    ld hl, $da39
+    inc [hl]
+    ret
+
+INCBIN "baserom.gbc",$324c,$3474 - $324c
+
+FuncTX_F7: ; 3474
+; XXX find a better name for this function
+; special_F7
+        ld b,BANK(CeladonPrizeMenu)
+        ld hl,CeladonPrizeMenu
+        call Bankswitch
+        jp $29DF        ; continue to main text-engine function
+
+INCBIN "baserom.gbc",$347F,$3493 - $347F
+
+IsItemInBag: ; 3493
+; given an item_id in b
+; set zero flag if item isn't in player's bag
+; else reset zero flag
+; related to Pokémon Tower and ghosts
+	ld a,$1C
+	call Predef
+	ld a,b
+	and a
+	ret
+
+INCBIN "baserom.gbc",$349B,$3541 - $349B
+
+Function3541: ; 3541
+; XXX what do these three functions do
+	push hl
+	call Function354E
+	ld [hl],$FF
+	call Function3558
+	ld [hl],$FF
+	pop hl
+	ret
+
+Function354E: ; 354E
+	ld h,$C2
+	ld a,[$FF8C] ; the sprite to move
+	swap a
+	add a,6
+	ld l,a
+	ret
+
+Function3558: ; 3558
+	push de
+	ld hl,$D4E4
+	ld a,[$FF8C] ; the sprite to move
+	dec a
+	add a
+	ld d,0
+	ld e,a
+	add hl,de
+	pop de
+	ret
+
+INCBIN "baserom.gbc",$3566,$35BC - $3566
+
+BankswitchHome: ; 35BC
+; switches to bank # in a
+; Only use this when in the home bank!
+	ld [$CF09],a
+	ld a,[$FFB8]
+	ld [$CF08],a
+	ld a,[$CF09]
+	ld [$FFB8],a
+	ld [$2000],a
+	ret
+
+BankswitchBack: ; 35CD
+; returns from BankswitchHome
+	ld a,[$CF08]
+	ld [$FFB8],a
+	ld [$2000],a
+	ret
+
+Bankswitch: ; 35D6
+; self-contained bankswitch, use this when not in the home bank
+; switches to the bank in b
+	ld a,[$FFB8]
+	push af
+	ld a,b
+	ld [$FFB8],a
+	ld [$2000],a
+	ld bc,.Return\@
+	push bc
+	jp [hl]
+.Return\@
+	pop bc
+	ld a,b
+	ld [$FFB8],a
+	ld [$2000],a
+	ret
+
+INCBIN "baserom.gbc",$35EC,$363A - $35EC
+
+MoveSprite: ; 363A
+; move the sprite [$FF8C] with the movement pointed to by de
+; actually only copies the movement data to $CC5B for later
+	call Function3541
+	push hl
+	push bc
+	call Function354E
+	xor a
+	ld [hl],a
+	ld hl,$CC5B
+	ld c,0
+
+.loop\@
+	ld a,[de]
+	ldi [hl],a
+	inc de
+	inc c
+	cp a,$FF ; have we reached the end of the movement data?
+	jr nz,.loop\@
+
+	ld a,c
+	ld [$CF0F],a ; number of steps taken
+
+	pop bc
+	ld hl,$D730
+	set 0,[hl]
+	pop hl
+	xor a
+	ld [$CD3B],a
+	ld [$CCD3],a
+	dec a
+	ld [$CD6B],a
+	ld [$CD3A],a
+	ret
+
+INCBIN "baserom.gbc",$366B,$3739 - $366B
+
+DelayFrames: ; 3739
+; wait n frames, where n is the value in c
+	call DelayFrame
+	dec c
+	jr nz,DelayFrames
+	ret
+
+INCBIN "baserom.gbc",$3740,$375D - $3740
+
+NamePointers: ; 375D
+	dw MonsterNames
+	dw MoveNames
+	dw UnusedNames
+	dw ItemNames
+	dw $D273 ; player's OT names list
+	dw $D9AC ; enemy's OT names list
+	dw TrainerNames
+
+GetName: ; 376B
+; arguments:
+; [$D0B5] = which name
+; [$D0B6] = which list
+; [$D0B7] = bank of list
+;
+; returns pointer to name in de
+	ld a,[$d0b5]
+	ld [$d11e],a
+	cp a,$C4        ;it's TM/HM
+	jp nc,GetMachineName
+	ld a,[$ffb8]
+	push af
+	push hl
+	push bc
+	push de
+	ld a,[$d0b6]    ;List3759_entrySelector
+	dec a
+	jr nz,.otherEntries\@
+	;1 = MON_NAMES
+	call GetMonName
+	ld hl,11
+	add hl,de
+	ld e,l
+	ld d,h
+	jr .gotPtr\@
+.otherEntries\@ ;$378d
+	;2-7 = OTHER ENTRIES
+	ld a,[$d0b7]
+	ld [$ffb8],a
+	ld [$2000],a
+	ld a,[$d0b6]    ;VariousNames' entryID
+	dec a
+	add a
+	ld d,0
+	ld e,a
+	jr nc,.skip\@
+	inc d
+.skip\@ ;$37a0
+	ld hl,NamePointers
+	add hl,de
+	ld a,[hli]
+	ld [$ff96],a
+	ld a,[hl]
+	ld [$ff95],a
+	ld a,[$ff95]
+	ld h,a
+	ld a,[$ff96]
+	ld l,a
+	ld a,[$d0b5]
+	ld b,a
+	ld c,0
+.nextName\@
+	ld d,h
+	ld e,l
+.nextChar\@
+	ld a,[hli]
+	cp a,$50
+	jr nz,.nextChar\@
+	inc c           ;entry counter
+	ld a,b          ;wanted entry
+	cp c
+	jr nz,.nextName\@
+	ld h,d
+	ld l,e
+	ld de,$cd6d
+	ld bc,$0014
+	call CopyData
+.gotPtr\@       ;$37cd
+	ld a,e
+	ld [$cf8d],a
+	ld a,d
+	ld [$cf8e],a
+	pop de
+	pop bc
+	pop hl
+	pop af
+	ld [$ffb8],a
+	ld [$2000],a
+	ret
+
+INCBIN "baserom.gbc",$37df,$3927 - $37df
+
+AddPokemonToParty: ; 0x3927
+    push hl
+    push de
+    push bc
+    ld b, $3 ; BANK(MyFunction)
+    ld hl, $72e5 ; MyFunction
+    call Bankswitch
+    pop bc
+    pop de
+    pop hl
+    ret
+
+INCBIN "baserom.gbc",$3936,$3A87 - $3936
+
+AddNTimes: ; 3A87
+; add bc to hl a times
+	and a
+	ret z
+.loop\@
+	add hl,bc
+	dec a
+	jr nz,.loop\@
+	ret
+
+INCBIN "baserom.gbc",$3A8E,$3C49 - $3A8E
+
+PrintText: ; 3C49
+; given a pointer in hl, print the text there
+	push hl
+	ld a,1
+	ld [$D125],a
+	call $30E8
+	call $2429
+	call Delay3
+	pop hl
+        FuncCoord 1,14
+	ld bc,Coord ;$C4B9
+	jp $1B40
+
+Func3C5F: ; 3C5F
+	push bc
+	xor a
+	ld [$FF95],a
+	ld [$FF96],a
+	ld [$FF97],a
+	ld a,b
+	and $F
+	cp 1
+	jr z,.next\@
+	cp 2
+	jr z,.next2\@
+	ld a,[de]
+	ld [$FF96],a
+	inc de
+	ld a,[de]
+	ld [$FF97],a
+	inc de
+	ld a,[de]
+	ld [$FF98],a
+	jr .next3\@
+
+.next2\@
+	ld a,[de]
+	ld [$FF97],a
+	inc de
+	ld a,[de]
+	ld [$FF98],a
+	jr .next3\@
+
+.next\@
+	ld a,[de]
+	ld [$FF98],a
+
+.next3\@
+	push de
+	ld d,b
+	ld a,c
+	ld b,a
+	xor a
+	ld c,a
+	ld a,b
+	cp 2
+	jr z,.next4\@
+	cp 3
+	jr z,.next5\@
+	cp 4
+	jr z,.next6\@
+	cp 5
+	jr z,.next7\@
+	cp 6
+	jr z,.next8\@
+	ld a,$F
+	ld [$FF99],a
+	ld a,$42
+	ld [$FF9A],a
+	ld a,$40
+	ld [$FF9B],a
+	call $3D25
+	call $3D89
+.next8\@
+	ld a,1
+	ld [$FF99],a
+	ld a,$86
+	ld [$FF9A],a
+	ld a,$A0
+	ld [$FF9B],a
+	call $3D25
+	call $3D89
+.next7\@
+	xor a
+	ld [$FF99],a
+	ld a,$27
+	ld [$FF9A],a
+	ld a,$10
+	ld [$FF9B],a
+	call $3D25
+	call $3D89
+.next6\@
+	xor a
+	ld [$FF99],a
+	ld a,3
+	ld [$FF9A],a
+	ld a,$E8
+	ld [$FF9B],a
+	call $3D25
+	call $3D89
+.next5\@
+	xor a
+	ld [$FF99],a
+	xor a
+	ld [$FF9A],a
+	ld a,$64
+	ld [$FF9B],a
+	call $3D25
+	call $3D89
+.next4\@
+	ld c,0
+	ld a,[$FF98]
+.next10\@
+	cp $A
+	jr c,.next9\@
+	sub $A
+	inc c
+	jr .next10\@
+.next9\@
+	ld b,a
+	ld a,[$FF95]
+	or c
+	ld [$FF95],a
+	jr nz,.next11\@
+	call $3D83
+	jr .next12\@
+.next11\@
+	ld a,$F6
+	add a,c
+	ld [hl],a
+.next12\@
+	call $3D89
+	ld a,$F6
+	add a,b
+	ld [hli],a
+	pop de
+	dec de
+	pop bc
+	ret
+
+INCBIN "baserom.gbc",$3D25,$3DAB - $3D25
+
+IsInArray: ; 3DAB
+; searches an array at hl for the value in a.
+; skips (de − 1) bytes between reads, so to check every byte, de should be 1.
+; if found, returns count in b and sets carry.
+	ld b,0
+	ld c,a
+.loop\@
+	ld a,[hl]
+	cp a,$FF
+	jr z,.NotInArray\@
+	cp c
+	jr z,.InArray\@
+	inc b
+	add hl,de
+	jr .loop\@
+.NotInArray\@
+	and a
+	ret
+.InArray\@
+	scf
+	ret
+
+INCBIN "baserom.gbc",$3DBE,$3DD7 - $3DBE
+
+Delay3: ; 3DD7
+; call Delay with a parameter of 3
+	ld c,3
+	jp DelayFrames
+
+INCBIN "baserom.gbc",$3DDC,$3DED - $3DDC
+
+GoPAL_SET_CF1C:	; 3ded
+	ld b,$ff
+GoPAL_SET: 	; 3def
+	ld a,[$cf1b]
+	and a
+	ret z
+	ld a,$45
+	jp Predef
+
+INCBIN "baserom.gbc",$3df9,$3e2e - $3df9
+
+GiveItem: ; 0x3e2e
+    ld a, b
+    ld [$d11e], a
+    ld [$cf91], a
+    ld a, c
+    ld [$cf96], a
+    ld hl,W_NUMBAGITEMS
+    call $2bcf
+    ret nc
+    call GetItemName ; $2fcf
+    call $3826
+    scf
+    ret
+
+GivePokemon: ; 0x3e48
+    ld a, b
+    ld [$cf91], a
+    ld a, c
+    ld [$d127], a
+    xor a
+    ld [$cc49], a
+    ld b, $13
+    ld hl, $7da5
+    jp Bankswitch
+
+GenRandom: ; 3E5C
+; store a random 8-bit value in a
+	push hl
+	push de
+	push bc
+	ld b,BANK(GenRandom_)
+	ld hl,GenRandom_
+	call Bankswitch
+	ld a,[H_RAND1]
+	pop bc
+	pop de
+	pop hl
+	ret
+
+Predef: ; 3E6D
+; runs a predefined ASM command, where the command ID is read from $D0B7
+; $3E6D grabs the ath pointer from PredefPointers and executes it
+
+	ld [$CC4E],a ; save the predef routine's ID for later
+
+	ld a,[$FFB8]
+	ld [$CF12],a
+
+	; save bank and call 13:7E49
+	push af
+	ld a,BANK(GetPredefPointer)
+	ld [$FFB8],a
+	ld [$2000],a
+	call GetPredefPointer
+
+	; call the predef function
+	; ($D0B7 has the bank of the predef routine)
+	ld a,[$D0B7]
+	ld [$FFB8],a
+	ld [$2000],a
+	ld de,.Return\@
+	push de
+	jp [hl]
+	; after the predefined function finishes it returns here
+.Return\@
+	pop af
+	ld [$FFB8],a
+	ld [$2000],a
+	ret
+
+INCBIN "baserom.gbc",$3E94,$4000 - $3E94
+
+SECTION "bank1",DATA,BANK[$1]
+
+INCBIN "baserom.gbc",$4000,$112
+
+MewPicFront:
+	INCBIN "pic/bmon/mew.pic"
+MewPicBack:
+	INCBIN "pic/monback/mewb.pic"
+
+INCBIN "baserom.gbc",$425B,$4588-$425B
+
+TitleMons: ; 4588
+; mons on the title screen are randomly chosen from here
+IF _RED
+	db CHARMANDER
+	db SQUIRTLE
+	db BULBASAUR
+	db WEEDLE
+	db NIDORAN_M
+	db SCYTHER
+	db PIKACHU
+	db CLEFAIRY
+	db RHYDON
+	db ABRA
+	db GASTLY
+	db DITTO
+	db PIDGEOTTO
+	db ONIX
+	db PONYTA
+	db MAGIKARP
+ENDC
+IF _GREEN
+	db BULBASAUR
+	db CHARMANDER
+	db SQUIRTLE
+	db CATERPIE
+	db NIDORAN_F
+	db PINSIR
+	db PIKACHU
+	db CLEFAIRY
+	db RHYDON
+	db ABRA
+	db GASTLY
+	db DITTO
+	db PIDGEOTTO
+	db ONIX
+	db PONYTA
+	db MAGIKARP
+ENDC
+IF _BLUE
+	db SQUIRTLE
+	db CHARMANDER
+	db BULBASAUR
+	db MANKEY
+	db HITMONLEE
+	db VULPIX
+	db CHANSEY
+	db AERODACTYL
+	db JOLTEON
+	db SNORLAX
+	db GLOOM
+	db POLIWAG
+	db DODUO
+	db PORYGON
+	db GENGAR
+	db RAICHU
+ENDC
+
+INCBIN "baserom.gbc",$4598,$472B-$4598
+
+ItemNames: ; 472B
+	db "MASTER BALL@"
+	db "ULTRA BALL@"
+	db "GREAT BALL@"
+	db "POKé BALL@"
+	db "TOWN MAP@"
+	db "BICYCLE@"
+	db "?????@"
+	db "SAFARI BALL@"
+	db "POKéDEX@"
+	db "MOON STONE@"
+	db "ANTIDOTE@"
+	db "BURN HEAL@"
+	db "ICE HEAL@"
+	db "AWAKENING@"
+	db "PARLYZ HEAL@"
+	db "FULL RESTORE@"
+	db "MAX POTION@"
+	db "HYPER POTION@"
+	db "SUPER POTION@"
+	db "POTION@"
+	db "BOULDERBADGE@"
+	db "CASCADEBADGE@"
+	db "THUNDERBADGE@"
+	db "RAINBOWBADGE@"
+	db "SOULBADGE@"
+	db "MARSHBADGE@"
+	db "VOLCANOBADGE@"
+	db "EARTHBADGE@"
+	db "ESCAPE ROPE@"
+	db "REPEL@"
+	db "OLD AMBER@"
+	db "FIRE STONE@"
+	db "THUNDERSTONE@"
+	db "WATER STONE@"
+	db "HP UP@"
+	db "PROTEIN@"
+	db "IRON@"
+	db "CARBOS@"
+	db "CALCIUM@"
+	db "RARE CANDY@"
+	db "DOME FOSSIL@"
+	db "HELIX FOSSIL@"
+	db "SECRET KEY@"
+	db "?????@"
+	db "BIKE VOUCHER@"
+	db "X ACCURACY@"
+	db "LEAF STONE@"
+	db "CARD KEY@"
+	db "NUGGET@"
+	db "PP UP@"
+	db "POKé DOLL@"
+	db "FULL HEAL@"
+	db "REVIVE@"
+	db "MAX REVIVE@"
+	db "GUARD SPEC.@"
+	db "SUPER REPEL@"
+	db "MAX REPEL@"
+	db "DIRE HIT@"
+	db "COIN@"
+	db "FRESH WATER@"
+	db "SODA POP@"
+	db "LEMONADE@"
+	db "S.S.TICKET@"
+	db "GOLD TEETH@"
+	db "X ATTACK@"
+	db "X DEFEND@"
+	db "X SPEED@"
+	db "X SPECIAL@"
+	db "COIN CASE@"
+	db "OAK's PARCEL@"
+	db "ITEMFINDER@"
+	db "SILPH SCOPE@"
+	db "POKé FLUTE@"
+	db "LIFT KEY@"
+	db "EXP.ALL@"
+	db "OLD ROD@"
+	db "GOOD ROD@"
+	db "SUPER ROD@"
+	db "PP UP@"
+	db "ETHER@"
+	db "MAX ETHER@"
+	db "ELIXER@"
+	db "MAX ELIXER@"
+	db "B2F@"
+	db "B1F@"
+	db "1F@"
+	db "2F@"
+	db "3F@"
+	db "4F@"
+	db "5F@"
+	db "6F@"
+	db "7F@"
+	db "8F@"
+	db "9F@"
+	db "10F@"
+	db "11F@"
+	db "B4F@"
+
+UnusedNames: ; 4A92
+	db "かみなりバッヂ@"
+	db "かいがらバッヂ@"
+	db "おじぞうバッヂ@"
+	db "はやぶさバッヂ@"
+	db "ひんやりバッヂ@"
+	db "なかよしバッヂ@"
+	db "バラバッヂ@"
+	db "ひのたまバッヂ@"
+	db "ゴールドバッヂ@"
+	db "たまご@"
+	db "ひよこ@"
+	db "ブロンズ@"
+	db "シルバー@"
+	db "ゴールド@"
+	db "プチキャプテン@"
+	db "キャプテン@"
+	db "プチマスター@"
+	db "マスター@"
+
+INCBIN "baserom.gbc",$4B09,$5AF2-$4B09
+
+MainMenu:
+; Check save file
+	call Func_5bff
+	xor a
+	ld [$D08A],a
+	inc a
+	ld [$D088],a
+	call $609E
+	jr nc,.next0\@
+
+	; Predef 52 loads the save from SRAM to RAM
+	ld a,$52
+	call Predef
+
+.next0\@
+	ld c,20
+	call DelayFrames
+	xor a
+	ld [$D12B],a
+	ld hl,$CC2B
+	ld [hli],a
+	ld [hli],a
+	ld [hli],a
+	ld [hl],a
+	ld [$D07C],a
+	ld hl,$D72E
+	res 6,[hl]
+	call ClearScreen
+	call $3DED
+	call $36A0 ; load some graphics in VRAM
+	call $3680 ; load fonts in VRAM
+	ld hl,$D730
+	set 6,[hl]
+	ld a,[$D088]
+	cp a,1
+	jr z,.next1\@
+	FuncCoord 0,0
+	ld hl,Coord
+	ld b,6
+	ld c,13
+	call TextBoxBorder
+	FuncCoord 2,2
+	ld hl,Coord
+	ld de,$5D7E
+	call PlaceString
+	jr .next2\@
+.next1\@
+	FuncCoord 0,0
+	ld hl,Coord
+	ld b,4
+	ld c,13
+	call TextBoxBorder
+	FuncCoord 2,2
+	ld hl,Coord
+	ld de,$5D87
+	call PlaceString
+.next2\@
+	ld hl,$D730
+	res 6,[hl]
+	call $2429 ; OAM?
+	xor a
+	ld [$CC26],a
+	ld [$CC2A],a
+	ld [$CC34],a
+	inc a
+	ld [$CC25],a
+	inc a
+	ld [$CC24],a
+	ld a,$B
+	ld [$CC29],a
+	ld a,[$D088]
+	ld [$CC28],a
+	call $3ABE
+	bit 1,a
+	jp nz,$42DD ; load title screen (gfx and arrangement)
+	ld c,20
+	call DelayFrames
+	ld a,[$CC26]
+	ld b,a
+	ld a,[$D088]
+	cp a,2
+	jp z,.next3\@
+	inc b ; adjust MenuArrow_Counter
+.next3\@
+	ld a,b
+	and a
+	jr z,.next4\@ ; if press_A on Continue
+	cp a,1
+	jp z,$5D52 ; if press_A on NewGame
+	call $5E8A ; if press_a on Options
+	ld a,1
+	ld [$D08A],a
+	jp .next0\@
+.next4\@
+	call $5DB5
+	ld hl,$D126
+	set 5,[hl]
+.next6\@
+	xor a
+	ld [$FFB3],a
+	ld [$FFB2],a
+	ld [$FFB4],a
+	call $19A
+	ld a,[$FFB4]
+	bit 0,a
+	jr nz,.next5\@
+	bit 1,a
+	jp nz,.next0\@
+	jr .next6\@
+.next5\@
+	call $3DD4
+	call ClearScreen
+	ld a,4
+	ld [$D52A],a
+	ld c,10
+	call DelayFrames
+	ld a,[$D5A2]
+	and a
+	jp z,$5D5F
+	ld a,[W_CURMAP] ; map ID
+	cp a,$76 ; Hall of Fame
+	jp nz,$5D5F
+	xor a
+	ld [$D71A],a
+	ld hl,$D732
+	set 2,[hl]
+	call $62CE
+	jp $5D5F
+Func_5bff:
+	ld a,1
+	ld [$D358],a
+	ld a,3
+	ld [$D355],a
+	ret
+
+INCBIN "baserom.gbc",$5C0A,$6115 - $5C0A
+
+OakSpeech: ; 6115
+	ld a,$FF
+	call $23B1 ; stop music
+	ld a,2     ; bank of song
+	ld c,a
+	ld a,$EF    ; song #
+	call $23A1  ; plays music
+	call ClearScreen
+	call $36A0
+	call $60CA
+	ld a,$18
+	call Predef
+	ld hl,$D53A
+	ld a,$14
+	ld [$CF91],a
+	ld a,1
+	ld [$CF96],a
+	call $2BCF
+	ld a,[$D07C]
+	ld [$D71A],a
+	call Function62CE
+	xor a
+	ld [$FFD7],a
+	ld a,[$D732]
+	bit 1,a ; XXX when is bit 1 set?
+	jp nz,Function61BC ; easter egg: skip the intro
+	ld de,$615F
+	ld bc,$1300
+	call IntroPredef3B   ; displays Oak pic?
+	call FadeInIntroPic
+	ld hl,OakSpeechText1
+	call PrintText      ; prints text box
+	call GBFadeOut2
+	call ClearScreen
+	ld a,NIDORINO
+	ld [$D0B5],a    ; pic displayed is stored at this location
+	ld [$CF91],a
+	call $1537      ; this is also related to the pic
+	ld hl,$C3F6     ; position on tilemap the pic is displayed
+	call $1384      ; displays pic?
+	call MovePicLeft
+	ld hl,OakSpeechText2
+	call PrintText      ; Prints text box
+	call GBFadeOut2
+	call ClearScreen
+	ld de,$6EDE
+	ld bc,$0400     ; affects the position of the player pic
+	call IntroPredef3B      ; displays player pic?
+	call MovePicLeft
+	ld hl,IntroducePlayerText
+	call PrintText
+	call $695D ; brings up NewName/Red/etc menu
+	call GBFadeOut2
+	call ClearScreen
+	ld de,$6049
+	ld bc,$1300
+	call IntroPredef3B ; displays rival pic
+	call FadeInIntroPic
+	ld hl,IntroduceRivalText
+	call PrintText
+	call $69A4
+Function61BC:
+	call GBFadeOut2
+	call ClearScreen
+	ld de,$6EDE
+	ld bc,$0400
+	call IntroPredef3B
+	call GBFadeIn2
+	ld a,[$D72D]
+	and a
+	jr nz,.next\@
+	ld hl,OakSpeechText3
+	call PrintText
+.next\@	ld a,[$FFB8]
+	push af
+	ld a,$9C
+	call $23B1
+	pop af
+	ld [$FFB8],a
+	ld [$2000],a
+	ld c,4
+	call DelayFrames
+	ld de,$4180
+	ld hl,$8000
+	ld bc,$050C
+	call $1848
+	ld de,$6FE8
+	ld bc,$0400
+	call IntroPredef3B
+	ld c,4
+	call DelayFrames
+	ld de,$7042
+	ld bc,$0400
+	call IntroPredef3B
+	call $28A6
+	ld a,[$FFB8]
+	push af
+	ld a,2
+	ld [$C0EF],a
+	ld [$C0F0],a
+	ld a,$A
+	ld [$CFC7],a
+	ld a,$FF
+	ld [$C0EE],a
+	call $23B1 ; stop music
+	pop af
+	ld [$FFB8],a
+	ld [$2000],a
+	ld c,$14
+	call DelayFrames
+	ld hl,$C40A
+	ld b,7
+	ld c,7
+	call $18C4
+	call $36A0
+	ld a,1
+	ld [$CFCB],a
+	ld c,$32
+	call DelayFrames
+	call GBFadeOut2
+	jp ClearScreen
+OakSpeechText1:
+	TX_FAR _OakSpeechText1
+	db "@"
+OakSpeechText2:
+	TX_FAR _OakSpeechText2A
+	db $14
+	TX_FAR _OakSpeechText2B
+	db "@"
+IntroducePlayerText:
+	TX_FAR _IntroducePlayerText
+	db "@"
+IntroduceRivalText:
+	TX_FAR _IntroduceRivalText
+	db "@"
+OakSpeechText3:
+	TX_FAR _OakSpeechText3
+	db "@"
+
+FadeInIntroPic:
+	ld hl,IntroFadePalettes
+	ld b,6
+.next\@
+	ld a,[hli]
+	ld [rBGP],a
+	ld c,10
+	call DelayFrames
+	dec b
+	jr nz,.next\@
+	ret
+
+IntroFadePalettes:
+	db %01010100
+	db %10101000
+	db %11111100
+	db %11111000
+	db %11110100
+	db %11100100
+
+MovePicLeft:
+	ld a,119
+	ld [$FF4B],a
+	call DelayFrame
+
+	ld a,$E4
+	ld [rBGP],a
+.next\@
+	call DelayFrame
+	ld a,[$FF4B]
+	sub 8
+	cp $FF
+	ret z
+	ld [$FF4B],a
+	jr .next\@
+
+Predef3B: ; 62A1
+	call $3E94
+IntroPredef3B: ; 62A4
+	push bc
+	ld a,b
+	call $36EB
+	ld hl,$A188
+	ld de,$A000
+	ld bc,$0310
+	call CopyData
+	ld de,$9000
+	call $16EA
+	pop bc
+	ld a,c
+	and a
+	ld hl,$C3C3
+	jr nz,.next\@
+	ld hl,$C3F6
+.next\@
+	xor a
+	ld [$FFE1],a
+	ld a,1
+	jp $3E6D
+
+Function62CE: ; 62CE, XXX called by 4B2 948 989 5BF9 5D15
+	call $62FF
+	ld a,$19
+	call $3E6D
+	ld hl,$D732
+	bit 2,[hl]
+	res 2,[hl]
+	jr z,.next\@
+	ld a,[$D71A]
+	jr .next2\@
+.next\@
+	bit 1,[hl]
+	jr z,.next3\@
+	call $64EA
+.next3\@
+	ld a,0
+.next2\@
+	ld b,a
+	ld a,[$D72D]
+	and a
+	jr nz,.next4\@
+	ld a,b
+.next4\@
+	ld hl,$D732
+	bit 4,[hl]
+	ret nz
+	ld [$D365],a
+	ret
+
+INCBIN "baserom.gbc",$62FF,$6420-$62FF
+
+FirstMapSpec:
+	db $26 ; RedHouse1F
+; Original Format:
+;   [Event Displacement][Y-block][X-block][Y-sub_block][X-sub_block]
+; Macro Format:
+;   FLYWARP_DATA [Map Width][Y-pos][X-pos]
+	FLYWARP_DATA 4,6,3
+	db $04		;Tileset_id
+
+INCBIN "baserom.gbc",$6428,$6448-$6428
+
+FlyWarpDataPtr:
+	db $00,0
+        dw Map00FlyWarp
+	db $01,0
+        dw Map01FlyWarp
+	db $02,0
+        dw Map02FlyWarp
+	db $03,0
+        dw Map03FlyWarp
+	db $04,0
+        dw Map04FlyWarp
+	db $05,0
+        dw Map05FlyWarp
+	db $06,0
+        dw Map06FlyWarp
+	db $07,0
+        dw Map07FlyWarp
+	db $08,0
+        dw Map08FlyWarp
+	db $09,0
+        dw Map09FlyWarp
+	db $0A,0
+        dw Map0aFlyWarp
+	db $0F,0
+        dw Map0fFlyWarp
+	db $15,0
+        dw Map15FlyWarp	
+
+; Original Format:
+;   [Event Displacement][Y-block][X-block][Y-sub_block][X-sub_block]
+; Macro Format:
+;   FLYWARP_DATA [Map Width][Y-pos][X-pos]
+Map00FlyWarp:
+	FLYWARP_DATA 10,6,5
+Map01FlyWarp:
+	FLYWARP_DATA 20,26,23
+Map02FlyWarp:
+	FLYWARP_DATA 20,26,13
+Map03FlyWarp:
+	FLYWARP_DATA 20,18,19
+Map04FlyWarp:
+	FLYWARP_DATA 10,6,3
+Map05FlyWarp:
+	FLYWARP_DATA 20,4,11
+Map06FlyWarp:
+	FLYWARP_DATA 25,10,41
+Map07FlyWarp:
+	FLYWARP_DATA 20,28,19
+Map08FlyWarp:
+	FLYWARP_DATA 10,12,11
+Map09FlyWarp:
+	FLYWARP_DATA 10,6,9
+Map0aFlyWarp:
+	FLYWARP_DATA 20,30,9
+Map0fFlyWarp:
+	FLYWARP_DATA 45,6,11
+Map15FlyWarp:
+	FLYWARP_DATA 10,20,11
+
+INCBIN "baserom.gbc",$64CA,$778D - $64CA
+
+FieldMoveNames: ; 778D
+	db "CUT@"
+	db "FLY@"
+	db "@"
+	db "SURF@"
+	db "STRENGTH@"
+	db "FLASH@"
+	db "DIG@"
+	db "TELEPORT@"
+	db "SOFTBOILED@"
+
+PokemonMenuEntries: ; 77C2
+	db "STATS",$4E
+	db "SWITCH",$4E
+	db "CANCEL@"
+
+INCBIN "baserom.gbc",$77D6,$7AF5 - $77D6
+
+PlayersPCMenuEntries: ; 7AF5
+	db "WITHDRAW ITEM",$4E
+	db "DEPOSIT ITEM",$4E
+	db "TOSS ITEM",$4E
+	db "LOG OFF@"
+
+INCBIN "baserom.gbc",$7B22,$7C49 - $7B22
+
+SECTION "bank2",DATA,BANK[$2]
+
+INCBIN "baserom.gbc",$8000,$4000
+
+SECTION "bank3",DATA,BANK[$3]
+
+INCBIN "baserom.gbc",$C000,$C23D - $C000
+
+; see also MapHeaderPointers
+MapHeaderBanks: ; 423D
+	db BANK(PalletTown_h)
+	db BANK(ViridianCity_h) ; VIRIDIAN_CITY
+	db BANK(PewterCity_h) ; PEWTER_CITY
+	db BANK(CeruleanCity_h) ; CERULEAN_CITY
+	db BANK(LavenderTown_h) ; LAVENDER_TOWN
+	db BANK(VermilionCity_h) ; VERMILION_CITY
+	db BANK(CeladonCity_h) ; CELADON_CITY
+	db BANK(FuchsiaCity_h) ; FUCHSIA_CITY
+	db BANK(CinnabarIsland_h) ; CINNABAR_ISLAND
+	db BANK(IndigoPlateau_h) ; INDIGO_PLATEAU
+	db BANK(SaffronCity_h) ; SAFFRON_CITY
+	db $01 ; unused
+	db BANK(Route1_h) ; ROUTE_1
+	db $15 ; ROUTE_2
+	db BANK(Route3_h) ; ROUTE_3
+	db BANK(Route4_h) ; ROUTE_4
+	db BANK(Route5_h) ; ROUTE_5
+	db BANK(Route6_h) ; ROUTE_6
+	db BANK(Route7_h) ; ROUTE_7
+    db BANK(Route8_h) ; ROUTE_8
+    db BANK(Route9_h) ; ROUTE_9
+    db BANK(Route10_h) ; ROUTE_10
+    db BANK(Route11_h) ; ROUTE_11
+    db BANK(Route12_h) ; ROUTE_12
+    db BANK(Route13_h) ; ROUTE_13
+    db BANK(Route14_h) ; ROUTE_14
+    db BANK(Route15_h) ; ROUTE_15
+    db BANK(Route16_h) ; ROUTE_16
+    db BANK(Route17_h) ; ROUTE_17
+    db BANK(Route18_h) ; ROUTE_18
+    db BANK(Route19_h) ; ROUTE_19
+    db BANK(Route20_h) ; ROUTE_20
+    db BANK(Route21_h) ; ROUTE_21
+    db BANK(Route22_h) ; ROUTE_22
+    db BANK(Route23_h) ; ROUTE_23
+    db BANK(Route24_h) ; ROUTE_24
+    db BANK(Route25_h) ; ROUTE_25
+	db BANK(RedsHouse1F_h)
+	db BANK(RedsHouse2F_h)
+	db BANK(BluesHouse_h)
+	db BANK(OaksLab_h)
+	db BANK(ViridianPokecenter_h)
+	db BANK(ViridianMart_h)
+	db BANK(School_h)
+	db BANK(ViridianHouse_h)
+	db BANK(ViridianGym_h)
+	db BANK(DiglettsCaveRoute2_h)
+	db BANK(ViridianForestexit_h)
+	db BANK(Route2House_h)
+	db BANK(Route2Gate_h)
+	db BANK(ViridianForestEntrance_h)
+	db BANK(ViridianForest_h)
+	db BANK(MuseumF1_h)
+	db BANK(MuseumF2_h)
+	db BANK(PewterGym_h)
+	db BANK(PewterHouse1_h)
+	db BANK(PewterMart_h)
+	db BANK(PewterHouse2_h)
+	db BANK(PewterPokecenter_h)
+	db BANK(MtMoon1_h)
+	db BANK(MtMoon2_h)
+	db BANK(MtMoon3_h)
+	db BANK(CeruleanHouseTrashed_h)
+	db BANK(CeruleanHouse2_h)
+	db BANK(CeruleanPokecenter_h)
+	db BANK(CeruleanGym_h)
+	db BANK(BikeShop_h)
+	db BANK(CeruleanMart_h)
+	db BANK(MtMoonPokecenter_h)
+	db BANK(CeruleanHouseTrashed_h)
+	db BANK(Route5Gate_h)
+	db BANK(UndergroundTunnelEntranceRoute5_h)
+	db BANK(DayCareM_h)
+	db BANK(Route6Gate_h)
+	db BANK(UndergroundTunnelEntranceRoute6_h)
+	db $17
+	db BANK(Route7Gate_h)
+	db BANK(UndergroundPathEntranceRoute7_h)
+	db $17
+	db BANK(Route8Gate_h)
+	db BANK(UndergroundPathEntranceRoute8_h)
+	db BANK(RockTunnelPokecenter_h)
+	db BANK(RockTunnel1_h)
+	db BANK(PowerPlant_h)
+	db BANK(Route11Gate_h)
+	db BANK(DiglettsCaveEntranceRoute11_h)
+	db BANK(Route11GateUpstairs_h)
+	db BANK(Route12Gate_h)
+	db BANK(BillsHouse_h)
+	db BANK(VermilionPokecenter_h)
+	db BANK(FanClub_h)
+	db BANK(VermilionMart_h)
+	db BANK(VermilionGym_h)
+	db BANK(VermilionHouse1_h)
+	db BANK(VermilionDock_h)
+	db BANK(SSAnne1_h)
+	db BANK(SSAnne2_h)
+	db BANK(SSAnne3_h)
+	db BANK(SSAnne4_h)
+	db BANK(SSAnne5_h)
+	db BANK(SSAnne6_h)
+	db BANK(SSAnne7_h)
+	db BANK(SSAnne8_h)
+	db BANK(SSAnne9_h)
+	db BANK(SSAnne10_h)
+	db $1D
+	db $1D
+	db $1D
+	db BANK(VictoryRoad1_h)
+	db $1D
+	db $1D
+	db $1D
+	db $1D
+	db BANK(Lance_h)
+	db $1D
+	db $1D
+	db $1D
+	db $1D
+	db $16
+	db BANK(UndergroundPathNS_h)
+	db $1D
+	db BANK(UndergroundPathWE_h)
+	db BANK(CeladonMart1_h)
+	db BANK(CeladonMart2_h)
+	db BANK(CeladonMart3_h)
+	db BANK(CeladonMart4_h)
+	db BANK(CeladonMartRoof_h)
+	db BANK(CeladonMartElevator_h)
+	db BANK(CeladonMansion1_h)
+	db BANK(CeladonMansion2_h)
+	db BANK(CeladonMansion3_h)
+	db BANK(CeladonMansion4_h)
+	db BANK(CeladonMansion5_h)
+	db BANK(CeladonPokecenter_h)
+	db BANK(CeladonGym_h)
+	db BANK(CeladonGameCorner_h)
+	db BANK(CeladonMart5_h)
+	db BANK(CeladonPrizeRoom_h)
+	db BANK(CeladonDiner_h)
+	db BANK(CeladonHouse_h)
+	db BANK(CeladonHotel_h)
+	db BANK(LavenderPokecenter_h)
+	db BANK(PokemonTower1_h)
+	db BANK(PokemonTower2_h)
+	db BANK(PokemonTower3_h)
+	db BANK(PokemonTower4_h)
+	db BANK(PokemonTower5_h)
+	db BANK(PokemonTower6_h)
+	db BANK(PokemonTower7_h)
+	db BANK(LavenderHouse1_h)
+	db BANK(LavenderMart_h)
+	db BANK(LavenderHouse2_h)
+	db BANK(FuchsiaMart_h)
+	db BANK(FuchsiaHouse1_h)
+	db BANK(FuchsiaPokecenter_h)
+	db BANK(FuchsiaHouse2_h)
+	db BANK(SafariZoneEntrance_h)
+	db BANK(FuchsiaGym_h)
+	db BANK(FuchsiaMeetingRoom_h)
+	db BANK(SeafoamIslands2_h)
+	db BANK(SeafoamIslands3_h)
+	db BANK(SeafoamIslands4_h)
+	db BANK(SeafoamIslands5_h)
+	db BANK(VermilionHouse2_h)
+	db BANK(FuchsiaHouse3_h)
+	db BANK(Mansion1_h)
+	db BANK(CinnabarGym_h)
+	db BANK(Lab1_h)
+	db BANK(Lab2_h)
+	db BANK(Lab3_h)
+	db BANK(Lab4_h)
+	db BANK(CinnabarPokecenter_h)
+	db BANK(CinnabarMart_h)
+	db $1D
+	db BANK(IndigoPlateauLobby_h)
+	db BANK(CopycatsHouseF1_h)
+	db BANK(CopycatsHouseF2_h)
+	db BANK(FightingDojo_h)
+	db BANK(SaffronGym_h)
+	db BANK(SaffronHouse1_h)
+	db BANK(SaffronMart_h)
+	db BANK(SilphCo1_h)
+	db BANK(SaffronPokecenter_h)
+	db BANK(SaffronHouse2_h)
+	db BANK(Route15Gate_h)
+	db $12
+	db BANK(Route16GateMap_h)
+	db BANK(Route16GateUpstairs_h)
+	db BANK(Route16House_h)
+	db BANK(Route12House_h)
+	db BANK(Route18Gate_h)
+	db BANK(Route18GateHeader_h)
+	db BANK(SeafoamIslands1_h)
+	db BANK(Route22Gate_h)
+	db BANK(VictoryRoad2_h)
+	db BANK(Route12GateUpstairs_h)
+	db BANK(VermilionHouse3_h)
+	db BANK(DiglettsCave_h)
+	db BANK(VictoryRoad3_h)
+	db BANK(RocketHideout1_h)
+	db BANK(RocketHideout2_h)
+	db BANK(RocketHideout3_h)
+	db BANK(RocketHideout4_h)
+	db BANK(RocketHideoutElevator_h)
+	db $01
+	db $01
+	db $01
+	db BANK(SilphCo2_h)
+	db BANK(SilphCo3_h)
+	db BANK(SilphCo4_h)
+	db BANK(SilphCo5_h)
+	db BANK(SilphCo6_h)
+	db BANK(SilphCo7_h)
+	db BANK(SilphCo8_h)
+	db BANK(Mansion2_h)
+	db BANK(Mansion3_h)
+	db BANK(Mansion4_h)
+	db BANK(SafariZoneEast_h)
+	db BANK(SafariZoneNorth_h)
+	db BANK(SafariZoneWest_h)
+	db BANK(SafariZoneCenter_h)
+	db BANK(SafariZoneRestHouse1_h)
+	db BANK(SafariZoneSecretHouse_h)
+	db BANK(SafariZoneRestHouse2_h)
+	db BANK(SafariZoneRestHouse3_h)
+	db BANK(SafariZoneRestHouse4_h)
+	db BANK(UnknownDungeon2_h)
+	db BANK(UnknownDungeon3_h)
+	db BANK(UnknownDungeon1_h)
+	db BANK(NameRater_h)
+	db BANK(CeruleanHouse3_h)
+	db $01
+	db BANK(RockTunnel2_h)
+	db BANK(SilphCo9_h)
+	db BANK(SilphCo10_h)
+	db BANK(SilphCo11_h)
+	db BANK(SilphCoElevator_h)
+	db $11
+	db $11
+	db BANK(BattleCenterM_h)
+	db BANK(TradeCenterM_h)
+	db $11
+	db $11
+	db $11
+	db $11
+	db BANK(Lorelei_h)
+	db BANK(Bruno_h)
+	db BANK(Agatha_h)
+
+INCBIN "baserom.gbc",$C335,$C766-$C335
+	ld hl,TilesetsHeadPtr
+INCBIN "baserom.gbc",$C769,$C7BE-$C769
+
+TilesetsHeadPtr:
+	TSETHEAD Tset00_Block,Tset00_GFX,Tset00_Coll,$FF,$FF,$FF,$52,2
+	TSETHEAD Tset01_Block,Tset01_GFX,Tset01_Coll,$FF,$FF,$FF,$FF,0
+	TSETHEAD Tset02_Block,Tset02_GFX,Tset02_Coll,$18,$19,$1E,$FF,0
+	TSETHEAD Tset03_Block,Tset03_GFX,Tset03_Coll,$FF,$FF,$FF,$20,1
+	TSETHEAD Tset01_Block,Tset01_GFX,Tset01_Coll,$FF,$FF,$FF,$FF,0
+	TSETHEAD Tset05_Block,Tset05_GFX,Tset05_Coll,$3A,$FF,$FF,$FF,2
+	TSETHEAD Tset02_Block,Tset02_GFX,Tset02_Coll,$18,$19,$1E,$FF,0
+	TSETHEAD Tset05_Block,Tset05_GFX,Tset05_Coll,$3A,$FF,$FF,$FF,2
+	TSETHEAD Tset08_Block,Tset08_GFX,Tset08_Coll,$FF,$FF,$FF,$FF,0
+	TSETHEAD Tset09_Block,Tset09_GFX,Tset09_Coll,$17,$32,$FF,$FF,0
+	TSETHEAD Tset09_Block,Tset09_GFX,Tset09_Coll,$17,$32,$FF,$FF,0
+	TSETHEAD Tset0B_Block,Tset0B_GFX,Tset0B_Coll,$FF,$FF,$FF,$FF,0
+	TSETHEAD Tset09_Block,Tset09_GFX,Tset09_Coll,$17,$32,$FF,$FF,0
+	TSETHEAD Tset0D_Block,Tset0D_GFX,Tset0D_Coll,$FF,$FF,$FF,$FF,1
+	TSETHEAD Tset0E_Block,Tset0E_GFX,Tset0E_Coll,$FF,$FF,$FF,$FF,1
+	TSETHEAD Tset0F_Block,Tset0F_GFX,Tset0F_Coll,$12,$FF,$FF,$FF,0
+	TSETHEAD Tset10_Block,Tset10_GFX,Tset10_Coll,$FF,$FF,$FF,$FF,0
+	TSETHEAD Tset11_Block,Tset11_GFX,Tset11_Coll,$FF,$FF,$FF,$FF,1
+	TSETHEAD Tset12_Block,Tset12_GFX,Tset12_Coll,$15,$36,$FF,$FF,0
+	TSETHEAD Tset13_Block,Tset13_GFX,Tset13_Coll,$FF,$FF,$FF,$FF,0
+	TSETHEAD Tset14_Block,Tset14_GFX,Tset14_Coll,$FF,$FF,$FF,$FF,0
+	TSETHEAD Tset15_Block,Tset15_GFX,Tset15_Coll,$07,$17,$FF,$FF,0
+	TSETHEAD Tset16_Block,Tset16_GFX,Tset16_Coll,$12,$FF,$FF,$FF,1
+	TSETHEAD Tset17_Block,Tset17_GFX,Tset17_Coll,$FF,$FF,$FF,$45,1
+
+INCBIN "baserom.gbc",$C8DE,$C8F5-$C8DE
+
+; data for default hidden/shown
+; objects for each map ($00-$F8)
+
+; Table of 2-Byte pointers, one pointer per map,
+; goes up to Map_F7, ends with $FFFF.
+MapHSPointers: ; 48F5
+	dw MapHS00
+	dw MapHS01
+	dw MapHS02
+	dw MapHS03
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS0A
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS0D
+	dw MapHSXX
+	dw MapHS0F
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS14
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS17
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS1A
+	dw MapHS1B
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS21
+	dw MapHSXX
+	dw MapHS23
+	dw MapHS24
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS27
+	dw MapHS28
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS2D
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS33
+	dw MapHS34
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS3B
+	dw MapHSXX
+	dw MapHS3D
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS53
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS58
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS60
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS66
+	dw MapHS67
+	dw MapHS68
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS6C
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS78
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS84
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS87
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS8F
+	dw MapHS90
+	dw MapHS91
+	dw MapHS92
+	dw MapHS93
+	dw MapHS94
+	dw MapHS95
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS9B
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHS9F
+	dw MapHSA0
+	dw MapHSA1
+	dw MapHSA2
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSA5
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSB1
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSB5
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSC0
+	dw MapHSXX
+	dw MapHSC2
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSC6
+	dw MapHSC7
+	dw MapHSC8
+	dw MapHSC9
+	dw MapHSCA
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSCF
+	dw MapHSD0
+	dw MapHSD1
+	dw MapHSD2
+	dw MapHSD3
+	dw MapHSD4
+	dw MapHSD5
+	dw MapHSD6
+	dw MapHSD7
+	dw MapHSD8
+	dw MapHSD9
+	dw MapHSDA
+	dw MapHSDB
+	dw MapHSDC
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSE2
+	dw MapHSE3
+	dw MapHSE4
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSE9
+	dw MapHSEA
+	dw MapHSEB
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSF4
+	dw MapHSXX
+	dw MapHSXX
+	dw MapHSXX
+	dw $FFFF
+
+; Structure:
+; 3 bytes per object
+; [Map_ID][Object_ID][H/S]
+;
+; Program stops reading when either:
+; a) Map_ID = $FF
+; b) Map_ID ≠ currentMapID
+;
+; This Data is loaded into RAM at $D5CE-$D5F?.
+
+; These constants come from the bytes for Predef functions:
+Hide	equ $11
+Show	equ $15
+
+MapHSXX:
+	db $FF,$FF,$FF
+MapHS00:
+	db $00,$01,Hide
+MapHS01:
+	db $01,$05,Show
+	db $01,$07,Hide
+MapHS02:
+	db $02,$03,Show
+	db $02,$05,Show
+MapHS03:
+	db $03,$01,Hide
+	db $03,$02,Show
+	db $03,$06,Hide
+	db $03,$0A,Show
+	db $03,$0B,Show
+MapHS0A:
+	db $0A,$01,Show
+	db $0A,$02,Show
+	db $0A,$03,Show
+	db $0A,$04,Show
+	db $0A,$05,Show
+	db $0A,$06,Show
+	db $0A,$07,Show
+	db $0A,$08,Hide
+	db $0A,$09,Hide
+	db $0A,$0A,Hide
+	db $0A,$0B,Hide
+	db $0A,$0C,Hide
+	db $0A,$0D,Hide
+	db $0A,$0E,Show
+	db $0A,$0F,Hide
+MapHS0D:
+	db $0D,$01,Show
+	db $0D,$02,Show
+MapHS0F:
+	db $0F,$03,Show
+MapHS14:
+	db $14,$0A,Show
+MapHS17:
+	db $17,$01,Show
+	db $17,$09,Show
+	db $17,$0A,Show
+MapHS1A:
+	db $1A,$0B,Show
+MapHS1B:
+	db $1B,$07,Show
+MapHS21:
+	db $21,$01,Hide
+	db $21,$02,Hide
+MapHS23:
+	db $23,$01,Show
+	db $23,$08,Show
+MapHS24:
+	db $24,$0A,Show
+MapHS27:
+	db $27,$01,Show
+	db $27,$02,Hide
+	db $27,$03,Show
+MapHS28:
+	db $28,$01,Show
+	db $28,$02,Show
+	db $28,$03,Show
+	db $28,$04,Show
+	db $28,$05,Hide
+	db $28,$06,Show
+	db $28,$07,Show
+	db $28,$08,Hide
+MapHS2D:
+	db $2D,$01,Show
+	db $2D,$0B,Show
+MapHS34:
+	db $34,$05,Show
+MapHSE4:
+	db $E4,$01,Show
+	db $E4,$02,Show
+	db $E4,$03,Show
+MapHS8F:
+	db $8F,$01,Show
+MapHS90:
+	db $90,$04,Show
+MapHS91:
+	db $91,$04,Show
+	db $91,$05,Show
+	db $91,$06,Show
+MapHS92:
+	db $92,$06,Show
+MapHS93:
+	db $93,$04,Show
+	db $93,$05,Show
+MapHS94:
+	db $94,$01,Show
+	db $94,$02,Show
+	db $94,$03,Show
+	db $94,$04,Show
+MapHS95:
+	db $95,$05,Hide
+MapHS84:
+	db $84,$02,Show
+MapHS87:
+	db $87,$0B,Show
+MapHS9B:
+	db $9B,$02,Show
+MapHSA5:
+	db $A5,$02,Show
+	db $A5,$03,Show
+MapHSB1:
+	db $B1,$06,Show
+	db $B1,$07,Show
+MapHSB5:
+	db $B5,$01,Hide
+MapHS53:
+	db $53,$01,Show
+	db $53,$02,Show
+	db $53,$03,Show
+	db $53,$04,Show
+	db $53,$05,Show
+	db $53,$06,Show
+	db $53,$07,Show
+	db $53,$08,Show
+	db $53,$09,Show
+	db $53,$0A,Show
+	db $53,$0B,Show
+	db $53,$0C,Show
+	db $53,$0D,Show
+	db $53,$0E,Show
+MapHSC2:
+	db $C2,$06,Show
+	db $C2,$07,Show
+	db $C2,$08,Show
+	db $C2,$09,Show
+	db $C2,$0A,Show
+	db $C2,$0D,Show
+MapHS58:
+	db $58,$01,Show
+	db $58,$02,Hide
+	db $58,$03,Hide
+MapHS33:
+	db $33,$05,Show
+	db $33,$06,Show
+	db $33,$07,Show
+MapHS3B:
+	db $3B,$08,Show
+	db $3B,$09,Show
+	db $3B,$0A,Show
+	db $3B,$0B,Show
+	db $3B,$0C,Show
+	db $3B,$0D,Show
+MapHS3D:
+	db $3D,$06,Show
+	db $3D,$07,Show
+	db $3D,$08,Show
+	db $3D,$09,Show
+MapHS60:
+	db $60,$02,Hide
+MapHS66:
+	db $66,$0A,Show
+MapHS67:
+	db $67,$06,Show
+	db $67,$09,Show
+MapHS68:
+	db $68,$09,Show
+	db $68,$0A,Show
+	db $68,$0B,Show
+MapHSC6:
+	db $C6,$05,Show
+	db $C6,$06,Show
+	db $C6,$0A,Show
+MapHSC7:
+	db $C7,$06,Show
+	db $C7,$07,Show
+MapHSC8:
+	db $C8,$02,Show
+	db $C8,$03,Show
+	db $C8,$04,Show
+	db $C8,$05,Show
+MapHSC9:
+	db $C9,$03,Show
+	db $C9,$04,Show
+MapHSCA:
+	db $CA,$01,Show
+	db $CA,$05,Show
+	db $CA,$06,Show
+	db $CA,$07,Show
+	db $CA,$08,Hide
+	db $CA,$09,Hide
+MapHSCF:
+	db $CF,$01,Show
+	db $CF,$02,Show
+	db $CF,$03,Show
+	db $CF,$04,Show
+	db $CF,$05,Show
+MapHSD0:
+	db $D0,$02,Show
+	db $D0,$03,Show
+	db $D0,$04,Show
+MapHSD1:
+	db $D1,$02,Show
+	db $D1,$03,Show
+	db $D1,$04,Show
+	db $D1,$05,Show
+	db $D1,$06,Show
+	db $D1,$07,Show
+MapHSD2:
+	db $D2,$02,Show
+	db $D2,$03,Show
+	db $D2,$04,Show
+	db $D2,$05,Show
+	db $D2,$06,Show
+	db $D2,$07,Show
+	db $D2,$08,Show
+MapHSD3:
+	db $D3,$06,Show
+	db $D3,$07,Show
+	db $D3,$08,Show
+	db $D3,$09,Show
+	db $D3,$0A,Show
+MapHSD4:
+	db $D4,$05,Show
+	db $D4,$06,Show
+	db $D4,$07,Show
+	db $D4,$08,Show
+	db $D4,$09,Show
+	db $D4,$0A,Show
+	db $D4,$0B,Show
+	db $D4,$0C,Show
+MapHSD5:
+	db $D5,$02,Show
+	db $D5,$03,Show
+	db $D5,$04,Show
+MapHSE9:
+	db $E9,$02,Show
+	db $E9,$03,Show
+	db $E9,$04,Show
+MapHSEA:
+	db $EA,$01,Show
+	db $EA,$02,Show
+	db $EA,$03,Show
+	db $EA,$04,Show
+	db $EA,$05,Show
+	db $EA,$06,Show
+MapHSEB:
+	db $EB,$03,Show
+	db $EB,$04,Show
+	db $EB,$05,Show
+MapHSF4:
+	db $F4,$02,Show
+MapHSD6:
+	db $D6,$02,Show
+MapHSD7:
+	db $D7,$03,Show
+	db $D7,$04,Show
+MapHSD8:
+	db $D8,$03,Show
+	db $D8,$04,Show
+	db $D8,$05,Show
+	db $D8,$06,Show
+	db $D8,$08,Show
+MapHSD9:
+	db $D9,$01,Show
+	db $D9,$02,Show
+	db $D9,$03,Show
+	db $D9,$04,Show
+MapHSDA:
+	db $DA,$01,Show
+	db $DA,$02,Show
+MapHSDB:
+	db $DB,$01,Show
+	db $DB,$02,Show
+	db $DB,$03,Show
+	db $DB,$04,Show
+MapHSDC:
+	db $DC,$01,Show
+MapHSE2:
+	db $E2,$01,Show
+	db $E2,$02,Show
+	db $E2,$03,Show
+MapHSE3:
+	db $E3,$01,Show
+	db $E3,$02,Show
+	db $E3,$03,Show
+MapHS6C:
+	db $6C,$03,Show
+	db $6C,$04,Show
+MapHS78:
+	db $78,$02,Hide
+MapHSC0:
+	db $C0,$01,Show
+	db $C0,$02,Show
+MapHS9F:
+	db $9F,$01,Hide
+	db $9F,$02,Hide
+MapHSA0:
+	db $A0,$01,Hide
+	db $A0,$02,Hide
+MapHSA1:
+	db $A1,$02,Show
+	db $A1,$03,Show
+	db $A1,$05,Hide
+	db $A1,$06,Hide
+MapHSA2:
+	db $A2,$01,Hide
+	db $A2,$02,Hide
+	db $A2,$03,Show
+
+	db $FF
+
+INCBIN "baserom.gbc",$CD97,$CEB8-$CD97
+
+; wild pokemon data: from 4EB8 to 55C7
+
+LoadWildData: ; 4EB8
+	ld hl,WildDataPointers
+	ld a,[W_CURMAP]
+
+	; get wild data for current map
+	ld c,a
+	ld b,0
+	add hl,bc
+	add hl,bc
+	ld a,[hli]
+	ld h,[hl]
+	ld l,a       ; hl now points to wild data for current map
+	ld a,[hli]
+	ld [W_GRASSRATE],a
+	and a
+	jr z,.NoGrassData\@ ; if no grass data, skip to surfing data
+	push hl
+	ld de,W_GRASSMONS ; otherwise, load grass data
+	ld bc,$0014
+	call CopyData
+	pop hl
+	ld bc,$0014
+	add hl,bc
+.NoGrassData\@
+	ld a,[hli]
+	ld [W_WATERRATE],a
+	and a
+	ret z        ; if no water data, we're done
+	ld de,W_WATERMONS  ; otherwise, load surfing data
+	ld bc,$0014
+	jp CopyData
+
+WildDataPointers: ; 4EEB
+	dw NoMons      ; PALLET_TOWN
+	dw NoMons      ; VIRIDIAN_CITY
+	dw NoMons      ; PEWTER_CITY
+	dw NoMons      ; CERULEAN_CITY
+	dw NoMons      ; LAVENDER_TOWN
+	dw NoMons      ; VERMILION_CITY
+	dw NoMons      ; CELADON_CITY
+	dw NoMons      ; FUCHSIA_CITY
+	dw NoMons      ; CINNABAR_ISLAND
+	dw NoMons      ; INDIGO_PLATEAU
+	dw NoMons      ; SAFFRON_CITY
+	dw NoMons      ; unused
+	dw Route1Mons  ; ROUTE_1
+	dw Route2Mons  ; ROUTE_2
+	dw Route3Mons  ; ROUTE_3
+	dw Route4Mons  ; ROUTE_4
+	dw Route5Mons  ; ROUTE_5
+	dw Route6Mons  ; ROUTE_6
+	dw Route7Mons  ; ROUTE_7
+	dw Route8Mons  ; ROUTE_8
+	dw Route9Mons  ; ROUTE_9
+	dw Route10Mons ; ROUTE_10
+	dw Route11Mons ; ROUTE_11
+	dw Route12Mons ; ROUTE_12
+	dw Route13Mons ; ROUTE_13
+	dw Route14Mons ; ROUTE_14
+	dw Route15Mons ; ROUTE_15
+	dw Route16Mons ; ROUTE_16
+	dw Route17Mons ; ROUTE_17
+	dw Route18Mons ; ROUTE_18
+	dw WaterMons   ; ROUTE_19
+	dw WaterMons   ; ROUTE_20
+	dw Route21Mons ; ROUTE_21
+	dw Route22Mons ; ROUTE_22
+	dw Route23Mons ; ROUTE_23
+	dw Route24Mons ; ROUTE_24
+	dw Route25Mons ; ROUTE_25
+	dw NoMons      ; REDS_HOUSE_1F
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw ForestMons ; ViridianForest
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw MoonMons1
+	dw MoonMonsB1
+	dw MoonMonsB2
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw TunnelMonsB1
+	dw PowerPlantMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw PlateauMons1
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw TowerMons1
+	dw TowerMons2
+	dw TowerMons3
+	dw TowerMons4
+	dw TowerMons5
+	dw TowerMons6
+	dw TowerMons7
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw IslandMonsB1
+	dw IslandMonsB2
+	dw IslandMonsB3
+	dw IslandMonsB4
+	dw NoMons
+	dw NoMons
+	dw MansionMons1
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw IslandMons1
+	dw NoMons
+	dw PlateauMons2
+	dw NoMons
+	dw NoMons
+	dw CaveMons
+	dw PlateauMons3
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw MansionMons2
+	dw MansionMons3
+	dw MansionMonsB1
+	dw ZoneMons1
+	dw ZoneMons2
+	dw ZoneMons3
+	dw ZoneMonsCenter
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw DungeonMons2
+	dw DungeonMonsB1
+	dw DungeonMons1
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw TunnelMonsB2
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw NoMons
+	dw $FFFF
+
+; wild pokemon data is divided into two parts.
+; first part:  pokemon found in grass
+; second part: pokemon found while surfing
+; each part goes as follows:
+	; if first byte == 00, then
+		; no wild pokemon on this map
+	; if first byte != 00, then
+		; first byte is encounter rate
+		; followed by 20 bytes:
+		; level, species (ten times)
+
+IF _RED
+NoMons:
+	db $00
+
+	db $00
+
+Route1Mons:
+	db $19
+	db 3,PIDGEY
+	db 3,RATTATA
+	db 3,RATTATA
+	db 2,RATTATA
+	db 2,PIDGEY
+	db 3,PIDGEY
+	db 3,PIDGEY
+	db 4,RATTATA
+	db 4,PIDGEY
+	db 5,PIDGEY
+
+	db $00
+
+Route2Mons:
+	db $19
+	db 3,RATTATA
+	db 3,PIDGEY
+	db 4,PIDGEY
+	db 4,RATTATA
+	db 5,PIDGEY
+	db 3,WEEDLE
+	db 2,RATTATA
+	db 5,RATTATA
+	db 4,WEEDLE
+	db 5,WEEDLE
+
+	db $00
+
+Route22Mons:
+	db $19
+	db 3,RATTATA
+	db 3,NIDORAN_M
+	db 4,RATTATA
+	db 4,NIDORAN_M
+	db 2,RATTATA
+	db 2,NIDORAN_M
+	db 3,SPEAROW
+	db 5,SPEAROW
+	db 3,NIDORAN_F
+	db 4,NIDORAN_F
+
+	db $00
+
+ForestMons:
+	db $08
+	db 4,WEEDLE
+	db 5,KAKUNA
+	db 3,WEEDLE
+	db 5,WEEDLE
+	db 4,KAKUNA
+	db 6,KAKUNA
+	db 4,METAPOD
+	db 3,CATERPIE
+	db 3,PIKACHU
+	db 5,PIKACHU
+
+	db $00
+
+Route3Mons:
+	db $14
+	db 6,PIDGEY
+	db 5,SPEAROW
+	db 7,PIDGEY
+	db 6,SPEAROW
+	db 7,SPEAROW
+	db 8,PIDGEY
+	db 8,SPEAROW
+	db 3,JIGGLYPUFF
+	db 5,JIGGLYPUFF
+	db 7,JIGGLYPUFF
+
+	db $00
+
+MoonMons1:
+	db $0A
+	db 8,ZUBAT
+	db 7,ZUBAT
+	db 9,ZUBAT
+	db 8,GEODUDE
+	db 6,ZUBAT
+	db 10,ZUBAT
+	db 10,GEODUDE
+	db 8,PARAS
+	db 11,ZUBAT
+	db 8,CLEFAIRY
+
+	db $00
+
+MoonMonsB1:
+	db $0A
+	db 8,ZUBAT
+	db 7,ZUBAT
+	db 7,GEODUDE
+	db 8,GEODUDE
+	db 9,ZUBAT
+	db 10,PARAS
+	db 10,ZUBAT
+	db 11,ZUBAT
+	db 9,CLEFAIRY
+	db 9,GEODUDE
+
+	db $00
+
+MoonMonsB2:
+	db $0A
+	db 9,ZUBAT
+	db 9,GEODUDE
+	db 10,ZUBAT
+	db 10,GEODUDE
+	db 11,ZUBAT
+	db 10,PARAS
+	db 12,PARAS
+	db 10,CLEFAIRY
+	db 12,ZUBAT
+	db 12,CLEFAIRY
+
+	db $00
+
+Route4Mons:
+	db $14
+	db 10,RATTATA
+	db 10,SPEAROW
+	db 8,RATTATA
+	db 6,EKANS
+	db 8,SPEAROW
+	db 10,EKANS
+	db 12,RATTATA
+	db 12,SPEAROW
+	db 8,EKANS
+	db 12,EKANS
+
+	db $00
+
+Route24Mons:
+	db $19
+	db 7,WEEDLE
+	db 8,KAKUNA
+	db 12,PIDGEY
+	db 12,ODDISH
+	db 13,ODDISH
+	db 10,ABRA
+	db 14,ODDISH
+	db 13,PIDGEY
+	db 8,ABRA
+	db 12,ABRA
+
+	db $00
+
+Route25Mons:
+	db $0F
+	db 8,WEEDLE
+	db 9,KAKUNA
+	db 13,PIDGEY
+	db 12,ODDISH
+	db 13,ODDISH
+	db 12,ABRA
+	db 14,ODDISH
+	db 10,ABRA
+	db 7,METAPOD
+	db 8,CATERPIE
+
+	db $00
+
+Route9Mons:
+	db $0F
+	db 16,RATTATA
+	db 16,SPEAROW
+	db 14,RATTATA
+	db 11,EKANS
+	db 13,SPEAROW
+	db 15,EKANS
+	db 17,RATTATA
+	db 17,SPEAROW
+	db 13,EKANS
+	db 17,EKANS
+
+	db $00
+
+Route5Mons:
+	db $0F
+	db 13,ODDISH
+	db 13,PIDGEY
+	db 15,PIDGEY
+	db 10,MANKEY
+	db 12,MANKEY
+	db 15,ODDISH
+	db 16,ODDISH
+	db 16,PIDGEY
+	db 14,MANKEY
+	db 16,MANKEY
+
+	db $00
+
+Route6Mons:
+	db $0F
+	db 13,ODDISH
+	db 13,PIDGEY
+	db 15,PIDGEY
+	db 10,MANKEY
+	db 12,MANKEY
+	db 15,ODDISH
+	db 16,ODDISH
+	db 16,PIDGEY
+	db 14,MANKEY
+	db 16,MANKEY
+
+	db $00
+
+Route11Mons:
+	db $0F
+	db 14,EKANS
+	db 15,SPEAROW
+	db 12,EKANS
+	db 9,DROWZEE
+	db 13,SPEAROW
+	db 13,DROWZEE
+	db 15,EKANS
+	db 17,SPEAROW
+	db 11,DROWZEE
+	db 15,DROWZEE
+
+	db $00
+
+TunnelMonsB1:
+	db $0F
+	db 16,ZUBAT
+	db 17,ZUBAT
+	db 17,GEODUDE
+	db 15,MACHOP
+	db 16,GEODUDE
+	db 18,ZUBAT
+	db 15,ZUBAT
+	db 17,MACHOP
+	db 13,ONIX
+	db 15,ONIX
+
+	db $00
+
+TunnelMonsB2:
+	db $0F
+	db 16,ZUBAT
+	db 17,ZUBAT
+	db 17,GEODUDE
+	db 15,MACHOP
+	db 16,GEODUDE
+	db 18,ZUBAT
+	db 17,MACHOP
+	db 17,ONIX
+	db 13,ONIX
+	db 18,GEODUDE
+
+	db $00
+
+Route10Mons:
+	db $0F
+	db 16,VOLTORB
+	db 16,SPEAROW
+	db 14,VOLTORB
+	db 11,EKANS
+	db 13,SPEAROW
+	db 15,EKANS
+	db 17,VOLTORB
+	db 17,SPEAROW
+	db 13,EKANS
+	db 17,EKANS
+
+	db $00
+
+Route12Mons:
+	db $0F
+	db 24,ODDISH
+	db 25,PIDGEY
+	db 23,PIDGEY
+	db 24,VENONAT
+	db 22,ODDISH
+	db 26,VENONAT
+	db 26,ODDISH
+	db 27,PIDGEY
+	db 28,GLOOM
+	db 30,GLOOM
+
+	db $00
+
+Route8Mons:
+	db $0F
+	db 18,PIDGEY
+	db 18,MANKEY
+	db 17,EKANS
+	db 16,GROWLITHE
+	db 20,PIDGEY
+	db 20,MANKEY
+	db 19,EKANS
+	db 17,GROWLITHE
+	db 15,GROWLITHE
+	db 18,GROWLITHE
+
+	db $00
+
+Route7Mons:
+	db $0F
+	db 19,PIDGEY
+	db 19,ODDISH
+	db 17,MANKEY
+	db 22,ODDISH
+	db 22,PIDGEY
+	db 18,MANKEY
+	db 18,GROWLITHE
+	db 20,GROWLITHE
+	db 19,MANKEY
+	db 20,MANKEY
+
+	db $00
+
+TowerMons1:
+	db $00
+
+	db $00
+
+TowerMons2:
+	db $00
+
+	db $00
+
+TowerMons3:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 24,GASTLY
+	db 20,CUBONE
+	db 22,CUBONE
+	db 25,HAUNTER
+
+	db $00
+
+TowerMons4:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 25,HAUNTER
+	db 20,CUBONE
+	db 22,CUBONE
+	db 24,GASTLY
+
+	db $00
+
+TowerMons5:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 25,HAUNTER
+	db 20,CUBONE
+	db 22,CUBONE
+	db 24,GASTLY
+
+	db $00
+
+TowerMons6:
+	db $0F
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 20,GASTLY
+	db 19,GASTLY
+	db 26,HAUNTER
+	db 22,CUBONE
+	db 24,CUBONE
+	db 28,HAUNTER
+
+	db $00
+
+TowerMons7:
+	db $0F
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 20,GASTLY
+	db 28,HAUNTER
+	db 22,CUBONE
+	db 24,CUBONE
+	db 28,HAUNTER
+	db 30,HAUNTER
+
+	db $00
+
+Route13Mons:
+	db $14
+	db 24,ODDISH
+	db 25,PIDGEY
+	db 27,PIDGEY
+	db 24,VENONAT
+	db 22,ODDISH
+	db 26,VENONAT
+	db 26,ODDISH
+	db 25,DITTO
+	db 28,GLOOM
+	db 30,GLOOM
+
+	db $00
+
+Route14Mons:
+	db $0F
+	db 24,ODDISH
+	db 26,PIDGEY
+	db 23,DITTO
+	db 24,VENONAT
+	db 22,ODDISH
+	db 26,VENONAT
+	db 26,ODDISH
+	db 30,GLOOM
+	db 28,PIDGEOTTO
+	db 30,PIDGEOTTO
+
+	db $00
+
+Route15Mons:
+	db $0F
+	db 24,ODDISH
+	db 26,DITTO
+	db 23,PIDGEY
+	db 26,VENONAT
+	db 22,ODDISH
+	db 28,VENONAT
+	db 26,ODDISH
+	db 30,GLOOM
+	db 28,PIDGEOTTO
+	db 30,PIDGEOTTO
+
+	db $00
+
+Route16Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 18,RATTATA
+	db 20,DODUO
+	db 20,RATTATA
+	db 18,DODUO
+	db 22,DODUO
+	db 22,RATTATA
+	db 23,RATICATE
+	db 25,RATICATE
+
+	db $00
+
+Route17Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 25,RATICATE
+	db 24,DODUO
+	db 27,RATICATE
+	db 26,DODUO
+	db 28,DODUO
+	db 29,RATICATE
+	db 25,FEAROW
+	db 27,FEAROW
+
+	db $00
+
+Route18Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 25,RATICATE
+	db 24,DODUO
+	db 25,FEAROW
+	db 26,DODUO
+	db 28,DODUO
+	db 29,RATICATE
+	db 27,FEAROW
+	db 29,FEAROW
+
+	db $00
+
+ZoneMonsCenter:
+	db $1E
+	db 22,NIDORAN_M
+	db 25,RHYHORN
+	db 22,VENONAT
+	db 24,EXEGGCUTE
+	db 31,NIDORINO
+	db 25,EXEGGCUTE
+	db 31,NIDORINA
+	db 30,PARASECT
+	db 23,SCYTHER
+	db 23,CHANSEY
+
+	db $00
+
+ZoneMons1:
+	db $1E
+	db 24,NIDORAN_M
+	db 26,DODUO
+	db 22,PARAS
+	db 25,EXEGGCUTE
+	db 33,NIDORINO
+	db 23,EXEGGCUTE
+	db 24,NIDORAN_F
+	db 25,PARASECT
+	db 25,KANGASKHAN
+	db 28,SCYTHER
+
+	db $00
+
+ZoneMons2:
+	db $1E
+	db 22,NIDORAN_M
+	db 26,RHYHORN
+	db 23,PARAS
+	db 25,EXEGGCUTE
+	db 30,NIDORINO
+	db 27,EXEGGCUTE
+	db 30,NIDORINA
+	db 32,VENOMOTH
+	db 26,CHANSEY
+	db 28,TAUROS
+
+	db $00
+
+ZoneMons3:
+	db $1E
+	db 25,NIDORAN_M
+	db 26,DODUO
+	db 23,VENONAT
+	db 24,EXEGGCUTE
+	db 33,NIDORINO
+	db 26,EXEGGCUTE
+	db 25,NIDORAN_F
+	db 31,VENOMOTH
+	db 26,TAUROS
+	db 28,KANGASKHAN
+
+	db $00
+
+WaterMons:
+	db $00
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+IslandMons1:
+	db $0F
+	db 30,SEEL
+	db 30,SLOWPOKE
+	db 30,SHELLDER
+	db 30,HORSEA
+	db 28,HORSEA
+	db 21,ZUBAT
+	db 29,GOLBAT
+	db 28,PSYDUCK
+	db 28,SHELLDER
+	db 38,GOLDUCK
+
+	db $00
+
+IslandMonsB1:
+	db $0A
+	db 30,STARYU
+	db 30,HORSEA
+	db 32,SHELLDER
+	db 32,HORSEA
+	db 28,SLOWPOKE
+	db 30,SEEL
+	db 30,SLOWPOKE
+	db 28,SEEL
+	db 38,DEWGONG
+	db 37,SEADRA
+
+	db $00
+
+IslandMonsB2:
+	db $0A
+	db 30,SEEL
+	db 30,SLOWPOKE
+	db 32,SEEL
+	db 32,SLOWPOKE
+	db 28,HORSEA
+	db 30,STARYU
+	db 30,HORSEA
+	db 28,SHELLDER
+	db 30,GOLBAT
+	db 37,SLOWBRO
+
+	db $00
+
+IslandMonsB3:
+	db $0A
+	db 31,SLOWPOKE
+	db 31,SEEL
+	db 33,SLOWPOKE
+	db 33,SEEL
+	db 29,HORSEA
+	db 31,SHELLDER
+	db 31,HORSEA
+	db 29,SHELLDER
+	db 39,SEADRA
+	db 37,DEWGONG
+
+	db $00
+
+IslandMonsB4:
+	db $0A
+	db 31,HORSEA
+	db 31,SHELLDER
+	db 33,HORSEA
+	db 33,SHELLDER
+	db 29,SLOWPOKE
+	db 31,SEEL
+	db 31,SLOWPOKE
+	db 29,SEEL
+	db 39,SLOWBRO
+	db 32,GOLBAT
+
+	db $00
+
+MansionMons1:
+	db $0A
+	db 32,KOFFING
+	db 30,KOFFING
+	db 34,PONYTA
+	db 30,PONYTA
+	db 34,GROWLITHE
+	db 32,PONYTA
+	db 30,GRIMER
+	db 28,PONYTA
+	db 37,WEEZING
+	db 39,MUK
+
+	db $00
+
+MansionMons2:
+	db $0A
+	db 32,GROWLITHE
+	db 34,KOFFING
+	db 34,KOFFING
+	db 30,PONYTA
+	db 30,KOFFING
+	db 32,PONYTA
+	db 30,GRIMER
+	db 28,PONYTA
+	db 39,WEEZING
+	db 37,MUK
+
+	db $00
+
+MansionMons3:
+	db $0A
+	db 31,KOFFING
+	db 33,GROWLITHE
+	db 35,KOFFING
+	db 32,PONYTA
+	db 34,PONYTA
+	db 40,WEEZING
+	db 34,GRIMER
+	db 38,WEEZING
+	db 36,PONYTA
+	db 42,MUK
+
+	db $00
+
+MansionMonsB1:
+	db $0A
+	db 33,KOFFING
+	db 31,KOFFING
+	db 35,GROWLITHE
+	db 32,PONYTA
+	db 31,KOFFING
+	db 40,WEEZING
+	db 34,PONYTA
+	db 35,GRIMER
+	db 42,WEEZING
+	db 42,MUK
+
+	db $00
+
+Route21Mons:
+	db $19
+	db 21,RATTATA
+	db 23,PIDGEY
+	db 30,RATICATE
+	db 23,RATTATA
+	db 21,PIDGEY
+	db 30,PIDGEOTTO
+	db 32,PIDGEOTTO
+	db 28,TANGELA
+	db 30,TANGELA
+	db 32,TANGELA
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+DungeonMons1:
+	db $0A
+	db 46,GOLBAT
+	db 46,HYPNO
+	db 46,MAGNETON
+	db 49,DODRIO
+	db 49,VENOMOTH
+	db 52,ARBOK
+	db 49,KADABRA
+	db 52,PARASECT
+	db 53,RAICHU
+	db 53,DITTO
+
+	db $00
+
+DungeonMons2:
+	db $0F
+	db 51,DODRIO
+	db 51,VENOMOTH
+	db 51,KADABRA
+	db 52,RHYDON
+	db 52,MAROWAK
+	db 52,ELECTRODE
+	db 56,CHANSEY
+	db 54,WIGGLYTUFF
+	db 55,DITTO
+	db 60,DITTO
+
+	db $00
+
+DungeonMonsB1:
+	db $19
+	db 55,RHYDON
+	db 55,MAROWAK
+	db 55,ELECTRODE
+	db 64,CHANSEY
+	db 64,PARASECT
+	db 64,RAICHU
+	db 57,ARBOK
+	db 65,DITTO
+	db 63,DITTO
+	db 67,DITTO
+
+	db $00
+
+PowerPlantMons:
+	db $0A
+	db 21,VOLTORB
+	db 21,MAGNEMITE
+	db 20,PIKACHU
+	db 24,PIKACHU
+	db 23,MAGNEMITE
+	db 23,VOLTORB
+	db 32,MAGNETON
+	db 35,MAGNETON
+	db 33,ELECTABUZZ
+	db 36,ELECTABUZZ
+
+	db $00
+
+Route23Mons:
+	db $0A
+	db 26,EKANS
+	db 33,DITTO
+	db 26,SPEAROW
+	db 38,FEAROW
+	db 38,DITTO
+	db 38,FEAROW
+	db 41,ARBOK
+	db 43,DITTO
+	db 41,FEAROW
+	db 43,FEAROW
+
+	db $00
+
+PlateauMons2:
+	db $0A
+	db 22,MACHOP
+	db 24,GEODUDE
+	db 26,ZUBAT
+	db 36,ONIX
+	db 39,ONIX
+	db 42,ONIX
+	db 41,MACHOKE
+	db 40,GOLBAT
+	db 40,MAROWAK
+	db 43,GRAVELER
+
+	db $00
+
+PlateauMons3:
+	db $0F
+	db 24,MACHOP
+	db 26,GEODUDE
+	db 22,ZUBAT
+	db 42,ONIX
+	db 40,VENOMOTH
+	db 45,ONIX
+	db 43,GRAVELER
+	db 41,GOLBAT
+	db 42,MACHOKE
+	db 45,MACHOKE
+
+	db $00
+
+PlateauMons1:
+	db $0F
+	db 24,MACHOP
+	db 26,GEODUDE
+	db 22,ZUBAT
+	db 36,ONIX
+	db 39,ONIX
+	db 42,ONIX
+	db 41,GRAVELER
+	db 41,GOLBAT
+	db 42,MACHOKE
+	db 43,MAROWAK
+
+	db $00
+
+CaveMons:
+	db $14
+	db 18,DIGLETT
+	db 19,DIGLETT
+	db 17,DIGLETT
+	db 20,DIGLETT
+	db 16,DIGLETT
+	db 15,DIGLETT
+	db 21,DIGLETT
+	db 22,DIGLETT
+	db 29,DUGTRIO
+	db 31,DUGTRIO
+
+	db $00
+
+ENDC
+IF _GREEN || !_JAPAN && _BLUE
+NoMons:
+	db $00
+
+	db $00
+
+Route1Mons:
+	db $19
+	db 3,PIDGEY
+	db 3,RATTATA
+	db 3,RATTATA
+	db 2,RATTATA
+	db 2,PIDGEY
+	db 3,PIDGEY
+	db 3,PIDGEY
+	db 4,RATTATA
+	db 4,PIDGEY
+	db 5,PIDGEY
+
+	db $00
+
+Route2Mons:
+	db $19
+	db 3,RATTATA
+	db 3,PIDGEY
+	db 4,PIDGEY
+	db 4,RATTATA
+	db 5,PIDGEY
+	db 3,CATERPIE
+	db 2,RATTATA
+	db 5,RATTATA
+	db 4,CATERPIE
+	db 5,CATERPIE
+
+	db $00
+
+Route22Mons:
+	db $19
+	db 3,RATTATA
+	db 3,NIDORAN_F
+	db 4,RATTATA
+	db 4,NIDORAN_F
+	db 2,RATTATA
+	db 2,NIDORAN_F
+	db 3,SPEAROW
+	db 5,SPEAROW
+	db 3,NIDORAN_M
+	db 4,NIDORAN_M
+
+	db $00
+
+ForestMons:
+	db $08
+	db 4,CATERPIE
+	db 5,METAPOD
+	db 3,CATERPIE
+	db 5,CATERPIE
+	db 4,METAPOD
+	db 6,METAPOD
+	db 4,KAKUNA
+	db 3,WEEDLE
+	db 3,PIKACHU
+	db 5,PIKACHU
+
+	db $00
+
+Route3Mons:
+	db $14
+	db 6,PIDGEY
+	db 5,SPEAROW
+	db 7,PIDGEY
+	db 6,SPEAROW
+	db 7,SPEAROW
+	db 8,PIDGEY
+	db 8,SPEAROW
+	db 3,JIGGLYPUFF
+	db 5,JIGGLYPUFF
+	db 7,JIGGLYPUFF
+
+	db $00
+
+MoonMons1:
+	db $0A
+	db 8,ZUBAT
+	db 7,ZUBAT
+	db 9,ZUBAT
+	db 8,GEODUDE
+	db 6,ZUBAT
+	db 10,ZUBAT
+	db 10,GEODUDE
+	db 8,PARAS
+	db 11,ZUBAT
+	db 8,CLEFAIRY
+
+	db $00
+
+MoonMonsB1:
+	db $0A
+	db 8,ZUBAT
+	db 7,ZUBAT
+	db 7,GEODUDE
+	db 8,GEODUDE
+	db 9,ZUBAT
+	db 10,PARAS
+	db 10,ZUBAT
+	db 11,ZUBAT
+	db 9,CLEFAIRY
+	db 9,GEODUDE
+
+	db $00
+
+MoonMonsB2:
+	db $0A
+	db 9,ZUBAT
+	db 9,GEODUDE
+	db 10,ZUBAT
+	db 10,GEODUDE
+	db 11,ZUBAT
+	db 10,PARAS
+	db 12,PARAS
+	db 10,CLEFAIRY
+	db 12,ZUBAT
+	db 12,CLEFAIRY
+
+	db $00
+
+Route4Mons:
+	db $14
+	db 10,RATTATA
+	db 10,SPEAROW
+	db 8,RATTATA
+	db 6,SANDSHREW
+	db 8,SPEAROW
+	db 10,SANDSHREW
+	db 12,RATTATA
+	db 12,SPEAROW
+	db 8,SANDSHREW
+	db 12,SANDSHREW
+
+	db $00
+
+Route24Mons:
+	db $19
+	db 7,CATERPIE
+	db 8,METAPOD
+	db 12,PIDGEY
+	db 12,BELLSPROUT
+	db 13,BELLSPROUT
+	db 10,ABRA
+	db 14,BELLSPROUT
+	db 13,PIDGEY
+	db 8,ABRA
+	db 12,ABRA
+
+	db $00
+
+Route25Mons:
+	db $0F
+	db 8,CATERPIE
+	db 9,METAPOD
+	db 13,PIDGEY
+	db 12,BELLSPROUT
+	db 13,BELLSPROUT
+	db 12,ABRA
+	db 14,BELLSPROUT
+	db 10,ABRA
+	db 7,KAKUNA
+	db 8,WEEDLE
+
+	db $00
+
+Route9Mons:
+	db $0F
+	db 16,RATTATA
+	db 16,SPEAROW
+	db 14,RATTATA
+	db 11,SANDSHREW
+	db 13,SPEAROW
+	db 15,SANDSHREW
+	db 17,RATTATA
+	db 17,SPEAROW
+	db 13,SANDSHREW
+	db 17,SANDSHREW
+
+	db $00
+
+Route5Mons:
+	db $0F
+	db 13,BELLSPROUT
+	db 13,PIDGEY
+	db 15,PIDGEY
+	db 10,MEOWTH
+	db 12,MEOWTH
+	db 15,BELLSPROUT
+	db 16,BELLSPROUT
+	db 16,PIDGEY
+	db 14,MEOWTH
+	db 16,MEOWTH
+
+	db $00
+
+Route6Mons:
+	db $0F
+	db 13,BELLSPROUT
+	db 13,PIDGEY
+	db 15,PIDGEY
+	db 10,MEOWTH
+	db 12,MEOWTH
+	db 15,BELLSPROUT
+	db 16,BELLSPROUT
+	db 16,PIDGEY
+	db 14,MEOWTH
+	db 16,MEOWTH
+
+	db $00
+
+Route11Mons:
+	db $0F
+	db 14,SANDSHREW
+	db 15,SPEAROW
+	db 12,SANDSHREW
+	db 9,DROWZEE
+	db 13,SPEAROW
+	db 13,DROWZEE
+	db 15,SANDSHREW
+	db 17,SPEAROW
+	db 11,DROWZEE
+	db 15,DROWZEE
+
+	db $00
+
+TunnelMonsB1:
+	db $0F
+	db 16,ZUBAT
+	db 17,ZUBAT
+	db 17,GEODUDE
+	db 15,MACHOP
+	db 16,GEODUDE
+	db 18,ZUBAT
+	db 15,ZUBAT
+	db 17,MACHOP
+	db 13,ONIX
+	db 15,ONIX
+
+	db $00
+
+TunnelMonsB2:
+	db $0F
+	db 16,ZUBAT
+	db 17,ZUBAT
+	db 17,GEODUDE
+	db 15,MACHOP
+	db 16,GEODUDE
+	db 18,ZUBAT
+	db 17,MACHOP
+	db 17,ONIX
+	db 13,ONIX
+	db 18,GEODUDE
+
+	db $00
+
+Route10Mons:
+	db $0F
+	db 16,VOLTORB
+	db 16,SPEAROW
+	db 14,VOLTORB
+	db 11,SANDSHREW
+	db 13,SPEAROW
+	db 15,SANDSHREW
+	db 17,VOLTORB
+	db 17,SPEAROW
+	db 13,SANDSHREW
+	db 17,SANDSHREW
+
+	db $00
+
+Route12Mons:
+	db $0F
+	db 24,BELLSPROUT
+	db 25,PIDGEY
+	db 23,PIDGEY
+	db 24,VENONAT
+	db 22,BELLSPROUT
+	db 26,VENONAT
+	db 26,BELLSPROUT
+	db 27,PIDGEY
+	db 28,WEEPINBELL
+	db 30,WEEPINBELL
+
+	db $00
+
+Route8Mons:
+	db $0F
+	db 18,PIDGEY
+	db 18,MEOWTH
+	db 17,SANDSHREW
+	db 16,VULPIX
+	db 20,PIDGEY
+	db 20,MEOWTH
+	db 19,SANDSHREW
+	db 17,VULPIX
+	db 15,VULPIX
+	db 18,VULPIX
+
+	db $00
+
+Route7Mons:
+	db $0F
+	db 19,PIDGEY
+	db 19,BELLSPROUT
+	db 17,MEOWTH
+	db 22,BELLSPROUT
+	db 22,PIDGEY
+	db 18,MEOWTH
+	db 18,VULPIX
+	db 20,VULPIX
+	db 19,MEOWTH
+	db 20,MEOWTH
+
+	db $00
+
+TowerMons1:
+	db $00
+
+	db $00
+
+TowerMons2:
+	db $00
+
+	db $00
+
+TowerMons3:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 24,GASTLY
+	db 20,CUBONE
+	db 22,CUBONE
+	db 25,HAUNTER
+
+	db $00
+
+TowerMons4:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 25,HAUNTER
+	db 20,CUBONE
+	db 22,CUBONE
+	db 24,GASTLY
+
+	db $00
+
+TowerMons5:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 25,HAUNTER
+	db 20,CUBONE
+	db 22,CUBONE
+	db 24,GASTLY
+
+	db $00
+
+TowerMons6:
+	db $0F
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 20,GASTLY
+	db 19,GASTLY
+	db 26,HAUNTER
+	db 22,CUBONE
+	db 24,CUBONE
+	db 28,HAUNTER
+
+	db $00
+
+TowerMons7:
+	db $0F
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 20,GASTLY
+	db 28,HAUNTER
+	db 22,CUBONE
+	db 24,CUBONE
+	db 28,HAUNTER
+	db 30,HAUNTER
+
+	db $00
+
+Route13Mons:
+	db $14
+	db 24,BELLSPROUT
+	db 25,PIDGEY
+	db 27,PIDGEY
+	db 24,VENONAT
+	db 22,BELLSPROUT
+	db 26,VENONAT
+	db 26,BELLSPROUT
+	db 25,DITTO
+	db 28,WEEPINBELL
+	db 30,WEEPINBELL
+
+	db $00
+
+Route14Mons:
+	db $0F
+	db 24,BELLSPROUT
+	db 26,PIDGEY
+	db 23,DITTO
+	db 24,VENONAT
+	db 22,BELLSPROUT
+	db 26,VENONAT
+	db 26,BELLSPROUT
+	db 30,WEEPINBELL
+	db 28,PIDGEOTTO
+	db 30,PIDGEOTTO
+
+	db $00
+
+Route15Mons:
+	db $0F
+	db 24,BELLSPROUT
+	db 26,DITTO
+	db 23,PIDGEY
+	db 26,VENONAT
+	db 22,BELLSPROUT
+	db 28,VENONAT
+	db 26,BELLSPROUT
+	db 30,WEEPINBELL
+	db 28,PIDGEOTTO
+	db 30,PIDGEOTTO
+
+	db $00
+
+Route16Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 18,RATTATA
+	db 20,DODUO
+	db 20,RATTATA
+	db 18,DODUO
+	db 22,DODUO
+	db 22,RATTATA
+	db 23,RATICATE
+	db 25,RATICATE
+
+	db $00
+
+Route17Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 25,RATICATE
+	db 24,DODUO
+	db 27,RATICATE
+	db 26,DODUO
+	db 28,DODUO
+	db 29,RATICATE
+	db 25,FEAROW
+	db 27,FEAROW
+
+	db $00
+
+Route18Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 25,RATICATE
+	db 24,DODUO
+	db 25,FEAROW
+	db 26,DODUO
+	db 28,DODUO
+	db 29,RATICATE
+	db 27,FEAROW
+	db 29,FEAROW
+
+	db $00
+
+ZoneMonsCenter:
+	db $1E
+	db 22,NIDORAN_F
+	db 25,RHYHORN
+	db 22,VENONAT
+	db 24,EXEGGCUTE
+	db 31,NIDORINA
+	db 25,EXEGGCUTE
+	db 31,NIDORINO
+	db 30,PARASECT
+	db 23,PINSIR
+	db 23,CHANSEY
+
+	db $00
+
+ZoneMons1:
+	db $1E
+	db 24,NIDORAN_F
+	db 26,DODUO
+	db 22,PARAS
+	db 25,EXEGGCUTE
+	db 33,NIDORINA
+	db 23,EXEGGCUTE
+	db 24,NIDORAN_M
+	db 25,PARASECT
+	db 25,KANGASKHAN
+	db 28,PINSIR
+
+	db $00
+
+ZoneMons2:
+	db $1E
+	db 22,NIDORAN_F
+	db 26,RHYHORN
+	db 23,PARAS
+	db 25,EXEGGCUTE
+	db 30,NIDORINA
+	db 27,EXEGGCUTE
+	db 30,NIDORINO
+	db 32,VENOMOTH
+	db 26,CHANSEY
+	db 28,TAUROS
+
+	db $00
+
+ZoneMons3:
+	db $1E
+	db 25,NIDORAN_F
+	db 26,DODUO
+	db 23,VENONAT
+	db 24,EXEGGCUTE
+	db 33,NIDORINA
+	db 26,EXEGGCUTE
+	db 25,NIDORAN_M
+	db 31,VENOMOTH
+	db 26,TAUROS
+	db 28,KANGASKHAN
+
+	db $00
+
+WaterMons:
+	db $00
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+IslandMons1:
+	db $0F
+	db 30,SEEL
+	db 30,PSYDUCK
+	db 30,STARYU
+	db 30,KRABBY
+	db 28,KRABBY
+	db 21,ZUBAT
+	db 29,GOLBAT
+	db 28,SLOWPOKE
+	db 28,STARYU
+	db 38,SLOWBRO
+
+	db $00
+
+IslandMonsB1:
+	db $0A
+	db 30,SHELLDER
+	db 30,KRABBY
+	db 32,STARYU
+	db 32,KRABBY
+	db 28,PSYDUCK
+	db 30,SEEL
+	db 30,PSYDUCK
+	db 28,SEEL
+	db 38,DEWGONG
+	db 37,KINGLER
+
+	db $00
+
+IslandMonsB2:
+	db $0A
+	db 30,SEEL
+	db 30,PSYDUCK
+	db 32,SEEL
+	db 32,PSYDUCK
+	db 28,KRABBY
+	db 30,SHELLDER
+	db 30,KRABBY
+	db 28,STARYU
+	db 30,GOLBAT
+	db 37,GOLDUCK
+
+	db $00
+
+IslandMonsB3:
+	db $0A
+	db 31,PSYDUCK
+	db 31,SEEL
+	db 33,PSYDUCK
+	db 33,SEEL
+	db 29,KRABBY
+	db 31,STARYU
+	db 31,KRABBY
+	db 29,STARYU
+	db 39,KINGLER
+	db 37,DEWGONG
+
+	db $00
+
+IslandMonsB4:
+	db $0A
+	db 31,KRABBY
+	db 31,STARYU
+	db 33,KRABBY
+	db 33,STARYU
+	db 29,PSYDUCK
+	db 31,SEEL
+	db 31,PSYDUCK
+	db 29,SEEL
+	db 39,GOLDUCK
+	db 32,GOLBAT
+
+	db $00
+
+MansionMons1:
+	db $0A
+	db 32,GRIMER
+	db 30,GRIMER
+	db 34,PONYTA
+	db 30,PONYTA
+	db 34,VULPIX
+	db 32,PONYTA
+	db 30,KOFFING
+	db 28,PONYTA
+	db 37,MUK
+	db 39,WEEZING
+
+	db $00
+
+MansionMons2:
+	db $0A
+	db 32,VULPIX
+	db 34,GRIMER
+	db 34,GRIMER
+	db 30,PONYTA
+	db 30,GRIMER
+	db 32,PONYTA
+	db 30,KOFFING
+	db 28,PONYTA
+	db 39,MUK
+	db 37,WEEZING
+
+	db $00
+
+MansionMons3:
+	db $0A
+	db 31,GRIMER
+	db 33,VULPIX
+	db 35,GRIMER
+	db 32,PONYTA
+	db 34,MAGMAR
+	db 40,MUK
+	db 34,KOFFING
+	db 38,MUK
+	db 36,PONYTA
+	db 42,WEEZING
+
+	db $00
+
+MansionMonsB1:
+	db $0A
+	db 33,GRIMER
+	db 31,GRIMER
+	db 35,VULPIX
+	db 32,PONYTA
+	db 31,GRIMER
+	db 40,MUK
+	db 34,PONYTA
+	db 35,KOFFING
+	db 38,MAGMAR
+	db 42,WEEZING
+
+	db $00
+
+Route21Mons:
+	db $19
+	db 21,RATTATA
+	db 23,PIDGEY
+	db 30,RATICATE
+	db 23,RATTATA
+	db 21,PIDGEY
+	db 30,PIDGEOTTO
+	db 32,PIDGEOTTO
+	db 28,TANGELA
+	db 30,TANGELA
+	db 32,TANGELA
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+DungeonMons1:
+	db $0A
+	db 46,GOLBAT
+	db 46,HYPNO
+	db 46,MAGNETON
+	db 49,DODRIO
+	db 49,VENOMOTH
+	db 52,SANDSLASH
+	db 49,KADABRA
+	db 52,PARASECT
+	db 53,RAICHU
+	db 53,DITTO
+
+	db $00
+
+DungeonMons2:
+	db $0F
+	db 51,DODRIO
+	db 51,VENOMOTH
+	db 51,KADABRA
+	db 52,RHYDON
+	db 52,MAROWAK
+	db 52,ELECTRODE
+	db 56,CHANSEY
+	db 54,WIGGLYTUFF
+	db 55,DITTO
+	db 60,DITTO
+
+	db $00
+
+DungeonMonsB1:
+	db $19
+	db 55,RHYDON
+	db 55,MAROWAK
+	db 55,ELECTRODE
+	db 64,CHANSEY
+	db 64,PARASECT
+	db 64,RAICHU
+	db 57,SANDSLASH
+	db 65,DITTO
+	db 63,DITTO
+	db 67,DITTO
+
+	db $00
+
+PowerPlantMons:
+	db $0A
+	db 21,VOLTORB
+	db 21,MAGNEMITE
+	db 20,PIKACHU
+	db 24,PIKACHU
+	db 23,MAGNEMITE
+	db 23,VOLTORB
+	db 32,MAGNETON
+	db 35,MAGNETON
+	db 33,RAICHU
+	db 36,RAICHU
+
+	db $00
+
+Route23Mons:
+	db $0A
+	db 26,SANDSHREW
+	db 33,DITTO
+	db 26,SPEAROW
+	db 38,FEAROW
+	db 38,DITTO
+	db 38,FEAROW
+	db 41,SANDSLASH
+	db 43,DITTO
+	db 41,FEAROW
+	db 43,FEAROW
+
+	db $00
+
+PlateauMons2:
+	db $0A
+	db 22,MACHOP
+	db 24,GEODUDE
+	db 26,ZUBAT
+	db 36,ONIX
+	db 39,ONIX
+	db 42,ONIX
+	db 41,MACHOKE
+	db 40,GOLBAT
+	db 40,MAROWAK
+	db 43,GRAVELER
+
+	db $00
+
+PlateauMons3:
+	db $0F
+	db 24,MACHOP
+	db 26,GEODUDE
+	db 22,ZUBAT
+	db 42,ONIX
+	db 40,VENOMOTH
+	db 45,ONIX
+	db 43,GRAVELER
+	db 41,GOLBAT
+	db 42,MACHOKE
+	db 45,MACHOKE
+
+	db $00
+
+PlateauMons1:
+	db $0F
+	db 24,MACHOP
+	db 26,GEODUDE
+	db 22,ZUBAT
+	db 36,ONIX
+	db 39,ONIX
+	db 42,ONIX
+	db 41,GRAVELER
+	db 41,GOLBAT
+	db 42,MACHOKE
+	db 43,MAROWAK
+
+	db $00
+
+CaveMons:
+	db $14
+	db 18,DIGLETT
+	db 19,DIGLETT
+	db 17,DIGLETT
+	db 20,DIGLETT
+	db 16,DIGLETT
+	db 15,DIGLETT
+	db 21,DIGLETT
+	db 22,DIGLETT
+	db 29,DUGTRIO
+	db 31,DUGTRIO
+
+	db $00
+
+ENDC
+IF _JAPAN && _BLUE
+NoMons:
+	db $00
+
+	db $00
+
+Route1Mons:
+	db $19
+	db 3,PIDGEY
+	db 3,RATTATA
+	db 3,RATTATA
+	db 2,RATTATA
+	db 2,PIDGEY
+	db 3,PIDGEY
+	db 3,PIDGEY
+	db 4,RATTATA
+	db 4,PIDGEY
+	db 5,PIDGEY
+
+	db $00
+
+Route2Mons:
+	db $19
+	db 3,RATTATA
+	db 3,PIDGEY
+	db 4,PIDGEY
+	db 4,RATTATA
+	db 5,PIDGEY
+	db 3,CATERPIE
+	db 2,RATTATA
+	db 5,RATTATA
+	db 4,CATERPIE
+	db 5,CATERPIE
+
+	db $00
+
+Route22Mons:
+	db $19
+	db 3,RATTATA
+	db 3,NIDORAN_M
+	db 4,RATTATA
+	db 4,NIDORAN_M
+	db 2,RATTATA
+	db 2,NIDORAN_M
+	db 3,SPEAROW
+	db 5,SPEAROW
+	db 3,NIDORAN_F
+	db 4,NIDORAN_F
+
+	db $00
+
+ForestMons:
+	db $08
+	db 4,CATERPIE
+	db 5,METAPOD
+	db 3,CATERPIE
+	db 5,CATERPIE
+	db 4,METAPOD
+	db 6,METAPOD
+	db 4,KAKUNA
+	db 3,WEEDLE
+	db 3,PIKACHU
+	db 5,PIKACHU
+
+	db $00
+
+Route3Mons:
+	db $14
+	db 6,PIDGEY
+	db 5,SPEAROW
+	db 7,PIDGEY
+	db 6,SPEAROW
+	db 7,SPEAROW
+	db 8,PIDGEY
+	db 8,SPEAROW
+	db 3,JIGGLYPUFF
+	db 5,JIGGLYPUFF
+	db 7,JIGGLYPUFF
+
+	db $00
+
+MoonMons1:
+	db $0A
+	db 8,ZUBAT
+	db 7,ZUBAT
+	db 9,ZUBAT
+	db 8,GEODUDE
+	db 6,ZUBAT
+	db 10,ZUBAT
+	db 10,GEODUDE
+	db 8,PARAS
+	db 11,ZUBAT
+	db 8,CLEFAIRY
+
+	db $00
+
+MoonMonsB1:
+	db $0A
+	db 8,ZUBAT
+	db 7,ZUBAT
+	db 7,GEODUDE
+	db 8,GEODUDE
+	db 9,ZUBAT
+	db 10,PARAS
+	db 10,ZUBAT
+	db 11,ZUBAT
+	db 9,CLEFAIRY
+	db 9,GEODUDE
+
+	db $00
+
+MoonMonsB2:
+	db $0A
+	db 9,ZUBAT
+	db 9,GEODUDE
+	db 10,ZUBAT
+	db 10,GEODUDE
+	db 11,ZUBAT
+	db 10,PARAS
+	db 12,PARAS
+	db 10,CLEFAIRY
+	db 12,ZUBAT
+	db 12,CLEFAIRY
+
+	db $00
+
+Route4Mons:
+	db $14
+	db 10,RATTATA
+	db 10,SPEAROW
+	db 8,RATTATA
+	db 6,SANDSHREW
+	db 8,SPEAROW
+	db 10,SANDSHREW
+	db 12,RATTATA
+	db 12,SPEAROW
+	db 8,SANDSHREW
+	db 12,SANDSHREW
+
+	db $00
+
+Route24Mons:
+	db $19
+	db 7,CATERPIE
+	db 8,METAPOD
+	db 12,PIDGEY
+	db 12,ODDISH
+	db 13,ODDISH
+	db 10,ABRA
+	db 14,ODDISH
+	db 13,PIDGEY
+	db 8,ABRA
+	db 12,ABRA
+
+	db $00
+
+Route25Mons:
+	db $0F
+	db 8,CATERPIE
+	db 9,METAPOD
+	db 13,PIDGEY
+	db 12,ODDISH
+	db 13,ODDISH
+	db 12,ABRA
+	db 14,ODDISH
+	db 10,ABRA
+	db 7,KAKUNA
+	db 8,WEEDLE
+
+	db $00
+
+Route9Mons:
+	db $0F
+	db 16,RATTATA
+	db 16,SPEAROW
+	db 14,RATTATA
+	db 11,SANDSHREW
+	db 13,SPEAROW
+	db 15,SANDSHREW
+	db 17,RATTATA
+	db 17,SPEAROW
+	db 13,SANDSHREW
+	db 17,SANDSHREW
+
+	db $00
+
+Route5Mons:
+	db $0F
+	db 13,ODDISH
+	db 13,PIDGEY
+	db 15,PIDGEY
+	db 10,MEOWTH
+	db 12,MEOWTH
+	db 15,ODDISH
+	db 16,ODDISH
+	db 16,PIDGEY
+	db 14,MEOWTH
+	db 16,MEOWTH
+
+	db $00
+
+Route6Mons:
+	db $0F
+	db 13,ODDISH
+	db 13,PIDGEY
+	db 15,PIDGEY
+	db 10,MEOWTH
+	db 12,MEOWTH
+	db 15,ODDISH
+	db 16,ODDISH
+	db 16,PIDGEY
+	db 14,MEOWTH
+	db 16,MEOWTH
+
+	db $00
+
+Route11Mons:
+	db $0F
+	db 14,SANDSHREW
+	db 15,SPEAROW
+	db 12,SANDSHREW
+	db 9,DROWZEE
+	db 13,SPEAROW
+	db 13,DROWZEE
+	db 15,SANDSHREW
+	db 17,SPEAROW
+	db 11,DROWZEE
+	db 15,DROWZEE
+
+	db $00
+
+TunnelMonsB1:
+	db $0F
+	db 16,ZUBAT
+	db 17,ZUBAT
+	db 17,GEODUDE
+	db 15,MACHOP
+	db 16,GEODUDE
+	db 18,DITTO
+	db 15,ZUBAT
+	db 17,MACHOP
+	db 13,ONIX
+	db 15,ONIX
+
+	db $00
+
+TunnelMonsB2:
+	db $0F
+	db 16,ZUBAT
+	db 17,ZUBAT
+	db 17,GEODUDE
+	db 15,MACHOP
+	db 16,GEODUDE
+	db 18,DITTO
+	db 17,MACHOP
+	db 17,ONIX
+	db 13,ONIX
+	db 18,GEODUDE
+
+	db $00
+
+Route10Mons:
+	db $0F
+	db 16,VOLTORB
+	db 16,SPEAROW
+	db 14,VOLTORB
+	db 11,SANDSHREW
+	db 13,SPEAROW
+	db 15,SANDSHREW
+	db 17,VOLTORB
+	db 17,SPEAROW
+	db 13,SANDSHREW
+	db 17,SANDSHREW
+
+	db $00
+
+Route12Mons:
+	db $0F
+	db 24,ODDISH
+	db 25,PIDGEY
+	db 23,PIDGEY
+	db 24,VENONAT
+	db 22,ODDISH
+	db 26,VENONAT
+	db 26,ODDISH
+	db 27,PIDGEY
+	db 28,GLOOM
+	db 30,GLOOM
+
+	db $00
+
+Route8Mons:
+	db $0F
+	db 18,PIDGEY
+	db 18,MEOWTH
+	db 17,SANDSHREW
+	db 16,GROWLITHE
+	db 20,PIDGEY
+	db 20,MEOWTH
+	db 19,SANDSHREW
+	db 17,GROWLITHE
+	db 15,GROWLITHE
+	db 18,GROWLITHE
+
+	db $00
+
+Route7Mons:
+	db $0F
+	db 19,PIDGEY
+	db 19,ODDISH
+	db 17,MEOWTH
+	db 22,ODDISH
+	db 22,PIDGEY
+	db 18,MEOWTH
+	db 18,GROWLITHE
+	db 20,GROWLITHE
+	db 19,MEOWTH
+	db 20,MEOWTH
+
+	db $00
+
+TowerMons1:
+	db $00
+
+	db $00
+
+TowerMons2:
+	db $00
+
+	db $00
+
+TowerMons3:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 24,GASTLY
+	db 20,CUBONE
+	db 22,CUBONE
+	db 25,HAUNTER
+
+	db $00
+
+TowerMons4:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 25,HAUNTER
+	db 20,CUBONE
+	db 22,CUBONE
+	db 24,GASTLY
+
+	db $00
+
+TowerMons5:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 25,HAUNTER
+	db 20,CUBONE
+	db 22,CUBONE
+	db 24,GASTLY
+
+	db $00
+
+TowerMons6:
+	db $0F
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 20,GASTLY
+	db 19,GASTLY
+	db 26,HAUNTER
+	db 22,CUBONE
+	db 24,CUBONE
+	db 28,HAUNTER
+
+	db $00
+
+TowerMons7:
+	db $0F
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 20,GASTLY
+	db 28,HAUNTER
+	db 22,CUBONE
+	db 24,CUBONE
+	db 28,HAUNTER
+	db 30,HAUNTER
+
+	db $00
+
+Route13Mons:
+	db $14
+	db 24,ODDISH
+	db 25,PIDGEY
+	db 27,PIDGEY
+	db 24,VENONAT
+	db 22,ODDISH
+	db 26,VENONAT
+	db 26,ODDISH
+	db 25,DITTO
+	db 28,GLOOM
+	db 30,GLOOM
+
+	db $00
+
+Route14Mons:
+	db $0F
+	db 24,ODDISH
+	db 26,PIDGEY
+	db 23,DITTO
+	db 24,VENONAT
+	db 22,ODDISH
+	db 26,VENONAT
+	db 26,ODDISH
+	db 30,GLOOM
+	db 28,PIDGEOTTO
+	db 30,PIDGEOTTO
+
+	db $00
+
+Route15Mons:
+	db $0F
+	db 24,ODDISH
+	db 26,DITTO
+	db 23,PIDGEY
+	db 26,VENONAT
+	db 22,ODDISH
+	db 28,VENONAT
+	db 26,ODDISH
+	db 30,GLOOM
+	db 28,PIDGEOTTO
+	db 30,PIDGEOTTO
+
+	db $00
+
+Route16Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 18,RATTATA
+	db 20,DODUO
+	db 20,RATTATA
+	db 18,DODUO
+	db 22,DODUO
+	db 22,RATTATA
+	db 23,RATICATE
+	db 25,RATICATE
+
+	db $00
+
+Route17Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 25,RATICATE
+	db 24,DODUO
+	db 27,RATICATE
+	db 26,DODUO
+	db 28,DODUO
+	db 29,RATICATE
+	db 25,FEAROW
+	db 27,FEAROW
+
+	db $00
+
+Route18Mons:
+	db $19
+	db 20,SPEAROW
+	db 22,SPEAROW
+	db 25,RATICATE
+	db 24,DODUO
+	db 25,FEAROW
+	db 26,DODUO
+	db 28,DODUO
+	db 29,RATICATE
+	db 27,FEAROW
+	db 29,FEAROW
+
+	db $00
+
+ZoneMonsCenter:
+	db $1E
+	db 22,NIDORAN_M
+	db 25,RHYHORN
+	db 22,VENONAT
+	db 24,EXEGGCUTE
+	db 31,NIDORINO
+	db 25,EXEGGCUTE
+	db 31,NIDORINA
+	db 30,PARASECT
+	db 23,SCYTHER
+	db 23,CHANSEY
+
+	db $00
+
+ZoneMons1:
+	db $1E
+	db 24,NIDORAN_M
+	db 26,DODUO
+	db 22,PARAS
+	db 25,EXEGGCUTE
+	db 33,NIDORINO
+	db 23,EXEGGCUTE
+	db 24,NIDORAN_F
+	db 25,PARASECT
+	db 25,LICKITUNG
+	db 28,SCYTHER
+
+	db $00
+
+ZoneMons2:
+	db $1E
+	db 22,NIDORAN_M
+	db 26,RHYHORN
+	db 23,PARAS
+	db 25,EXEGGCUTE
+	db 30,NIDORINO
+	db 27,EXEGGCUTE
+	db 30,NIDORINA
+	db 32,VENOMOTH
+	db 26,CHANSEY
+	db 28,PINSIR
+
+	db $00
+
+ZoneMons3:
+	db $1E
+	db 25,NIDORAN_M
+	db 26,DODUO
+	db 23,VENONAT
+	db 24,EXEGGCUTE
+	db 33,NIDORINO
+	db 26,EXEGGCUTE
+	db 25,NIDORAN_F
+	db 31,VENOMOTH
+	db 26,PINSIR
+	db 28,LICKITUNG
+
+	db $00
+
+WaterMons:
+	db $00
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+WaterMons:
+	db $00
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+IslandMons1:
+	db $0F
+	db 30,SEEL
+	db 30,HORSEA
+	db 30,STARYU
+	db 30,KRABBY
+	db 28,KRABBY
+	db 21,ZUBAT
+	db 29,GOLBAT
+	db 28,SLOWPOKE
+	db 28,STARYU
+	db 38,SLOWBRO
+
+	db $00
+
+IslandMonsB1:
+	db $0A
+	db 30,SHELLDER
+	db 30,KRABBY
+	db 32,STARYU
+	db 32,KRABBY
+	db 28,HORSEA
+	db 30,SEEL
+	db 30,HORSEA
+	db 28,SEEL
+	db 38,DEWGONG
+	db 37,KINGLER
+
+	db $00
+
+IslandMonsB2:
+	db $0A
+	db 30,SEEL
+	db 30,HORSEA
+	db 32,SEEL
+	db 32,HORSEA
+	db 28,KRABBY
+	db 30,SHELLDER
+	db 30,KRABBY
+	db 28,STARYU
+	db 30,GOLBAT
+	db 37,JYNX
+
+	db $00
+
+IslandMonsB3:
+	db $0A
+	db 31,HORSEA
+	db 31,SEEL
+	db 33,HORSEA
+	db 33,SEEL
+	db 29,KRABBY
+	db 31,STARYU
+	db 31,KRABBY
+	db 29,STARYU
+	db 39,KINGLER
+	db 37,DEWGONG
+
+	db $00
+
+IslandMonsB4:
+	db $0A
+	db 31,KRABBY
+	db 31,STARYU
+	db 33,KRABBY
+	db 33,STARYU
+	db 29,HORSEA
+	db 31,SEEL
+	db 31,HORSEA
+	db 29,SEEL
+	db 39,JYNX
+	db 32,GOLBAT
+
+	db $00
+
+MansionMons1:
+	db $0A
+	db 32,GRIMER
+	db 30,GRIMER
+	db 34,PONYTA
+	db 30,PONYTA
+	db 34,GROWLITHE
+	db 32,PONYTA
+	db 30,KOFFING
+	db 28,PONYTA
+	db 37,MUK
+	db 39,WEEZING
+
+	db $00
+
+MansionMons2:
+	db $0A
+	db 32,GROWLITHE
+	db 34,GRIMER
+	db 34,GRIMER
+	db 30,PONYTA
+	db 30,GRIMER
+	db 32,PONYTA
+	db 30,KOFFING
+	db 28,PONYTA
+	db 39,MUK
+	db 37,WEEZING
+
+	db $00
+
+MansionMons3:
+	db $0A
+	db 31,GRIMER
+	db 33,GROWLITHE
+	db 35,GRIMER
+	db 32,PONYTA
+	db 34,PONYTA
+	db 40,MUK
+	db 34,KOFFING
+	db 38,MUK
+	db 36,PONYTA
+	db 42,WEEZING
+
+	db $00
+
+MansionMonsB1:
+	db $0A
+	db 33,GRIMER
+	db 31,GRIMER
+	db 35,GROWLITHE
+	db 32,PONYTA
+	db 31,GRIMER
+	db 40,MUK
+	db 34,PONYTA
+	db 35,KOFFING
+	db 38,MUK
+	db 42,WEEZING
+
+	db $00
+
+Route21Mons:
+	db $19
+	db 21,RATTATA
+	db 23,PIDGEY
+	db 30,RATICATE
+	db 23,RATTATA
+	db 21,PIDGEY
+	db 30,PIDGEOTTO
+	db 32,PIDGEOTTO
+	db 28,TANGELA
+	db 30,TANGELA
+	db 32,TANGELA
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+DungeonMons1:
+	db $0A
+	db 46,GOLBAT
+	db 46,HYPNO
+	db 46,MAGNETON
+	db 49,RAPIDASH
+	db 49,VENOMOTH
+	db 52,SANDSLASH
+	db 49,KADABRA
+	db 52,PARASECT
+	db 53,RAICHU
+	db 53,DITTO
+
+	db $00
+
+DungeonMons2:
+	db $0F
+	db 51,DODRIO
+	db 51,VENOMOTH
+	db 51,KADABRA
+	db 52,RHYDON
+	db 52,RATICATE
+	db 52,ELECTRODE
+	db 56,CHANSEY
+	db 54,WIGGLYTUFF
+	db 55,DITTO
+	db 60,DITTO
+
+	db $00
+
+DungeonMonsB1:
+	db $19
+	db 55,RHYDON
+	db 55,MAROWAK
+	db 55,ELECTRODE
+	db 64,CLEFAIRY
+	db 64,PARASECT
+	db 64,RAICHU
+	db 57,SANDSLASH
+	db 65,DITTO
+	db 63,DITTO
+	db 67,DITTO
+
+	db $00
+
+PowerPlantMons:
+	db $0A
+	db 21,VOLTORB
+	db 21,MAGNEMITE
+	db 20,PIKACHU
+	db 24,PIKACHU
+	db 23,MAGNEMITE
+	db 23,VOLTORB
+	db 32,MAGNETON
+	db 35,MAGNETON
+	db 33,RAICHU
+	db 36,RAICHU
+
+	db $00
+
+Route23Mons:
+	db $0A
+	db 26,SANDSHREW
+	db 33,DITTO
+	db 26,SPEAROW
+	db 38,FEAROW
+	db 38,DITTO
+	db 38,FEAROW
+	db 41,SANDSLASH
+	db 43,DITTO
+	db 41,FEAROW
+	db 43,FEAROW
+
+	db $00
+
+PlateauMons2:
+	db $0A
+	db 22,MACHOP
+	db 24,GEODUDE
+	db 26,ZUBAT
+	db 36,ONIX
+	db 39,ONIX
+	db 42,ONIX
+	db 41,MACHOKE
+	db 40,GOLBAT
+	db 40,MAROWAK
+	db 43,GRAVELER
+
+	db $00
+
+PlateauMons3:
+	db $0F
+	db 24,MACHOP
+	db 26,GEODUDE
+	db 22,ZUBAT
+	db 42,ONIX
+	db 40,VENOMOTH
+	db 45,ONIX
+	db 43,GRAVELER
+	db 41,GOLBAT
+	db 42,MACHOKE
+	db 45,MACHOKE
+
+	db $00
+
+PlateauMons1:
+	db $0F
+	db 24,MACHOP
+	db 26,GEODUDE
+	db 22,ZUBAT
+	db 36,ONIX
+	db 39,ONIX
+	db 42,ONIX
+	db 41,GRAVELER
+	db 41,GOLBAT
+	db 42,MACHOKE
+	db 43,MAROWAK
+
+	db $00
+
+CaveMons:
+	db $14
+	db 18,DIGLETT
+	db 19,DIGLETT
+	db 17,DIGLETT
+	db 20,DIGLETT
+	db 16,DIGLETT
+	db 15,DIGLETT
+	db 21,DIGLETT
+	db 22,DIGLETT
+	db 29,DUGTRIO
+	db 31,DUGTRIO
+
+	db $00
+
+ENDC
+IF _YELLOW
+NoMons:
+	db $00
+
+	db $00
+
+Route1Mons:
+	db $19
+	db 3,PIDGEY
+	db 4,PIDGEY
+	db 2,RATTATA
+	db 3,RATTATA
+	db 2,PIDGEY
+	db 3,PIDGEY
+	db 5,PIDGEY
+	db 4,RATTATA
+	db 6,PIDGEY
+	db 7,PIDGEY
+
+	db $00
+
+Route2Mons:
+	db $19
+	db 3,RATTATA
+	db 3,PIDGEY
+	db 4,RATTATA
+	db 4,NIDORAN_M
+	db 4,NIDORAN_F
+	db 5,PIDGEY
+	db 6,NIDORAN_M
+	db 6,NIDORAN_F
+	db 7,PIDGEY
+	db 7,PIDGEY
+
+	db $00
+
+Route22Mons:
+	db $19
+	db 2,NIDORAN_M
+	db 2,NIDORAN_F
+	db 3,MANKEY
+	db 3,RATTATA
+	db 4,NIDORAN_M
+	db 4,NIDORAN_F
+	db 5,MANKEY
+	db 2,SPEAROW
+	db 4,SPEAROW
+	db 6,SPEAROW
+
+	db $00
+
+ForestMons:
+	db $19
+	db 3,CATERPIE
+	db 4,METAPOD
+	db 4,CATERPIE
+	db 5,CATERPIE
+	db 4,PIDGEY
+	db 6,PIDGEY
+	db 6,CATERPIE
+	db 6,METAPOD
+	db 8,PIDGEY
+	db 9,PIDGEOTTO
+
+	db $00
+
+Route3Mons:
+	db $14
+	db 8,SPEAROW
+	db 9,SPEAROW
+	db 9,MANKEY
+	db 10,SPEAROW
+	db 8,SANDSHREW
+	db 10,RATTATA
+	db 10,SANDSHREW
+	db 12,RATTATA
+	db 11,SPEAROW
+	db 12,SPEAROW
+
+	db $00
+
+MoonMons1:
+	db $0A
+	db 8,ZUBAT
+	db 9,ZUBAT
+	db 10,GEODUDE
+	db 6,ZUBAT
+	db 7,ZUBAT
+	db 10,ZUBAT
+	db 10,GEODUDE
+	db 11,ZUBAT
+	db 12,SANDSHREW
+	db 11,CLEFAIRY
+
+	db $00
+
+MoonMonsB1:
+	db $0A
+	db 8,ZUBAT
+	db 9,ZUBAT
+	db 10,ZUBAT
+	db 10,GEODUDE
+	db 11,GEODUDE
+	db 11,ZUBAT
+	db 9,PARAS
+	db 11,PARAS
+	db 10,CLEFAIRY
+	db 12,CLEFAIRY
+
+	db $00
+
+MoonMonsB2:
+	db $0A
+	db 10,ZUBAT
+	db 11,GEODUDE
+	db 13,PARAS
+	db 11,ZUBAT
+	db 11,ZUBAT
+	db 12,ZUBAT
+	db 13,ZUBAT
+	db 9,CLEFAIRY
+	db 11,CLEFAIRY
+	db 13,CLEFAIRY
+
+	db $00
+
+Route4Mons:
+	db $14
+	db 8,SPEAROW
+	db 9,SPEAROW
+	db 9,MANKEY
+	db 10,SPEAROW
+	db 8,SANDSHREW
+	db 10,RATTATA
+	db 10,SANDSHREW
+	db 12,RATTATA
+	db 11,SPEAROW
+	db 12,SPEAROW
+
+	db $00
+
+Route24Mons:
+	db $19
+	db 12,ODDISH
+	db 12,BELLSPROUT
+	db 13,PIDGEY
+	db 14,ODDISH
+	db 14,BELLSPROUT
+	db 15,PIDGEY
+	db 13,VENONAT
+	db 16,VENONAT
+	db 17,PIDGEY
+	db 17,PIDGEOTTO
+
+	db $00
+
+Route25Mons:
+	db $0F
+	db 12,ODDISH
+	db 12,BELLSPROUT
+	db 13,PIDGEY
+	db 14,ODDISH
+	db 14,BELLSPROUT
+	db 15,PIDGEY
+	db 13,VENONAT
+	db 16,VENONAT
+	db 17,PIDGEY
+	db 17,PIDGEOTTO
+
+	db $00
+
+Route9Mons:
+	db $0F
+	db 16,NIDORAN_M
+	db 16,NIDORAN_F
+	db 18,RATTATA
+	db 18,NIDORAN_M
+	db 18,NIDORAN_F
+	db 17,SPEAROW
+	db 18,NIDORINO
+	db 18,NIDORINA
+	db 20,RATICATE
+	db 19,FEAROW
+
+	db $00
+
+Route5Mons:
+	db $0F
+	db 15,PIDGEY
+	db 14,RATTATA
+	db 7,ABRA
+	db 16,PIDGEY
+	db 16,RATTATA
+	db 17,PIDGEY
+	db 17,PIDGEOTTO
+	db 3,JIGGLYPUFF
+	db 5,JIGGLYPUFF
+	db 7,JIGGLYPUFF
+
+	db $00
+
+Route6Mons:
+	db $0F
+	db 15,PIDGEY
+	db 14,RATTATA
+	db 7,ABRA
+	db 16,PIDGEY
+	db 16,RATTATA
+	db 17,PIDGEY
+	db 17,PIDGEOTTO
+	db 3,JIGGLYPUFF
+	db 5,JIGGLYPUFF
+	db 7,JIGGLYPUFF
+
+	db $03
+	db 15,PSYDUCK
+	db 15,PSYDUCK
+	db 15,PSYDUCK
+	db 15,PSYDUCK
+	db 15,PSYDUCK
+	db 15,PSYDUCK
+	db 15,PSYDUCK
+	db 15,PSYDUCK
+	db 15,GOLDUCK
+	db 20,GOLDUCK
+
+Route11Mons:
+	db $0F
+	db 16,PIDGEY
+	db 15,RATTATA
+	db 18,PIDGEY
+	db 15,DROWZEE
+	db 17,RATTATA
+	db 17,DROWZEE
+	db 18,PIDGEOTTO
+	db 20,PIDGEOTTO
+	db 19,DROWZEE
+	db 17,RATICATE
+
+	db $00
+
+TunnelMonsB1:
+	db $0F
+	db 15,ZUBAT
+	db 16,GEODUDE
+	db 17,ZUBAT
+	db 19,ZUBAT
+	db 18,GEODUDE
+	db 20,GEODUDE
+	db 21,ZUBAT
+	db 17,MACHOP
+	db 19,MACHOP
+	db 21,MACHOP
+
+	db $00
+
+TunnelMonsB2:
+	db $0F
+	db 20,ZUBAT
+	db 17,GEODUDE
+	db 18,MACHOP
+	db 21,ZUBAT
+	db 22,ZUBAT
+	db 21,GEODUDE
+	db 20,MACHOP
+	db 14,ONIX
+	db 18,ONIX
+	db 22,ONIX
+
+	db $00
+
+Route10Mons:
+	db $0F
+	db 16,MAGNEMITE
+	db 18,RATTATA
+	db 18,MAGNEMITE
+	db 20,MAGNEMITE
+	db 17,NIDORAN_M
+	db 17,NIDORAN_F
+	db 22,MAGNEMITE
+	db 20,RATICATE
+	db 16,MACHOP
+	db 18,MACHOP
+
+	db $00
+
+Route12Mons:
+	db $0F
+	db 25,ODDISH
+	db 25,BELLSPROUT
+	db 28,PIDGEY
+	db 28,PIDGEOTTO
+	db 27,ODDISH
+	db 27,BELLSPROUT
+	db 29,GLOOM
+	db 29,WEEPINBELL
+	db 26,FARFETCH_D
+	db 31,FARFETCH_D
+
+	db $03
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWBRO
+	db 20,SLOWBRO
+
+Route8Mons:
+	db $0F
+	db 20,PIDGEY
+	db 22,PIDGEY
+	db 20,RATTATA
+	db 15,ABRA
+	db 19,ABRA
+	db 24,PIDGEOTTO
+	db 19,JIGGLYPUFF
+	db 24,JIGGLYPUFF
+	db 20,KADABRA
+	db 27,KADABRA
+
+	db $00
+
+Route7Mons:
+	db $0F
+	db 20,PIDGEY
+	db 22,PIDGEY
+	db 20,RATTATA
+	db 15,ABRA
+	db 19,ABRA
+	db 24,PIDGEOTTO
+	db 26,ABRA
+	db 19,JIGGLYPUFF
+	db 24,JIGGLYPUFF
+	db 24,JIGGLYPUFF
+
+	db $00
+
+TowerMons1:
+	db $00
+
+	db $00
+
+TowerMons2:
+	db $00
+
+	db $00
+
+TowerMons3:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 25,GASTLY
+	db 20,HAUNTER
+	db 25,HAUNTER
+
+	db $00
+
+TowerMons4:
+	db $0A
+	db 20,GASTLY
+	db 21,GASTLY
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 19,GASTLY
+	db 18,GASTLY
+	db 25,GASTLY
+	db 20,HAUNTER
+	db 25,HAUNTER
+
+	db $00
+
+TowerMons5:
+	db $0F
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 25,GASTLY
+	db 26,GASTLY
+	db 21,GASTLY
+	db 20,CUBONE
+	db 27,GASTLY
+	db 22,HAUNTER
+	db 27,HAUNTER
+
+	db $00
+
+TowerMons6:
+	db $0F
+	db 22,GASTLY
+	db 23,GASTLY
+	db 24,GASTLY
+	db 25,GASTLY
+	db 26,GASTLY
+	db 21,GASTLY
+	db 22,CUBONE
+	db 27,GASTLY
+	db 22,HAUNTER
+	db 27,HAUNTER
+
+	db $00
+
+TowerMons7:
+	db $14
+	db 24,GASTLY
+	db 25,GASTLY
+	db 26,GASTLY
+	db 27,GASTLY
+	db 28,GASTLY
+	db 23,GASTLY
+	db 24,CUBONE
+	db 29,GASTLY
+	db 24,HAUNTER
+	db 29,HAUNTER
+
+	db $00
+
+Route13Mons:
+	db $0F
+	db 25,ODDISH
+	db 25,BELLSPROUT
+	db 28,PIDGEOTTO
+	db 28,PIDGEY
+	db 27,ODDISH
+	db 27,BELLSPROUT
+	db 29,GLOOM
+	db 29,WEEPINBELL
+	db 26,FARFETCH_D
+	db 31,FARFETCH_D
+
+	db $03
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWPOKE
+	db 15,SLOWBRO
+	db 20,SLOWBRO
+
+Route14Mons:
+	db $0F
+	db 26,ODDISH
+	db 26,BELLSPROUT
+	db 24,VENONAT
+	db 30,PIDGEOTTO
+	db 28,ODDISH
+	db 28,BELLSPROUT
+	db 30,GLOOM
+	db 30,WEEPINBELL
+	db 27,VENONAT
+	db 30,VENOMOTH
+
+	db $00
+
+Route15Mons:
+	db $0F
+	db 26,ODDISH
+	db 26,BELLSPROUT
+	db 24,VENONAT
+	db 32,PIDGEOTTO
+	db 28,ODDISH
+	db 28,BELLSPROUT
+	db 30,GLOOM
+	db 30,WEEPINBELL
+	db 27,VENONAT
+	db 30,VENOMOTH
+
+	db $00
+
+Route16Mons:
+	db $19
+	db 22,SPEAROW
+	db 22,DODUO
+	db 23,RATTATA
+	db 24,DODUO
+	db 24,RATTATA
+	db 26,DODUO
+	db 23,SPEAROW
+	db 24,FEAROW
+	db 25,RATICATE
+	db 26,RATICATE
+
+	db $00
+
+Route17Mons:
+	db $19
+	db 26,DODUO
+	db 27,FEAROW
+	db 27,DODUO
+	db 28,DODUO
+	db 28,PONYTA
+	db 30,PONYTA
+	db 29,FEAROW
+	db 28,DODUO
+	db 32,PONYTA
+	db 29,DODRIO
+
+	db $00
+
+Route18Mons:
+	db $19
+	db 22,SPEAROW
+	db 22,DODUO
+	db 23,RATTATA
+	db 24,DODUO
+	db 24,RATTATA
+	db 26,DODUO
+	db 23,SPEAROW
+	db 24,FEAROW
+	db 25,RATICATE
+	db 26,RATICATE
+
+	db $00
+
+ZoneMonsCenter:
+	db $1E
+	db 14,NIDORAN_M
+	db 36,NIDORAN_F
+	db 24,EXEGGCUTE
+	db 20,RHYHORN
+	db 23,NIDORINO
+	db 27,PARASECT
+	db 27,PARAS
+	db 32,PARASECT
+	db 22,TANGELA
+	db 7,CHANSEY
+
+	db $00
+
+ZoneMons1:
+	db $1E
+	db 21,NIDORAN_M
+	db 29,NIDORAN_F
+	db 22,EXEGGCUTE
+	db 21,TAUROS
+	db 32,NIDORINA
+	db 19,CUBONE
+	db 26,EXEGGCUTE
+	db 24,MAROWAK
+	db 21,CHANSEY
+	db 15,SCYTHER
+
+	db $00
+
+ZoneMons2:
+	db $1E
+	db 36,NIDORAN_M
+	db 14,NIDORAN_F
+	db 20,EXEGGCUTE
+	db 25,RHYHORN
+	db 23,NIDORINA
+	db 28,KANGASKHAN
+	db 16,CUBONE
+	db 33,KANGASKHAN
+	db 25,SCYTHER
+	db 15,PINSIR
+
+	db $00
+
+ZoneMons3:
+	db $1E
+	db 29,NIDORAN_M
+	db 21,NIDORAN_F
+	db 22,EXEGGCUTE
+	db 21,TAUROS
+	db 32,NIDORINO
+	db 19,CUBONE
+	db 26,EXEGGCUTE
+	db 24,MAROWAK
+	db 25,PINSIR
+	db 27,TANGELA
+
+	db $00
+
+WaterMons:
+	db $00
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+WaterMons:
+	db $00
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+IslandMons1:
+	db $0F
+	db 18,ZUBAT
+	db 25,KRABBY
+	db 27,KRABBY
+	db 27,ZUBAT
+	db 36,ZUBAT
+	db 28,SLOWPOKE
+	db 30,SLOWPOKE
+	db 9,ZUBAT
+	db 27,GOLBAT
+	db 36,GOLBAT
+
+	db $00
+
+IslandMonsB1:
+	db $0A
+	db 27,ZUBAT
+	db 26,KRABBY
+	db 36,ZUBAT
+	db 28,KRABBY
+	db 27,GOLBAT
+	db 29,SLOWPOKE
+	db 18,ZUBAT
+	db 28,KINGLER
+	db 22,SEEL
+	db 26,SEEL
+
+	db $00
+
+IslandMonsB2:
+	db $0A
+	db 27,ZUBAT
+	db 27,KRABBY
+	db 36,ZUBAT
+	db 27,GOLBAT
+	db 28,KINGLER
+	db 24,SEEL
+	db 29,KRABBY
+	db 36,GOLBAT
+	db 31,SLOWPOKE
+	db 31,SLOWBRO
+
+	db $00
+
+IslandMonsB3:
+	db $0A
+	db 27,GOLBAT
+	db 36,ZUBAT
+	db 29,KRABBY
+	db 27,ZUBAT
+	db 30,KINGLER
+	db 26,SEEL
+	db 31,KRABBY
+	db 30,SEEL
+	db 28,DEWGONG
+	db 32,DEWGONG
+
+	db $05
+	db 25,TENTACOOL
+	db 30,TENTACOOL
+	db 20,TENTACOOL
+	db 30,STARYU
+	db 35,TENTACOOL
+	db 30,STARYU
+	db 40,TENTACOOL
+	db 30,STARYU
+	db 30,STARYU
+	db 30,STARYU
+
+IslandMonsB4:
+	db $0A
+	db 36,GOLBAT
+	db 36,ZUBAT
+	db 30,KRABBY
+	db 32,KINGLER
+	db 28,SEEL
+	db 32,SEEL
+	db 27,GOLBAT
+	db 45,ZUBAT
+	db 30,DEWGONG
+	db 34,DEWGONG
+
+	db $05
+	db 25,TENTACOOL
+	db 30,TENTACOOL
+	db 20,TENTACOOL
+	db 30,STARYU
+	db 35,TENTACOOL
+	db 30,STARYU
+	db 40,TENTACOOL
+	db 30,STARYU
+	db 30,STARYU
+	db 30,STARYU
+
+MansionMons1:
+	db $0A
+	db 34,RATTATA
+	db 34,RATICATE
+	db 23,GRIMER
+	db 26,GROWLITHE
+	db 37,RATTATA
+	db 37,RATICATE
+	db 30,GROWLITHE
+	db 26,GRIMER
+	db 34,GROWLITHE
+	db 38,GROWLITHE
+
+	db $00
+
+MansionMons2:
+	db $0A
+	db 37,RATTATA
+	db 37,RATICATE
+	db 26,GRIMER
+	db 29,GRIMER
+	db 40,RATTATA
+	db 40,RATICATE
+	db 32,GRIMER
+	db 35,GRIMER
+	db 35,MUK
+	db 38,MUK
+
+	db $00
+
+MansionMons3:
+	db $0A
+	db 40,RATTATA
+	db 40,RATICATE
+	db 32,GRIMER
+	db 35,GRIMER
+	db 43,RATTATA
+	db 43,RATICATE
+	db 38,GRIMER
+	db 38,GRIMER
+	db 38,MUK
+	db 41,MUK
+
+	db $00
+
+MansionMonsB1:
+	db $0A
+	db 35,GRIMER
+	db 38,GRIMER
+	db 37,RATICATE
+	db 40,RATICATE
+	db 41,MUK
+	db 43,RATICATE
+	db 24,DITTO
+	db 46,RATICATE
+	db 18,DITTO
+	db 12,DITTO
+
+	db $00
+
+Route21Mons:
+	db $19
+	db 15,PIDGEY
+	db 13,RATTATA
+	db 13,PIDGEY
+	db 11,PIDGEY
+	db 17,PIDGEY
+	db 15,RATTATA
+	db 15,RATICATE
+	db 17,PIDGEOTTO
+	db 19,PIDGEOTTO
+	db 15,PIDGEOTTO
+
+	db $05
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 5,TENTACOOL
+	db 10,TENTACOOL
+	db 15,TENTACOOL
+	db 20,TENTACOOL
+	db 30,TENTACOOL
+	db 35,TENTACOOL
+	db 40,TENTACOOL
+
+DungeonMons1:
+	db $0A
+	db 50,GOLBAT
+	db 55,GOLBAT
+	db 45,GRAVELER
+	db 55,GLOOM
+	db 55,WEEPINBELL
+	db 52,SANDSLASH
+	db 54,VENOMOTH
+	db 54,PARASECT
+	db 55,DITTO
+	db 60,DITTO
+
+	db $00
+
+DungeonMons2:
+	db $0F
+	db 52,GOLBAT
+	db 57,GOLBAT
+	db 50,GRAVELER
+	db 56,SANDSLASH
+	db 50,RHYHORN
+	db 60,DITTO
+	db 58,GLOOM
+	db 58,WEEPINBELL
+	db 60,RHYDON
+	db 58,RHYDON
+
+	db $00
+
+DungeonMonsB1:
+	db $19
+	db 54,GOLBAT
+	db 59,GOLBAT
+	db 55,GRAVELER
+	db 52,RHYHORN
+	db 62,RHYDON
+	db 60,DITTO
+	db 56,CHANSEY
+	db 65,DITTO
+	db 55,LICKITUNG
+	db 50,LICKITUNG
+
+	db $00
+
+PowerPlantMons:
+	db $0A
+	db 30,MAGNEMITE
+	db 35,MAGNEMITE
+	db 33,MAGNETON
+	db 33,VOLTORB
+	db 37,VOLTORB
+	db 33,GRIMER
+	db 37,GRIMER
+	db 38,MAGNETON
+	db 33,MUK
+	db 37,MUK
+
+	db $00
+
+Route23Mons:
+	db $0A
+	db 41,NIDORINO
+	db 41,NIDORINA
+	db 36,MANKEY
+	db 44,NIDORINO
+	db 44,NIDORINA
+	db 40,FEAROW
+	db 41,MANKEY
+	db 45,FEAROW
+	db 41,PRIMEAPE
+	db 46,PRIMEAPE
+
+	db $00
+
+PlateauMons2:
+	db $0A
+	db 31,GEODUDE
+	db 36,GEODUDE
+	db 41,GEODUDE
+	db 44,ZUBAT
+	db 39,GOLBAT
+	db 44,GRAVELER
+	db 45,ONIX
+	db 47,ONIX
+	db 39,MACHOKE
+	db 42,MACHOKE
+
+	db $00
+
+PlateauMons3:
+	db $0F
+	db 36,GEODUDE
+	db 44,GOLBAT
+	db 41,GEODUDE
+	db 49,ONIX
+	db 46,GEODUDE
+	db 41,GRAVELER
+	db 42,MACHOKE
+	db 45,MACHOKE
+	db 47,GRAVELER
+	db 47,GRAVELER
+
+	db $00
+
+PlateauMons1:
+	db $0F
+	db 26,GEODUDE
+	db 31,GEODUDE
+	db 36,GEODUDE
+	db 39,ZUBAT
+	db 44,ZUBAT
+	db 41,GEODUDE
+	db 43,ONIX
+	db 45,ONIX
+	db 41,GRAVELER
+	db 47,GRAVELER
+
+	db $00
+
+CaveMons:
+	db $14
+	db 18,DIGLETT
+	db 19,DIGLETT
+	db 17,DIGLETT
+	db 20,DIGLETT
+	db 16,DIGLETT
+	db 15,DIGLETT
+	db 21,DIGLETT
+	db 22,DIGLETT
+	db 29,DUGTRIO
+	db 31,DUGTRIO
+
+	db $00
+
+ENDC
+
+GetItemUse:		;$D5C7
+	ld a,1
+	ld [$cd6a],a
+	ld a,[$cf91]	;contains item_ID
+	cp a,HM_01
+	jp nc,ItemUseTMHM
+	ld hl,ItemUsePtrTable
+	dec a
+	add a
+	ld c,a
+	ld b,0
+	add hl,bc
+	ld a,[hli]
+	ld h,[hl]
+	ld l,a
+	jp [hl]
+
+ItemUsePtrTable:	;$D5E1
+	dw ItemUseBall		;$5687 masterball
+	dw ItemUseBall		;$5687 ultraball
+	dw ItemUseBall		;$5687 greatball
+	dw ItemUseBall		;$5687 pokeball
+	dw ItemUseTownMap	;$5968 TownMap
+	dw $5977                ;ItemUseBicycle
+	dw $59B4                ;ItemUseSurfBoard (UNUSED, glitchy!)
+	dw ItemUseBall		;$5687 Safariball
+	dw $5A56
+	dw $5A5B
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $5F52
+	dw $5F67
+	dw $6476
+	dw $6476
+	dw $6476
+	dw $6476
+	dw $6476
+	dw $6476
+	dw $5FAF
+	dw $6003
+	dw $6476
+	dw $5A5B
+	dw $5A5B
+	dw $5A5B
+	dw $5AB4
+	dw $5AB4
+	dw $5AB4
+	dw $5AB4
+	dw $5AB4
+	dw $5AB4
+	dw $6476
+	dw $6476
+	dw $6476
+	dw $6476
+	dw $6476
+	dw $6013
+	dw $5A5B
+	dw $6022
+	dw $6476
+	dw $6476
+	dw $60CD
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $60DC
+	dw $60EB
+	dw $60F0
+	dw $60F5
+	dw $6476
+	dw $5ABB
+	dw $5ABB
+	dw $5ABB
+	dw $6476
+	dw $6476
+	dw $6104
+	dw $6104
+	dw $6104
+	dw $6104
+	dw $623A
+	dw $62DE
+	dw $62E1
+	dw $6476
+	dw $6140
+	dw $6476
+	dw $6476
+	dw $624C
+	dw GoodRodCode ;$6259
+	dw $6283
+	dw $6317
+	dw $631E
+	dw $631E
+	dw $631E
+	dw $631E
+
+ItemUseBall:	;03:5687
+	ld a,[W_ISINBATTLE]
+	and a
+	jp z,ItemUseNotTime ; not in battle
+	dec a
+	jp nz,$658b ; in trainer battle
+	ld a,[W_BATTLETYPE]
+	dec a
+	jr z,.UseBall\@
+	ld a,[W_NUMINPARTY]	;is Party full?
+	cp a,6
+	jr nz,.UseBall\@
+	ld a,[W_NUMINBOX]	;is Box full?
+	cp a,20
+	jp z,$65b1
+.UseBall\@	;$56a7
+;ok, you can use a ball
+	xor a
+	ld [$d11c],a
+	ld a,[W_BATTLETYPE]
+	cp a,2		;SafariBattle
+	jr nz,.next2\@
+	; remove a Safari Ball from inventory
+	ld hl,W_NUMSAFARIBALLS
+	dec [hl]
+.next2\@	;$56b6
+	call GoPAL_SET_CF1C
+	ld a,$43
+	ld [$d11e],a
+	call $3725	;restore screenBuffer from Backup
+	ld hl,ItemUseText00
+	call PrintText
+	ld hl,$583a
+	ld b,$0f
+	call Bankswitch
+	ld b,$10
+	jp z,$5801
+	ld a,[W_BATTLETYPE]
+	dec a
+	jr nz,.next3\@
+	ld hl,W_GRASSRATE	;backups wildMon data
+	ld de,W_PLAYERNAME
+	ld bc,11
+	call CopyData
+	jp .BallSuccess\@	;$578b
+.next3\@	;$56e9
+	ld a,[W_CURMAP]
+	cp a,$93	;MonTower 6F
+	jr nz,.next4\@
+	ld a,[$cfd8]
+	cp a,MAROWAK
+	ld b,$10
+	jp z,$5801
+.next4\@	;$56fa
+	call $3e5c	;GetRandom
+	ld b,a
+	ld hl,$cf91
+	ld a,[hl]
+	cp a,MASTER_BALL;1
+	jp z,.BallSuccess\@	;$578b
+	cp a,POKE_BALL	;4
+	jr z,.next5\@
+	ld a,200
+        cp b
+	jr c,.next4\@	;get only numbers < 200
+	ld a,[hl]
+	cp a,GREAT_BALL	;3
+	jr z,.next5\@
+	ld a,150	;get only numbers < 150
+	cp b
+	jr c,.next4\@
+.next5\@	;$571a
+	ld a,[$cfe9]	;status ailments
+	and a
+	jr z,.next6\@
+	and a,(FRZ + SLP)	;is frozen and/or asleep?
+	ld c,12
+	jr z,.noAilments\@
+	ld c,25
+.noAilments\@	;$5728
+	ld a,b
+	sub c
+	jp c,.BallSuccess\@	;$578b
+	ld b,a
+.next6\@	;$572e
+	push bc		;save RANDOM number
+	xor a
+	ld [$ff96],a
+	ld hl,$cff4	;enemy: Max HP
+	ld a,[hli]
+	ld [$ff97],a
+	ld a,[hl]
+	ld [$ff98],a
+	ld a,255
+	ld [$ff99],a
+	call $38ac	;Multiply: MaxHP * 255
+	ld a,[$cf91]
+	cp a,GREAT_BALL
+	ld a,12		;any other BallFactor
+	jr nz,.next7\@
+	ld a,8
+.next7\@	;$574d
+	ld [$ff99],a
+	ld b,4		;GreatBall's BallFactor
+	call $38b9	;Divide
+	ld hl,$cfe6	;currentHP
+	ld a,[hli]
+	ld b,a
+	ld a,[hl]
+	srl b		;explanation:
+	rr a		;we have a 16 bit value
+	srl b		;equal to [b << 8 | a].
+	rr a		;This number is divided
+	and a		;by 4. The result is
+	jr nz,.next8\@	;8 bit (reg. a). Always
+	inc a		;bigger than zero.
+.next8\@	;$5766
+	ld [$ff99],a
+	ld b,4
+	call $38b9	;Divide
+	ld a,[$ff97]
+	and a
+	jr z,.next9\@
+	ld a,255
+	ld [$ff98],a
+.next9\@	;$5776
+	pop bc
+	ld a,[$d007]	;enemy: Catch Rate
+	cp b
+	jr c,.next10\@
+        ld a,[$ff97]
+        and a
+        jr nz,.BallSuccess\@
+	call $3e5c	;get random number
+	ld b,a
+	ld a,[$ff98]
+	cp b
+	jr c,.next10\@
+.BallSuccess\@	;$578b
+	jr .BallSuccess2\@
+.next10\@	;$578d
+	ld a,[$ff98]
+	ld [$d11e],a
+	xor a
+	ld [$ff96],a
+	ld [$ff97],a
+	ld a,[$d007]	;enemy: Catch Rate
+	ld [$ff98],a
+	ld a,100
+	ld [$ff99],a
+	call $38ac	;Multiply: CatchRate * 100
+	ld a,[$cf91]
+	ld b,255
+	cp a,POKE_BALL
+	jr z,.next11\@
+	ld b,200
+	cp a,GREAT_BALL
+	jr z,.next11\@
+	ld b,150
+	cp a,ULTRA_BALL
+	jr z,.next11\@
+.next11\@	;$57b8
+	ld a,b
+	ld [$ff99],a
+	ld b,4
+	call $38b9	;Divide
+	ld a,[$ff97]
+	and a
+	ld b,$63
+	jr nz,.next12\@
+	ld a,[$d11e]
+	ld [$ff99],a
+	call $38ac
+	ld a,255
+	ld [$ff99],a
+	ld b,4
+	call $38b9
+	ld a,[$cfe9]	;status ailments
+	and a
+	jr z,.next13\@
+	and a,(FRZ + SLP)
+	ld b,5
+	jr z,.next14\@
+	ld b,10
+.next14\@	;$57e6
+	ld a,[$ff98]
+	add b
+	ld [$ff98],a
+.next13\@	;$57eb
+	ld a,[$ff98]
+	cp a,10
+	ld b,$20
+	jr c,.next12\@
+	cp a,30
+	ld b,$61
+	jr c,.next12\@
+	cp a,70
+	ld b,$62
+	jr c,.next12\@
+	ld b,$63
+.next12\@	;$5801
+	ld a,b
+	ld [$d11e],a
+.BallSuccess2\@	;$5805
+	ld c,20
+	call DelayFrames
+	ld a,$c1
+	ld [$d07c],a
+	xor a
+	ld [$fff3],a
+	ld [$cc5b],a
+	ld [$d05b],a
+	ld a,[$cf92]
+	push af
+	ld a,[$cf91]
+	push af
+	ld a,$08	;probably animations
+	call Predef
+	pop af
+	ld [$cf91],a
+	pop af
+	ld [$cf92],a
+	ld a,[$d11e]
+	cp a,$10
+	ld hl,ItemUseBallText00
+	jp z,.printText0\@
+	cp a,$20
+	ld hl,ItemUseBallText01
+	jp z,.printText0\@
+	cp a,$61
+	ld hl,ItemUseBallText02
+	jp z,.printText0\@
+	cp a,$62
+	ld hl,ItemUseBallText03
+	jp z,.printText0\@
+	cp a,$63
+	ld hl,ItemUseBallText04
+	jp z,.printText0\@
+	ld hl,$cfe6	;current HP
+	ld a,[hli]
+	push af
+	ld a,[hli]
+	push af		;backup currentHP...
+	inc hl
+	ld a,[hl]
+	push af		;...and status ailments
+	push hl
+	ld hl,$d069
+	bit 3,[hl]
+	jr z,.next15\@
+	ld a,$4c
+	ld [$cfd8],a
+	jr .next16\@
+.next15\@	;$5871
+	set 3,[hl]
+	ld hl,$cceb
+	ld a,[$cff1]
+	ld [hli],a
+	ld a,[$cff2]
+	ld [hl],a
+.next16\@	;$587e
+	ld a,[$cf91]
+	push af
+	ld a,[$cfd8]
+	ld [$cf91],a
+	ld a,[$cff3]
+	ld [$d127],a
+	ld hl,$6b01
+	ld b,$0f
+	call Bankswitch
+	pop af
+	ld [$cf91],a
+	pop hl
+	pop af
+	ld [hld],a
+	dec hl
+	pop af
+	ld [hld],a
+	pop af
+	ld [hl],a
+	ld a,[$cfe5]	;enemy
+	ld [$d11c],a
+	ld [$cf91],a
+	ld [$d11e],a
+	ld a,[W_BATTLETYPE]
+	dec a
+	jr z,.printText1\@
+	ld hl,ItemUseBallText05
+	call PrintText
+	ld a,$3a	;convert order: Internal->Dex
+	call Predef
+	ld a,[$d11e]
+	dec a
+	ld c,a
+	ld b,2
+	ld hl,$d2f7	;Dex_own_flags (pokemon)
+	ld a,$10
+	call Predef	;check Dex flag (own already or not)
+	ld a,c
+	push af
+	ld a,[$d11e]
+	dec a
+	ld c,a
+	ld b,1
+	ld a,$10	;set Dex_own_flag?
+	call Predef
+	pop af
+	and a
+	jr nz,.checkParty\@
+	ld hl,ItemUseBallText06
+	call PrintText
+	call CleanLCD_OAM
+	ld a,[$cfe5]	;caught mon_ID
+	ld [$d11e],a
+	ld a,$3d
+	call Predef
+.checkParty\@	;$58f4
+	ld a,[W_NUMINPARTY]
+	cp a,6		;is party full?
+	jr z,.sendToBox\@
+	xor a
+	ld [$cc49],a
+	call CleanLCD_OAM
+	call AddPokemonToParty	;add mon to Party
+	jr .End\@
+.sendToBox\@	;$5907
+	call CleanLCD_OAM
+	call $67a4
+	ld hl,ItemUseBallText07
+	ld a,[$d7f1]
+	bit 0,a		;already met Bill?
+	jr nz,.sendToBox2\@
+	ld hl,ItemUseBallText08
+.sendToBox2\@	;$591a
+	call PrintText
+	jr .End\@
+.printText1\@	;$591f
+	ld hl,ItemUseBallText05
+.printText0\@	;$5922
+	call PrintText
+	call CleanLCD_OAM
+.End\@	;$5928
+	ld a,[W_BATTLETYPE]
+	and a
+	ret nz
+	ld hl,$d31d
+	inc a
+	ld [$cf96],a
+	jp $2bbb	;remove ITEM (XXX)
+ItemUseBallText00:
+;"It dodged the thrown ball!"
+;"This pokemon can't be caught"
+	TX_FAR _ItemUseBallText00
+	db "@"
+ItemUseBallText01:
+;"You missed the pokemon!"
+	TX_FAR _ItemUseBallText01
+	db "@"
+ItemUseBallText02:
+;"Darn! The pokemon broke free!"
+	TX_FAR _ItemUseBallText02
+	db "@"
+ItemUseBallText03:
+;"Aww! It appeared to be caught!"
+	TX_FAR _ItemUseBallText03
+	db "@"
+ItemUseBallText04:
+;"Shoot! It was so close too!"
+	TX_FAR _ItemUseBallText04
+	db "@"
+ItemUseBallText05:
+;"All right! {MonName} was caught!"
+;play sound
+	TX_FAR _ItemUseBallText05
+	db $12,$06
+	db "@"
+ItemUseBallText07:
+;"X was transferred to Bill's PC"
+	TX_FAR _ItemUseBallText07
+	db "@"
+ItemUseBallText08:
+;"X was transferred to someone's PC"
+	TX_FAR _ItemUseBallText08
+	db "@"
+
+ItemUseBallText06:
+;"New DEX data will be added..."
+;play sound
+	TX_FAR _ItemUseBallText06
+	db $13,$06
+	db "@"
+
+ItemUseTownMap:	;03:5968
+	ld a,[W_ISINBATTLE]	;in-battle or outside
+	and a
+	jp nz,ItemUseNotTime	;OAK: "this isn't the time..."
+
+INCBIN "baserom.gbc",$D96F,$E259 - $D96F
+
+GoodRodCode: ; 6259
+	call $62B4
+	jp c,ItemUseNotTime
+Next625F:
+	call GenRandom
+	srl a
+	jr c,Next6278
+	and 3
+	cp 2
+	jr nc,Next625F
+	; choose which monster appears
+	ld hl,GoodRodMons
+	add a,a
+	ld c,a
+	ld b,0
+	add hl,bc
+	ld b,[hl]
+	inc hl
+	ld c,[hl]
+	and a
+Next6278:
+	ld a,0
+	rla
+	xor 1
+	jr Next628E
+
+GoodRodMons:
+	db 10,GOLDEEN
+	db 10,POLIWAG
+
+Next6283:
+	call $62B4
+	jp c,ItemUseNotTime
+Next6289:
+	call $68EA
+	ld a,e
+Next628E:
+	ld [$CD3D],a
+	dec a
+	jr nz,.next\@
+	ld a,1
+	ld [$D05F],a
+	ld a,b
+	ld [$D127],a
+	ld a,c
+	ld [$D059],a
+.next\@
+	ld hl,$D700
+	ld a,[hl]
+	push af
+	push hl
+	ld [hl],0
+	ld b,$1C
+	ld hl,$47B6
+	call Bankswitch
+	pop hl
+	pop af
+	ld [hl],a
+	ret
+
+INCBIN "baserom.gbc",$E2B4,$E479 - $E2B4
+
+ItemUseTMHM:	;03:6479
+    	INCBIN "baserom.gbc",$E479,$E581 - $E479
+ItemUseNotTime:	;03:6581
+    	INCBIN "baserom.gbc",$E581,$E5E8 - $E581
+;ItemUseTexts:	;03:65e8
+ItemUseText00:	;03:65e8
+	TX_FAR _ItemUseText001
+        db $05
+	TX_FAR _ItemUseText002
+	db "@"
+INCBIN "baserom.gbc",$E5F2,$E919 - $E5F2
+
+; super rod data
+; map, pointer to fishing group
+SuperRodData: ; 6919
+	dbw $00,FishingGroup1
+	dbw $01,FishingGroup1
+	dbw $03,FishingGroup3
+	dbw $05,FishingGroup4
+	dbw $06,FishingGroup5
+	dbw $07,FishingGroup10
+	dbw $08,FishingGroup8
+	dbw $0F,FishingGroup3
+	dbw $11,FishingGroup4
+	dbw $15,FishingGroup5
+	dbw $16,FishingGroup4
+	dbw $17,FishingGroup7
+	dbw $18,FishingGroup7
+	dbw $1C,FishingGroup7
+	dbw $1D,FishingGroup7
+	dbw $1E,FishingGroup8
+	dbw $1F,FishingGroup8
+	dbw $20,FishingGroup8
+	dbw $21,FishingGroup2
+	dbw $22,FishingGroup9
+	dbw $23,FishingGroup3
+	dbw $24,FishingGroup3
+	dbw $41,FishingGroup3
+	dbw $5E,FishingGroup4
+	dbw $A1,FishingGroup8
+	dbw $A2,FishingGroup8
+	dbw $D9,FishingGroup6
+	dbw $DA,FishingGroup6
+	dbw $DB,FishingGroup6
+	dbw $DC,FishingGroup6
+	dbw $E2,FishingGroup9
+	dbw $E3,FishingGroup9
+	dbw $E4,FishingGroup9
+	db $FF
+
+; fishing groups
+; number of monsters, followed by level/monster pairs
+FishingGroup1:
+	db 2
+	db 15,TENTACOOL
+	db 15,POLIWAG
+
+FishingGroup2:
+	db 2
+	db 15,GOLDEEN
+	db 15,POLIWAG
+
+FishingGroup3:
+	db 3
+	db 15,PSYDUCK
+	db 15,GOLDEEN
+	db 15,KRABBY
+
+FishingGroup4:
+	db 2
+	db 15,KRABBY
+	db 15,SHELLDER
+
+FishingGroup5:
+	db 2
+	db 23,POLIWHIRL
+	db 15,SLOWPOKE
+
+FishingGroup6:
+	db 4
+	db 15,DRATINI
+	db 15,KRABBY
+	db 15,PSYDUCK
+	db 15,SLOWPOKE
+
+FishingGroup7:
+	db 4
+	db 5,TENTACOOL
+	db 15,KRABBY
+	db 15,GOLDEEN
+	db 15,MAGIKARP
+
+FishingGroup8:
+	db 4
+	db 15,STARYU
+	db 15,HORSEA
+	db 15,SHELLDER
+	db 15,GOLDEEN
+
+FishingGroup9:
+	db 4
+	db 23,SLOWBRO
+	db 23,SEAKING
+	db 23,KINGLER
+	db 23,SEADRA
+
+FishingGroup10:
+	db 4
+	db 23,SEAKING
+	db 15,KRABBY
+	db 15,GOLDEEN
+	db 15,MAGIKARP
+
+INCBIN "baserom.gbc",$E9C5,$10000 - $E9C5
+
+SECTION "bank4",DATA,BANK[$4]
+
+INCBIN "baserom.gbc",$10000,$2EDE
+
+RedPicFront:
+	INCBIN "pic/trainer/red.pic"
+ShrinkPic1:
+	INCBIN "pic/trainer/shrink1.pic"
+ShrinkPic2:
+	INCBIN "pic/trainer/shrink2.pic"
+
+INCBIN "baserom.gbc",$13074,$13A8F-$13074
+
+GenRandom_: ; 7A8F
+; generate a random 16-bit integer and store it at $FFD3,$FFD4
+	ld a,[rDIV]
+	ld b,a
+	ld a,[H_RAND1]
+	adc b
+	ld [H_RAND1],a
+	ld a,[rDIV]
+	ld b,a
+	ld a,[H_RAND2]
+	sbc b
+	ld [H_RAND2],a
+	ret
+
+SECTION "bank5",DATA,BANK[$5]
+
+INCBIN "baserom.gbc",$14000,$4000
+
+SECTION "bank6",DATA,BANK[$6]
+
+CeladonCity_h: ; 0x18000
+    db $00 ; tileset
+    db $12,$19 ; dimensions
+    dw CeladonCityBlocks, CeladonCityTexts, CeladonCityScript ; blocks, texts, scripts
+    db WEST | EAST ; connections
+
+    ; connection data
+
+	db ROUTE_16
+    dw $4B95, $C7C1 ; pointers (connected, current) (strip)
+    db $09, $14 ; bigness, width
+    db $F8, $27 ; alignments (y, x)
+    dw $C716 ; window
+
+	db ROUTE_7
+    dw $4051, $C7DD ; pointers (connected, current) (strip)
+    db $09, $0A ; bigness, width
+    db $F8, $00 ; alignments (y, x)
+    dw $C6F9 ; window
+
+    ; end connection data
+
+    dw CeladonCityObject ; objects
+
+CeladonCityObject: ; 0x18022 (size=189)
+    db $f ; border tile
+
+    db $d ; warps
+    db $d, $8, $0, CELADON_MART_1
+    db $d, $a, $2, CELADON_MART_1
+    db $9, $18, $0, CELADON_MANSION_1
+    db $3, $18, $2, CELADON_MANSION_1
+    db $3, $19, $2, CELADON_MANSION_1
+    db $9, $29, $0, CELADON_POKECENTER
+    db $1b, $c, $0, CELADON_GYM
+    db $13, $1c, $0, GAME_CORNER
+    db $13, $27, $0, CELADON_MART_5
+    db $13, $21, $0, CELADONPRIZE_ROOM
+    db $1b, $1f, $0, CELADON_DINER
+    db $1b, $23, $0, CELADON_HOUSE
+    db $1b, $2b, $0, CELADON_HOTEL
+
+    db $9 ; signs
+    db $f, $1b, $a ; CeladonCityText10
+    db $f, $13, $b ; CeladonCityText11
+    db $9, $2a, $c ; CeladonCityText12
+    db $1d, $d, $d ; CeladonCityText13
+    db $9, $15, $e ; CeladonCityText14
+    db $d, $c, $f ; CeladonCityText15
+    db $15, $27, $10 ; CeladonCityText16
+    db $15, $21, $11 ; CeladonCityText17
+    db $15, $1b, $12 ; CeladonCityText18
+
+    db $9 ; people
+    db SPRITE_LITTLE_GIRL, $11 + 4, $8 + 4, $fe, $0, $1 ; person
+    db SPRITE_OLD_PERSON, $1c + 4, $b + 4, $ff, $d1, $2 ; person
+    db SPRITE_GIRL, $13 + 4, $e + 4, $fe, $1, $3 ; person
+    db SPRITE_OLD_PERSON, $16 + 4, $19 + 4, $ff, $d0, $4 ; person
+    db SPRITE_OLD_PERSON, $10 + 4, $16 + 4, $ff, $d0, $5 ; person
+    db SPRITE_FISHER2, $c + 4, $20 + 4, $ff, $d2, $6 ; person
+    db SPRITE_SLOWBRO, $c + 4, $1e + 4, $ff, $d3, $7 ; person
+    db SPRITE_ROCKET, $1d + 4, $20 + 4, $fe, $2, $8 ; person
+    db SPRITE_ROCKET, $e + 4, $2a + 4, $fe, $2, $9 ; person
+
+    ; warp-to
+    EVENT_DISP $19, $d, $8 ; CELADON_MART_1
+    EVENT_DISP $19, $d, $a ; CELADON_MART_1
+    EVENT_DISP $19, $9, $18 ; CELADON_MANSION_1
+    EVENT_DISP $19, $3, $18 ; CELADON_MANSION_1
+    EVENT_DISP $19, $3, $19 ; CELADON_MANSION_1
+    EVENT_DISP $19, $9, $29 ; CELADON_POKECENTER
+    EVENT_DISP $19, $1b, $c ; CELADON_GYM
+    EVENT_DISP $19, $13, $1c ; GAME_CORNER
+    EVENT_DISP $19, $13, $27 ; CELADON_MART_5
+    EVENT_DISP $19, $13, $21 ; CELADONPRIZE_ROOM
+    EVENT_DISP $19, $1b, $1f ; CELADON_DINER
+    EVENT_DISP $19, $1b, $23 ; CELADON_HOUSE
+    EVENT_DISP $19, $1b, $2b ; CELADON_HOTEL
+
+CeladonCityBlocks: ; 450
+    INCBIN "maps/celadoncity.blk"
+
+PalletTown_h:
+	db $00 ; tileset
+	db $09,$0A ; dimensions
+	dw PalletTownBlocks, PalletTownTexts, PalletTownScript
+	db NORTH | SOUTH ; connections
+
+	db $0C ; Route 1
+	dw $4192,$C6EB ; pointers
+	db $0A,$0A ; bigness, width
+	db $23,$00 ; alignments
+	dw $C809 ; window
+
+	db $20 ; Route 21
+	dw $506D,$C7AB ; pointers
+	db $0A,$0A ; bigness, width
+	db $00,$00 ; alignments
+	dw $C6F9 ; window
+
+	dw PalletTownObject
+
+PalletTownObject: ; 0x182c3 (size=58)
+    db $b ; border tile
+
+    db $3 ; warps
+    db $5, $5, $0, REDS_HOUSE_1F
+    db $5, $d, $0, BLUES_HOUSE
+    db $b, $c, $1, OAKS_LAB
+
+    db $4 ; signs
+    db $d, $d, $4 ; PalletTownText4
+    db $9, $7, $5 ; PalletTownText5
+    db $5, $3, $6 ; PalletTownText6
+    db $5, $b, $7 ; PalletTownText7
+
+    db $3 ; people
+    db SPRITE_OAK, $5 + 4, $8 + 4, $ff, $ff, $1 ; person
+    db SPRITE_GIRL, $8 + 4, $3 + 4, $fe, $0, $2 ; person
+    db SPRITE_FISHER2, $e + 4, $b + 4, $fe, $0, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $5, $5 ; REDS_HOUSE_1F
+    EVENT_DISP $a, $5, $d ; BLUES_HOUSE
+    EVENT_DISP $a, $b, $c ; OAKS_LAB
+
+PalletTownBlocks: ; 0x182fd
+	INCBIN "maps/pallettown.blk"
+
+ViridianCity_h: ; 0x18357 to 0x18384 (45 bytes) (bank=6) (id=1)
+    db $00 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw ViridianCityBlocks, ViridianCityTexts, ViridianCityScript ; blocks, texts, scripts
+    db NORTH | SOUTH | WEST ; connections
+
+    ; connections data
+
+	db ROUTE_2
+    dw $41C8, $C6F0 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $47, $f6 ; alignments (y, x)
+    dw $c929 ; window
+
+	db ROUTE_1
+    dw $40fc, $c912 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $f6 ; alignments (y, x)
+    dw $c6f9 ; window
+
+	db ROUTE_22
+    dw $404e, $c79e ; pointers (connected, current) (strip)
+    db $09, $14 ; bigness, width
+    db $f8, $27 ; alignments (y, x)
+    dw $c716 ; window
+
+    ; end connection data
+
+    dw ViridianCityObject ; objects
+
+ViridianCityObject: ; 0x18384 (size=104)
+    db $f ; border tile
+
+    db $5 ; warps
+    db $19, $17, $0, VIRIDIAN_POKECENTER
+    db $13, $1d, $0, VIRIDIAN_MART
+    db $f, $15, $0, VIRIDIAN_SCHOOL
+    db $9, $15, $0, VIRIDIAN_HOUSE
+    db $7, $20, $0, VIRIDIAN_GYM
+
+    db $6 ; signs
+    db $11, $11, $8 ; ViridianCityText8
+    db $1, $13, $9 ; ViridianCityText9
+    db $1d, $15, $a ; ViridianCityText10
+    db $13, $1e, $b ; ViridianCityText11
+    db $19, $18, $c ; ViridianCityText12
+    db $7, $1b, $d ; ViridianCityText13
+
+    db $7 ; people
+    db SPRITE_BUG_CATCHER, $14 + 4, $d + 4, $fe, $0, $1 ; person
+    db SPRITE_GAMBLER, $8 + 4, $1e + 4, $ff, $ff, $2 ; person
+    db SPRITE_BUG_CATCHER, $19 + 4, $1e + 4, $fe, $0, $3 ; person
+    db SPRITE_GIRL, $9 + 4, $11 + 4, $ff, $d3, $4 ; person
+    db SPRITE_LYING_OLD_MAN, $9 + 4, $12 + 4, $ff, $ff, $5 ; person
+    db SPRITE_FISHER2, $17 + 4, $6 + 4, $ff, $d0, $6 ; person
+    db SPRITE_GAMBLER, $5 + 4, $11 + 4, $fe, $2, $7 ; person
+
+    ; warp-to
+    EVENT_DISP $14, $19, $17 ; VIRIDIAN_POKECENTER
+    EVENT_DISP $14, $13, $1d ; VIRIDIAN_MART
+    EVENT_DISP $14, $f, $15 ; VIRIDIAN_SCHOOL
+    EVENT_DISP $14, $9, $15 ; VIRIDIAN_HOUSE
+    EVENT_DISP $14, $7, $20 ; VIRIDIAN_GYM
+
+ViridianCityBlocks: ; 360
+    INCBIN "maps/viridiancity.blk"
+
+PewterCity_h: ; 0x18554 to 0x18576 (34 bytes) (bank=6) (id=2)
+    db $00 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw PewterCityBlocks, PewterCityTexts, PewterCityScript ; blocks, texts, scripts
+    db SOUTH | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_2
+    dw $407e, $c912 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $f6 ; alignments (y, x)
+    dw $c6f9 ; window
+
+	db ROUTE_3
+    dw $4255, $c7b5 ; pointers (connected, current) (strip)
+    db $09, $23 ; bigness, width
+    db $f8, $00 ; alignments (y, x)
+    dw $c712 ; window
+
+    ; end connection data
+
+    dw PewterCityObject ; objects
+
+INCBIN "baserom.gbc",$18576,$18577 - $18576
+
+PewterCityObject: ; 0x18577 (size=111)
+    db $a ; border tile
+
+    db $7 ; warps
+    db $7, $e, $0, MUSEUM_1F
+    db $5, $13, $2, MUSEUM_1F
+    db $11, $10, $0, PEWTER_GYM
+    db $d, $1d, $0, PEWTER_HOUSE_1
+    db $11, $17, $0, PEWTER_MART
+    db $1d, $7, $0, PEWTER_HOUSE_2
+    db $19, $d, $0, PEWTER_POKECENTER
+
+    db $7 ; signs
+    db $1d, $13, $6 ; PewterCityText6
+    db $13, $21, $7 ; PewterCityText7
+    db $11, $18, $8 ; PewterCityText8
+    db $19, $e, $9 ; PewterCityText9
+    db $9, $f, $a ; PewterCityText10
+    db $11, $b, $b ; PewterCityText11
+    db $17, $19, $c ; PewterCityText12
+
+    db $5 ; people
+    db SPRITE_LASS, $f + 4, $8 + 4, $ff, $ff, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $19 + 4, $11 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $11 + 4, $1b + 4, $ff, $ff, $3 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $19 + 4, $1a + 4, $fe, $2, $4 ; person
+    db SPRITE_BUG_CATCHER, $10 + 4, $23 + 4, $ff, $d0, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $14, $7, $e ; MUSEUM_1F
+    EVENT_DISP $14, $5, $13 ; MUSEUM_1F
+    EVENT_DISP $14, $11, $10 ; PEWTER_GYM
+    EVENT_DISP $14, $d, $1d ; PEWTER_HOUSE_1
+    EVENT_DISP $14, $11, $17 ; PEWTER_MART
+    EVENT_DISP $14, $1d, $7 ; PEWTER_HOUSE_2
+    EVENT_DISP $14, $19, $d ; PEWTER_POKECENTER
+
+PewterCityBlocks: ; 360
+    INCBIN "maps/pewtercity.blk"
+
+CeruleanCity_h: ; 0x1874e to 0x18786 (56 bytes) (bank=6) (id=3)
+    db $00 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw CeruleanCityBlocks, CeruleanCityTexts, CeruleanCityScript ; blocks, texts, scripts
+    db NORTH | SOUTH | WEST | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_24
+    dw $477d, $c6f0 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $23, $f6 ; alignments (y, x)
+    dw $c809 ; window
+
+	db ROUTE_5
+    dw $45d2, $c912 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $f6 ; alignments (y, x)
+    dw $c6f9 ; window
+
+	db ROUTE_4
+    dw $4416, $c79e ; pointers (connected, current) (strip)
+    db $09, $2d ; bigness, width
+    db $f8, $59 ; alignments (y, x)
+    dw $c748 ; window
+
+	db ROUTE_9
+    dw $46fe, $c7b5 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $f8, $00 ; alignments (y, x)
+    dw $c70d ; window
+
+    ; end connection data
+
+    dw CeruleanCityObject ; objects
+
+CeruleanCityObject: ; 0x18786 (size=170)
+    db $f ; border tile
+
+    db $a ; warps
+    db $b, $1b, $0, TRASHED_HOUSE
+    db $f, $d, $0, CERULEAN_HOUSE
+    db $11, $13, $0, CERULEAN_POKECENTER
+    db $13, $1e, $0, CERULEAN_GYM
+    db $19, $d, $0, BIKE_SHOP
+    db $19, $19, $0, CERULEAN_MART
+    db $b, $4, $0, UNKNOWN_DUNGEON_1
+    db $9, $1b, $2, TRASHED_HOUSE
+    db $b, $9, $1, CERULEAN_HOUSE_3
+    db $9, $9, $0, CERULEAN_HOUSE_3
+
+    db $6 ; signs
+    db $13, $17, $c ; CeruleanCityText12
+    db $1d, $11, $d ; CeruleanCityText13
+    db $19, $1a, $e ; CeruleanCityText14
+    db $11, $14, $f ; CeruleanCityText15
+    db $19, $b, $10 ; CeruleanCityText16
+    db $15, $1b, $11 ; CeruleanCityText17
+
+    db $b ; people
+    db SPRITE_BLUE, $2 + 4, $14 + 4, $ff, $d0, $1 ; person
+    db SPRITE_ROCKET, $8 + 4, $1e + 4, $ff, $ff, $42, ROCKET + $C8, $5 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $14 + 4, $1f + 4, $ff, $d0, $3 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $12 + 4, $f + 4, $fe, $1, $4 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $15 + 4, $9 + 4, $fe, $2, $5 ; person
+    db SPRITE_GUARD, $c + 4, $1c + 4, $ff, $d0, $6 ; person
+    db SPRITE_LASS, $1a + 4, $1d + 4, $ff, $d2, $7 ; person
+    db SPRITE_SLOWBRO, $1a + 4, $1c + 4, $ff, $d0, $8 ; person
+    db SPRITE_LASS, $1b + 4, $9 + 4, $fe, $2, $9 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $c + 4, $4 + 4, $ff, $d0, $a ; person
+    db SPRITE_GUARD, $c + 4, $1b + 4, $ff, $d0, $b ; person
+
+    ; warp-to
+    EVENT_DISP $14, $b, $1b ; TRASHED_HOUSE
+    EVENT_DISP $14, $f, $d ; CERULEAN_HOUSE
+    EVENT_DISP $14, $11, $13 ; CERULEAN_POKECENTER
+    EVENT_DISP $14, $13, $1e ; CERULEAN_GYM
+    EVENT_DISP $14, $19, $d ; BIKE_SHOP
+    EVENT_DISP $14, $19, $19 ; CERULEAN_MART
+    EVENT_DISP $14, $b, $4 ; UNKNOWN_DUNGEON_1
+    EVENT_DISP $14, $9, $1b ; TRASHED_HOUSE
+    EVENT_DISP $14, $b, $9 ; CERULEAN_HOUSE_3
+    EVENT_DISP $14, $9, $9 ; CERULEAN_HOUSE_3
+
+CeruleanCityBlocks: ; 360
+    INCBIN "maps/ceruleancity.blk"
+
+VermilionCity_h: ; 0x18998 to 0x189ba (34 bytes) (bank=6) (id=5)
+    db $00 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw VermilionCityBlocks, VermilionCityTexts, VermilionCityScript ; blocks, texts, scripts
+    db NORTH | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_6
+    dw $410f, $c6f0 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $23, $f6 ; alignments (y, x)
+    dw $c809 ; window
+
+	db ROUTE_11
+    dw $455f, $c7b5 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $f8, $00 ; alignments (y, x)
+    dw $c70d ; window
+
+    ; end connection data
+
+    dw VermilionCityObject ; objects
+
+VermilionCityObject: ; 0x189ba (size=133)
+    db $43 ; border tile
+
+    db $9 ; warps
+    db $3, $b, $0, VERMILION_POKECENTER
+    db $d, $9, $0, POKEMON_FAN_CLUB
+    db $d, $17, $0, VERMILION_MART
+    db $13, $c, $0, VERMILION_GYM
+    db $13, $17, $0, VERMILION_HOUSE_1
+    db $1f, $12, $0, VERMILION_DOCK
+    db $1f, $13, $0, VERMILION_DOCK
+    db $d, $f, $0, VERMILION_HOUSE_3
+    db $3, $7, $0, VERMILION_HOUSE_2
+
+    db $7 ; signs
+    db $3, $1b, $7 ; VermilionCityText7
+    db $d, $25, $8 ; VermilionCityText8
+    db $d, $18, $9 ; VermilionCityText9
+    db $3, $c, $a ; VermilionCityText10
+    db $d, $7, $b ; VermilionCityText11
+    db $13, $7, $c ; VermilionCityText12
+    db $f, $1d, $d ; VermilionCityText13
+
+    db $6 ; people
+    db SPRITE_FOULARD_WOMAN, $7 + 4, $13 + 4, $fe, $2, $1 ; person
+    db SPRITE_GAMBLER, $6 + 4, $e + 4, $ff, $ff, $2 ; person
+    db SPRITE_SAILOR, $1e + 4, $13 + 4, $ff, $d1, $3 ; person
+    db SPRITE_GAMBLER, $7 + 4, $1e + 4, $ff, $ff, $4 ; person
+    db SPRITE_SLOWBRO, $9 + 4, $1d + 4, $fe, $1, $5 ; person
+    db SPRITE_SAILOR, $1b + 4, $19 + 4, $fe, $2, $6 ; person
+
+    ; warp-to
+    EVENT_DISP $14, $3, $b ; VERMILION_POKECENTER
+    EVENT_DISP $14, $d, $9 ; POKEMON_FAN_CLUB
+    EVENT_DISP $14, $d, $17 ; VERMILION_MART
+    EVENT_DISP $14, $13, $c ; VERMILION_GYM
+    EVENT_DISP $14, $13, $17 ; VERMILION_HOUSE_1
+    EVENT_DISP $14, $1f, $12 ; VERMILION_DOCK
+    EVENT_DISP $14, $1f, $13 ; VERMILION_DOCK
+    EVENT_DISP $14, $d, $f ; VERMILION_HOUSE_3
+    EVENT_DISP $14, $3, $7 ; VERMILION_HOUSE_2
+
+VermilionCityBlocks: ; 360
+    INCBIN "maps/vermilioncity.blk"
+
+FuchsiaCity_h: ; 0x18ba7 to 0x18bd4 (45 bytes) (bank=6) (id=7)
+    db $00 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw FuchsiaCityBlocks, FuchsiaCityTexts, FuchsiaCityScript ; blocks, texts, scripts
+    db SOUTH | WEST | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_19
+    dw $4ef1, $c912 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $f6 ; alignments (y, x)
+    dw $c6f9 ; window
+
+	db ROUTE_18
+    dw $4cb2, $c79e ; pointers (connected, current) (strip)
+    db $09, $19 ; bigness, width
+    db $f8, $31 ; alignments (y, x)
+    dw $c720 ; window
+
+	db ROUTE_15
+    dw $49cc, $c7b5 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $f8, $00 ; alignments (y, x)
+    dw $c70d ; window
+
+    ; end connection data
+
+    dw FuchsiaCityObject ; objects
+
+FuchsiaCityObject: ; 0x18bd4 (size=178)
+    db $f ; border tile
+
+    db $9 ; warps
+    db $d, $5, $0, FUCHSIA_MART
+    db $1b, $b, $0, FUCHSIA_HOUSE_1
+    db $1b, $13, $0, FUCHSIA_POKECENTER
+    db $1b, $1b, $0, FUCHSIA_HOUSE_2
+    db $3, $12, $0, SAFARIZONEENTRANCE
+    db $1b, $5, $0, FUCHSIA_GYM
+    db $d, $16, $0, FUCHSIAMEETINGROOM
+    db $1b, $1f, $1, FUCHSIA_HOUSE_3
+    db $18, $1f, $0, FUCHSIA_HOUSE_3
+
+    db $e ; signs
+    db $17, $f, $b ; FuchsiaCityText11
+    db $f, $19, $c ; FuchsiaCityText12
+    db $5, $11, $d ; FuchsiaCityText13
+    db $d, $6, $e ; FuchsiaCityText14
+    db $1b, $14, $f ; FuchsiaCityText15
+    db $1d, $1b, $10 ; FuchsiaCityText16
+    db $f, $15, $11 ; FuchsiaCityText17
+    db $1d, $5, $12 ; FuchsiaCityText18
+    db $7, $21, $13 ; FuchsiaCityText19
+    db $7, $1b, $14 ; FuchsiaCityText20
+    db $7, $d, $15 ; FuchsiaCityText21
+    db $d, $1f, $16 ; FuchsiaCityText22
+    db $f, $d, $17 ; FuchsiaCityText23
+    db $7, $7, $18 ; FuchsiaCityText24
+
+    db $a ; people
+    db SPRITE_BUG_CATCHER, $c + 4, $a + 4, $fe, $2, $1 ; person
+    db SPRITE_GAMBLER, $11 + 4, $1c + 4, $fe, $2, $2 ; person
+    db SPRITE_FISHER2, $e + 4, $1e + 4, $ff, $d0, $3 ; person
+    db SPRITE_BUG_CATCHER, $8 + 4, $18 + 4, $ff, $d1, $4 ; person
+    db SPRITE_CLEFAIRY, $5 + 4, $1f + 4, $fe, $0, $5 ; person
+    db SPRITE_BALL, $6 + 4, $19 + 4, $ff, $ff, $6 ; person
+    db SPRITE_SLOWBRO, $6 + 4, $c + 4, $fe, $2, $7 ; person
+    db SPRITE_SLOWBRO, $c + 4, $1e + 4, $fe, $2, $8 ; person
+    db SPRITE_SEEL, $11 + 4, $8 + 4, $fe, $0, $9 ; person
+    db SPRITE_OMANYTE, $5 + 4, $6 + 4, $ff, $ff, $a ; person
+
+    ; warp-to
+    EVENT_DISP $14, $d, $5 ; FUCHSIA_MART
+    EVENT_DISP $14, $1b, $b ; FUCHSIA_HOUSE_1
+    EVENT_DISP $14, $1b, $13 ; FUCHSIA_POKECENTER
+    EVENT_DISP $14, $1b, $1b ; FUCHSIA_HOUSE_2
+    EVENT_DISP $14, $3, $12 ; SAFARIZONEENTRANCE
+    EVENT_DISP $14, $1b, $5 ; FUCHSIA_GYM
+    EVENT_DISP $14, $d, $16 ; FUCHSIAMEETINGROOM
+    EVENT_DISP $14, $1b, $1f ; FUCHSIA_HOUSE_3
+    EVENT_DISP $14, $18, $1f ; FUCHSIA_HOUSE_3
+
+FuchsiaCityBlocks: ; 360
+    INCBIN "maps/fuchsiacity.blk"
+
+INCBIN "baserom.gbc",$18dee,$6d
+
+PalletTownScript:
+	ld a,[$D74B]
+	bit 4,a
+	jr z,.next\@
+	ld hl,$D747
+	set 6,[hl]
+.next\@
+	call $3C3C
+	ld hl,PalletTownScriptPointers
+	ld a,[$D5F1]
+	jp $3D97
+; 0x18e73
+
+PalletTownScriptPointers:
+	dw PalletTownScript1,PalletTownScript2,PalletTownScript3,PalletTownScript4,PalletTownScript5,PalletTownScript6,PalletTownScript7
+
+PalletTownScript1:
+	ld a,[$D747]
+	bit 0,a
+	ret nz
+	ld a,[W_YCOORD]
+	cp 1 ; is player near north exit?
+	ret nz
+	xor a
+	ld [$FFB4],a
+	ld a,4
+	ld [$D528],a
+	ld a,$FF
+	call $23B1 ; stop music
+	ld a,2
+	ld c,a ; song bank
+	ld a,$DB ; “oak appears” music
+	call $23A1 ; plays music
+	ld a,$FC
+	ld [$CD6B],a
+	ld hl,$D74B
+	set 7,[hl]
+
+	; trigger the next script
+	ld a,1
+	ld [$D5F1],a
+	ret
+
+PalletTownScript2:
+	xor a
+	ld [$CF0D],a
+	ld a,1
+	ld [$FF8C],a
+	call $2920
+	ld a,$FF
+	ld [$CD6B],a
+	ld a,0
+	ld [$CC4D],a
+	ld a,$15
+	call Predef
+
+	; trigger the next script
+	ld a,2
+	ld [$D5F1],a
+	ret
+
+PalletTownScript3:
+	ld a,1
+	ld [$FF8C],a
+	ld a,4
+	ld [$FF8D],a
+	call $34A6
+	call Delay3
+	ld a,1
+	ld [W_YCOORD],a
+	ld a,1
+	ld [$FF9B],a
+	ld a,1
+	swap a
+	ld [$FF95],a
+	ld a,$22
+	call Predef
+	ld hl,$FF95
+	dec [hl]
+	ld a,$20
+	call Predef ; load Oak’s movement into $CC97
+	ld de,$CC97
+	ld a,1 ; oak
+	ld [$FF8C],a
+	call MoveSprite
+	ld a,$FF
+	ld [$CD6B],a
+
+	; trigger the next script
+	ld a,3
+	ld [$D5F1],a
+	ret
+
+PalletTownScript4:
+	ld a,[$D730]
+	bit 0,a
+	ret nz
+	xor a
+	ld [$C109],a
+	ld a,1
+	ld [$CF0D],a
+	ld a,$FC
+	ld [$CD6B],a
+	ld a,1
+	ld [$FF8C],a
+	call $2920
+	ld a,$FF
+	ld [$CD6B],a
+	ld a,1
+	ld [$CF13],a
+	xor a
+	ld [$CF10],a
+	ld a,1
+	ld [$CC57],a
+	ld a,[$FFB8]
+	ld [$CC58],a
+
+	; trigger the next script
+	ld a,4
+	ld [$D5F1],a
+	ret
+
+PalletTownScript5:
+	ld a,[$CC57]
+	and a
+	ret nz
+
+	; trigger the next script
+	ld a,5
+	ld [$D5F1],a
+	ret
+
+PalletTownScript6:
+	ld a,[$D74A]
+	bit 2,a
+	jr nz,.next\@
+	and 3
+	cp 3
+	jr nz,.next\@
+	ld hl,$D74A
+	set 2,[hl]
+	ld a,$27
+	ld [$CC4D],a
+	ld a,$11
+	call Predef
+	ld a,$28
+	ld [$CC4D],a
+	ld a,$15
+	jp Predef
+.next\@
+	ld a,[$D74B]
+	bit 4,a
+	ret z
+	ld hl,$D74B
+	set 6,[hl]
+PalletTownScript7:
+	ret
+
+PalletTownTexts: ; 0x18f88
+	dw PalletTownText1,PalletTownText2,PalletTownText3,PalletTownText4,PalletTownText5,PalletTownText6,PalletTownText7
+
+PalletTownText1: ; 4F96 0x18f96
+	db 8
+	ld a,[$CF0D]
+	and a
+	jr nz,.next\@
+	ld a,1
+	ld [$CC3C],a
+	ld hl,OakAppearsText
+	jr .done\@
+.next\@
+	ld hl,OakWalksUpText
+.done\@
+	call PrintText
+	jp $24D7
+
+OakAppearsText:
+	TX_FAR _OakAppearsText
+	db 8
+	ld c,10
+	call DelayFrames
+	xor a
+	ld [$CD4F],a
+	ld [$CD50],a
+	ld a,$4C
+	call Predef ; display ! over head
+	ld a,4
+	ld [$D528],a
+	jp $24D7
+
+OakWalksUpText:
+	TX_FAR _OakWalksUpText
+	db "@"
+
+PalletTownText2: ; girl 0x18fd3
+	TX_FAR _PalletTownText2 ; dc 42 29 pointing to 0xa42dc
+	db "@"
+
+PalletTownText3: ; fat man
+	TX_FAR _PalletTownText3
+	db "@"
+
+PalletTownText4: ; sign by lab
+	TX_FAR _PalletTownText4
+	db "@"
+
+PalletTownText5: ; sign by fence
+	TX_FAR _PalletTownText5
+	db "@"
+
+PalletTownText6: ; sign by Red’s house
+	TX_FAR _PalletTownText6
+	db "@"
+
+PalletTownText7: ; sign by Blue’s house
+	TX_FAR _PalletTownText7
+	db "@"
+
+ViridianCityScript: ; 0x18ff1
+    call $3c3c
+    ld hl, $4ffd
+    ld a, [$d5f4]
+    jp $3d97
+; 0x18ffd
+
+ViridianCityScripts: ; 0x18ffd
+    dw ViridianCityScript0
+
+INCBIN "baserom.gbc",$18fff,$6
+
+ViridianCityScript0: ; 0x19005
+    call $500b
+    jp $503d
+; 0x1900b
+
+INCBIN "baserom.gbc",$1900b,$d9
+
+ViridianCityTexts: ; 0x190e4
+    dw ViridianCityText1, ViridianCityText2, ViridianCityText3, ViridianCityText4, ViridianCityText5, ViridianCityText6, ViridianCityText7, ViridianCityText8, ViridianCityText9, ViridianCityText10, ViridianCityText11, ViridianCityText12, ViridianCityText13, ViridianCityText14, ViridianCityText15
+
+ViridianCityText1: ; 0x19102
+    TX_FAR _ViridianCityText1
+    db $50
+
+ViridianCityText2: ; 0x19107
+    db $08 ; asm
+    ld a, [$d356]
+    cp $7f
+    ld hl, $5127
+    jr z, .asm_ae9fe ; 0x19110
+    ld a, [$d751]
+    bit 1, a
+    jr nz, .asm_ae9fe ; 0x19117
+    ld hl, $5122
+.asm_ae9fe ; 0x1911c
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$19122,$1912c - $19122
+
+ViridianCityText3: ; 0x1912c
+    db $08 ; asm
+    ld hl, $514d
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_6dfea ; 0x1913a
+    ld hl, $5157
+    call PrintText
+    jr .asm_d611f ; 0x19142
+.asm_6dfea ; 0x19144
+    ld hl, $5152
+    call PrintText
+.asm_d611f ; 0x1914a
+    jp $24d7
+
+INCBIN "baserom.gbc",$1914d,$1915c - $1914d
+
+ViridianCityText4: ; 0x1915c
+    db $08 ; asm
+    ld a, [$d74b]
+    bit 5, a
+    jr nz, .asm_83894 ; 0x19162
+    ld hl, $5175
+    call PrintText
+    jr .asm_700a6 ; 0x1916a
+.asm_83894 ; 0x1916c
+    ld hl, $517a
+    call PrintText
+.asm_700a6 ; 0x19172
+    jp $24d7
+
+INCBIN "baserom.gbc",$19175,$1917f - $19175
+
+ViridianCityText5: ; 0x1917f
+    db $08 ; asm
+    ld hl, $5191
+    call PrintText
+    call $50cf
+    ld a, $3
+    ld [$d5f4], a
+    jp $24d7
+
+INCBIN "baserom.gbc",$19191,$19196 - $19191
+
+ViridianCityText6: ; 0x19196
+    db $08 ; asm
+    ld a, [$d74c]
+    bit 1, a
+    jr nz, .asm_4e5a0 ; 0x1919c
+    ld hl, $51ca
+    call PrintText
+    ld bc,(TM_42 << 8) | 1
+    call $3e2e
+    jr nc, .asm_b655e ; 0x191aa
+    ld hl, $51cf
+    call PrintText
+    ld hl, $d74c
+    set 1, [hl]
+    jr .asm_3c73c ; 0x191b7
+.asm_b655e ; 0x191b9
+    ld hl, $51da
+    call PrintText
+    jr .asm_3c73c ; 0x191bf
+.asm_4e5a0 ; 0x191c1
+    ld hl, $51d5
+    call PrintText
+.asm_3c73c ; 0x191c7
+    jp $24d7
+
+INCBIN "baserom.gbc",$191ca,$191df - $191ca
+
+ViridianCityText7: ; 0x191df
+    db $08 ; asm
+    ld hl, $520a
+    call PrintText
+    ld c, $2
+    call $3739
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr z, .asm_42f68 ; 0x191f2
+    ld hl, $520f
+    call PrintText
+    ld a, $1
+    ld [$d5f4], a
+    jr .asm_2413a ; 0x191ff
+.asm_42f68 ; 0x19201
+    ld hl, $5214
+    call PrintText
+.asm_2413a ; 0x19207
+    jp $24d7
+
+INCBIN "baserom.gbc",$1920a,$19219 - $1920a
+
+ViridianCityText15: ; 0x19219
+INCBIN "baserom.gbc",$19219,$1921e - $19219
+
+ViridianCityText8: ; 0x1921e
+    TX_FAR _ViridianCityText8
+    db $50
+
+ViridianCityText9: ; 0x19223
+    TX_FAR _ViridianCityText9
+    db $50
+
+ViridianCityText10: ; 0x19228
+    TX_FAR _ViridianCityText10
+    db $50
+
+ViridianCityText13: ; 0x1922d
+    TX_FAR _ViridianCityText13
+    db $50
+
+ViridianCityText14:
+INCBIN "baserom.gbc",$19232,$19237 - $19232
+
+PewterCityScript: ; 0x19237
+    call $3c3c
+    ld hl, $5243
+    ld a, [$d5f7]
+    jp $3d97
+; 0x19243
+
+PewterCityScripts: ; 0x19243
+    dw PewterCityScript0
+
+INCBIN "baserom.gbc",$19245,$c
+
+PewterCityScript0: ; 0x19251
+    xor a
+    ld [$d619], a
+    ld hl, $d754
+    res 0, [hl]
+    call $525e
+    ret
+; 0x1925e
+
+INCBIN "baserom.gbc",$1925e,$12d
+
+PewterCityTexts: ; 0x1938b
+    dw PewterCityText1, PewterCityText2, PewterCityText3, PewterCityText4, PewterCityText5, PewterCityText6, PewterCityText7, PewterCityText8, PewterCityText9, PewterCityText10, PewterCityText11, PewterCityText12, PewterCityText13, PewterCityText14
+
+PewterCityText1: ; 0x193a7
+    TX_FAR _PewterCityText1
+    db $50
+
+PewterCityText2: ; 0x193ac
+    TX_FAR _PewterCityText2
+    db $50
+
+PewterCityText3: ; 0x193b1
+    db $08 ; asm
+    ld hl, $53f1
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_f46a9 ; 0x193bf
+    ld hl, $53f6
+    call PrintText
+    jr .asm_ac429 ; 0x193c7
+.asm_f46a9 ; 0x193c9
+    ld hl, $53fb
+    call PrintText
+    xor a
+    ldh [$b3], a
+    ldh [$b4], a
+    ld [$cf10], a
+    ld a, $2
+    ld [$cc57], a
+    ldh a, [$b8]
+    ld [$cc58], a
+    ld a, $3
+    ld [$cf13], a
+    call $32f4
+    ld a, $1
+    ld [$d5f7], a
+.asm_ac429 ; 0x193ee
+    jp $24d7
+
+INCBIN "baserom.gbc",$193f1,$19400 - $193f1
+
+PewterCityText13:
+INCBIN "baserom.gbc",$19400,$5
+
+PewterCityText4: ; 0x19405
+    db $8
+    ld hl, $5427
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    cp $0
+    jr nz, .asm_e4603
+    ld hl, $542c
+    call PrintText
+    jr .asm_e4604 ; 0x1941c $6
+.asm_e4603
+    ld hl, $5431
+    call PrintText
+.asm_e4604 ; 0x19424
+    jp $24d7
+; 0x19427
+
+INCBIN "baserom.gbc",$19427,$f
+
+PewterCityText5: ; 0x19436
+    db $08 ; asm
+    ld hl, $545d
+    call PrintText
+    xor a
+    ldh [$b4], a
+    ld [$cf10], a
+    ld a, $3
+    ld [$cc57], a
+    ldh a, [$b8]
+    ld [$cc58], a
+    ld a, $5
+    ld [$cf13], a
+    call $32f4
+    ld a, $4
+    ld [$d5f7], a
+    jp $24d7
+
+INCBIN "baserom.gbc",$1945d,$19462 - $1945d
+
+PewterCityText14: ; 0x19462
+INCBIN "baserom.gbc",$19462,$5
+
+PewterCityText6: ; 0x19467
+    TX_FAR _PewterCityText6
+    db $50
+
+PewterCityText7: ; 0x1946c
+    TX_FAR _PewterCityText7
+    db $50
+
+PewterCityText10: ; 0x19471
+    TX_FAR _PewterCityText10
+    db $50
+
+PewterCityText11: ; 0x19476
+    TX_FAR _PewterCityText11
+    db $50
+
+PewterCityText12: ; 0x1947b
+    TX_FAR _PewterCityText12
+    db $50
+
+CeruleanCityScript: ; 0x19480
+    call $3c3c
+    ld hl, $549d
+    ld a, [$d60f]
+    jp $3d97
+; 0x1948c
+
+INCBIN "baserom.gbc",$1948c,$1949d - $1948c
+
+CeruleanCityScripts: ; 0x1949d
+    dw CeruleanCityScript0, CeruleanCityScript1, CeruleanCityScript2, CeruleanCityScript3
+
+INCBIN "baserom.gbc",$194a5,$23
+
+CeruleanCityScript0: ; 0x194c8
+    ld a, [$d75b]
+    bit 7, a
+    jr nz, .asm_194f7 ; 0x194cd $28
+    ld hl, $554f
+    call $34bf
+    jr nc, .asm_194f7 ; 0x194d5 $20
+    ld a, [$cd3d]
+    cp $1
+    ld a, $8
+    ld b, $0
+    jr nz, .asm_194e6 ; 0x194e0 $4
+    ld a, $4
+    ld b, $4
+.asm_194e6
+    ld [$d528], a
+    ld a, b
+    ld [$c129], a
+    call Delay3
+    ld a, $2
+    ld [$ff00+$8c], a
+    jp $2920
+.asm_194f7
+    ld a, [$d75a]
+    bit 0, a
+    ret nz
+    ld hl, $5554
+    call $34bf
+    ret nc
+    ld a, [$d700]
+    and a
+    jr z, .asm_19512 ; 0x19508 $8
+    ld a, $ff
+    ld [$c0ee], a
+    call $23b1
+.asm_19512
+    ld c, $2
+    ld a, $de
+    call $23a1
+    xor a
+    ld [$ff00+$b4], a
+    ld a, $f0
+    ld [$cd6b], a
+    ld a, [$d362]
+    cp $14
+    jr z, .asm_19535 ; 0x19526 $d
+    ld a, $1
+    ld [$ff00+$8c], a
+    ld a, $5
+    ld [$ff00+$8b], a
+    call $3500
+    ld [hl], $19
+.asm_19535
+    ld a, $5
+    ld [$cc4d], a
+    ld a, $15
+    call Predef
+    ld de, $5559
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $363a
+    ld a, $1
+    ld [$d60f], a
+    ret
+; 0x1954f
+
+INCBIN "baserom.gbc",$1954f,$19567 - $1954f
+
+CeruleanCityScript1: ; 0x19567
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    xor a
+    ld [$cd6b], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $2920
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $566d
+    ld de, $5672
+    call $3354
+    ld a, $e1
+    ld [$d059], a
+    ld a, [$d715]
+    cp $b1
+    jr nz, .asm_19598 ; 0x19592 $4
+    ld a, $7
+    jr .asm_195a2 ; 0x19596 $a
+.asm_19598
+    cp $99
+    jr nz, .asm_195a0 ; 0x1959a $4
+    ld a, $8
+    jr .asm_195a2 ; 0x1959e $2
+.asm_195a0
+    ld a, $9
+.asm_195a2
+    ld [$d05d], a
+    xor a
+    ld [$ff00+$b4], a
+    call $555d
+    ld a, $2
+    ld [$d60f], a
+    ret
+; 0x195b1
+
+CeruleanCityScript2: ; 0x195b1
+    ld a, [$d057]
+    cp $ff
+    jp z, $548c
+    call $555d
+    ld a, $f0
+    ld [$cd6b], a
+    ld hl, $d75a
+    set 0, [hl]
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $2920
+    ld a, $ff
+    ld [$c0ee], a
+    call $23b1
+    ld b, $2
+    ld hl, $5b47
+    call Bankswitch
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $3541
+    ld a, [$d362]
+    cp $14
+    jr nz, .asm_195f0 ; 0x195e9 $5
+    ld de, $5608
+    jr .asm_195f3 ; 0x195ee $3
+.asm_195f0
+    ld de, $5600
+.asm_195f3
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $363a
+    ld a, $3
+    ld [$d60f], a
+    ret
+; 0x19600
+
+INCBIN "baserom.gbc",$19600,$19610 - $19600
+
+CeruleanCityScript3: ; 0x19610
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    ld a, $5
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    xor a
+    ld [$cd6b], a
+    call $2307
+    ld a, $0
+    ld [$d60f], a
+    ret
+; 0x1962d
+
+CeruleanCityTexts: ; 0x1962d
+    dw CeruleanCityText1, CeruleanCityText2, CeruleanCityText3, CeruleanCityText4, CeruleanCityText5, CeruleanCityText6, CeruleanCityText7, CeruleanCityText8, CeruleanCityText9, CeruleanCityText10, CeruleanCityText11, CeruleanCityText12, CeruleanCityText13, CeruleanCityText14, CeruleanCityText15, CeruleanCityText16, CeruleanCityText17
+
+CeruleanCityText1: ; 0x1964f
+    db $08 ; asm
+    ld a, [$d75a]
+    bit 0, a
+    jr z, .asm_a89f9 ; 0x19655
+    ld hl, $5677
+    call PrintText
+    jr .asm_815c6 ; 0x1965d
+.asm_a89f9 ; 0x1965f
+    ld hl, $5668
+    call PrintText
+.asm_815c6 ; 0x19665
+    jp $24d7
+
+INCBIN "baserom.gbc",$19668,$1967c - $19668
+
+CeruleanCityText2: ; 0x1967c
+    db $8
+    ld a, [$d75b]
+    bit 7, a
+    jr nz, .asm_4ca20 ; 0x19682 $29
+    ld hl, $56d9
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $56ee
+    ld de, $56ee
+    call $3354
+    ld a, [$ff00+$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $4
+    ld [$d60f], a
+    jp $24d7
+.asm_4ca20 ; 0x196ad
+    ld hl, $56f3
+    call PrintText
+    ld bc, $e401
+    call GiveItem
+    jr c, .asm_8bbbd ; 0x196b9 $8
+    ld hl, $56e9
+    call PrintText
+    jr .asm_e4e6f ; 0x196c1 $13
+.asm_8bbbd ; 0x196c3
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $56de
+    call PrintText
+    ld b, $1d
+    ld hl, $4872
+    call Bankswitch
+.asm_e4e6f ; 0x196d6
+    jp $24d7
+; 0x196d9
+
+INCBIN "baserom.gbc",$196d9,$1f
+
+CeruleanCityText3: ; 0x196f8
+    TX_FAR _CeruleanCityText3
+    db $50
+
+CeruleanCityText4: ; 0x196fd
+    TX_FAR _CeruleanCityText4
+    db $50
+
+CeruleanCityText5: ; 0x19702
+    TX_FAR _CeruleanCityText5
+    db $50
+
+CeruleanCityText11:
+CeruleanCityText6: ; 0x19707
+    TX_FAR _CeruleanCityText6
+    db $50
+
+CeruleanCityText7: ; 0x1970c
+    db $08 ; asm
+    ldh a, [$d3]
+    cp $b4
+    jr c, .asm_e9fc9 ; 0x19711
+    ld hl, $5730
+    call PrintText
+    jr .asm_d486e ; 0x19719
+.asm_e9fc9 ; 0x1971b
+    cp $64
+    jr c, .asm_df99b ; 0x1971d
+    ld hl, $5735
+    call PrintText
+    jr .asm_d486e ; 0x19725
+.asm_df99b ; 0x19727
+    ld hl, $573a
+    call PrintText
+.asm_d486e ; 0x1972d
+    jp $24d7
+
+INCBIN "baserom.gbc",$19730,$1973f - $19730
+
+CeruleanCityText8: ; 0x1973f
+    db $08 ; asm
+    ldh a, [$d3]
+    cp $b4
+    jr c, .asm_e28da ; 0x19744
+    ld hl, $576f
+    call PrintText
+    jr .asm_f2f38 ; 0x1974c
+.asm_e28da ; 0x1974e
+    cp $78
+    jr c, .asm_15d08 ; 0x19750
+    ld hl, $5774
+    call PrintText
+    jr .asm_f2f38 ; 0x19758
+.asm_15d08 ; 0x1975a
+    cp $3c
+    jr c, .asm_d7fea ; 0x1975c
+    ld hl, $5779
+    call PrintText
+    jr .asm_f2f38 ; 0x19764
+.asm_d7fea ; 0x19766
+    ld hl, $577e
+    call PrintText
+.asm_f2f38 ; 0x1976c
+    jp $24d7
+
+INCBIN "baserom.gbc",$1976f,$14
+
+CeruleanCityText9: ; 0x19783
+    TX_FAR _CeruleanCityText9
+    db $50
+
+CeruleanCityText10: ; 0x19788
+    TX_FAR _CeruleanCityText10
+    db $50
+
+CeruleanCityText12: ; 0x1978d
+    TX_FAR _CeruleanCityText12
+    db $50
+
+CeruleanCityText13: ; 0x19792
+    TX_FAR _CeruleanCityText13
+    db $50
+
+CeruleanCityText16: ; 0x19797
+    TX_FAR _CeruleanCityText16
+    db $50
+
+CeruleanCityText17: ; 0x1979c
+    TX_FAR _CeruleanCityText17
+    db $50
+
+VermilionCityScript: ; 0x197a1
+    call $3c3c
+    ld hl, $d126
+    bit 6, [hl]
+    res 6, [hl]
+    push hl
+    call nz, $57cb
+    pop hl
+    bit 5, [hl]
+    res 5, [hl]
+    call nz, $57c0
+    ld hl, $57dc
+    ld a, [$d62a]
+    jp $3d97
+; 0x197c0
+
+INCBIN "baserom.gbc",$197c0,$197dc - $197c0
+
+VermilionCityScripts: ; 0x197dc
+    dw VermilionCityScript0, VermilionCityScript1
+
+INCBIN "baserom.gbc",$197e0,$6
+
+VermilionCityScript0: ; 0x197e6
+    ld a, [$c109]
+    and a
+    ret nz
+    ld hl, $5823
+    call $34bf
+    ret nc
+    xor a
+    ld [$ff00+$b4], a
+    ld [$cf0d], a
+    ld a, $3
+    ld [$ff00+$8c], a
+    call $2920
+    ld a, [$d803]
+    bit 2, a
+    jr nz, .asm_19810 ; 0x19804 $a
+    ld b, $3f
+    ld a, $1c
+    call Predef
+    ld a, b
+    and a
+    ret nz
+.asm_19810
+    ld a, $40
+    ld [$ccd3], a
+    ld a, $1
+    ld [$cd38], a
+    call $3486
+    ld a, $1
+    ld [$d62a], a
+    ret
+; 0x19823
+
+INCBIN "baserom.gbc",$19823,$1985f - $19823
+
+VermilionCityScript1: ; 0x1985f
+    ld a, [$cd38]
+    and a
+    ret nz
+    ld c, $a
+    call $3739
+    ld a, $0
+    ld [$d62a], a
+    ret
+; 0x1986f
+
+VermilionCityTexts: ; 0x1986f
+    dw VermilionCityText1, VermilionCityText2, VermilionCityText3, VermilionCityText4, VermilionCityText5, VermilionCityText6, VermilionCityText7, VermilionCityText8, VermilionCityText9, VermilionCityText10, VermilionCityText11, VermilionCityText12, VermilionCityText13
+
+VermilionCityText1: ; 0x19889
+    TX_FAR _VermilionCityText1
+    db $50
+
+VermilionCityText2: ; 0x1988e
+    db $08 ; asm
+    ld a, [$d803]
+    bit 2, a
+    jr nz, .asm_359bd ; 0x19894
+    ld hl, $58a7
+    call PrintText
+    jr .asm_735d9 ; 0x1989c
+.asm_359bd ; 0x1989e
+    ld hl, $58ac
+    call PrintText
+.asm_735d9 ; 0x198a4
+    jp $24d7
+
+INCBIN "baserom.gbc",$198a7,$198b1 - $198a7
+
+VermilionCityText3: ; 0x198b1
+    db $08 ; asm
+    ld a, [$d803]
+    bit 2, a
+    jr nz, .asm_3e0e9 ; 0x198b7
+    ld a, [$c109]
+    cp $c
+    jr z, .asm_07af3 ; 0x198be
+    ld hl, $58ff
+    call $34bf
+    jr nc, .asm_57b73 ; 0x198c6
+.asm_07af3 ; 0x198c8
+    ld hl, $5904
+    call PrintText
+    jr .asm_79bd1 ; 0x198ce
+.asm_57b73 ; 0x198d0
+    ld hl, $5909
+    call PrintText
+    ld b, $3f
+    ld a, $1c
+    call Predef
+    ld a, b
+    and a
+    jr nz, .asm_0419b ; 0x198df
+    ld hl, $5913
+    call PrintText
+    jr .asm_79bd1 ; 0x198e7
+.asm_0419b ; 0x198e9
+    ld hl, $590e
+    call PrintText
+    ld a, $4
+    ld [$d62a], a
+    jr .asm_79bd1 ; 0x198f4
+.asm_3e0e9 ; 0x198f6
+    ld hl, $5918
+    call PrintText
+.asm_79bd1 ; 0x198fc
+    jp $24d7
+
+INCBIN "baserom.gbc",$198ff,$1e
+
+VermilionCityText4: ; 0x1991d
+    TX_FAR _VermilionCityText4
+    db $50
+
+VermilionCityText5: ; 0x19922
+    TX_FAR _VermilionCityText5
+    db $08 ; asm
+    ld a, $6a
+    call $13d0
+    call $3748
+    ld hl, $5933
+    ret
+
+;db $17, $6b, $58, $29, $50
+INCBIN "baserom.gbc",$19933,$5
+
+VermilionCityText6: ; 0x19938
+    TX_FAR _VermilionCityText6
+    db $50
+
+VermilionCityText7: ; 0x1993d
+    TX_FAR _VermilionCityText7
+    db $50
+
+VermilionCityText8: ; 0x19942
+    TX_FAR _VermilionCityText8
+    db $50
+
+VermilionCityText11: ; 0x19947
+    TX_FAR _VermilionCityText11
+    db $50
+
+VermilionCityText12: ; 0x1994c
+    TX_FAR _VermilionCityText12
+    db $50
+
+VermilionCityText13: ; 0x19951
+    TX_FAR _VermilionCityText13
+    db $50
+
+CeladonCityScript: ; 0x19956
+    call $3c3c
+    ld hl, $d77e
+    res 0, [hl]
+    res 7, [hl]
+    ld hl, $d816
+    res 7, [hl]
+    ret
+; 0x19966
+
+CeladonCityTexts: ; 0x19966
+    dw CeladonCityText1, CeladonCityText2, CeladonCityText3, CeladonCityText4, CeladonCityText5, CeladonCityText6, CeladonCityText7, CeladonCityText8, CeladonCityText9, CeladonCityText10, CeladonCityText11, CeladonCityText12, CeladonCityText13, CeladonCityText14, CeladonCityText15, CeladonCityText16, CeladonCityText17, CeladonCityText18
+
+CeladonCityText1: ; 0x1998a
+    TX_FAR _CeladonCityText1
+    db $50
+
+CeladonCityText2: ; 0x1998f
+    TX_FAR _CeladonCityText2
+    db $50
+
+CeladonCityText3: ; 0x19994
+    TX_FAR _CeladonCityText3
+    db $50
+
+CeladonCityText4: ; 0x19999
+    TX_FAR _CeladonCityText4
+    db $50
+
+CeladonCityText5: ; 0x1999e
+    db $08 ; asm
+    ld a, [$d777]
+    bit 0, a
+    jr nz, .asm_7053f ; 0x199a4
+    ld hl, $59d2
+    call PrintText
+    ld bc,(TM_41 << 8) | 1
+    call $3e2e
+    jr c, .asm_890ec ; 0x199b2
+    ld hl, $59e2
+    call PrintText
+    jr .asm_c765a ; 0x199ba
+.asm_890ec ; 0x199bc
+    ld hl, $59d7
+    call PrintText
+    ld hl, $d777
+    set 0, [hl]
+    jr .asm_c765a ; 0x199c7
+.asm_7053f ; 0x199c9
+    ld hl, $59dd
+    call PrintText
+.asm_c765a ; 0x199cf
+    jp $24d7
+
+INCBIN "baserom.gbc",$199d2,$15
+
+CeladonCityText6: ; 0x199e7
+    TX_FAR _CeladonCityText6
+    db $50
+
+CeladonCityText7: ; 0x199ec
+    TX_FAR _CeladonCityText7
+    db $08 ; asm
+    ld a, $6f
+    call $13d0
+    jp $24d7
+
+CeladonCityText8: ; 0x199f9
+    TX_FAR _CeladonCityText8
+    db $50
+
+CeladonCityText9: ; 0x199fe
+    TX_FAR _CeladonCityText9
+    db $50
+
+CeladonCityText10: ; 0x19a03
+    TX_FAR _CeladonCityText10
+    db $50
+
+CeladonCityText11: ; 0x19a08
+    TX_FAR _CeladonCityText11
+    db $50
+
+CeladonCityText13: ; 0x19a0d
+    TX_FAR _CeladonCityText13
+    db $50
+
+CeladonCityText14: ; 0x19a12
+    TX_FAR _CeladonCityText14
+    db $50
+
+CeladonCityText15: ; 0x19a17
+    TX_FAR _CeladonCityText15
+    db $50
+
+CeladonCityText16: ; 0x19a1c
+    TX_FAR _CeladonCityText16
+    db $50
+
+CeladonCityText17: ; 0x19a21
+    TX_FAR _CeladonCityText17
+    db $50
+
+CeladonCityText18: ; 0x19a26
+    TX_FAR _CeladonCityText18
+    db $50
+
+FuchsiaCityScript: ; 0x19a2b
+    jp $3c3c
+; 0x19a2e
+
+FuchsiaCityTexts: ; 0x19a2e
+    dw FuchsiaCityText1, FuchsiaCityText2, FuchsiaCityText3, FuchsiaCityText4, FuchsiaCityText5, FuchsiaCityText6, FuchsiaCityText7, FuchsiaCityText8, FuchsiaCityText9, FuchsiaCityText10, FuchsiaCityText11, FuchsiaCityText12, FuchsiaCityText13, FuchsiaCityText14, FuchsiaCityText15, FuchsiaCityText16, FuchsiaCityText17, FuchsiaCityText18, FuchsiaCityText19, FuchsiaCityText20, FuchsiaCityText21, FuchsiaCityText22, FuchsiaCityText23, FuchsiaCityText24
+
+FuchsiaCityText1: ; 0x19a5e
+    TX_FAR _FuchsiaCityText1
+    db $50
+
+FuchsiaCityText2: ; 0x19a63
+    TX_FAR _FuchsiaCityText2
+    db $50
+
+FuchsiaCityText3: ; 0x19a68
+    TX_FAR _FuchsiaCityText3
+    db $50
+
+FuchsiaCityText4: ; 0x19a6d
+    TX_FAR _FuchsiaCityText4
+    db $50
+
+FuchsiaCityText5: ; 0x19a72
+FuchsiaCityText6:
+FuchsiaCityText7:
+FuchsiaCityText8:
+FuchsiaCityText9:
+FuchsiaCityText10: ; 0x19a72
+    TX_FAR _FuchsiaCityText5
+    db $50
+
+FuchsiaCityText12:
+FuchsiaCityText11: ; 0x19a77
+    TX_FAR _FuchsiaCityText11
+    db $50
+
+FuchsiaCityText13: ; 0x19a7c
+    TX_FAR _FuchsiaCityText13
+    db $50
+
+FuchsiaCityText16: ; 0x19a81
+    TX_FAR _FuchsiaCityText16
+    db $50
+
+FuchsiaCityText17: ; 0x19a86
+    TX_FAR _FuchsiaCityText17
+    db $50
+
+FuchsiaCityText18: ; 0x19a8b
+    TX_FAR _FuchsiaCityText18
+    db $50
+
+FuchsiaCityText19: ; 0x19a90
+    db $08 ; asm
+    ld hl, $5a9f
+    call PrintText
+    ld a, $28
+    call $349b
+    jp $24d7
+
+INCBIN "baserom.gbc",$19a9f,$19aa4 - $19a9f
+
+FuchsiaCityText20: ; 0x19aa4
+    db $08 ; asm
+    ld hl, $5ab3
+    call PrintText
+    ld a, $6
+    call $349b
+    jp $24d7
+
+INCBIN "baserom.gbc",$19ab3,$19ab8 - $19ab3
+
+FuchsiaCityText21: ; 0x19ab8
+    db $08 ; asm
+    ld hl, $5ac7
+    call PrintText
+    ld a, $2
+    call $349b
+    jp $24d7
+
+INCBIN "baserom.gbc",$19ac7,$19acc - $19ac7
+
+FuchsiaCityText22: ; 0x19acc
+    db $08 ; asm
+    ld hl, $5adb
+    call PrintText
+    ld a, $25
+    call $349b
+    jp $24d7
+
+INCBIN "baserom.gbc",$19adb,$19ae0 - $19adb
+
+FuchsiaCityText23: ; 0x19ae0
+    db $08 ; asm
+    ld hl, $5aef
+    call PrintText
+    ld a, $13
+    call $349b
+    jp $24d7
+
+INCBIN "baserom.gbc",$19aef,$19af4 - $19aef
+
+FuchsiaCityText24: ; 0x19af4
+    db $08 ; asm
+    ld a, [$d7f6]
+    bit 6, a
+    jr nz, .asm_3b4e8 ; 0x19afa
+    bit 7, a
+    jr nz, .asm_667d5 ; 0x19afe
+    ld hl, $5b2a
+    call PrintText
+    jr .asm_4343f ; 0x19b06
+.asm_3b4e8 ; 0x19b08
+    ld hl, $5b20
+    call PrintText
+    ld a, $62
+    jr .asm_81556 ; 0x19b10
+.asm_667d5 ; 0x19b12
+    ld hl, $5b25
+    call PrintText
+    ld a, $5a
+.asm_81556 ; 0x19b1a
+    call $349b
+.asm_4343f ; 0x19b1d
+    jp $24d7
+
+INCBIN "baserom.gbc",$19b20,$f
+
+BluesHouse_h: ; 0x19b2f
+	db $08 ; tileset
+	db $04,$04 ; dimensions
+	dw BluesHouseBlocks, BluesHouseTexts, BluesHouseScript
+	db 0
+	dw BluesHouseObject
+
+BluesHouseScript:
+	call $3C3C
+	ld hl,BluesHouseScriptPointers
+	ld a,[$D5F3]
+	jp $3D97
+
+BluesHouseScriptPointers:
+	dw BluesHouseScript1,BluesHouseScript2
+
+BluesHouseScript1:
+	ld hl,$D74A
+	set 1,[hl]
+
+	; trigger the next script
+	ld a,1
+	ld [$D5F3],a
+	ret
+
+BluesHouseScript2:
+	ret
+
+BluesHouseTexts: ; 0x19B57
+	dw BluesHouseText1,BluesHouseText2,BluesHouseText3
+
+BluesHouseText1: ; 5B5D 0x19B5D
+	db 8
+	ld a,[$D74A]
+	bit 0,a
+	jr nz,.GotMap\@
+	ld a,[$D74B]
+	bit 5,a
+	jr nz,.GiveMap\@
+	ld hl,DaisyInitialText
+	call PrintText
+	jr .done\@
+.GiveMap\@
+	ld hl,DaisyOfferMapText
+	call PrintText
+	ld bc,(TOWN_MAP << 8) | 1
+	call $3E2E
+	jr nc,.BagFull\@
+	ld a,$29
+	ld [$CC4D],a
+	ld a,$11
+	call Predef ; hide table map object
+	ld hl,GotMapText
+	call PrintText
+	ld hl,$D74A
+	set 0,[hl]
+	jr .done\@
+.GotMap\@
+	ld hl,DaisyUseMapText
+	call PrintText
+	jr .done\@
+.BagFull\@
+	ld hl,DaisyBagFullText
+	call PrintText
+.done\@
+	jp $24D7
+
+DaisyInitialText:
+	TX_FAR _DaisyInitialText
+	db "@"
+DaisyOfferMapText:
+	TX_FAR _DaisyOfferMapText
+	db "@"
+GotMapText:
+	TX_FAR _GotMapText
+	db $11,"@"
+DaisyBagFullText:
+	TX_FAR _DaisyBagFullText
+	db "@"
+DaisyUseMapText:
+	TX_FAR _DaisyUseMapText
+	db "@"
+BluesHouseText2: ; Daisy, walking around
+	TX_FAR _BluesHouseText2
+	db "@"
+BluesHouseText3: ; map on table
+	TX_FAR _BluesHouseText3
+	db "@"
+
+BluesHouseObject:
+	db $0A ; border tile
+
+	db 2 ; warps
+	db 7,2,1,$FF
+	db 7,3,1,$FF
+
+	db 0 ; signs
+
+	db 3 ; people
+	db $11,4+3,4+2,$FF,$D3,1 ; Daisy, sitting by map
+	db $11,4+4,4+6,$FE,1,ITEM|2,0 ; map on table
+	db $41,4+3,4+3,$FF,$FF,ITEM|3,0 ; Daisy, walking around
+
+	; warp-to
+	dw $C712
+	db 7,2
+
+	dw $C712
+	db 7,3
+
+BluesHouseBlocks:
+	INCBIN "maps/blueshouse.blk"
+
+VermilionHouse3_h: ; 0x19c06 to 0x19c12 (12 bytes) (bank=6) (id=196)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw VermilionHouse3Blocks, VermilionHouse3Texts, VermilionHouse3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VermilionHouse3Object ; objects
+
+VermilionHouse3Script: ; 0x19c12
+    jp $3c3c
+; 0x19c15
+
+VermilionHouse3Texts: ; 0x19c15
+    dw VermilionHouse3Text1
+
+VermilionHouse3Text1: ; 0x19c17
+    db $08 ; asm
+    ld a, $4
+    ld [W_WHICHTRADE], a
+    ld a, $54
+    call Predef
+    jp $24d7
+
+VermilionHouse3Object: ; 0x19c25 (size=26)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $7, $ff
+    db $7, $3, $7, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_LITTLE_GIRL, $5 + 4, $3 + 4, $ff, $d1, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+VermilionHouse3Blocks: ; 16
+    INCBIN "maps/vermilionhouse3.blk"
+
+IndigoPlateauLobby_h: ; 0x19c4f to 0x19c5b (12 bytes) (bank=6) (id=174)
+    db $02 ; tileset
+    db $06, $08 ; dimensions (y, x)
+    dw IndigoPlateauLobbyBlocks, IndigoPlateauLobbyTexts, IndigoPlateauLobbyScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw IndigoPlateauLobbyObject ; objects
+
+IndigoPlateauLobbyScript: ; 0x19c5b
+    call $22fa
+    call $3c3c
+    ld hl, $d126
+    bit 6, [hl]
+    res 6, [hl]
+    ret z
+    ld hl, $d869
+    res 7, [hl]
+    ld hl, $d734
+    bit 1, [hl]
+    res 1, [hl]
+    ret z
+    ld hl, $d863
+    xor a
+    ld [hli], a
+    ld [hli], a
+    ld [hli], a
+    ld [hl], a
+    ret
+; 0x19c7f
+
+IndigoPlateauLobbyTexts:
+INCBIN "baserom.gbc",$19c7f,$b
+
+IndigoPlateauLobbyText2:
+IndigoPlateauLobbyText1: ; 0x19c8a
+    TX_FAR _IndigoPlateauLobbyText1
+    db $50
+
+INCBIN "baserom.gbc",$19c8f,$19c8f - $19c8f
+
+IndigoPlateauLobbyText3: ; 0x19c8f
+    TX_FAR _IndigoPlateauLobbyText3
+    db $50
+
+IndigoPlateauLobbyText5:
+    db $f6
+
+IndigoPlateauLobbyObject: ; 0x19c95 (size=58)
+    db $0 ; border tile
+
+    db $3 ; warps
+    db $b, $7, $0, $ff
+    db $b, $8, $1, $ff
+    db $0, $8, $0, LORELEIS_ROOM
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_NURSE, $5 + 4, $7 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GYM_HELPER, $9 + 4, $4 + 4, $ff, $d3, $2 ; person
+    db SPRITE_LASS, $1 + 4, $5 + 4, $ff, $d0, $3 ; person
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $4 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $6 + 4, $d + 4, $ff, $d0, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $8, $b, $7
+    EVENT_DISP $8, $b, $8
+    EVENT_DISP $8, $0, $8 ; LORELEIS_ROOM
+
+IndigoPlateauLobbyBlocks: ; 48
+    INCBIN "maps/indigoplateaulobby.blk"
+
+SilphCo4_h: ; 0x19cff to 0x19d0b (12 bytes) (bank=6) (id=209)
+    db $16 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SilphCo4Blocks, SilphCo4Texts, SilphCo4Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo4Object ; objects
+
+SilphCo4Script: ; 0x19d0b
+    call $5d21
+    call $3c3c
+    ld hl, $5dae
+    ld de, $5d9a
+    ld a, [$d645]
+    call $3160
+    ld [$d645], a
+    ret
+; 0x19d21
+
+INCBIN "baserom.gbc",$19d21,$7f
+
+SilphCo4Texts: ; 0x19da0
+    dw SilphCo4Text1, SilphCo4Text2, SilphCo4Text3, SilphCo4Text4, SilphCo4Text5, SilphCo4Text6, SilphCo4Text7
+
+INCBIN "baserom.gbc",$19dae,$25
+
+SilphCo4Text1: ; 0x19dd3
+    db $08 ; asm
+    ld hl, $5de0
+    ld de, $5de5
+    call $622f
+    jp $24d7
+
+INCBIN "baserom.gbc",$19de0,$19dea - $19de0
+
+SilphCo4Text2: ; 0x19dea
+    db $08 ; asm
+    ld hl, $5dae
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$19df4,$19e03 - $19df4
+
+SilphCo4Text3: ; 0x19e03
+    db $08 ; asm
+    ld hl, $5dba
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$19e0d,$19e1c - $19e0d
+
+SilphCo4Text4: ; 0x19e1c
+    db $08 ; asm
+    ld hl, $5dc6
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$19e26,$f
+
+SilphCo4Object: ; 0x19e35 (size=111)
+    db $2e ; border tile
+
+    db $7 ; warps
+    db $0, $18, $1, SILPH_CO_3F
+    db $0, $1a, $1, SILPH_CO_5F
+    db $0, $14, $0, SILPH_CO_ELEVATOR
+    db $7, $b, $3, SILPH_CO_10F
+    db $3, $11, $3, SILPH_CO_6F
+    db $f, $3, $4, SILPH_CO_10F
+    db $b, $11, $5, SILPH_CO_10F
+
+    db $0 ; signs
+
+    db $7 ; people
+    db SPRITE_LAPRAS_GIVER, $2 + 4, $6 + 4, $ff, $ff, $1 ; person
+    db SPRITE_ROCKET, $e + 4, $9 + 4, $ff, $d3, $42, ROCKET + $C8, $1a ; trainer
+    db SPRITE_OAK_AIDE, $6 + 4, $e + 4, $ff, $d2, $43, SCIENTIST + $C8, $5 ; trainer
+    db SPRITE_ROCKET, $a + 4, $1a + 4, $ff, $d1, $44, ROCKET + $C8, $1b ; trainer
+	db SPRITE_BALL, $9 + 4, $3 + 4, $ff, $ff, $85, FULL_HEAL ; item
+	db SPRITE_BALL, $7 + 4, $4 + 4, $ff, $ff, $86, MAX_REVIVE ; item
+	db SPRITE_BALL, $8 + 4, $5 + 4, $ff, $ff, $87, ESCAPE_ROPE ; item
+
+    ; warp-to
+    EVENT_DISP $f, $0, $18 ; SILPH_CO_3F
+    EVENT_DISP $f, $0, $1a ; SILPH_CO_5F
+    EVENT_DISP $f, $0, $14 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $f, $7, $b ; SILPH_CO_10F
+    EVENT_DISP $f, $3, $11 ; SILPH_CO_6F
+    EVENT_DISP $f, $f, $3 ; SILPH_CO_10F
+    EVENT_DISP $f, $b, $11 ; SILPH_CO_10F
+
+SilphCo4Blocks: ; 135
+    INCBIN "maps/silphco4.blk"
+
+SilphCo5_h: ; 0x19f2b to 0x19f37 (12 bytes) (bank=6) (id=210)
+    db $16 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SilphCo5Blocks, SilphCo5Texts, SilphCo5Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo5Object ; objects
+
+SilphCo5Script: ; 0x19f37
+    call $5f4d
+    call $3c3c
+    ld hl, $5fd2
+    ld de, $5fb6
+    ld a, [$d646]
+    call $3160
+    ld [$d646], a
+    ret
+; 0x19f4d
+
+INCBIN "baserom.gbc",$19f4d,$6f
+
+SilphCo5Texts: ; 0x19fbc
+    dw SilphCo5Text1, SilphCo5Text2, SilphCo5Text3, SilphCo5Text4, SilphCo5Text5, SilphCo5Text6, SilphCo5Text7, SilphCo5Text8, SilphCo5Text9, SilphCo5Text10, SilphCo5Text11
+
+INCBIN "baserom.gbc",$19fd2,$31
+
+SilphCo5Text1: ; 0x1a003
+    db $08 ; asm
+    ld hl, $6010
+    ld de, $6015
+    call $622f
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a010,$1a01a - $1a010
+
+SilphCo5Text2: ; 0x1a01a
+    db $08 ; asm
+    ld hl, $5fd2
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a024,$1a033 - $1a024
+
+SilphCo5Text3: ; 0x1a033
+    db $08 ; asm
+    ld hl, $5fde
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a03d,$1a04c - $1a03d
+
+SilphCo5Text4: ; 0x1a04c
+    db $08 ; asm
+    ld hl, $5fea
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a056,$1a065 - $1a056
+
+SilphCo5Text5: ; 0x1a065
+    db $08 ; asm
+    ld hl, $5ff6
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a06f,$f
+
+SilphCo5Text9: ; 0x1a07e
+    TX_FAR _SilphCo5Text9
+    db $50
+
+SilphCo5Text10: ; 0x1a083
+    TX_FAR _SilphCo5Text10
+    db $50
+
+SilphCo5Text11: ; 0x1a088
+    TX_FAR _SilphCo5Text11
+    db $50
+
+SilphCo5Object: ; 0x1a08d (size=137)
+    db $2e ; border tile
+
+    db $7 ; warps
+    db $0, $18, $1, SILPH_CO_6F
+    db $0, $1a, $1, SILPH_CO_4F
+    db $0, $14, $0, SILPH_CO_ELEVATOR
+    db $3, $1b, $5, SILPH_CO_7F
+    db $f, $9, $4, SILPH_CO_9F
+    db $5, $b, $4, SILPH_CO_3F
+    db $f, $3, $5, SILPH_CO_3F
+
+    db $0 ; signs
+
+    db $b ; people
+    db SPRITE_LAPRAS_GIVER, $9 + 4, $d + 4, $ff, $ff, $1 ; person
+    db SPRITE_ROCKET, $10 + 4, $8 + 4, $ff, $d3, $42, ROCKET + $C8, $1c ; trainer
+    db SPRITE_OAK_AIDE, $3 + 4, $8 + 4, $ff, $d3, $43, SCIENTIST + $C8, $6 ; trainer
+    db SPRITE_ROCKER, $a + 4, $12 + 4, $ff, $d1, $44, JUGGLER + $C8, $1 ; trainer
+    db SPRITE_ROCKET, $4 + 4, $1c + 4, $ff, $d1, $45, ROCKET + $C8, $1d ; trainer
+	db SPRITE_BALL, $d + 4, $2 + 4, $ff, $ff, $86, TM_09 ; item
+	db SPRITE_BALL, $6 + 4, $4 + 4, $ff, $ff, $87, PROTEIN ; item
+	db SPRITE_BALL, $10 + 4, $15 + 4, $ff, $ff, $88, CARD_KEY ; item
+    db SPRITE_CLIPBOARD, $c + 4, $16 + 4, $ff, $ff, $9 ; person
+    db SPRITE_CLIPBOARD, $a + 4, $19 + 4, $ff, $ff, $a ; person
+    db SPRITE_CLIPBOARD, $6 + 4, $18 + 4, $ff, $ff, $b ; person
+
+    ; warp-to
+    EVENT_DISP $f, $0, $18 ; SILPH_CO_6F
+    EVENT_DISP $f, $0, $1a ; SILPH_CO_4F
+    EVENT_DISP $f, $0, $14 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $f, $3, $1b ; SILPH_CO_7F
+    EVENT_DISP $f, $f, $9 ; SILPH_CO_9F
+    EVENT_DISP $f, $5, $b ; SILPH_CO_3F
+    EVENT_DISP $f, $f, $3 ; SILPH_CO_3F
+
+SilphCo5Blocks: ; 135
+    INCBIN "maps/silphco5.blk"
+
+SilphCo6_h: ; 0x1a19d to 0x1a1a9 (12 bytes) (bank=6) (id=211)
+    db $16 ; tileset
+    db $09, $0d ; dimensions (y, x)
+    dw SilphCo6Blocks, SilphCo6Texts, SilphCo6Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo6Object ; objects
+
+SilphCo6Script: ; 0x1a1a9
+    call $61bf
+    call $3c3c
+    ld hl, $620a
+    ld de, $61f0
+    ld a, [$d647]
+    call $3160
+    ld [$d647], a
+    ret
+; 0x1a1bf
+
+INCBIN "baserom.gbc",$1a1bf,$37
+
+SilphCo6Texts: ; 0x1a1f6
+    dw SilphCo6Text1, SilphCo6Text2, SilphCo6Text3, SilphCo6Text4, SilphCo6Text5, SilphCo6Text6, SilphCo6Text7, SilphCo6Text8, SilphCo6Text9, SilphCo6Text10
+
+INCBIN "baserom.gbc",$1a20a,$33
+
+SilphCo6Text1: ; 0x1a23d
+    db $08 ; asm
+    ld hl, $624a
+    ld de, $624f
+    call $622f
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a24a,$1a254 - $1a24a
+
+SilphCo6Text2: ; 0x1a254
+    db $08 ; asm
+    ld hl, $6261
+    ld de, $6266
+    call $622f
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a261,$1a26b - $1a261
+
+SilphCo6Text3: ; 0x1a26b
+    db $08 ; asm
+    ld hl, $6278
+    ld de, $627d
+    call $622f
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a278,$1a282 - $1a278
+
+SilphCo6Text4: ; 0x1a282
+    db $08 ; asm
+    ld hl, $628f
+    ld de, $6294
+    call $622f
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a28f,$1a299 - $1a28f
+
+SilphCo6Text5: ; 0x1a299
+    db $08 ; asm
+    ld hl, $62a6
+    ld de, $62ab
+    call $622f
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a2a6,$1a2b0 - $1a2a6
+
+SilphCo6Text6: ; 0x1a2b0
+    db $08 ; asm
+    ld hl, $620a
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a2ba,$1a2c9 - $1a2ba
+
+SilphCo6Text7: ; 0x1a2c9
+    db $08 ; asm
+    ld hl, $6216
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a2d3,$1a2e2 - $1a2d3
+
+SilphCo6Text8: ; 0x1a2e2
+    db $08 ; asm
+    ld hl, $6222
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$1a2ec,$f
+
+SilphCo6Object: ; 0x1a2fb (size=112)
+    db $2e ; border tile
+
+    db $5 ; warps
+    db $0, $10, $1, SILPH_CO_7F
+    db $0, $e, $0, SILPH_CO_5F
+    db $0, $12, $0, SILPH_CO_ELEVATOR
+    db $3, $3, $4, SILPH_CO_4F
+    db $3, $17, $6, SILPH_CO_2F
+
+    db $0 ; signs
+
+    db $a ; people
+    db SPRITE_LAPRAS_GIVER, $6 + 4, $a + 4, $ff, $ff, $1 ; person
+    db SPRITE_LAPRAS_GIVER, $6 + 4, $14 + 4, $ff, $ff, $2 ; person
+    db SPRITE_ERIKA, $6 + 4, $15 + 4, $ff, $d0, $3 ; person
+    db SPRITE_ERIKA, $a + 4, $b + 4, $ff, $d3, $4 ; person
+    db SPRITE_LAPRAS_GIVER, $d + 4, $12 + 4, $ff, $d1, $5 ; person
+    db SPRITE_ROCKET, $3 + 4, $11 + 4, $ff, $d3, $46, ROCKET + $C8, $1e ; trainer
+    db SPRITE_OAK_AIDE, $8 + 4, $7 + 4, $ff, $d0, $47, SCIENTIST + $C8, $7 ; trainer
+    db SPRITE_ROCKET, $f + 4, $e + 4, $ff, $d2, $48, ROCKET + $C8, $1f ; trainer
+	db SPRITE_BALL, $c + 4, $3 + 4, $ff, $ff, $89, HP_UP ; item
+	db SPRITE_BALL, $f + 4, $2 + 4, $ff, $ff, $8a, X_ACCURACY ; item
+
+    ; warp-to
+    EVENT_DISP $d, $0, $10 ; SILPH_CO_7F
+    EVENT_DISP $d, $0, $e ; SILPH_CO_5F
+    EVENT_DISP $d, $0, $12 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $d, $3, $3 ; SILPH_CO_4F
+    EVENT_DISP $d, $3, $17 ; SILPH_CO_2F
+
+SilphCo6Blocks: ; 117
+    INCBIN "maps/silphco6.blk"
+
+INCBIN "baserom.gbc",$1a3e0,$1c20
+
+SECTION "bank7",DATA,BANK[$7]
+
+CinnabarIsland_h: ; 0x1c000 to 0x1c022 (34 bytes) (bank=7) (id=8)
+    db $00 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw CinnabarIslandBlocks, CinnabarIslandTexts, CinnabarIslandScript ; blocks, texts, scripts
+    db NORTH | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_21
+    dw $5211, $c6eb ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $59, $00 ; alignments (y, x)
+    dw $c9b9 ; window
+
+	db ROUTE_20
+    dw $417d, $c725 ; pointers (connected, current) (strip)
+    db $09, $32 ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c721 ; window
+
+    ; end connection data
+
+    dw CinnabarIslandObject ; objects
+
+CinnabarIslandObject: ; 0x1c022 (size=71)
+    db $43 ; border tile
+
+    db $5 ; warps
+    db $3, $6, $1, MANSION_1
+    db $3, $12, $0, CINNABAR_GYM
+    db $9, $6, $0, CINNABAR_LAB_1
+    db $b, $b, $0, CINNABAR_POKECENTER
+    db $b, $f, $0, CINNABAR_MART
+
+    db $5 ; signs
+    db $5, $9, $3 ; CinnabarIslandText3
+    db $b, $10, $4 ; CinnabarIslandText4
+    db $b, $c, $5 ; CinnabarIslandText5
+    db $b, $9, $6 ; CinnabarIslandText6
+    db $3, $d, $7 ; CinnabarIslandText7
+
+    db $2 ; people
+    db SPRITE_GIRL, $5 + 4, $c + 4, $fe, $2, $1 ; person
+    db SPRITE_GAMBLER, $6 + 4, $e + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $3, $6 ; MANSION_1
+    EVENT_DISP $a, $3, $12 ; CINNABAR_GYM
+    EVENT_DISP $a, $9, $6 ; CINNABAR_LAB_1
+    EVENT_DISP $a, $b, $b ; CINNABAR_POKECENTER
+    EVENT_DISP $a, $b, $f ; CINNABAR_MART
+
+CinnabarIslandBlocks: ; 90
+    INCBIN "maps/cinnabarisland.blk"
+
+Route1_h: ; 0x1c0c3 to 0x1c0e5 (34 bytes) (bank=7) (id=12)
+    db $00 ; tileset
+    db $12, $0a ; dimensions (y, x)
+    dw Route1Blocks, Route1Texts, Route1Script ; blocks, texts, scripts
+    db NORTH | SOUTH ; connections
+
+    ; connections data
+
+	db VIRIDIAN_CITY
+    dw $451a, $c6e8 ; pointers (connected, current) (strip)
+    db $10, $14 ; bigness, width
+    db $23, $0a ; alignments (y, x)
+    dw $c8bd ; window
+
+	db PALLET_TOWN
+    dw $42fd, $c83b ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+    ; end connection data
+
+    dw Route1Object ; objects
+
+Route1Object: ; 0x1c0e5 (size=19)
+    db $b ; border tile
+
+    db $0 ; warps
+
+    db $1 ; signs
+    db $1b, $9, $3 ; Route1Text3
+
+    db $2 ; people
+    db SPRITE_BUG_CATCHER, $18 + 4, $5 + 4, $fe, $1, $1 ; person
+    db SPRITE_BUG_CATCHER, $d + 4, $f + 4, $fe, $2, $2 ; person
+
+INCBIN "baserom.gbc",$1c0f8,$4
+
+Route1Blocks: ; 180
+    INCBIN "maps/route1.blk"
+
+UndergroundPathEntranceRoute8Blocks: ; 16
+    INCBIN "maps/undergroundpathentranceroute8.blk"
+
+OaksLabBlocks: ; 30
+    INCBIN "maps/oakslab.blk"
+
+Route16HouseBlocks:
+Route2HouseBlocks:
+SaffronHouse1Blocks:
+SaffronHouse2Blocks:
+VermilionHouse1Blocks:
+NameRaterBlocks:
+LavenderHouse1Blocks:
+LavenderHouse2Blocks:
+CeruleanHouse2Blocks:
+PewterHouse1Blocks:
+PewterHouse2Blocks:
+ViridianHouseBlocks: ; 16 0x1c1de 41DE
+    INCBIN "maps/viridianhouse.blk"
+
+CeladonMansion5Blocks:
+SchoolBlocks: ; 16 0x1c1ee 41EE
+    INCBIN "maps/school.blk"
+
+CeruleanHouseTrashedBlocks: ; 16
+    INCBIN "maps/ceruleanhousetrashed.blk"
+
+DiglettsCaveEntranceRoute11Blocks:
+DiglettsCaveRoute2Blocks: ; 16
+    INCBIN "maps/diglettscaveroute2.blk"
+
+MonsterNames: ; 421E
+	db "RHYDON@@@@"
+	db "KANGASKHAN"
+	db "NIDORAN♂@@"
+	db "CLEFAIRY@@"
+	db "SPEAROW@@@"
+	db "VOLTORB@@@"
+	db "NIDOKING@@"
+	db "SLOWBRO@@@"
+	db "IVYSAUR@@@"
+	db "EXEGGUTOR@"
+	db "LICKITUNG@"
+	db "EXEGGCUTE@"
+	db "GRIMER@@@@"
+	db "GENGAR@@@@"
+	db "NIDORAN♀@@"
+	db "NIDOQUEEN@"
+	db "CUBONE@@@@"
+	db "RHYHORN@@@"
+	db "LAPRAS@@@@"
+	db "ARCANINE@@"
+	db "MEW@@@@@@@"
+	db "GYARADOS@@"
+	db "SHELLDER@@"
+	db "TENTACOOL@"
+	db "GASTLY@@@@"
+	db "SCYTHER@@@"
+	db "STARYU@@@@"
+	db "BLASTOISE@"
+	db "PINSIR@@@@"
+	db "TANGELA@@@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "GROWLITHE@"
+	db "ONIX@@@@@@"
+	db "FEAROW@@@@"
+	db "PIDGEY@@@@"
+	db "SLOWPOKE@@"
+	db "KADABRA@@@"
+	db "GRAVELER@@"
+	db "CHANSEY@@@"
+	db "MACHOKE@@@"
+	db "MR.MIME@@@"
+	db "HITMONLEE@"
+	db "HITMONCHAN"
+	db "ARBOK@@@@@"
+	db "PARASECT@@"
+	db "PSYDUCK@@@"
+	db "DROWZEE@@@"
+	db "GOLEM@@@@@"
+	db "MISSINGNO."
+	db "MAGMAR@@@@"
+	db "MISSINGNO."
+	db "ELECTABUZZ"
+	db "MAGNETON@@"
+	db "KOFFING@@@"
+	db "MISSINGNO."
+	db "MANKEY@@@@"
+	db "SEEL@@@@@@"
+	db "DIGLETT@@@"
+	db "TAUROS@@@@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "FARFETCH'D"
+	db "VENONAT@@@"
+	db "DRAGONITE@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "DODUO@@@@@"
+	db "POLIWAG@@@"
+	db "JYNX@@@@@@"
+	db "MOLTRES@@@"
+	db "ARTICUNO@@"
+	db "ZAPDOS@@@@"
+	db "DITTO@@@@@"
+	db "MEOWTH@@@@"
+	db "KRABBY@@@@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "VULPIX@@@@"
+	db "NINETALES@"
+	db "PIKACHU@@@"
+	db "RAICHU@@@@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "DRATINI@@@"
+	db "DRAGONAIR@"
+	db "KABUTO@@@@"
+	db "KABUTOPS@@"
+	db "HORSEA@@@@"
+	db "SEADRA@@@@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "SANDSHREW@"
+	db "SANDSLASH@"
+	db "OMANYTE@@@"
+	db "OMASTAR@@@"
+	db "JIGGLYPUFF"
+	db "WIGGLYTUFF"
+	db "EEVEE@@@@@"
+	db "FLAREON@@@"
+	db "JOLTEON@@@"
+	db "VAPOREON@@"
+	db "MACHOP@@@@"
+	db "ZUBAT@@@@@"
+	db "EKANS@@@@@"
+	db "PARAS@@@@@"
+	db "POLIWHIRL@"
+	db "POLIWRATH@"
+	db "WEEDLE@@@@"
+	db "KAKUNA@@@@"
+	db "BEEDRILL@@"
+	db "MISSINGNO."
+	db "DODRIO@@@@"
+	db "PRIMEAPE@@"
+	db "DUGTRIO@@@"
+	db "VENOMOTH@@"
+	db "DEWGONG@@@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "CATERPIE@@"
+	db "METAPOD@@@"
+	db "BUTTERFREE"
+	db "MACHAMP@@@"
+	db "MISSINGNO."
+	db "GOLDUCK@@@"
+	db "HYPNO@@@@@"
+	db "GOLBAT@@@@"
+	db "MEWTWO@@@@"
+	db "SNORLAX@@@"
+	db "MAGIKARP@@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "MUK@@@@@@@"
+	db "MISSINGNO."
+	db "KINGLER@@@"
+	db "CLOYSTER@@"
+	db "MISSINGNO."
+	db "ELECTRODE@"
+	db "CLEFABLE@@"
+	db "WEEZING@@@"
+	db "PERSIAN@@@"
+	db "MAROWAK@@@"
+	db "MISSINGNO."
+	db "HAUNTER@@@"
+	db "ABRA@@@@@@"
+	db "ALAKAZAM@@"
+	db "PIDGEOTTO@"
+	db "PIDGEOT@@@"
+	db "STARMIE@@@"
+	db "BULBASAUR@"
+	db "VENUSAUR@@"
+	db "TENTACRUEL"
+	db "MISSINGNO."
+	db "GOLDEEN@@@"
+	db "SEAKING@@@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "PONYTA@@@@"
+	db "RAPIDASH@@"
+	db "RATTATA@@@"
+	db "RATICATE@@"
+	db "NIDORINO@@"
+	db "NIDORINA@@"
+	db "GEODUDE@@@"
+	db "PORYGON@@@"
+	db "AERODACTYL"
+	db "MISSINGNO."
+	db "MAGNEMITE@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "CHARMANDER"
+	db "SQUIRTLE@@"
+	db "CHARMELEON"
+	db "WARTORTLE@"
+	db "CHARIZARD@"
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "MISSINGNO."
+	db "ODDISH@@@@"
+	db "GLOOM@@@@@"
+	db "VILEPLUME@"
+	db "BELLSPROUT"
+	db "WEEPINBELL"
+	db "VICTREEBEL"
+
+INCBIN "baserom.gbc",$1c98a,$1ca19 - $1c98a
+
+CinnabarIslandScript: ; 0x1ca19
+    call $3c3c
+    ld hl, $d126
+    set 5, [hl]
+    ld hl, $d796
+    res 0, [hl]
+    ld hl, $d7a3
+    res 1, [hl]
+    ld hl, $4a34
+    ld a, [$d639]
+    jp $3d97
+; 0x1ca34
+
+CinnabarIslandScripts: ; 0x1ca34
+    dw CinnabarIslandScript0, CinnabarIslandScript1
+
+CinnabarIslandScript0: ; 0x1ca38
+    ld b, $2b
+    call $3493
+    ret nz
+    ld a, [$d361]
+    cp $4
+    ret nz
+    ld a, [$d362]
+    cp $12
+    ret nz
+    ld a, $8
+    ld [$d528], a
+    ld a, $8
+    ld [$ff00+$8c], a
+    call $2920
+    xor a
+    ld [$ff00+$b4], a
+    ld a, $1
+    ld [$cd38], a
+    ld a, $80
+    ld [$ccd3], a
+    call $3486
+    xor a
+    ld [$c109], a
+    ld [$cd6b], a
+    ld a, $1
+    ld [$d639], a
+    ret
+; 0x1ca73
+
+CinnabarIslandScript1: ; 0x1ca73
+    ld a, [$cd38]
+    and a
+    ret nz
+    call Delay3
+    ld a, $0
+    ld [$d639], a
+    ret
+; 0x1ca81
+
+CinnabarIslandTexts: ; 0x1ca81
+    dw CinnabarIslandText1, CinnabarIslandText2, CinnabarIslandText3, CinnabarIslandText4, CinnabarIslandText5, CinnabarIslandText6, CinnabarIslandText7, CinnabarIslandText8
+
+CinnabarIslandText8:
+INCBIN "baserom.gbc",$1ca91,$5
+
+CinnabarIslandText1: ; 0x1ca96
+    TX_FAR _CinnabarIslandText1
+    db $50
+
+CinnabarIslandText2: ; 0x1ca9b
+    TX_FAR _CinnabarIslandText2
+    db $50
+
+CinnabarIslandText3: ; 0x1caa0
+    TX_FAR _CinnabarIslandText3
+    db $50
+
+CinnabarIslandText6: ; 0x1caa5
+    TX_FAR _CinnabarIslandText6
+    db $50
+
+CinnabarIslandText7: ; 0x1caaa
+    TX_FAR _CinnabarIslandText7
+    db $50
+
+Route1Script: ; 0x1caaf
+    jp $3c3c
+; 0x1cab2
+
+Route1Texts: ; 0x1cab2
+    dw Route1Text1, Route1Text2, Route1Text3
+
+Route1Text1: ; 0x1cab8
+    db $08 ; asm
+    ld hl, $d7bf
+    bit 0, [hl]
+    set 0, [hl]
+    jr nz, .asm_02840 ; 0x1cac0
+    ld hl, $4ae3
+    call PrintText
+    ld bc, (POTION << 8) | 1
+    call $3e2e
+    jr nc, .asm_a630e ; 0x1cace
+    ld hl, $4ae8
+    jr .asm_46d43 ; 0x1cad3
+.asm_a630e ; 0x1cad5
+    ld hl, $4af3
+    jr .asm_46d43 ; 0x1cad8
+.asm_02840 ; 0x1cada
+    ld hl, $4aee
+.asm_46d43 ; 0x1cadd
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$1cae3,$15
+
+Route1Text2: ; 0x1caf8
+    TX_FAR _Route1Text2
+    db $50
+
+Route1Text3: ; 0x1cafd
+    TX_FAR _Route1Text3
+    db $50
+
+OaksLab_h: ; 0x1cb02 to 0x1cb0e (12 bytes) (bank=7) (id=40)
+    db $05 ; tileset
+    db $06, $05 ; dimensions (y, x)
+    dw OaksLabBlocks, OaksLabTexts, OaksLabScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw OaksLabObject ; objects
+
+OaksLabScript: ; 0x1cb0e
+    ld a, [$d74b]
+    bit 6, a
+    call nz, $5076
+    ld a, $1
+    ld [$cf0c], a
+    xor a
+    ld [$cc3c], a
+    ld hl, $4b28
+    ld a, [$d5f0]
+    jp $3d97
+; 0x1cb28
+
+OaksLabScripts: ; 0x1cb28
+    dw OaksLabScript0, OaksLabScript1, OaksLabScript2, OaksLabScript3, OaksLabScript4, OaksLabScript5, OaksLabScript6, OaksLabScript7
+
+INCBIN "baserom.gbc",$1cb38,$16
+
+OaksLabScript0: ; 0x1cb4e
+    ld a, [$d74b]
+    bit 7, a
+    ret z
+    ld a, [$cf10]
+    and a
+    ret nz
+    ld a, $31
+    ld [$cc4d], a
+    ld a, $15
+    call Predef
+    ld hl, $d72e
+    res 4, [hl]
+    ld a, $1
+    ld [$d5f0], a
+    ret
+; 0x1cb6e
+
+OaksLabScript1: ; 0x1cb6e
+    ld a, $8
+    ld [$ff00+$8c], a
+    ld de, $4b7e
+    call $363a
+    ld a, $2
+    ld [$d5f0], a
+    ret
+; 0x1cb7e
+
+INCBIN "baserom.gbc",$1cb7e,$1cb82 - $1cb7e
+
+OaksLabScript2: ; 0x1cb82
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    ld a, $31
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld a, $2e
+    ld [$cc4d], a
+    ld a, $15
+    call Predef
+    ld a, $3
+    ld [$d5f0], a
+    ret
+; 0x1cba2
+
+OaksLabScript3: ; 0x1cba2
+    call Delay3
+    ld hl, $ccd3
+    ld de, $4bcf
+    call $350c
+    dec a
+    ld [$cd38], a
+    call $3486
+    ld a, $1
+    ld [$ff00+$8c], a
+    xor a
+    ld [$ff00+$8d], a
+    call $34a6
+    ld a, $5
+    ld [$ff00+$8c], a
+    xor a
+    ld [$ff00+$8d], a
+    call $34a6
+    ld a, $4
+    ld [$d5f0], a
+    ret
+; 0x1cbcf
+
+INCBIN "baserom.gbc",$1cbcf,$1cbd2 - $1cbcf
+
+OaksLabScript4: ; 0x1cbd2
+    ld a, [$cd38]
+    and a
+    ret nz
+    ld hl, $d747
+    set 0, [hl]
+    ld hl, $d74b
+    set 0, [hl]
+    ld a, $1
+    ld [$ff00+$8c], a
+    ld a, $4
+    ld [$ff00+$8d], a
+    call $34a6
+    call $2429
+    ld hl, $d733
+    res 1, [hl]
+    call $2307
+    ld a, $5
+    ld [$d5f0], a
+    ret
+; 0x1cbfd
+
+OaksLabScript5: ; 0x1cbfd
+    ld a, $fc
+    ld [$cd6b], a
+    ld a, $11
+    ld [$ff00+$8c], a
+    call $2920
+    call Delay3
+    ld a, $12
+    ld [$ff00+$8c], a
+    call $2920
+    call Delay3
+    ld a, $13
+    ld [$ff00+$8c], a
+    call $2920
+    call Delay3
+    ld a, $14
+    ld [$ff00+$8c], a
+    call $2920
+    ld hl, $d74b
+    set 1, [hl]
+    xor a
+    ld [$cd6b], a
+    ld a, $6
+    ld [$d5f0], a
+    ret
+; 0x1cc36
+
+OaksLabScript6: ; 0x1cc36
+    ld a, [$d361]
+    cp $6
+    ret nz
+    ld a, $5
+    ld [$ff00+$8c], a
+    xor a
+    ld [$ff00+$8d], a
+    call $34a6
+    ld a, $1
+    ld [$ff00+$8c], a
+    xor a
+    ld [$ff00+$8d], a
+    call $34a6
+    call $2429
+    ld a, $c
+    ld [$ff00+$8c], a
+    call $2920
+    ld a, $1
+    ld [$cd38], a
+    ld a, $40
+    ld [$ccd3], a
+    call $3486
+    ld a, $8
+    ld [$d528], a
+    ld a, $7
+    ld [$d5f0], a
+    ret
+; 0x1cc72
+
+OaksLabScript7: ; 0x1cc72
+    ld a, [$cd38]
+    and a
+    ret nz
+    call Delay3
+    ld a, $6
+    ld [$d5f0], a
+    ret
+; 0x1cc80
+
+INCBIN "baserom.gbc",$1cc80,$402
+
+OaksLabTexts: ; 0x1d082
+    dw OaksLabText1, OaksLabText2, OaksLabText3, OaksLabText4, OaksLabText5, OaksLabText6, OaksLabText7, OaksLabText8, OaksLabText9, OaksLabText10, OaksLabText11, OaksLabText12, OaksLabText13, OaksLabText14, OaksLabText15, OaksLabText16, OaksLabText17, OaksLabText18, OaksLabText19, OaksLabText20, OaksLabText21, OaksLabText22, OaksLabText23, OaksLabText24, OaksLabText25, OaksLabText26, OaksLabText27
+
+INCBIN "baserom.gbc",$1d0b8,22
+
+OaksLabText1: ; 0x1d0ce
+    db $08 ; asm
+    ld a, [$d74b]
+    bit 0, a
+    jr nz, .asm_6a7a2 ; 0x1d0d4
+    ld hl, $50f3
+    call PrintText
+    jr .asm_ff2ed ; 0x1d0dc
+.asm_6a7a2 ; 0x1d0de
+    bit 2, a
+    jr nz, .asm_56780 ; 0x1d0e0
+    ld hl, $50f8
+    call PrintText
+    jr .asm_ff2ed ; 0x1d0e8
+.asm_56780 ; 0x1d0ea
+    ld hl, $50fd
+    call PrintText
+.asm_ff2ed ; 0x1d0f0
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d0f3,$1d102 - $1d0f3
+
+OaksLabText2: ; 0x1d102
+    db $8
+    ld a, $b1
+    ld [$cd3d], a
+    ld a, $3
+    ld [$cd3e], a
+    ld a, $b0
+    ld b, $2
+    jr asm_5e6bb ; 0x1d111 $20
+
+OaksLabText3: ; 0x1d113
+    db $8
+    ld a, $99
+    ld [$cd3d], a
+    ld a, $4
+    ld [$cd3e], a
+    ld a, $b1
+    ld b, $3
+    jr asm_5e6bb ; 0x1d122 $f
+
+OaksLabText4: ; 0x1d124
+    db $8
+    ld a, $b0
+    ld [$cd3d], a
+    ld a, $2
+    ld [$cd3e], a
+    ld a, $99
+    ld b, $4
+
+asm_5e6bb: ; 0x1d133
+    ld [$cf91], a
+    ld [$d11e], a
+    ld a, b
+    ld [$cf13], a
+    ld a, [$d74b]
+    bit 2, a
+    jp nz, $522d
+    bit 1, a
+    jr nz, asm_9eaa4 ; 0x1d147 $e
+    ld hl, $5152
+    call PrintText
+    jp $24d7
+; 0x1d152
+
+;XXX which text is this?
+db $17, $df, $4d, $25, $50
+
+asm_9eaa4: ; 0x1d157
+    ld a, $5
+    ld [$ff00+$8c], a
+    ld a, $9
+    ld [$ff00+$8b], a
+    call $34fc
+    ld [hl], $0
+    ; manually fixed some disassembler issues around here
+    ld a, $1
+    ld [$FF8c], a
+    ld a, $9
+    ld [$ff00+$8b], a
+    call $34fc
+    ld [hl], $c
+    ld hl, $d730
+    set 6, [hl]
+    ld a, $46
+    call Predef
+    ld hl, $d730
+    res 6, [hl]
+    call $3071
+    ld c, $a
+    call $3739
+    ld a, [$cf13]
+    cp $2
+    jr z, asm_f6e3a ; 0x1d18d $6
+    cp $3
+    jr z, asm_2391d ; 0x1d191 $c
+    jr asm_ddec1 ; 0x1d193 $14
+asm_f6e3a: ; 0x1d195
+    ld hl, $519a
+    jr asm_b5ddf ; 0x1d198 $19
+    rla ; probably a TX_FAR
+    ld b, $4e
+    dec h
+    ld d, b
+asm_2391d: ; 0x1d19f
+    ld hl, $51a4
+    jr asm_b5ddf ; 0x1d1a2 $f
+    rla ; probably a TX_FAR
+    cpl
+    ld c, [hl]
+    dec h
+    ld d, b
+asm_ddec1: ; 0x1d1a9
+    ld hl, $51ae
+    jr asm_b5ddf ; 0x1d1ac $5
+    rla ; probably a TX_FAR
+    ld d, a
+    ld c, [hl]
+    dec h
+    ld d, b
+asm_b5ddf: ; 0x1d1b3
+    call PrintText
+    ld a, $1
+    ld [$cc3c], a
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, asm_6ccd7 ; 0x1d1c2 $5b
+    ld a, [$cf91]
+    ld [$d717], a
+    ld [$d11e], a
+    call GetMonName
+    ld a, [$cf13]
+    cp $2
+    jr nz, asm_5b538 ; 0x1d1d5 $4
+    ld a, $2b
+    jr asm_03e85 ; 0x1d1d9 $a
+asm_5b538: ; 0x1d1db
+    cp $3
+    jr nz, asm_f8b3f ; 0x1d1dd $4
+    ld a, $2c
+    jr asm_03e85 ; 0x1d1e1 $2
+asm_f8b3f: ; 0x1d1e3
+    ld a, $2d
+asm_03e85: ; 0x1d1e5
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $5222
+    call PrintText
+    ld hl, $5227
+    call PrintText
+    xor a
+    ld [$cc49], a
+    ld a, $5
+    ld [$d127], a
+    ld a, [$cf91]
+    ld [$d11e], a
+    call AddPokemonToParty
+    ld hl, $d72e
+    set 3, [hl]
+    ld a, $fc
+    ld [$cd6b], a
+    ld a, $8
+    ld [$d5f0], a
+asm_6ccd7: ; 0x1d21f
+    jp $24d7
+; 0x1d222
+
+INCBIN "baserom.gbc",$1d222,$26
+
+OaksLabText5: ; 0x1d248
+    db $08 ; asm
+    ld a, [$d747]
+    bit 6, a
+    jr nz, .asm_50e81 ; 0x1d24e
+    ld hl, $d2f7
+    ld b, $13
+    call $2b7f
+    ld a, [$d11e]
+    cp $2
+    jr c, .asm_b28b0 ; 0x1d25d
+    ld a, [$d74b]
+    bit 5, a
+    jr z, .asm_b28b0 ; 0x1d264
+.asm_50e81 ; 0x1d266
+    ld hl, $531d
+    call PrintText
+    ld a, $1
+    ld [$cc3c], a
+    ld a, $56
+    call Predef
+    jp $52ed
+.asm_b28b0 ; 0x1d279
+    ld b,POKE_BALL
+    call $3493
+    jr nz, .asm_17c30 ; 0x1d27e
+    ld a, [$d7eb]
+    bit 5, a
+    jr nz, .asm_f1adc ; 0x1d285
+    ld a, [$d74b]
+    bit 5, a
+    jr nz, .asm_333a2 ; 0x1d28c
+    bit 3, a
+    jr nz, .asm_76269 ; 0x1d290
+    ld a, [$d72e]
+    bit 3, a
+    jr nz, .asm_4a5e0 ; 0x1d297
+    ld hl, $52f0
+    call PrintText
+    jr .asm_0f042 ; 0x1d29f
+.asm_4a5e0 ; 0x1d2a1
+    ld hl, $52f5
+    call PrintText
+    jr .asm_0f042 ; 0x1d2a7
+.asm_76269 ; 0x1d2a9
+    ld b,OAKS_PARCEL
+    call $3493
+    jr nz, .asm_a8fcf ; 0x1d2ae
+    ld hl, $52fa
+    call PrintText
+    jr .asm_0f042 ; 0x1d2b6
+.asm_a8fcf ; 0x1d2b8
+    ld hl, $52ff
+    call PrintText
+    call $500a
+    ld a, $f
+    ld [$d5f0], a
+    jr .asm_0f042 ; 0x1d2c6
+.asm_333a2 ; 0x1d2c8
+    ld hl, $5309
+    call PrintText
+    jr .asm_0f042 ; 0x1d2ce
+.asm_f1adc ; 0x1d2d0
+    ld hl, $d74b
+    bit 4, [hl]
+    set 4, [hl]
+    jr nz, .asm_17c30 ; 0x1d2d7
+    ld bc, (POKE_BALL << 8) | 5
+    call $3e2e
+    ld hl, $530e
+    call PrintText
+    jr .asm_0f042 ; 0x1d2e5
+.asm_17c30 ; 0x1d2e7
+    ld hl, $5318
+    call PrintText
+.asm_0f042 ; 0x1d2ed
+    jp $24d7
+; 0x1d2f0
+
+INCBIN "baserom.gbc",$1d2f0,$32
+
+OaksLabText7: ; 0x1d322
+OaksLabText6: ; 0x1d322
+    db $08 ; asm
+    ld hl, $532c
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d32c,$5
+
+OaksLabText8: ; 0x1d331
+    TX_FAR _OaksLabText8
+    db $50
+
+OaksLabText9: ; 0x1d336
+    db $08 ; asm
+    ld hl, $5340
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d340,$1d345 - $1d340
+
+OaksLabText17: ; 0x1d345
+    db $8
+    ld hl, $534f
+    call PrintText
+    jp $24d7
+; 0x1d34f
+
+INCBIN "baserom.gbc",$1d34f,$1d354 - $1d34f
+
+OaksLabText18: ; 0x1d354
+    db $8
+    ld hl, $535e
+    call PrintText
+    jp $24d7
+; 0x1d35e
+
+INCBIN "baserom.gbc",$1d35e,$1d363 - $1d35e
+
+OaksLabText19: ; 0x1d363
+    db $8
+    ld hl, $536d
+    call PrintText
+    jp $24d7
+; 0x1d36d
+
+INCBIN "baserom.gbc",$1d36d,$1d372 - $1d36d
+
+OaksLabText20: ; 0x1d372
+    db $8
+    ld hl, $537c
+    call PrintText
+    jp $24d7
+; 0x1d37c
+
+INCBIN "baserom.gbc",$1d37c,$1d381 - $1d37c
+
+OaksLabText12: ; 0x1d381
+INCBIN "baserom.gbc",$1d381,$5
+
+INCBIN "baserom.gbc",$1d386,$1d390 - $1d386
+
+OaksLabText13: ; 0x1d390
+INCBIN "baserom.gbc",$1d390,$5
+
+INCBIN "baserom.gbc",$1d395,$1d39f - $1d395
+
+OaksLabText14: ; 0x1d39f
+    db $8
+    ld hl, $53a9
+    call PrintText
+    jp $24d7
+; 0x1d3a9
+
+INCBIN "baserom.gbc",$1d3a9,$1d3af - $1d3a9
+
+OaksLabText15: ; 0x1d3af to 0x1d3b9
+    db $8
+    ld hl, $53b9
+    call PrintText
+    jp $24d7
+; 0x1d3b9
+
+INCBIN "baserom.gbc",$1d3b9,$1d3c8 - $1d3b9
+
+OaksLabText16: ; 0x1d3c8
+    db $8
+    ld hl, $53d2
+    call PrintText
+    jp $24d7
+; 0x1d3d2
+
+INCBIN "baserom.gbc",$1d3d2,$1d3d7 - $1d3d2
+
+OaksLabText21: ; 0x1d3d7
+INCBIN "baserom.gbc",$1d3d7,$5
+
+OaksLabText22: ; 0x1d3dc
+INCBIN "baserom.gbc",$1d3dc,$5
+
+OaksLabText23: ; 0x1d3e1
+INCBIN "baserom.gbc",$1d3e1,$5
+
+OaksLabText24: ; 0x1d3e6
+INCBIN "baserom.gbc",$1d3e6,$5
+
+OaksLabText25: ; 0x1d3eb
+INCBIN "baserom.gbc",$1d3eb,$4
+    db $11
+    db $50
+
+OaksLabText26: ; 0x1d3f1
+INCBIN "baserom.gbc",$1d3f1,$1d3f6 - $1d3f1
+
+OaksLabText27: ; 0x1d3f6
+INCBIN "baserom.gbc",$1d3f6,5
+
+OaksLabText11:
+OaksLabText10: ; 0x1d3fb
+    db $08 ; asm
+    ld hl, $5405
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d405,$5
+
+OaksLabObject: ; 0x1d40a (size=88)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $b, $4, $2, $ff
+    db $b, $5, $2, $ff
+
+    db $0 ; signs
+
+    db $b ; people
+    db SPRITE_BLUE, $3 + 4, $4 + 4, $ff, $ff, $41, SONY1 + $C8, $1 ; trainer
+    db SPRITE_BALL, $3 + 4, $6 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BALL, $3 + 4, $7 + 4, $ff, $ff, $3 ; person
+    db SPRITE_BALL, $3 + 4, $8 + 4, $ff, $ff, $4 ; person
+    db SPRITE_OAK, $2 + 4, $5 + 4, $ff, $d0, $5 ; person
+    db SPRITE_BOOK_MAP_DEX, $1 + 4, $2 + 4, $ff, $ff, $6 ; person
+    db SPRITE_BOOK_MAP_DEX, $1 + 4, $3 + 4, $ff, $ff, $7 ; person
+    db SPRITE_OAK, $a + 4, $5 + 4, $ff, $d1, $8 ; person
+    db SPRITE_GIRL, $9 + 4, $1 + 4, $fe, $1, $9 ; person
+    db SPRITE_OAK_AIDE, $a + 4, $2 + 4, $ff, $ff, $a ; person
+    db SPRITE_OAK_AIDE, $a + 4, $8 + 4, $ff, $ff, $b ; person
+
+    ; warp-to
+    EVENT_DISP $5, $b, $4
+    EVENT_DISP $5, $b, $5
+
+ViridianMart_h: ; 0x1d462 to 0x1d46e (12 bytes) (bank=7) (id=42)
+    db $02 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw ViridianMartBlocks, ViridianMartTexts, ViridianMartScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw ViridianMartObject ; objects
+
+ViridianMartScript: ; 0x1d46e
+    call $547d
+    call $3c3c
+    ld hl, $5495
+    ld a, [$d60d]
+    jp $3d97
+; 0x1d47d
+
+INCBIN "baserom.gbc",$1d47d,$1e
+
+ViridianMartScript0: ; 0x1d49b
+    call $2429
+    ld a, $4
+    ld [$ff00+$8c], a
+    call $2920
+    ld hl, $ccd3
+    ld de, $54bb
+    call $350c
+    dec a
+    ld [$cd38], a
+    call $3486
+    ld a, $1
+    ld [$d60d], a
+    ret
+; 0x1d4bb
+
+INCBIN "baserom.gbc",$1d4bb,$1d4c0 - $1d4bb
+
+ViridianMartScript1: ; 0x1d4c0
+    ld a, [$cd38]
+    and a
+    ret nz
+    call Delay3
+    ld a, $5
+    ld [$ff00+$8c], a
+    call $2920
+    ld bc, $4601
+    call GiveItem
+    ld hl, $d74e
+    set 1, [hl]
+    ld a, $2
+    ld [$d60d], a
+    ret
+; 0x1d4e0
+
+ViridianMartTexts: ; 0x1d4e0
+    dw ViridianMartText1, ViridianMartText2, ViridianMartText3 ;, ViridianMartText4
+
+INCBIN "baserom.gbc",$1d4e6,$a
+
+ViridianMartText1: ; 0x1d4f0
+    TX_FAR _ViridianMartText1
+    db $50
+
+INCBIN "baserom.gbc",$1d4f5,$1d500 - $1d4f5
+
+ViridianMartText2: ; 0x1d500
+    TX_FAR _ViridianMartText2
+    db $50
+
+ViridianMartText3: ; 0x1d505
+    TX_FAR _ViridianMartText3
+    db $50
+
+ViridianMartObject: ; 0x1d50a (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $1, $ff
+    db $7, $4, $1, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BUG_CATCHER, $5 + 4, $5 + 4, $fe, $1, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $3 + 4, $3 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+
+ViridianMartBlocks: ; 16
+    INCBIN "maps/viridianmart.blk"
+
+School_h: ; 0x1d540 to 0x1d54c (12 bytes) (bank=7) (id=43)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw SchoolBlocks, SchoolTexts, SchoolScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SchoolObject ; objects
+
+SchoolScript: ; 0x1d54c
+    jp $3c3c
+; 0x1d54f
+
+SchoolTexts: ; 0x1d54f
+    dw SchoolText1, SchoolText2
+
+SchoolText1: ; 0x1d553
+    TX_FAR _SchoolText1
+    db $50
+
+SchoolText2: ; 0x1d558
+    TX_FAR _SchoolText2
+    db $50
+
+SchoolObject: ; 0x1d55d (size=32)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $2, $ff
+    db $7, $3, $2, $ff
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_BRUNETTE_GIRL, $5 + 4, $3 + 4, $ff, $d1, $1 ; person
+    db SPRITE_LASS, $1 + 4, $4 + 4, $ff, $d0, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+ViridianHouse_h: ; 0x1d57d to 0x1d589 (12 bytes) (bank=7) (id=44)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw ViridianHouseBlocks, ViridianHouseTexts, ViridianHouseScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw ViridianHouseObject ; objects
+
+INCBIN "baserom.gbc",$1d589,$1d58a - $1d589
+
+ViridianHouseScript: ; 0x1d58a
+    jp $3c3c
+; 0x1d58d
+
+ViridianHouseTexts: ; 0x1d58d
+    dw ViridianHouseText1, ViridianHouseText2, ViridianHouseText3, ViridianHouseText4
+
+ViridianHouseText1: ; 0x1d595
+    TX_FAR _ViridianHouseText1
+    db $50
+
+ViridianHouseText2: ; 0x1d59a
+    TX_FAR _ViridianHouseText2
+    db $50
+
+ViridianHouseText3: ; 0x1d59f
+    db $08 ; asm
+    ld hl, $55b1
+    call PrintText
+	ld a,SPEAROW
+    call $13d0
+    call $3748
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d5b1,$5
+
+ViridianHouseText4: ; 0x1d5b6
+    TX_FAR _ViridianHouseText4
+    db $50
+
+ViridianHouseObject: ; 0x1d5bb (size=44)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $3, $ff
+    db $7, $3, $3, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_BALDING_GUY, $3 + 4, $5 + 4, $ff, $ff, $1 ; person
+    db SPRITE_LITTLE_GIRL, $4 + 4, $1 + 4, $fe, $1, $2 ; person
+    db SPRITE_BIRD, $5 + 4, $5 + 4, $fe, $2, $3 ; person
+    db SPRITE_CLIPBOARD, $0 + 4, $4 + 4, $ff, $ff, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+PewterHouse1_h: ; 0x1d5e7 to 0x1d5f3 (12 bytes) (bank=7) (id=55)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw PewterHouse1Blocks, PewterHouse1Texts, PewterHouse1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PewterHouse1Object ; objects
+
+PewterHouse1Script: ; 0x1d5f3
+    jp $3c3c
+; 0x1d5f6
+
+PewterHouse1Texts: ; 0x1d5f6
+    dw PewterHouse1Text1, PewterHouse1Text2, PewterHouse1Text3
+
+PewterHouse1Text1: ; 0x1d5fc
+    TX_FAR _PewterHouse1Text1
+    db $08 ; asm
+    ld a, $3
+    call $13d0
+    call $3748
+    jp $24d7
+
+PewterHouse1Text2: ; 0x1d60c
+    TX_FAR _PewterHouse1Text2
+    db $50
+
+PewterHouse1Text3: ; 0x1d611
+    TX_FAR _PewterHouse1Text3
+    db $50
+
+PewterHouse1Object: ; 0x1d616 (size=38)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $3, $ff
+    db $7, $3, $3, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_SLOWBRO, $5 + 4, $4 + 4, $ff, $d2, $1 ; person
+    db SPRITE_YOUNG_BOY, $5 + 4, $3 + 4, $ff, $d3, $2 ; person
+    db SPRITE_FAT_BALD_GUY, $2 + 4, $1 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+PewterHouse2_h: ; 0x1d63c to 0x1d648 (12 bytes) (bank=7) (id=57)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw PewterHouse2Blocks, PewterHouse2Texts, PewterHouse2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PewterHouse2Object ; objects
+
+PewterHouse2Script: ; 0x1d648
+    jp $3c3c
+; 0x1d64b
+
+PewterHouse2Texts: ; 0x1d64b
+    dw PewterHouse2Text1, PewterHouse2Text2
+
+PewterHouse2Text1: ; 0x1d64f
+    TX_FAR _PewterHouse2Text1
+    db $50
+
+PewterHouse2Text2: ; 0x1d654
+    TX_FAR _PewterHouse2Text2
+    db $50
+
+PewterHouse2Object: ; 0x1d659 (size=32)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $5, $ff
+    db $7, $3, $5, $ff
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_GAMBLER, $3 + 4, $2 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BUG_CATCHER, $5 + 4, $4 + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+CeruleanHouseTrashed_h: ; 0x1d679 to 0x1d685 (12 bytes) (bank=7) (id=62)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw CeruleanHouseTrashedBlocks, CeruleanHouseTrashedTexts, CeruleanHouseTrashedScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeruleanHouseTrashedObject ; objects
+
+CeruleanHouseTrashedScript: ; 0x1d685
+    call $3c3c
+    ret
+; 0x1d689
+
+CeruleanHouseTrashedTexts: ; 0x1d689
+    dw CeruleanHouseTrashedText1, CeruleanHouseTrashedText2, CeruleanHouseTrashedText3
+
+CeruleanHouseTrashedText1: ; 0x1d68f
+    db $08 ; asm
+    ld b, $e4
+    ld a, $1c
+    call Predef
+    and b
+    jr z, .asm_f8734 ; 0x1d698
+    ld hl, $56b0
+    call PrintText
+    jr .asm_8dfe9 ; 0x1d6a0
+.asm_f8734 ; 0x1d6a2
+    ld hl, $56ab
+    call PrintText
+.asm_8dfe9 ; 0x1d6a8
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d6ab,$a
+
+CeruleanHouseTrashedText2: ; 0x1d6b5
+    TX_FAR _CeruleanHouseTrashedText2
+    db $50
+
+CeruleanHouseTrashedText3: ; 0x1d6ba
+    TX_FAR _CeruleanHouseTrashedText3
+    db $50
+
+CeruleanHouseTrashedObject: ; 0x1d6bf (size=43)
+    db $a ; border tile
+
+    db $3 ; warps
+    db $7, $2, $0, $ff
+    db $7, $3, $0, $ff
+    db $0, $3, $7, $ff
+
+    db $1 ; signs
+    db $0, $3, $3 ; CeruleanHouseTrashedText3
+
+    db $2 ; people
+    db SPRITE_FISHER, $1 + 4, $2 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GIRL, $6 + 4, $5 + 4, $fe, $2, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $0, $3
+
+CeruleanHouse2_h: ; 0x1d6ea to 0x1d6f6 (12 bytes) (bank=7) (id=63)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw CeruleanHouse2Blocks, CeruleanHouse2Texts, CeruleanHouse2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeruleanHouse2Object ; objects
+
+CeruleanHouse2Script: ; 0x1d6f6
+    jp $3c3c
+; 0x1d6f9
+
+CeruleanHouse2Texts: ; 0x1d6f9
+    dw CeruleanHouse2Text1, CeruleanHouse2Text2
+
+CeruleanHouse2Text1: ; 0x1d6fd
+    TX_FAR _CeruleanHouse2Text1
+    db $50
+
+CeruleanHouse2Text2: ; 0x1d702
+    db $08 ; asm
+    ld a, $6
+    ld [W_WHICHTRADE], a
+    ld a, $54
+    call Predef
+    jp $24d7
+
+CeruleanHouse2Object: ; 0x1d710 (size=32)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $1, $ff
+    db $7, $3, $1, $ff
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_OLD_MEDIUM_WOMAN, $4 + 4, $5 + 4, $ff, $d2, $1 ; person
+    db SPRITE_GAMBLER, $2 + 4, $1 + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+BikeShop_h: ; 0x1d730 to 0x1d73c (12 bytes) (bank=7) (id=66)
+    db $15 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw BikeShopBlocks, BikeShopTexts, BikeShopScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw BikeShopObject ; objects
+
+BikeShopScript: ; 0x1d73c
+    jp $3c3c
+; 0x1d73f
+
+BikeShopTexts: ; 0x1d73f
+    dw BikeShopText1, BikeShopText2, BikeShopText3
+
+BikeShopText1: ; 0x1d745
+    db $08 ; asm
+    ld a, [$d75f]
+    bit 0, a
+    jr z, .asm_260d4 ; 0x1d74b
+    ld hl, $582f
+    call PrintText
+    jp $57f5
+.asm_260d4 ; 0x1d756
+	ld b,BIKE_VOUCHER
+    call $3493
+    jr z, .asm_41190 ; 0x1d75b
+    ld hl, $581f
+    call PrintText
+    ld bc,(BICYCLE << 8) | 1
+    call $3e2e
+    jr nc, .asm_d0d90 ; 0x1d769
+    ld a, $2d
+    ldh [$db], a
+    ld b, $5 ; BANK(MyFunction)
+    ld hl, $7f37 ; MyFunction
+    call Bankswitch
+    ld hl, $d75f
+    set 0, [hl]
+    ld hl, $5824
+    call PrintText
+    jr .asm_99ef2 ; 0x1d782
+.asm_d0d90 ; 0x1d784
+    ld hl, $5834
+    call PrintText
+    jr .asm_99ef2 ; 0x1d78a
+.asm_41190 ; 0x1d78c
+    ld hl, $5810
+    call PrintText
+    xor a
+    ld [$cc26], a
+    ld [$cc2a], a
+    ld a, $3
+    ld [$cc29], a
+    ld a, $1
+    ld [$cc28], a
+    ld a, $2
+    ld [$cc24], a
+    ld a, $1
+    ld [$cc25], a
+    ld hl, $d730
+    set 6, [hl]
+    ld hl, $c3a0
+    ld b, $4
+    ld c, $f
+    call $1922
+    call $2429
+    ld hl, $c3ca
+    ld de, $57f8
+    call $1955
+    ld hl, $c3e4
+    ld de, $5807
+    call $1955
+    ld hl, $5815
+    call PrintText
+    call $3abe
+    bit 1, a
+    jr nz, .asm_b7579 ; 0x1d7dc
+    ld hl, $d730
+    res 6, [hl]
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_b7579 ; 0x1d7e7
+    ld hl, $581a
+    call PrintText
+.asm_b7579 ; 0x1d7ef
+    ld hl, $582a
+    call PrintText
+.asm_99ef2 ; 0x1d7f5
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d7f8,$1d839 - $1d7f8
+
+BikeShopText2: ; 0x1d839
+    db $08 ; asm
+    ld hl, $5843
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d843,$1d848 - $1d843
+
+BikeShopText3: ; 0x1d848
+    db $08 ; asm
+    ld a, [$d75f]
+    bit 0, a
+    ld hl, $5861
+    jr nz, .asm_34d2d ; 0x1d851
+    ld hl, $585c
+.asm_34d2d ; 0x1d856
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d85c,$a
+
+BikeShopObject: ; 0x1d866 (size=38)
+    db $e ; border tile
+
+    db $2 ; warps
+    db $7, $2, $4, $ff
+    db $7, $3, $4, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_BIKE_SHOP_GUY, $2 + 4, $6 + 4, $ff, $ff, $1 ; person
+    db SPRITE_MOM_GEISHA, $6 + 4, $5 + 4, $fe, $1, $2 ; person
+    db SPRITE_BUG_CATCHER, $3 + 4, $1 + 4, $ff, $d1, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+BikeShopBlocks: ; 16
+    INCBIN "maps/bikeshop.blk"
+
+LavenderHouse1_h: ; 0x1d89c to 0x1d8a8 (12 bytes) (bank=7) (id=149)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw LavenderHouse1Blocks, LavenderHouse1Texts, LavenderHouse1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw LavenderHouse1Object ; objects
+
+LavenderHouse1Script: ; 0x1d8a8
+    call $3c3c
+    ret
+; 0x1d8ac
+
+LavenderHouse1Texts: ; 0x1d8ac
+    dw LavenderHouse1Text1, LavenderHouse1Text2, LavenderHouse1Text3, LavenderHouse1Text4, LavenderHouse1Text5, LavenderHouse1Text6
+
+LavenderHouse1Text1: ; 0x1d8b8
+    db $08 ; asm
+    ld a, [$d7e0]
+    bit 7, a
+    jr nz, .asm_72e5d ; 0x1d8be
+    ld hl, $58d1
+    call PrintText
+    jr .asm_6957f ; 0x1d8c6
+.asm_72e5d ; 0x1d8c8
+    ld hl, $58d6
+    call PrintText
+.asm_6957f ; 0x1d8ce
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d8d1,$1d8db - $1d8d1
+
+LavenderHouse1Text2: ; 0x1d8db
+    db $08 ; asm
+    ld a, [$d7e0]
+    bit 7, a
+    jr nz, .asm_06470 ; 0x1d8e1
+    ld hl, $58f4
+    call PrintText
+    jr .asm_3d208 ; 0x1d8e9
+.asm_06470 ; 0x1d8eb
+    ld hl, $58f9
+    call PrintText
+.asm_3d208 ; 0x1d8f1
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d8f4,$a
+
+LavenderHouse1Text3: ; 0x1d8fe
+    TX_FAR _LavenderHouse1Text3
+    db $8
+    ld a, $2f
+    call $13d0
+    jp $24d7
+
+LavenderHouse1Text4: ; 0x1d90b
+    TX_FAR _LavenderHouse1Text4
+    db $8
+    ld a, $a7
+    call $13d0
+    jp $24d7
+; 0x1d918
+
+LavenderHouse1Text5: ; 0x1d918
+    db $08 ; asm
+    ld a, [$d76c]
+    bit 0, a
+    jr nz, .asm_15ac2 ; 0x1d91e
+    ld hl, $594c
+    call PrintText
+    ld bc, (POKE_FLUTE << 8) | 1
+    call $3e2e
+    jr nc, .asm_5ce36 ; 0x1d92c
+    ld hl, $5951
+    call PrintText
+    ld hl, $d76c
+    set 0, [hl]
+    jr .asm_da749 ; 0x1d939
+.asm_5ce36 ; 0x1d93b
+    ld hl, $595b
+    call PrintText
+    jr .asm_da749 ; 0x1d941
+.asm_15ac2 ; 0x1d943
+    ld hl, $5960
+    call PrintText
+.asm_da749 ; 0x1d949
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d94c,$19
+
+LavenderHouse1Text6: ; 0x1d965
+    TX_FAR _LavenderHouse1Text6
+    db $50
+
+LavenderHouse1Object: ; 0x1d96a (size=56)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $2, $ff
+    db $7, $3, $2, $ff
+
+    db $0 ; signs
+
+    db $6 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $5 + 4, $3 + 4, $ff, $ff, $1 ; person
+    db SPRITE_LITTLE_GIRL, $3 + 4, $6 + 4, $ff, $d0, $2 ; person
+    db SPRITE_SLOWBRO, $4 + 4, $6 + 4, $ff, $d1, $3 ; person
+    db SPRITE_SLOWBRO, $3 + 4, $1 + 4, $ff, $ff, $4 ; person
+    db SPRITE_MR_FUJI, $1 + 4, $3 + 4, $ff, $ff, $5 ; person
+    db SPRITE_BOOK_MAP_DEX, $3 + 4, $3 + 4, $ff, $ff, $6 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+LavenderHouse2_h: ; 0x1d9a2 to 0x1d9ae (12 bytes) (bank=7) (id=151)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw LavenderHouse2Blocks, LavenderHouse2Texts, LavenderHouse2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw LavenderHouse2Object ; objects
+
+LavenderHouse2Script: ; 0x1d9ae
+    call $3c3c
+    ret
+; 0x1d9b2
+
+LavenderHouse2Texts: ; 0x1d9b2
+    dw LavenderHouse2Text1, LavenderHouse2Text2
+
+LavenderHouse2Text1: ; 0x1d9b6
+    TX_FAR _LavenderHouse2Text1
+    db $8
+    ld a, $11
+    call $13d0
+    jp $24d7
+; 0x1d9c3
+
+LavenderHouse2Text2: ; 0x1d9c3
+    db $08 ; asm
+    ld a, [$d7e0]
+    bit 7, a
+    jr nz, .asm_65711 ; 0x1d9c9
+    ld hl, $59dc
+    call PrintText
+    jr .asm_64be1 ; 0x1d9d1
+.asm_65711 ; 0x1d9d3
+    ld hl, $59e1
+    call PrintText
+.asm_64be1 ; 0x1d9d9
+    jp $24d7
+
+INCBIN "baserom.gbc",$1d9dc,$a
+
+LavenderHouse2Object: ; 0x1d9e6 (size=32)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $4, $ff
+    db $7, $3, $4, $ff
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_SLOWBRO, $5 + 4, $3 + 4, $ff, $d1, $1 ; person
+    db SPRITE_BRUNETTE_GIRL, $4 + 4, $2 + 4, $ff, $d3, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+NameRater_h: ; 0x1da06 to 0x1da12 (12 bytes) (bank=7) (id=229)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw NameRaterBlocks, $5a54, NameRaterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw NameRaterObject ; objects
+
+NameRaterScript: ; 0x1da12
+    jp $3c3c
+; 0x1da15
+
+INCBIN "baserom.gbc",$1da15,$41
+
+NameRaterText1: ; 0x1da56
+    db $8
+    call $36f4
+    ld hl, $5ab3
+    call $5a15
+    jr nz, .asm_1daae ; 0x1da60 $4c
+    ld hl, $5ab8
+    call PrintText
+    xor a
+    ld [$d07d], a
+    ld [$cfcb], a
+    ld [$cc35], a
+    call $13fc
+    push af
+    call $3dd4
+    call $3dbe
+    call $20ba
+    pop af
+    jr c, .asm_1daae ; 0x1da80 $2c
+    call $15b4
+    call $5a20
+    ld hl, $5ad1
+    jr c, .asm_1daa8 ; 0x1da8b $1b
+    ld hl, $5abd
+    call $5a15
+    jr nz, .asm_1daae ; 0x1da93 $19
+    ld hl, $5ac2
+    call PrintText
+    ld b, $1
+    ld hl, $655c
+    call Bankswitch
+    jr c, .asm_1daae ; 0x1daa3 $9
+    ld hl, $5ac7
+.asm_1daa8
+    call PrintText
+    jp $24d7
+.asm_1daae
+    ld hl, $5acc
+    jr .asm_1daa8 ; 0x1dab1 $f5
+; 0x1dab3
+
+INCBIN "baserom.gbc",$1dab3,$23
+
+NameRaterObject: ; 0x1dad6 (size=26)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $5, $ff
+    db $7, $3, $5, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_MR_MASTERBALL, $3 + 4, $5 + 4, $ff, $d2, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+VermilionHouse1_h: ; 0x1daf0 to 0x1dafc (12 bytes) (bank=7) (id=93)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw VermilionHouse1Blocks, VermilionHouse1Texts, VermilionHouse1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VermilionHouse1Object ; objects
+
+VermilionHouse1Script: ; 0x1dafc
+    call $3c3c
+    ret
+; 0x1db00
+
+VermilionHouse1Texts: ; 0x1db00
+    dw VermilionHouse1Text1, VermilionHouse1Text2, VermilionHouse1Text3
+
+VermilionHouse1Text1: ; 0x1db06
+    TX_FAR _VermilionHouse1Text1
+    db $50
+
+VermilionHouse1Text2: ; 0x1db0b
+    TX_FAR _VermilionHouse1Text2
+    db $08 ; asm
+    ld a, $24
+    call $13d0
+    call $3748
+    jp $24d7
+
+VermilionHouse1Text3: ; 0x1db1b
+    TX_FAR _VermilionHouse1Text3
+    db $50
+
+INCBIN "baserom.gbc", $1db1b + 5, $1db20 - ($1db1b + 5)
+
+VermilionHouse1Object: ; 0x1db20 (size=38)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $4, $ff
+    db $7, $3, $4, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_BUG_CATCHER, $3 + 4, $5 + 4, $ff, $d2, $1 ; person
+    db SPRITE_BIRD, $5 + 4, $3 + 4, $fe, $2, $2 ; person
+    db SPRITE_PAPER_SHEET, $3 + 4, $4 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+VermilionDock_h: ; 0x1db46 to 0x1db52 (12 bytes) (bank=7) (id=94)
+    db $0e ; tileset
+    db $06, $0e ; dimensions (y, x)
+    dw VermilionDockBlocks, $5cbf, VermilionDockScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VermilionDockObject ; objects
+
+VermilionDockScript: ; 0x1db52
+    call $3c3c
+    ld hl, $d803
+    bit 4, [hl]
+    jr nz, .asm_1db8d ; 0x1db5a $31
+    bit 0, [hl]
+    ret z
+    ld a, [$d42f]
+    cp $1
+    ret nz
+    bit 2, [hl]
+    jp z, $5b9b
+    set 4, [hl]
+    call Delay3
+    ld hl, $d730
+    set 7, [hl]
+    ld hl, $ccd3
+    ld a, $40
+    ld [hli], a
+    ld [hli], a
+    ld [hl], a
+    ld a, $3
+    ld [$cd38], a
+    xor a
+    ld [$c206], a
+    ld [$cd3b], a
+    dec a
+    ld [$cd6b], a
+    ret
+.asm_1db8d
+    bit 5, [hl]
+    ret nz
+    ld a, [$cd38]
+    and a
+    ret nz
+    ld [$cd6b], a
+    set 5, [hl]
+    ret
+; 0x1db9b
+
+INCBIN "baserom.gbc",$1db9b,$12b
+
+VermilionDockObject: ; 0x1dcc6 (size=20)
+    db $f ; border tile
+
+    db $2 ; warps
+    db $0, $e, $5, $ff
+    db $2, $e, $1, SS_ANNE_1
+
+    db $0 ; signs
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $e, $0, $e
+    EVENT_DISP $e, $2, $e ; SS_ANNE_1
+
+VermilionDockBlocks: ; 84
+    INCBIN "maps/vermiliondock.blk"
+
+CeladonMansion5_h: ; 0x1dd2e to 0x1dd3a (12 bytes) (bank=7) (id=132)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw CeladonMansion5Blocks, CeladonMansion5Texts, CeladonMansion5Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMansion5Object ; objects
+
+CeladonMansion5Script: ; 0x1dd3a
+    jp $3c3c
+; 0x1dd3d
+
+CeladonMansion5Texts: ; 0x1dd3d
+    dw CeladonMansion5Text1, CeladonMansion5Text2
+
+CeladonMansion5Text1: ; 0x1dd41
+    TX_FAR _CeladonMansion5Text1
+    db $50
+
+CeladonMansion5Text2: ; 0x1dd46
+    db $08 ; asm
+	ld bc,(EEVEE << 8) | 25
+    call GivePokemon
+    jr nc, .asm_24365 ; 0x1dd4d
+    ld a, $45
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+.asm_24365 ; 0x1dd59
+    jp $24d7
+
+CeladonMansion5Object: ; 0x1dd5c (size=32)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $2, CELADON_MANSION_4
+    db $7, $3, $2, CELADON_MANSION_4
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_HIKER, $2 + 4, $2 + 4, $ff, $d0, $1 ; person
+    db SPRITE_BALL, $3 + 4, $4 + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; CELADON_MANSION_4
+    EVENT_DISP $4, $7, $3 ; CELADON_MANSION_4
+
+FuchsiaMart_h: ; 0x1dd7c to 0x1dd88 (12 bytes) (bank=7) (id=152)
+    db $02 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw FuchsiaMartBlocks, FuchsiaMartTexts, FuchsiaMartScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FuchsiaMartObject ; objects
+
+FuchsiaMartScript: ; 0x1dd88
+    jp $3c3c
+; 0x1dd8b
+
+FuchsiaMartTexts: ; 0x1dd8b
+    dw FuchsiaMartText1, FuchsiaMartText2, FuchsiaMartText3
+
+FuchsiaMartText2: ; 0x1dd91
+    TX_FAR _FuchsiaMartText2
+    db $50
+
+FuchsiaMartText3: ; 0x1dd96
+    TX_FAR _FuchsiaMartText3
+    db $50
+
+FuchsiaMartObject: ; 0x1dd9b (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $0, $ff
+    db $7, $4, $0, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_FAT_BALD_GUY, $2 + 4, $4 + 4, $ff, $ff, $2 ; person
+    db SPRITE_LASS, $5 + 4, $6 + 4, $fe, $1, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+
+FuchsiaMartBlocks: ; 16
+    INCBIN "maps/fuchsiamart.blk"
+
+SaffronHouse1_h: ; 0x1ddd1 to 0x1dddd (12 bytes) (bank=7) (id=179)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw SaffronHouse1Blocks, SaffronHouse1Texts, SaffronHouse1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SaffronHouse1Object ; objects
+
+SaffronHouse1Script: ; 0x1dddd
+    jp $3c3c
+; 0x1dde0
+
+SaffronHouse1Texts: ; 0x1dde0
+    dw SaffronHouse1Text1, SaffronHouse1Text2, SaffronHouse1Text3, SaffronHouse1Text4
+
+SaffronHouse1Text1: ; 0x1dde8
+    TX_FAR _SaffronHouse1Text1
+    db $50
+
+SaffronHouse1Text2: ; 0x1dded
+    TX_FAR _SaffronHouse1Text2
+    db $8
+    ld a, $24
+    call $13d0
+    jp $24d7
+; 0x1ddfa
+
+SaffronHouse1Text3: ; 0x1ddfa
+    TX_FAR _SaffronHouse1Text3
+    db $50
+
+SaffronHouse1Text4: ; 0x1ddff
+    TX_FAR _SaffronHouse1Text4
+    db $50
+
+SaffronHouse1Object: ; 0x1de04 (size=44)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $3, $ff
+    db $7, $3, $3, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_BRUNETTE_GIRL, $3 + 4, $2 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BIRD, $4 + 4, $0 + 4, $fe, $1, $2 ; person
+    db SPRITE_BUG_CATCHER, $1 + 4, $4 + 4, $ff, $d0, $3 ; person
+    db SPRITE_PAPER_SHEET, $3 + 4, $3 + 4, $ff, $ff, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+SaffronHouse2_h: ; 0x1de30 to 0x1de3c (12 bytes) (bank=7) (id=183)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw SaffronHouse2Blocks, SaffronHouse2Texts, SaffronHouse2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SaffronHouse2Object ; objects
+
+SaffronHouse2Script: ; 0x1de3c
+    jp $3c3c
+; 0x1de3f
+
+SaffronHouse2Texts: ; 0x1de3f
+    dw SaffronHouse2Text1
+
+SaffronHouse2Text1: ; 0x1de41
+    db $08 ; asm
+    ld a, [$d7bd]
+    bit 0, a
+    jr nz, .asm_9e72b ; 0x1de47
+    ld hl, $5e75
+    call PrintText
+    ld bc,(TM_29 << 8) | 1
+    call $3e2e
+    jr nc, .asm_4b1da ; 0x1de55
+    ld hl, $5e7a
+    call PrintText
+    ld hl, $d7bd
+    set 0, [hl]
+    jr .asm_fe4e1 ; 0x1de62
+.asm_4b1da ; 0x1de64
+    ld hl, $5e85
+    call PrintText
+    jr .asm_fe4e1 ; 0x1de6a
+.asm_9e72b ; 0x1de6c
+    ld hl, $5e80
+    call PrintText
+.asm_fe4e1 ; 0x1de72
+    jp $24d7
+
+INCBIN "baserom.gbc",$1de75,$15
+
+SaffronHouse2Object: ; 0x1de8a (size=26)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $7, $ff
+    db $7, $3, $7, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_FISHER, $3 + 4, $5 + 4, $ff, $d2, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+DiglettsCaveRoute2_h: ; 0x1dea4 to 0x1deb0 (12 bytes) (bank=7) (id=46)
+    db $11 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw DiglettsCaveRoute2Blocks, DiglettsCaveRoute2Texts, DiglettsCaveRoute2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw DiglettsCaveRoute2Object ; objects
+
+DiglettsCaveRoute2Script: ; 0x1deb0
+    ld a, $d
+    ld [$d365], a
+    jp $3c3c
+; 0x1deb8
+
+DiglettsCaveRoute2Texts: ; 0x1deb8
+    dw DiglettsCaveRoute2Text1
+
+DiglettsCaveRoute2Text1: ; 0x1deba
+    TX_FAR _DiglettsCaveRoute2Text1
+    db $50
+
+DiglettsCaveRoute2Object: ; 0x1debf (size=34)
+    db $7d ; border tile
+
+    db $3 ; warps
+    db $7, $2, $0, $ff
+    db $7, $3, $0, $ff
+    db $4, $4, $0, DIGLETTS_CAVE
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_FISHER, $3 + 4, $3 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $4, $4 ; DIGLETTS_CAVE
+
+Route2House_h: ; 0x1dee1 to 0x1deed (12 bytes) (bank=7) (id=48)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw Route2HouseBlocks, Route2HouseTexts, Route2HouseScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route2HouseObject ; objects
+
+Route2HouseScript: ; 0x1deed
+    jp $3c3c
+; 0x1def0
+
+Route2HouseTexts: ; 0x1def0
+    dw Route2HouseText1, Route2HouseText2
+
+Route2HouseText1: ; 0x1def4
+    TX_FAR _Route2HouseText1
+    db $50
+
+Route2HouseText2: ; 0x1def9
+    db $08 ; asm
+    ld a, $1
+    ld [W_WHICHTRADE], a
+    ld a, $54
+    call Predef
+    jp $24d7
+
+Route2HouseObject: ; 0x1df07 (size=32)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $2, $ff
+    db $7, $3, $2, $ff
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_OAK_AIDE, $4 + 4, $2 + 4, $ff, $d3, $1 ; person
+    db SPRITE_GAMEBOY_KID_COPY, $1 + 4, $4 + 4, $ff, $d0, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+Route5Gate_h: ; 0x1df27 to 0x1df33 (12 bytes) (bank=7) (id=70)
+    db $0c ; tileset
+    db $03, $04 ; dimensions (y, x)
+    dw Route5GateBlocks, Route5GateTexts, Route5GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route5GateObject ; objects
+
+Route5GateScript: ; 0x1df33
+    call $3c3c
+    ld a, [$d662]
+    ld hl, $5f3f
+    jp $3d97
+; 0x1df3f
+
+Route5GateScripts: ; 0x1df3f
+    dw Route5GateScript0
+
+INCBIN "baserom.gbc",$1df41,$f
+
+Route5GateScript0: ; 0x1df50
+    ld a, [$d728]
+    bit 6, a
+    ret nz
+    ld hl, $5f8f
+    call $34bf
+    ret nc
+    ld a, $2
+    ld [$d528], a
+    xor a
+    ld [$ff00+$b4], a
+    ld b, $16
+    ld hl, $659f
+    call Bankswitch
+    ld a, [$ff00+$db]
+    and a
+    jr nz, .asm_1df82 ; 0x1df70 $10
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $2920
+    call $5f43
+    ld a, $1
+    ld [$d662], a
+    ret
+.asm_1df82
+    ld a, $3
+    ld [$ff00+$8c], a
+    call $2920
+    ld hl, $d728
+    set 6, [hl]
+    ret
+; 0x1df8f
+
+INCBIN "baserom.gbc",$1df8f,$15
+
+Route5GateTexts: ; 0x1dfa4
+    dw Route5GateText1, Route5GateText2, Route5GateText3
+
+Route8GateText1:
+Route7GateText1:
+Route6GateText1:
+Route5GateText1: ; 0x1dfaa
+    db $8
+    ld a, [$d728]
+    bit 6, a
+    jr nz, .asm_88856 ; 0x1dfb0 $2c
+    ld b, $16
+    ld hl, $659f
+    call Bankswitch
+    ld a, [$ff00+$db]
+    and a
+    jr nz, .asm_768a2 ; 0x1dfbd $11
+    ld hl, $5fe7
+    call PrintText
+    call $5f43
+    ld a, $1
+    ld [$d662], a
+    jp $24d7
+.asm_768a2 ; 0x1dfd0
+    ld hl, $5fec
+    call PrintText
+    ld hl, $d728
+    set 6, [hl]
+    jp $24d7
+.asm_88856 ; 0x1dfde
+    ld hl, $5ff6
+    call PrintText
+    jp $24d7
+; 0x1dfe7
+
+Route8GateText2:
+Route7GateText2:
+Route6GateText2:
+Route5GateText2: ; 0x1dfe7
+INCBIN "baserom.gbc",$1dfe7,$5
+
+Route8GateText3:
+Route7GateText3:
+Route6GateText3:
+Route5GateText3: ; 0x1dfec
+INCBIN "baserom.gbc",$1dfec,$5
+
+INCBIN "baserom.gbc",$1dff1,$1dffb - $1dff1
+
+Route5GateObject: ; 0x1dffb (size=42)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $5, $3, $2, $ff
+    db $5, $4, $2, $ff
+    db $0, $3, $1, $ff
+    db $0, $4, $0, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $3 + 4, $1 + 4, $ff, $d3, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $5, $3
+    EVENT_DISP $4, $5, $4
+    EVENT_DISP $4, $0, $3
+    EVENT_DISP $4, $0, $4
+
+Route5GateBlocks: ; 12
+    INCBIN "maps/route5gate.blk"
+
+Route6Gate_h: ; 0x1e031 to 0x1e03d (12 bytes) (bank=7) (id=73)
+    db $0c ; tileset
+    db $03, $04 ; dimensions (y, x)
+    dw Route6GateBlocks, Route6GateTexts, Route6GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route6GateObject ; objects
+
+Route6GateScript: ; 0x1e03d
+    call $3c3c
+    ld hl, $604a
+    ld a, [$d636]
+    call $3d97
+    ret
+; 0x1e04a
+
+Route6GateScripts: ; 0x1e04a
+    dw Route6GateScript0
+
+INCBIN "baserom.gbc",$1e04c,$2
+
+Route6GateScript0: ; 0x1e04e
+    ld a, [$d728]
+    bit 6, a
+    ret nz
+    ld hl, $608c
+    call $34bf
+    ret nc
+    ld a, $1
+    ld [$d528], a
+    xor a
+    ld [$ff00+$b4], a
+    ld b, $16
+    ld hl, $659f
+    call Bankswitch
+    ld a, [$ff00+$db]
+    and a
+    jr nz, .asm_1e080 ; 0x1e06e $10
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $2920
+    call $60a1
+    ld a, $1
+    ld [$d636], a
+    ret
+.asm_1e080
+    ld hl, $d728
+    set 6, [hl]
+    ld a, $3
+    ld [$ff00+$8c], a
+    jp $2920
+; 0x1e08c
+
+INCBIN "baserom.gbc",$1e08c,$2c
+
+Route6GateTexts: ; 0x1e0b8
+    dw Route6GateText1, Route6GateText2, Route6GateText3
+
+Route6GateObject: ; 0x1e0be (size=42)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $5, $3, $2, $ff
+    db $5, $4, $2, $ff
+    db $0, $3, $1, $ff
+    db $0, $4, $1, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $2 + 4, $6 + 4, $ff, $d2, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $5, $3
+    EVENT_DISP $4, $5, $4
+    EVENT_DISP $4, $0, $3
+    EVENT_DISP $4, $0, $4
+
+Route6GateBlocks: ; 12
+    INCBIN "maps/route6gate.blk"
+
+Route7Gate_h: ; 0x1e0f4 to 0x1e100 (12 bytes) (bank=7) (id=76)
+    db $0c ; tileset
+    db $04, $03 ; dimensions (y, x)
+    dw Route7GateBlocks, Route7GateTexts, Route7GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route7GateObject ; objects
+
+Route7GateScript: ; 0x1e100
+    call $3c3c
+    ld a, [$d663]
+    ld hl, $610d
+    call $3d97
+    ret
+; 0x1e10d
+
+Route7GateScripts: ; 0x1e10d
+    dw Route7GateScript0
+
+INCBIN "baserom.gbc",$1e10f,$19
+
+Route7GateScript0: ; 0x1e128
+    ld a, [$d728]
+    bit 6, a
+    ret nz
+    ld hl, $6167
+    call $34bf
+    ret nc
+    ld a, $8
+    ld [$d528], a
+    xor a
+    ld [$ff00+$b4], a
+    ld b, $16
+    ld hl, $659f
+    call Bankswitch
+    ld a, [$ff00+$db]
+    and a
+    jr nz, .asm_1e15a ; 0x1e148 $10
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $2920
+    call $6111
+    ld a, $1
+    ld [$d663], a
+    ret
+.asm_1e15a
+    ld a, $3
+    ld [$ff00+$8c], a
+    call $2920
+    ld hl, $d728
+    set 6, [hl]
+    ret
+; 0x1e167
+
+INCBIN "baserom.gbc",$1e167,$18
+
+Route7GateTexts: ; 0x1e17f
+    dw Route7GateText1, Route7GateText2, Route7GateText3
+
+Route7GateObject: ; 0x1e185 (size=42)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $3, $0, $3, $ff
+    db $4, $0, $3, $ff
+    db $3, $5, $0, $ff
+    db $4, $5, $1, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $3, $3, $0
+    EVENT_DISP $3, $4, $0
+    EVENT_DISP $3, $3, $5
+    EVENT_DISP $3, $4, $5
+
+Route7GateBlocks: ; 12
+    INCBIN "maps/route7gate.blk"
+
+Route8Gate_h: ; 0x1e1bb to 0x1e1c7 (12 bytes) (bank=7) (id=79)
+    db $0c ; tileset
+    db $04, $03 ; dimensions (y, x)
+    dw Route8GateBlocks, Route8GateTexts, Route8GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route8GateObject ; objects
+
+Route8GateScript: ; 0x1e1c7
+    call $3c3c
+    ld hl, $61d3
+    ld a, [$d637]
+    jp $3d97
+; 0x1e1d3
+
+Route8GateScripts: ; 0x1e1d3
+    dw Route8GateScript0
+
+INCBIN "baserom.gbc",$1e1d5,$19
+
+Route8GateScript0: ; 0x1e1ee
+    ld a, [$d728]
+    bit 6, a
+    ret nz
+    ld hl, $622c
+    call $34bf
+    ret nc
+    ld a, $2
+    ld [$d528], a
+    xor a
+    ld [$ff00+$b4], a
+    ld b, $16
+    ld hl, $659f
+    call Bankswitch
+    ld a, [$ff00+$db]
+    and a
+    jr nz, .asm_1e220 ; 0x1e20e $10
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $2920
+    call $61d7
+    ld a, $1
+    ld [$d637], a
+    ret
+.asm_1e220
+    ld hl, $d728
+    set 6, [hl]
+    ld a, $3
+    ld [$ff00+$8c], a
+    jp $2920
+; 0x1e22c
+INCBIN "baserom.gbc",$1e22c,$15
+
+Route8GateTexts: ; 0x1e241
+    dw Route8GateText1, Route8GateText2, Route8GateText3
+
+Route8GateObject: ; 0x1e247 (size=42)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $3, $0, $0, $ff
+    db $4, $0, $1, $ff
+    db $3, $5, $2, $ff
+    db $4, $5, $3, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $1 + 4, $2 + 4, $ff, $d0, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $3, $3, $0
+    EVENT_DISP $3, $4, $0
+    EVENT_DISP $3, $3, $5
+    EVENT_DISP $3, $4, $5
+
+Route8GateBlocks: ; 12
+    INCBIN "maps/route8gate.blk"
+
+UndergroundPathEntranceRoute8_h: ; 0x1e27d to 0x1e289 (12 bytes) (bank=7) (id=80)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw UndergroundPathEntranceRoute8Blocks, UndergroundPathEntranceRoute8Texts, UndergroundPathEntranceRoute8Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UndergroundPathEntranceRoute8Object ; objects
+
+UndergroundPathEntranceRoute8Script: ; 0x1e289
+    ld a, $13
+    ld [$d365], a
+    jp $3c3c
+; 0x1e291
+
+UndergroundPathEntranceRoute8Texts: ; 0x1e291
+    dw UndergroundPathEntranceRoute8Text1
+
+;XXX wtf? syntax error
+UndergroundPathEntranceRoute8Text1: ; 0x1e293
+    db $17, $8d, $42, $23
+    ;TX_FAR _UndergroundPathEntranceRoute8Text1
+    db $50
+
+UndergroundPathEntranceRoute8Object: ; 0x1e298 (size=34)
+    db $a ; border tile
+
+    db $3 ; warps
+    db $7, $3, $4, $ff
+    db $7, $4, $4, $ff
+    db $4, $4, $1, UNDERGROUND_PATH_WE
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GIRL, $4 + 4, $3 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+    EVENT_DISP $4, $4, $4 ; UNDERGROUND_PATH_WE
+
+PowerPlant_h: ; 0x1e2ba to 0x1e2c6 (12 bytes) (bank=7) (id=83)
+    db $16 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw PowerPlantBlocks, PowerPlantTexts, PowerPlantScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PowerPlantObject ; objects
+
+PowerPlantScript: ; 0x1e2c6
+    call $3c3c
+    ld hl, $62fb
+    ld de, $62d9
+    ld a, [$d663]
+    call $3160
+    ld [$d663], a
+    ret
+; 0x1e2d9
+
+INCBIN "baserom.gbc",$1e2d9,$6
+
+PowerPlantTexts: ; 0x1e2df
+    dw PowerPlantText1, PowerPlantText2, PowerPlantText3, PowerPlantText4, PowerPlantText5, PowerPlantText6, PowerPlantText7, PowerPlantText8, PowerPlantText9, PowerPlantText10, PowerPlantText11, PowerPlantText12, PowerPlantText13, PowerPlantText14
+
+INCBIN "baserom.gbc",$1e2fb,$6d
+
+asm_234cc:
+    call $31cc
+    ld a, [$da39]
+    ld [$d663], a
+    jp $24d7
+; 0x1e374
+
+PowerPlantText1: ; maybe
+    db $8 ; asm
+    ld hl, $62fb
+    jr asm_234cc ; 0x1e378 $ee
+
+PowerPlantText2:
+    db $8 ; asm
+    ld hl, $6307
+    jr asm_234cc ; 0x1e37e $e8
+
+PowerPlantText3:
+    db $8 ; asm
+    ld hl, $6313
+    jr asm_234cc ; 0x1e384 $e2
+
+PowerPlantText4:
+    db $8 ; asm
+    ld hl, $631f
+    jr asm_234cc ; 0x1e38a $dc
+
+PowerPlantText5:
+    db $8 ; asm
+    ld hl, $632b
+    jr asm_234cc ; 0x1e390 $d6
+
+PowerPlantText6:
+    db $8 ; asm
+    ld hl, $6337
+    jr asm_234cc ; 0x1e396 $d0
+
+PowerPlantText7:
+    db $8 ; asm
+    ld hl, $6343
+    jr asm_234cc ; 0x1e39c $ca
+
+PowerPlantText8:
+    db $8 ; asm
+    ld hl, $634f
+    jr asm_234cc ; 0x1e3a2 $c4
+
+PowerPlantText9:
+    db $8 ; asm
+    ld hl, $635b
+    jr asm_234cc ; 0x1e3a8 $be
+    rla ; probably a TX_FAR
+    ld [$ff00+c], a
+    ld b, l
+    inc hl
+    ld d, b
+    rla
+    ld [$2345], a
+    db $8
+    ld a, $4b
+    call $13d0
+    call $3748
+    jp $24d7
+; 0x1e3bf
+
+PowerPlantObject: ; 0x1e3bf (size=135)
+    db $2e ; border tile
+
+    db $3 ; warps
+    db $23, $4, $3, $ff
+    db $23, $5, $3, $ff
+    db $b, $0, $3, $ff
+
+    db $0 ; signs
+
+    db $e ; people
+    db SPRITE_BALL, $14 + 4, $9 + 4, $ff, $ff, $41, VOLTORB, $28 ; trainer
+    db SPRITE_BALL, $12 + 4, $20 + 4, $ff, $ff, $42, VOLTORB, $28 ; trainer
+    db SPRITE_BALL, $19 + 4, $15 + 4, $ff, $ff, $43, VOLTORB, $28 ; trainer
+    db SPRITE_BALL, $12 + 4, $19 + 4, $ff, $ff, $44, ELECTRODE, $2b ; trainer
+    db SPRITE_BALL, $22 + 4, $17 + 4, $ff, $ff, $45, VOLTORB, $28 ; trainer
+    db SPRITE_BALL, $1c + 4, $1a + 4, $ff, $ff, $46, VOLTORB, $28 ; trainer
+    db SPRITE_BALL, $e + 4, $15 + 4, $ff, $ff, $47, ELECTRODE, $2b ; trainer
+    db SPRITE_BALL, $20 + 4, $25 + 4, $ff, $ff, $48, VOLTORB, $28 ; trainer
+    db SPRITE_BIRD, $9 + 4, $4 + 4, $ff, $d1, $49, ZAPDOS, $32 ; trainer
+	db SPRITE_BALL, $19 + 4, $7 + 4, $ff, $ff, $8a, CARBOS ; item
+	db SPRITE_BALL, $3 + 4, $1c + 4, $ff, $ff, $8b, HP_UP ; item
+	db SPRITE_BALL, $3 + 4, $22 + 4, $ff, $ff, $8c, RARE_CANDY ; item
+	db SPRITE_BALL, $20 + 4, $1a + 4, $ff, $ff, $8d, TM_25 ; item
+	db SPRITE_BALL, $20 + 4, $14 + 4, $ff, $ff, $8e, TM_33 ; item
+
+    ; warp-to
+    EVENT_DISP $14, $23, $4
+    EVENT_DISP $14, $23, $5
+    EVENT_DISP $14, $b, $0
+
+PowerPlantBlocks: ; 360
+    INCBIN "maps/powerplant.blk"
+
+DiglettsCaveEntranceRoute11_h: ; 0x1e5ae to 0x1e5ba (12 bytes) (bank=7) (id=85)
+    db $11 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw DiglettsCaveEntranceRoute11Blocks, DiglettsCaveEntranceRoute11Texts, DiglettsCaveEntranceRoute11Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw DiglettsCaveEntranceRoute11Object ; objects
+
+DiglettsCaveEntranceRoute11Script: ; 0x1e5ba
+    call $3c3c
+    ld a, $16
+    ld [$d365], a
+    ret
+; 0x1e5c3
+
+DiglettsCaveEntranceRoute11Texts: ; 0x1e5c3
+    dw DiglettsCaveEntranceRoute11Text1
+
+; XXX wtf? syntax error
+DiglettsCaveEntranceRoute11Text1: ; 0x1e5c5
+    db $17, $f9, $47, $23
+    ;TX_FAR _DiglettsCaveEntranceRoute11Text1
+    db $50
+
+DiglettsCaveEntranceRoute11Object: ; 0x1e5ca (size=34)
+    db $7d ; border tile
+
+    db $3 ; warps
+    db $7, $2, $4, $ff
+    db $7, $3, $4, $ff
+    db $4, $4, $1, DIGLETTS_CAVE
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GAMBLER, $3 + 4, $2 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $4, $4 ; DIGLETTS_CAVE
+
+Route16House_h: ; 0x1e5ec to 0x1e5f8 (12 bytes) (bank=7) (id=188)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw Route16HouseBlocks, Route16HouseTexts, Route16HouseScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route16HouseObject ; objects
+
+Route16HouseScript: ; 0x1e5f8
+    jp $3c3c
+; 0x1e5fb
+
+Route16HouseTexts: ; 0x1e5fb
+    dw Route16HouseText1, Route16HouseText2
+
+Route16HouseText1: ; 0x1e5ff
+    db $08 ; asm
+    ld a, [$d7e0]
+    bit 6, a
+    ld hl, $6636
+    jr nz, .asm_13616 ; 0x1e608
+    ld hl, $662b
+    call PrintText
+    ld bc,(HM_02 << 8) | 1
+    call $3e2e
+    jr nc, .asm_d3ee3 ; 0x1e616
+    ld hl, $d7e0
+    set 6, [hl]
+    ld hl, $6630
+    jr .asm_13616 ; 0x1e620
+.asm_d3ee3 ; 0x1e622
+    ld hl, $663b
+.asm_13616 ; 0x1e625
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$1e62b,$1e640 - $1e62b
+
+Route16HouseText2: ; 0x1e640
+    db $08 ; asm
+    ld hl, $6652
+    call PrintText
+	ld a,FEAROW
+    call $13d0
+    call $3748
+    jp $24d7
+
+INCBIN "baserom.gbc",$1e652,$5
+
+Route16HouseObject: ; 0x1e657 (size=32)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $8, $ff
+    db $7, $3, $8, $ff
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_BRUNETTE_GIRL, $3 + 4, $2 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BIRD, $4 + 4, $6 + 4, $fe, $0, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+Route22Gate_h: ; 0x1e677 to 0x1e683 (12 bytes) (bank=7) (id=193)
+    db $0c ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw Route22GateBlocks, Route22GateTexts, Route22GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route22GateObject ; objects
+
+Route22GateScript: ; 0x1e683
+    call $3c3c
+    ld hl, $669e
+    ld a, [$d60e]
+    call $3d97
+    ld a, [$d361]
+    cp $4
+    ld a, $22
+    jr c, .asm_1e69a ; 0x1e696 $2
+    ld a, $21
+.asm_1e69a
+    ld [$d365], a
+    ret
+; 0x1e69e
+
+Route22GateScripts: ; 0x1e69e
+    dw Route22GateScript0, Route22GateScript1
+
+INCBIN "baserom.gbc",$1e6a2,$2
+
+Route22GateScript0: ; 0x1e6a4
+    ld hl, $66b5
+    call $34bf
+    ret nc
+    xor a
+    ld [$ff00+$b4], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    jp $2920
+; 0x1e6b5
+
+INCBIN "baserom.gbc",$1e6b5,$1e6cd - $1e6b5
+
+Route22GateScript1: ; 0x1e6cd
+    ld a, [$cd38]
+    and a
+    ret nz
+    xor a
+    ld [$cd6b], a
+    call Delay3
+    ld a, $0
+    ld [$d60e], a
+    ret
+; 0x1e6df
+
+Route22GateTexts: ; 0x1e6df
+    dw Route22GateText1
+
+Route22GateText1: ; 0x1e6e1
+    db $8
+    ld a, [$d356]
+    bit 0, a
+    jr nz, .asm_8a809 ; 0x1e6e7 $d
+    ld hl, $6704
+    call PrintText
+    call $66ba
+    ld a, $1
+    jr .asm_20f7e ; 0x1e6f4 $8
+.asm_8a809 ; 0x1e6f6
+    ld hl, $671a
+    call PrintText
+    ld a, $2
+.asm_20f7e ; 0x1e6fe
+    ld [$d60e], a
+    jp $24d7
+; 0x1e704
+
+INCBIN "baserom.gbc",$1e704,$1c
+
+Route22GateObject: ; 0x1e720 (size=42)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $7, $4, $0, $ff
+    db $7, $5, $0, $ff
+    db $0, $4, $0, $ff
+    db $0, $5, $1, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $2 + 4, $6 + 4, $ff, $d2, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $7, $4
+    EVENT_DISP $5, $7, $5
+    EVENT_DISP $5, $0, $4
+    EVENT_DISP $5, $0, $5
+
+Route22GateBlocks: ; 20
+    INCBIN "maps/route22gate.blk"
+
+BillsHouse_h: ; 0x1e75e to 0x1e76a (12 bytes) (bank=7) (id=88)
+    db $10 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw BillsHouseBlocks, BillsHouseTexts, BillsHouseScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw BillsHouseObject ; objects
+
+BillsHouseScript: ; 0x1e76a
+    call $3c3c
+    ld a, [$d661]
+    ld hl, $6776
+    jp $3d97
+; 0x1e776
+
+BillsHouseScripts: ; 0x1e776
+    dw BillsHouseScript0
+
+INCBIN "baserom.gbc",$1e778,$a
+
+BillsHouseScript0: ; 0x1e782
+    ret
+; 0x1e783
+
+INCBIN "baserom.gbc",$1e783,$b1
+
+BillsHouseTexts: ; 0x1e834
+    dw BillsHouseText1, BillsHouseText2, BillsHouseText3, BillsHouseText4
+
+BillsHouseText4:
+    db $fd
+
+BillsHouseText1: ; 0x1e83d
+    db $8
+    ld hl, $6865
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, asm_6b196 ; 0x1e84b $d
+asm_4d03c:
+    ld hl, $686a
+    call PrintText
+    ld a, $1
+    ld [$d661], a
+    jr asm_fd4e2 ; 0x1e858 $8
+asm_6b196: ; 0x1e85a
+    ld hl, $686f
+    call PrintText
+    jr asm_4d03c ; 0x1e860 $eb
+asm_fd4e2 ; 0x1e862
+    jp $24d7
+
+; dunno what this is (rla indicates $17 or TX_FAR)
+    rla
+    ld h, a
+    ld d, d
+    inc hl
+    ld d, b
+    rla
+    ld b, l
+    ld d, e
+    inc hl
+    ld d, b
+    rla
+    sub c
+    ld d, e
+    inc hl
+    ld d, b
+
+BillsHouseText2: ; 0x1e874
+    db $08 ; asm
+    ld a, [$d7f2]
+    bit 4, a
+    jr nz, .asm_5491f ; 0x1e87a
+    ld hl, $68ba
+    call PrintText
+    ld bc,(S_S__TICKET << 8) | 1
+    call $3e2e
+    jr nc, .asm_18a67 ; 0x1e888
+    ld hl, $68bf
+    call PrintText
+    ld hl, $d7f2
+    set 4, [hl]
+    ld a, $7
+    ld [$cc4d], a
+    ld a, $15
+    call Predef
+    ld a, $9
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+.asm_5491f ; 0x1e8a9
+    ld hl, $68cb
+    call PrintText
+    jr .asm_bd408 ; 0x1e8af
+.asm_18a67 ; 0x1e8b1
+    ld hl, $68c6
+    call PrintText
+.asm_bd408 ; 0x1e8b7
+    jp $24d7
+
+INCBIN "baserom.gbc",$1e8ba,$1e8d0 - $1e8ba
+
+BillsHouseText3: ; 0x1e8d0
+    db $08 ; asm
+    ld hl, $68da
+    call PrintText
+    jp $24d7
+; 0x1e8da
+
+INCBIN "baserom.gbc",$1e8da,$5
+
+BillsHouseObject: ; 0x1e8df (size=38)
+    db $d ; border tile
+
+    db $2 ; warps
+    db $7, $2, $0, $ff
+    db $7, $3, $0, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_SLOWBRO, $5 + 4, $6 + 4, $ff, $ff, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $4 + 4, $4 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $5 + 4, $6 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+BillsHouseBlocks:
+    INCBIN "maps/billshouse.blk"
+
+INCBIN "baserom.gbc",$1e905 + 16,$16fb - 16
+
+SECTION "bank8",DATA,BANK[$8]
+
+INCBIN "baserom.gbc",$20000,$4000
+
+SECTION "bank9",DATA,BANK[$9]
+
+RhydonPicFront:
+	INCBIN "pic/bmon/rhydon.pic"
+RhydonPicBack:
+	INCBIN "pic/monback/rhydonb.pic"
+KangaskhanPicFront:
+	INCBIN "pic/bmon/kangaskhan.pic"
+KangaskhanPicBack:
+	INCBIN "pic/monback/kangaskhanb.pic"
+NidoranMPicFront:
+	INCBIN "pic/bmon/nidoranm.pic"
+NidoranMPicBack:
+	INCBIN "pic/monback/nidoranmb.pic"
+ClefairyPicFront:
+	INCBIN "pic/bmon/clefairy.pic"
+ClefairyPicBack:
+	INCBIN "pic/monback/clefairyb.pic"
+SpearowPicFront:
+	INCBIN "pic/bmon/spearow.pic"
+SpearowPicBack:
+	INCBIN "pic/monback/spearowb.pic"
+VoltorbPicFront:
+	INCBIN "pic/bmon/voltorb.pic"
+VoltorbPicBack:
+	INCBIN "pic/monback/voltorbb.pic"
+NidokingPicFront:
+	INCBIN "pic/bmon/nidoking.pic"
+NidokingPicBack:
+	INCBIN "pic/monback/nidokingb.pic"
+SlowbroPicFront:
+	INCBIN "pic/bmon/slowbro.pic"
+SlowbroPicBack:
+	INCBIN "pic/monback/slowbrob.pic"
+IvysaurPicFront:
+	INCBIN "pic/bmon/ivysaur.pic"
+IvysaurPicBack:
+	INCBIN "pic/monback/ivysaurb.pic"
+ExeggutorPicFront:
+	INCBIN "pic/bmon/exeggutor.pic"
+ExeggutorPicBack:
+	INCBIN "pic/monback/exeggutorb.pic"
+LickitungPicFront:
+	INCBIN "pic/bmon/lickitung.pic"
+LickitungPicBack:
+	INCBIN "pic/monback/lickitungb.pic"
+ExeggcutePicFront:
+	INCBIN "pic/bmon/exeggcute.pic"
+ExeggcutePicBack:
+	INCBIN "pic/monback/exeggcuteb.pic"
+GrimerPicFront:
+	INCBIN "pic/bmon/grimer.pic"
+GrimerPicBack:
+	INCBIN "pic/monback/grimerb.pic"
+GengarPicFront:
+	INCBIN "pic/bmon/gengar.pic"
+GengarPicBack:
+	INCBIN "pic/monback/gengarb.pic"
+NidoranFPicFront:
+	INCBIN "pic/bmon/nidoranf.pic"
+NidoranFPicBack:
+	INCBIN "pic/monback/nidoranfb.pic"
+NidoqueenPicFront:
+	INCBIN "pic/bmon/nidoqueen.pic"
+NidoqueenPicBack:
+	INCBIN "pic/monback/nidoqueenb.pic"
+CubonePicFront:
+	INCBIN "pic/bmon/cubone.pic"
+CubonePicBack:
+	INCBIN "pic/monback/cuboneb.pic"
+RhyhornPicFront:
+	INCBIN "pic/bmon/rhyhorn.pic"
+RhyhornPicBack:
+	INCBIN "pic/monback/rhyhornb.pic"
+LaprasPicFront:
+	INCBIN "pic/bmon/lapras.pic"
+LaprasPicBack:
+	INCBIN "pic/monback/laprasb.pic"
+ArcaninePicFront:
+	INCBIN "pic/bmon/arcanine.pic"
+ArcaninePicBack:
+	INCBIN "pic/monback/arcanineb.pic"
+GyaradosPicFront:
+	INCBIN "pic/bmon/gyarados.pic"
+GyaradosPicBack:
+	INCBIN "pic/monback/gyaradosb.pic"
+ShellderPicFront:
+	INCBIN "pic/bmon/shellder.pic"
+ShellderPicBack:
+	INCBIN "pic/monback/shellderb.pic"
+TentacoolPicFront:
+	INCBIN "pic/bmon/tentacool.pic"
+TentacoolPicBack:
+	INCBIN "pic/monback/tentacoolb.pic"
+GastlyPicFront:
+	INCBIN "pic/bmon/gastly.pic"
+GastlyPicBack:
+	INCBIN "pic/monback/gastlyb.pic"
+ScytherPicFront:
+	INCBIN "pic/bmon/scyther.pic"
+ScytherPicBack:
+	INCBIN "pic/monback/scytherb.pic"
+StaryuPicFront:
+	INCBIN "pic/bmon/staryu.pic"
+StaryuPicBack:
+	INCBIN "pic/monback/staryub.pic"
+BlastoisePicFront:
+	INCBIN "pic/bmon/blastoise.pic"
+BlastoisePicBack:
+	INCBIN "pic/monback/blastoiseb.pic"
+PinsirPicFront:
+	INCBIN "pic/bmon/pinsir.pic"
+PinsirPicBack:
+	INCBIN "pic/monback/pinsirb.pic"
+TangelaPicFront:
+	INCBIN "pic/bmon/tangela.pic"
+TangelaPicBack:
+	INCBIN "pic/monback/tangelab.pic"
+
+INCBIN "baserom.gbc",$27d6b,$27DAE - $27d6b
+
+TypeNamePointers: ; 7DAE
+	dw Type00Name
+	dw Type01Name
+	dw Type02Name
+	dw Type03Name
+	dw Type04Name
+	dw Type05Name
+	dw Type06Name
+	dw Type07Name
+	dw Type08Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type00Name
+	dw Type14Name
+	dw Type15Name
+	dw Type16Name
+	dw Type17Name
+	dw Type18Name
+	dw Type19Name
+	dw Type1AName
+
+Type00Name:
+	db "NORMAL@"
+Type01Name:
+	db "FIGHTING@"
+Type02Name:
+	db "FLYING@"
+Type03Name:
+	db "POISON@"
+Type14Name:
+	db "FIRE@"
+Type15Name:
+	db "WATER@"
+Type16Name:
+	db "GRASS@"
+Type17Name:
+	db "ELECTRIC@"
+Type18Name:
+	db "PSYCHIC@"
+Type19Name:
+	db "ICE@"
+Type04Name:
+	db "GROUND@"
+Type05Name:
+	db "ROCK@"
+Type06Name:
+	db "BIRD@"
+Type07Name:
+	db "BUG@"
+Type08Name:
+	db "GHOST@"
+Type1AName:
+	db "DRAGON@"
+
+SaveTrainerName: ; 7E4A
+	ld hl,TrainerNamePointers
+	ld a,[W_TRAINERCLASS]
+	dec a
+	ld c,a
+	ld b,0
+	add hl,bc
+	add hl,bc
+	ld a,[hli]
+	ld h,[hl]
+	ld l,a
+	ld de,$CD6D
+.CopyCharacter\@
+	ld a,[hli]
+	ld [de],a
+	inc de
+	cp "@"
+	jr nz,.CopyCharacter\@
+	ret
+
+TrainerNamePointers:
+; what is the point of these?
+	dw YoungsterName
+	dw BugCatcherName
+	dw LassName
+	dw $D04A
+	dw JrTrainerMName
+	dw JrTrainerFName
+	dw PokemaniacName
+	dw SuperNerdName
+	dw $D04A
+	dw $D04A
+	dw BurglarName
+	dw EngineerName
+	dw JugglerXName
+	dw $D04A
+	dw SwimmerName
+	dw $D04A
+	dw $D04A
+	dw BeautyName
+	dw $D04A
+	dw RockerName
+	dw JugglerName
+	dw $D04A
+	dw $D04A
+	dw BlackbeltName
+	dw $D04A
+	dw ProfOakName
+	dw ChiefName
+	dw ScientistName
+	dw $D04A
+	dw RocketName
+	dw CooltrainerMName
+	dw CooltrainerFName
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+	dw $D04A
+
+YoungsterName:
+	db "YOUNGSTER@"
+BugCatcherName:
+	db "BUG CATCHER@"
+LassName:
+	db "LASS@"
+JrTrainerMName:
+	db "JR.TRAINER♂@"
+JrTrainerFName:
+	db "JR.TRAINER♀@"
+PokemaniacName:
+	db "POKéMANIAC@"
+SuperNerdName:
+	db "SUPER NERD@"
+BurglarName:
+	db "BURGLAR@"
+EngineerName:
+	db "ENGINEER@"
+JugglerXName:
+	db "JUGGLER@"
+SwimmerName:
+	db "SWIMMER@"
+BeautyName:
+	db "BEAUTY@"
+RockerName:
+	db "ROCKER@"
+JugglerName:
+	db "JUGGLER@"
+BlackbeltName:
+	db "BLACKBELT@"
+ProfOakName:
+	db "PROF.OAK@"
+ChiefName:
+	db "CHIEF@"
+ScientistName:
+	db "SCIENTIST@"
+RocketName:
+	db "ROCKET@"
+CooltrainerMName:
+	db "COOLTRAINER♂@"
+CooltrainerFName:
+	db "COOLTRAINER♀@"
+
+INCBIN "baserom.gbc",$27f86,$27fb8-$27f86
+
+SECTION "bankA",DATA,BANK[$A]
+GrowlithePicFront:
+	INCBIN "pic/bmon/growlithe.pic"
+GrowlithePicBack:
+	INCBIN "pic/monback/growlitheb.pic"
+OnixPicFront:
+	INCBIN "pic/bmon/onix.pic"
+OnixPicBack:
+	INCBIN "pic/monback/onixb.pic"
+FearowPicFront:
+	INCBIN "pic/bmon/fearow.pic"
+FearowPicBack:
+	INCBIN "pic/monback/fearowb.pic"
+PidgeyPicFront:
+	INCBIN "pic/bmon/pidgey.pic"
+PidgeyPicBack:
+	INCBIN "pic/monback/pidgeyb.pic"
+SlowpokePicFront:
+	INCBIN "pic/bmon/slowpoke.pic"
+SlowpokePicBack:
+	INCBIN "pic/monback/slowpokeb.pic"
+KadabraPicFront:
+	INCBIN "pic/bmon/kadabra.pic"
+KadabraPicBack:
+	INCBIN "pic/monback/kadabrab.pic"
+GravelerPicFront:
+	INCBIN "pic/bmon/graveler.pic"
+GravelerPicBack:
+	INCBIN "pic/monback/gravelerb.pic"
+ChanseyPicFront:
+	INCBIN "pic/bmon/chansey.pic"
+ChanseyPicBack:
+	INCBIN "pic/monback/chanseyb.pic"
+MachokePicFront:
+	INCBIN "pic/bmon/machoke.pic"
+MachokePicBack:
+	INCBIN "pic/monback/machokeb.pic"
+MrMimePicFront:
+	INCBIN "pic/bmon/mr.mime.pic"
+MrMimePicBack:
+	INCBIN "pic/monback/mr.mimeb.pic"
+HitmonleePicFront:
+	INCBIN "pic/bmon/hitmonlee.pic"
+HitmonleePicBack:
+	INCBIN "pic/monback/hitmonleeb.pic"
+HitmonchanPicFront:
+	INCBIN "pic/bmon/hitmonchan.pic"
+HitmonchanPicBack:
+	INCBIN "pic/monback/hitmonchanb.pic"
+ArbokPicFront:
+	INCBIN "pic/bmon/arbok.pic"
+ArbokPicBack:
+	INCBIN "pic/monback/arbokb.pic"
+ParasectPicFront:
+	INCBIN "pic/bmon/parasect.pic"
+ParasectPicBack:
+	INCBIN "pic/monback/parasectb.pic"
+PsyduckPicFront:
+	INCBIN "pic/bmon/psyduck.pic"
+PsyduckPicBack:
+	INCBIN "pic/monback/psyduckb.pic"
+DrowzeePicFront:
+	INCBIN "pic/bmon/drowzee.pic"
+DrowzeePicBack:
+	INCBIN "pic/monback/drowzeeb.pic"
+GolemPicFront:
+	INCBIN "pic/bmon/golem.pic"
+GolemPicBack:
+	INCBIN "pic/monback/golemb.pic"
+MagmarPicFront:
+	INCBIN "pic/bmon/magmar.pic"
+MagmarPicBack:
+	INCBIN "pic/monback/magmarb.pic"
+ElectabuzzPicFront:
+	INCBIN "pic/bmon/electabuzz.pic"
+ElectabuzzPicBack:
+	INCBIN "pic/monback/electabuzzb.pic"
+MagnetonPicFront:
+	INCBIN "pic/bmon/magneton.pic"
+MagnetonPicBack:
+	INCBIN "pic/monback/magnetonb.pic"
+KoffingPicFront:
+	INCBIN "pic/bmon/koffing.pic"
+KoffingPicBack:
+	INCBIN "pic/monback/koffingb.pic"
+MankeyPicFront:
+	INCBIN "pic/bmon/mankey.pic"
+MankeyPicBack:
+	INCBIN "pic/monback/mankeyb.pic"
+SeelPicFront:
+	INCBIN "pic/bmon/seel.pic"
+SeelPicBack:
+	INCBIN "pic/monback/seelb.pic"
+DiglettPicFront:
+	INCBIN "pic/bmon/diglett.pic"
+DiglettPicBack:
+	INCBIN "pic/monback/diglettb.pic"
+TaurosPicFront:
+	INCBIN "pic/bmon/tauros.pic"
+TaurosPicBack:
+	INCBIN "pic/monback/taurosb.pic"
+FarfetchdPicFront:
+	INCBIN "pic/bmon/farfetchd.pic"
+FarfetchdPicBack:
+	INCBIN "pic/monback/farfetchdb.pic"
+VenonatPicFront:
+	INCBIN "pic/bmon/venonat.pic"
+VenonatPicBack:
+	INCBIN "pic/monback/venonatb.pic"
+DragonitePicFront:
+	INCBIN "pic/bmon/dragonite.pic"
+DragonitePicBack:
+	INCBIN "pic/monback/dragoniteb.pic"
+DoduoPicFront:
+	INCBIN "pic/bmon/doduo.pic"
+DoduoPicBack:
+	INCBIN "pic/monback/doduob.pic"
+PoliwagPicFront:
+	INCBIN "pic/bmon/poliwag.pic"
+PoliwagPicBack:
+	INCBIN "pic/monback/poliwagb.pic"
+JynxPicFront:
+	INCBIN "pic/bmon/jynx.pic"
+JynxPicBack:
+	INCBIN "pic/monback/jynxb.pic"
+MoltresPicFront:
+	INCBIN "pic/bmon/moltres.pic"
+MoltresPicBack:
+	INCBIN "pic/monback/moltresb.pic"
+
+INCBIN "baserom.gbc",$2bea9,$3efc-$3ea9
+
+SECTION "bankB",DATA,BANK[$B]
+ArticunoPicFront:
+	INCBIN "pic/bmon/articuno.pic"
+ArticunoPicBack:
+	INCBIN "pic/monback/articunob.pic"
+ZapdosPicFront:
+	INCBIN "pic/bmon/zapdos.pic"
+ZapdosPicBack:
+	INCBIN "pic/monback/zapdosb.pic"
+DittoPicFront:
+	INCBIN "pic/bmon/ditto.pic"
+DittoPicBack:
+	INCBIN "pic/monback/dittob.pic"
+MeowthPicFront:
+	INCBIN "pic/bmon/meowth.pic"
+MeowthPicBack:
+	INCBIN "pic/monback/meowthb.pic"
+KrabbyPicFront:
+	INCBIN "pic/bmon/krabby.pic"
+KrabbyPicBack:
+	INCBIN "pic/monback/krabbyb.pic"
+VulpixPicFront:
+	INCBIN "pic/bmon/vulpix.pic"
+VulpixPicBack:
+	INCBIN "pic/monback/vulpixb.pic"
+NinetalesPicFront:
+	INCBIN "pic/bmon/ninetales.pic"
+NinetalesPicBack:
+	INCBIN "pic/monback/ninetalesb.pic"
+PikachuPicFront:
+	INCBIN "pic/bmon/pikachu.pic"
+PikachuPicBack:
+	INCBIN "pic/monback/pikachub.pic"
+RaichuPicFront:
+	INCBIN "pic/bmon/raichu.pic"
+RaichuPicBack:
+	INCBIN "pic/monback/raichub.pic"
+DratiniPicFront:
+	INCBIN "pic/bmon/dratini.pic"
+DratiniPicBack:
+	INCBIN "pic/monback/dratinib.pic"
+DragonairPicFront:
+	INCBIN "pic/bmon/dragonair.pic"
+DragonairPicBack:
+	INCBIN "pic/monback/dragonairb.pic"
+KabutoPicFront:
+	INCBIN "pic/bmon/kabuto.pic"
+KabutoPicBack:
+	INCBIN "pic/monback/kabutob.pic"
+KabutopsPicFront:
+	INCBIN "pic/bmon/kabutops.pic"
+KabutopsPicBack:
+	INCBIN "pic/monback/kabutopsb.pic"
+HorseaPicFront:
+	INCBIN "pic/bmon/horsea.pic"
+HorseaPicBack:
+	INCBIN "pic/monback/horseab.pic"
+SeadraPicFront:
+	INCBIN "pic/bmon/seadra.pic"
+SeadraPicBack:
+	INCBIN "pic/monback/seadrab.pic"
+SandshrewPicFront:
+	INCBIN "pic/bmon/sandshrew.pic"
+SandshrewPicBack:
+	INCBIN "pic/monback/sandshrewb.pic"
+SandslashPicFront:
+	INCBIN "pic/bmon/sandslash.pic"
+SandslashPicBack:
+	INCBIN "pic/monback/sandslashb.pic"
+OmanytePicFront:
+	INCBIN "pic/bmon/omanyte.pic"
+OmanytePicBack:
+	INCBIN "pic/monback/omanyteb.pic"
+OmastarPicFront:
+	INCBIN "pic/bmon/omastar.pic"
+OmastarPicBack:
+	INCBIN "pic/monback/omastarb.pic"
+JigglypuffPicFront:
+	INCBIN "pic/bmon/jigglypuff.pic"
+JigglypuffPicBack:
+	INCBIN "pic/monback/jigglypuffb.pic"
+WigglytuffPicFront:
+	INCBIN "pic/bmon/wigglytuff.pic"
+WigglytuffPicBack:
+	INCBIN "pic/monback/wigglytuffb.pic"
+EeveePicFront:
+	INCBIN "pic/bmon/eevee.pic"
+EeveePicBack:
+	INCBIN "pic/monback/eeveeb.pic"
+FlareonPicFront:
+	INCBIN "pic/bmon/flareon.pic"
+FlareonPicBack:
+	INCBIN "pic/monback/flareonb.pic"
+JolteonPicFront:
+	INCBIN "pic/bmon/jolteon.pic"
+JolteonPicBack:
+	INCBIN "pic/monback/jolteonb.pic"
+VaporeonPicFront:
+	INCBIN "pic/bmon/vaporeon.pic"
+VaporeonPicBack:
+	INCBIN "pic/monback/vaporeonb.pic"
+MachopPicFront:
+	INCBIN "pic/bmon/machop.pic"
+MachopPicBack:
+	INCBIN "pic/monback/machopb.pic"
+ZubatPicFront:
+	INCBIN "pic/bmon/zubat.pic"
+ZubatPicBack:
+	INCBIN "pic/monback/zubatb.pic"
+EkansPicFront:
+	INCBIN "pic/bmon/ekans.pic"
+EkansPicBack:
+	INCBIN "pic/monback/ekansb.pic"
+ParasPicFront:
+	INCBIN "pic/bmon/paras.pic"
+ParasPicBack:
+	INCBIN "pic/monback/parasb.pic"
+PoliwhirlPicFront:
+	INCBIN "pic/bmon/poliwhirl.pic"
+PoliwhirlPicBack:
+	INCBIN "pic/monback/poliwhirlb.pic"
+PoliwrathPicFront:
+	INCBIN "pic/bmon/poliwrath.pic"
+PoliwrathPicBack:
+	INCBIN "pic/monback/poliwrathb.pic"
+WeedlePicFront:
+	INCBIN "pic/bmon/weedle.pic"
+WeedlePicBack:
+	INCBIN "pic/monback/weedleb.pic"
+KakunaPicFront:
+	INCBIN "pic/bmon/kakuna.pic"
+KakunaPicBack:
+	INCBIN "pic/monback/kakunab.pic"
+BeedrillPicFront:
+	INCBIN "pic/bmon/beedrill.pic"
+BeedrillPicBack:
+	INCBIN "pic/monback/beedrillb.pic"
+FossilKabutopsPic:
+	INCBIN "pic/bmon/fossilkabutops.pic"
+
+INCBIN "baserom.gbc",$2fb7b,$2ff3c-$2fb7b
+
+SECTION "bankC",DATA,BANK[$C]
+DodrioPicFront:
+	INCBIN "pic/bmon/dodrio.pic"
+DodrioPicBack:
+	INCBIN "pic/monback/dodriob.pic"
+PrimeapePicFront:
+	INCBIN "pic/bmon/primeape.pic"
+PrimeapePicBack:
+	INCBIN "pic/monback/primeapeb.pic"
+DugtrioPicFront:
+	INCBIN "pic/bmon/dugtrio.pic"
+DugtrioPicBack:
+	INCBIN "pic/monback/dugtriob.pic"
+VenomothPicFront:
+	INCBIN "pic/bmon/venomoth.pic"
+VenomothPicBack:
+	INCBIN "pic/monback/venomothb.pic"
+DewgongPicFront:
+	INCBIN "pic/bmon/dewgong.pic"
+DewgongPicBack:
+	INCBIN "pic/monback/dewgongb.pic"
+CaterpiePicFront:
+	INCBIN "pic/bmon/caterpie.pic"
+CaterpiePicBack:
+	INCBIN "pic/monback/caterpieb.pic"
+MetapodPicFront:
+	INCBIN "pic/bmon/metapod.pic"
+MetapodPicBack:
+	INCBIN "pic/monback/metapodb.pic"
+ButterfreePicFront:
+	INCBIN "pic/bmon/butterfree.pic"
+ButterfreePicBack:
+	INCBIN "pic/monback/butterfreeb.pic"
+MachampPicFront:
+	INCBIN "pic/bmon/machamp.pic"
+MachampPicBack:
+	INCBIN "pic/monback/machampb.pic"
+GolduckPicFront:
+	INCBIN "pic/bmon/golduck.pic"
+GolduckPicBack:
+	INCBIN "pic/monback/golduckb.pic"
+HypnoPicFront:
+	INCBIN "pic/bmon/hypno.pic"
+HypnoPicBack:
+	INCBIN "pic/monback/hypnob.pic"
+GolbatPicFront:
+	INCBIN "pic/bmon/golbat.pic"
+GolbatPicBack:
+	INCBIN "pic/monback/golbatb.pic"
+MewtwoPicFront:
+	INCBIN "pic/bmon/mewtwo.pic"
+MewtwoPicBack:
+	INCBIN "pic/monback/mewtwob.pic"
+SnorlaxPicFront:
+	INCBIN "pic/bmon/snorlax.pic"
+SnorlaxPicBack:
+	INCBIN "pic/monback/snorlaxb.pic"
+MagikarpPicFront:
+	INCBIN "pic/bmon/magikarp.pic"
+MagikarpPicBack:
+	INCBIN "pic/monback/magikarpb.pic"
+MukPicFront:
+	INCBIN "pic/bmon/muk.pic"
+MukPicBack:
+	INCBIN "pic/monback/mukb.pic"
+KinglerPicFront:
+	INCBIN "pic/bmon/kingler.pic"
+KinglerPicBack:
+	INCBIN "pic/monback/kinglerb.pic"
+CloysterPicFront:
+	INCBIN "pic/bmon/cloyster.pic"
+CloysterPicBack:
+	INCBIN "pic/monback/cloysterb.pic"
+ElectrodePicFront:
+	INCBIN "pic/bmon/electrode.pic"
+ElectrodePicBack:
+	INCBIN "pic/monback/electrodeb.pic"
+ClefablePicFront:
+	INCBIN "pic/bmon/clefable.pic"
+ClefablePicBack:
+	INCBIN "pic/monback/clefableb.pic"
+WeezingPicFront:
+	INCBIN "pic/bmon/weezing.pic"
+WeezingPicBack:
+	INCBIN "pic/monback/weezingb.pic"
+PersianPicFront:
+	INCBIN "pic/bmon/persian.pic"
+PersianPicBack:
+	INCBIN "pic/monback/persianb.pic"
+MarowakPicFront:
+	INCBIN "pic/bmon/marowak.pic"
+MarowakPicBack:
+	INCBIN "pic/monback/marowakb.pic"
+HaunterPicFront:
+	INCBIN "pic/bmon/haunter.pic"
+HaunterPicBack:
+	INCBIN "pic/monback/haunterb.pic"
+AbraPicFront:
+	INCBIN "pic/bmon/abra.pic"
+AbraPicBack:
+	INCBIN "pic/monback/abrab.pic"
+AlakazamPicFront:
+	INCBIN "pic/bmon/alakazam.pic"
+AlakazamPicBack:
+	INCBIN "pic/monback/alakazamb.pic"
+PidgeottoPicFront:
+	INCBIN "pic/bmon/pidgeotto.pic"
+PidgeottoPicBack:
+	INCBIN "pic/monback/pidgeottob.pic"
+PidgeotPicFront:
+	INCBIN "pic/bmon/pidgeot.pic"
+PidgeotPicBack:
+	INCBIN "pic/monback/pidgeotb.pic"
+StarmiePicFront:
+	INCBIN "pic/bmon/starmie.pic"
+StarmiePicBack:
+	INCBIN "pic/monback/starmieb.pic"
+RedPicBack:
+	INCBIN "pic/trainer/redb.pic"
+OldManPic:
+	INCBIN "pic/trainer/oldman.pic"
+
+INCBIN "baserom.gbc",$33f2b,$3f90-$3f2b
+
+SECTION "bankD",DATA,BANK[$D]
+BulbasaurPicFront:
+	INCBIN "pic/bmon/bulbasaur.pic"
+BulbasaurPicBack:
+	INCBIN "pic/monback/bulbasaurb.pic"
+VenusaurPicFront:
+	INCBIN "pic/bmon/venusaur.pic"
+VenusaurPicBack:
+	INCBIN "pic/monback/venusaurb.pic"
+TentacruelPicFront:
+	INCBIN "pic/bmon/tentacruel.pic"
+TentacruelPicBack:
+	INCBIN "pic/monback/tentacruelb.pic"
+GoldeenPicFront:
+	INCBIN "pic/bmon/goldeen.pic"
+GoldeenPicBack:
+	INCBIN "pic/monback/goldeenb.pic"
+SeakingPicFront:
+	INCBIN "pic/bmon/seaking.pic"
+SeakingPicBack:
+	INCBIN "pic/monback/seakingb.pic"
+PonytaPicFront:
+	INCBIN "pic/bmon/ponyta.pic"
+RapidashPicFront:
+	INCBIN "pic/bmon/rapidash.pic"
+PonytaPicBack:
+	INCBIN "pic/monback/ponytab.pic"
+RapidashPicBack:
+	INCBIN "pic/monback/rapidashb.pic"
+RattataPicFront:
+	INCBIN "pic/bmon/rattata.pic"
+RattataPicBack:
+	INCBIN "pic/monback/rattatab.pic"
+RaticatePicFront:
+	INCBIN "pic/bmon/raticate.pic"
+RaticatePicBack:
+	INCBIN "pic/monback/raticateb.pic"
+NidorinoPicFront:
+	INCBIN "pic/bmon/nidorino.pic"
+NidorinoPicBack:
+	INCBIN "pic/monback/nidorinob.pic"
+NidorinaPicFront:
+	INCBIN "pic/bmon/nidorina.pic"
+NidorinaPicBack:
+	INCBIN "pic/monback/nidorinab.pic"
+GeodudePicFront:
+	INCBIN "pic/bmon/geodude.pic"
+GeodudePicBack:
+	INCBIN "pic/monback/geodudeb.pic"
+PorygonPicFront:
+	INCBIN "pic/bmon/porygon.pic"
+PorygonPicBack:
+	INCBIN "pic/monback/porygonb.pic"
+AerodactylPicFront:
+	INCBIN "pic/bmon/aerodactyl.pic"
+AerodactylPicBack:
+	INCBIN "pic/monback/aerodactylb.pic"
+MagnemitePicFront:
+	INCBIN "pic/bmon/magnemite.pic"
+MagnemitePicBack:
+	INCBIN "pic/monback/magnemiteb.pic"
+CharmanderPicFront:
+	INCBIN "pic/bmon/charmander.pic"
+CharmanderPicBack:
+	INCBIN "pic/monback/charmanderb.pic"
+SquirtlePicFront:
+	INCBIN "pic/bmon/squirtle.pic"
+SquirtlePicBack:
+	INCBIN "pic/monback/squirtleb.pic"
+CharmeleonPicFront:
+	INCBIN "pic/bmon/charmeleon.pic"
+CharmeleonPicBack:
+	INCBIN "pic/monback/charmeleonb.pic"
+WartortlePicFront:
+	INCBIN "pic/bmon/wartortle.pic"
+WartortlePicBack:
+	INCBIN "pic/monback/wartortleb.pic"
+CharizardPicFront:
+	INCBIN "pic/bmon/charizard.pic"
+CharizardPicBack:
+	INCBIN "pic/monback/charizardb.pic"
+FossilAerodactylPic:
+	INCBIN "pic/bmon/fossilaerodactyl.pic"
+GhostPic:
+	INCBIN "pic/other/ghost.pic"
+OddishPicFront:
+	INCBIN "pic/bmon/oddish.pic"
+OddishPicBack:
+	INCBIN "pic/monback/oddishb.pic"
+GloomPicFront:
+	INCBIN "pic/bmon/gloom.pic"
+GloomPicBack:
+	INCBIN "pic/monback/gloomb.pic"
+VileplumePicFront:
+	INCBIN "pic/bmon/vileplume.pic"
+VileplumePicBack:
+	INCBIN "pic/monback/vileplumeb.pic"
+BellsproutPicFront:
+	INCBIN "pic/bmon/bellsprout.pic"
+BellsproutPicBack:
+	INCBIN "pic/monback/bellsproutb.pic"
+WeepinbellPicFront:
+	INCBIN "pic/bmon/weepinbell.pic"
+WeepinbellPicBack:
+	INCBIN "pic/monback/weepinbellb.pic"
+VictreebelPicFront:
+	INCBIN "pic/bmon/victreebel.pic"
+VictreebelPicBack:
+	INCBIN "pic/monback/victreebelb.pic"
+
+INCBIN "baserom.gbc",$37244,$3e88-$3244
+
+SECTION "bankE",DATA,BANK[$E]
+
+Attacks: ; 4000
+; characteristics of each attack
+; animation, effect, power, type, accuracy, PP
+db POUND       ,$00,$28,NORMAL,$FF,35
+db KARATE_CHOP ,$00,$32,NORMAL,$FF,25
+db DOUBLESLAP  ,$1D,$0F,NORMAL,$D8,10
+db COMET_PUNCH ,$1D,$12,NORMAL,$D8,15
+db MEGA_PUNCH  ,$00,$50,NORMAL,$D8,20
+db PAY_DAY     ,$10,$28,NORMAL,$FF,20
+db FIRE_PUNCH  ,$04,$4B,FIRE,$FF,15
+db ICE_PUNCH   ,$05,$4B,ICE,$FF,15
+db THUNDERPUNCH,$06,$4B,ELECTRIC,$FF,15
+db SCRATCH     ,$00,$28,NORMAL,$FF,35
+db VICEGRIP    ,$00,$37,NORMAL,$FF,30
+db GUILLOTINE  ,$26,$01,NORMAL,$4C,5
+db RAZOR_WIND  ,$27,$50,NORMAL,$BF,10
+db SWORDS_DANCE,$32,$00,NORMAL,$FF,30
+db CUT         ,$00,$32,NORMAL,$F2,30
+db GUST        ,$00,$28,NORMAL,$FF,35
+db WING_ATTACK ,$00,$23,FLYING,$FF,35
+db WHIRLWIND   ,$1C,$00,NORMAL,$D8,20
+db FLY         ,$2B,$46,FLYING,$F2,15
+db BIND        ,$2A,$0F,NORMAL,$BF,20
+db SLAM        ,$00,$50,NORMAL,$BF,20
+db VINE_WHIP   ,$00,$23,GRASS,$FF,10
+db STOMP       ,$25,$41,NORMAL,$FF,20
+db DOUBLE_KICK ,$2C,$1E,FIGHTING,$FF,30
+db MEGA_KICK   ,$00,$78,NORMAL,$BF,5
+db JUMP_KICK   ,$2D,$46,FIGHTING,$F2,25
+db ROLLING_KICK,$25,$3C,FIGHTING,$D8,15
+db SAND_ATTACK ,$16,$00,NORMAL,$FF,15
+db HEADBUTT    ,$25,$46,NORMAL,$FF,15
+db HORN_ATTACK ,$00,$41,NORMAL,$FF,25
+db FURY_ATTACK ,$1D,$0F,NORMAL,$D8,20
+db HORN_DRILL  ,$26,$01,NORMAL,$4C,5
+db TACKLE      ,$00,$23,NORMAL,$F2,35
+db BODY_SLAM   ,$24,$55,NORMAL,$FF,15
+db WRAP        ,$2A,$0F,NORMAL,$D8,20
+db TAKE_DOWN   ,$30,$5A,NORMAL,$D8,20
+db THRASH      ,$1B,$5A,NORMAL,$FF,20
+db DOUBLE_EDGE ,$30,$64,NORMAL,$FF,15
+db TAIL_WHIP   ,$13,$00,NORMAL,$FF,30
+db POISON_STING,$02,$0F,POISON,$FF,35
+db TWINEEDLE   ,$4D,$19,BUG,$FF,20
+db PIN_MISSILE ,$1D,$0E,BUG,$D8,20
+db LEER        ,$13,$00,NORMAL,$FF,30
+db BITE        ,$1F,$3C,NORMAL,$FF,25
+db GROWL       ,$12,$00,NORMAL,$FF,40
+db ROAR        ,$1C,$00,NORMAL,$FF,20
+db SING        ,$20,$00,NORMAL,$8C,15
+db SUPERSONIC  ,$31,$00,NORMAL,$8C,20
+db SONICBOOM   ,$29,$01,NORMAL,$E5,20
+db DISABLE     ,$56,$00,NORMAL,$8C,20
+db ACID        ,$45,$28,POISON,$FF,30
+db EMBER       ,$04,$28,FIRE,$FF,25
+db FLAMETHROWER,$04,$5F,FIRE,$FF,15
+db MIST        ,$2E,$00,ICE,$FF,30
+db WATER_GUN   ,$00,$28,WATER,$FF,25
+db HYDRO_PUMP  ,$00,$78,WATER,$CC,5
+db SURF        ,$00,$5F,WATER,$FF,15
+db ICE_BEAM    ,$05,$5F,ICE,$FF,10
+db BLIZZARD    ,$05,$78,ICE,$E5,5
+db PSYBEAM     ,$4C,$41,PSYCHIC,$FF,20
+db BUBBLEBEAM  ,$46,$41,WATER,$FF,20
+db AURORA_BEAM ,$44,$41,ICE,$FF,20
+db HYPER_BEAM  ,$50,$96,NORMAL,$E5,5
+db PECK        ,$00,$23,FLYING,$FF,35
+db DRILL_PECK  ,$00,$50,FLYING,$FF,20
+db SUBMISSION  ,$30,$50,FIGHTING,$CC,25
+db LOW_KICK    ,$25,$32,FIGHTING,$E5,20
+db COUNTER     ,$00,$01,FIGHTING,$FF,20
+db SEISMIC_TOSS,$29,$01,FIGHTING,$FF,20
+db STRENGTH    ,$00,$50,NORMAL,$FF,15
+db ABSORB      ,$03,$14,GRASS,$FF,20
+db MEGA_DRAIN  ,$03,$28,GRASS,$FF,10
+db LEECH_SEED  ,$54,$00,GRASS,$E5,10
+db GROWTH      ,$0D,$00,NORMAL,$FF,40
+db RAZOR_LEAF  ,$00,$37,GRASS,$F2,25
+db SOLARBEAM   ,$27,$78,GRASS,$FF,10
+db POISONPOWDER,$42,$00,POISON,$BF,35
+db STUN_SPORE  ,$43,$00,GRASS,$BF,30
+db SLEEP_POWDER,$20,$00,GRASS,$BF,15
+db PETAL_DANCE ,$1B,$46,GRASS,$FF,20
+db STRING_SHOT ,$14,$00,BUG,$F2,40
+db DRAGON_RAGE ,$29,$01,DRAGON,$FF,10
+db FIRE_SPIN   ,$2A,$0F,FIRE,$B2,15
+db THUNDERSHOCK,$06,$28,ELECTRIC,$FF,30
+db THUNDERBOLT ,$06,$5F,ELECTRIC,$FF,15
+db THUNDER_WAVE,$43,$00,ELECTRIC,$FF,20
+db THUNDER     ,$06,$78,ELECTRIC,$B2,10
+db ROCK_THROW  ,$00,$32,ROCK,$A5,15
+db EARTHQUAKE  ,$00,$64,GROUND,$FF,10
+db FISSURE     ,$26,$01,GROUND,$4C,5
+db DIG         ,$27,$64,GROUND,$FF,10
+db TOXIC       ,$42,$00,POISON,$D8,10
+db CONFUSION   ,$4C,$32,PSYCHIC,$FF,25
+db PSYCHIC_M   ,$47,$5A,PSYCHIC,$FF,10
+db HYPNOSIS    ,$20,$00,PSYCHIC,$99,20
+db MEDITATE    ,$0A,$00,PSYCHIC,$FF,40
+db AGILITY     ,$34,$00,PSYCHIC,$FF,30
+db QUICK_ATTACK,$00,$28,NORMAL,$FF,30
+db RAGE        ,$51,$14,NORMAL,$FF,20
+db TELEPORT    ,$1C,$00,PSYCHIC,$FF,20
+db NIGHT_SHADE ,$29,$00,GHOST,$FF,15
+db MIMIC       ,$52,$00,NORMAL,$FF,10
+db SCREECH     ,$3B,$00,NORMAL,$D8,40
+db DOUBLE_TEAM ,$0F,$00,NORMAL,$FF,15
+db RECOVER     ,$38,$00,NORMAL,$FF,20
+db HARDEN      ,$0B,$00,NORMAL,$FF,30
+db MINIMIZE    ,$0F,$00,NORMAL,$FF,20
+db SMOKESCREEN ,$16,$00,NORMAL,$FF,20
+db CONFUSE_RAY ,$31,$00,GHOST,$FF,10
+db WITHDRAW    ,$0B,$00,WATER,$FF,40
+db DEFENSE_CURL,$0B,$00,NORMAL,$FF,40
+db BARRIER     ,$33,$00,PSYCHIC,$FF,30
+db LIGHT_SCREEN,$40,$00,PSYCHIC,$FF,30
+db HAZE        ,$19,$00,ICE,$FF,30
+db REFLECT     ,$41,$00,PSYCHIC,$FF,20
+db FOCUS_ENERGY,$2F,$00,NORMAL,$FF,30
+db BIDE        ,$1A,$00,NORMAL,$FF,10
+db METRONOME   ,$53,$00,NORMAL,$FF,10
+db MIRROR_MOVE ,$09,$00,FLYING,$FF,20
+db SELFDESTRUCT,$07,$82,NORMAL,$FF,5
+db EGG_BOMB    ,$00,$64,NORMAL,$BF,10
+db LICK        ,$24,$14,GHOST,$FF,30
+db SMOG        ,$21,$14,POISON,$B2,20
+db SLUDGE      ,$21,$41,POISON,$FF,20
+db BONE_CLUB   ,$1F,$41,GROUND,$D8,20
+db FIRE_BLAST  ,$22,$78,FIRE,$D8,5
+db WATERFALL   ,$00,$50,WATER,$FF,15
+db CLAMP       ,$2A,$23,WATER,$BF,10
+db SWIFT       ,$11,$3C,NORMAL,$FF,20
+db SKULL_BASH  ,$27,$64,NORMAL,$FF,15
+db SPIKE_CANNON,$1D,$14,NORMAL,$FF,15
+db CONSTRICT   ,$46,$0A,NORMAL,$FF,35
+db AMNESIA     ,$35,$00,PSYCHIC,$FF,20
+db KINESIS     ,$16,$00,PSYCHIC,$CC,15
+db SOFTBOILED  ,$38,$00,NORMAL,$FF,10
+db HI_JUMP_KICK,$2D,$55,FIGHTING,$E5,20
+db GLARE       ,$43,$00,NORMAL,$BF,30
+db DREAM_EATER ,$08,$64,PSYCHIC,$FF,15
+db POISON_GAS  ,$42,$00,POISON,$8C,40
+db BARRAGE     ,$1D,$0F,NORMAL,$D8,20
+db LEECH_LIFE  ,$03,$14,BUG,$FF,15
+db LOVELY_KISS ,$20,$00,NORMAL,$BF,10
+db SKY_ATTACK  ,$27,$8C,FLYING,$E5,5
+db TRANSFORM   ,$39,$00,NORMAL,$FF,10
+db BUBBLE      ,$46,$14,WATER,$FF,30
+db DIZZY_PUNCH ,$00,$46,NORMAL,$FF,10
+db SPORE       ,$20,$00,GRASS,$FF,15
+db FLASH       ,$16,$00,NORMAL,$B2,20
+db PSYWAVE     ,$29,$01,PSYCHIC,$CC,15
+db SPLASH      ,$55,$00,NORMAL,$FF,40
+db ACID_ARMOR  ,$33,$00,POISON,$FF,40
+db CRABHAMMER  ,$00,$5A,WATER,$D8,10
+db EXPLOSION   ,$07,$AA,NORMAL,$FF,5
+db FURY_SWIPES ,$1D,$12,NORMAL,$CC,15
+db BONEMERANG  ,$2C,$32,GROUND,$E5,10
+db REST        ,$38,$00,PSYCHIC,$FF,10
+db ROCK_SLIDE  ,$00,$4B,ROCK,$E5,10
+db HYPER_FANG  ,$1F,$50,NORMAL,$E5,15
+db SHARPEN     ,$0A,$00,NORMAL,$FF,30
+db CONVERSION  ,$18,$00,NORMAL,$FF,30
+db TRI_ATTACK  ,$00,$50,NORMAL,$FF,10
+db SUPER_FANG  ,$28,$01,NORMAL,$E5,10
+db SLASH       ,$00,$46,NORMAL,$FF,20
+db SUBSTITUTE  ,$4F,$00,NORMAL,$FF,10
+db STRUGGLE    ,$30,$32,NORMAL,$FF,10
+
+INCBIN "baserom.gbc",$383DE,$39884 - $383DE
+
+ReadAttack: ; 5884
+	push hl
+	push de
+	push bc
+	dec a
+	ld hl,Attacks
+	ld bc,6
+	call AddNTimes
+	ld de,$CFCC
+	call CopyData
+	pop bc
+	pop de
+	pop hl
+	ret
+
+; trainer data: from 5C53 to 652E
+INCBIN "baserom.gbc",$3989B,$39914 - $3989B
+
+; trainer pic pointers and base money.
+dw YoungsterPic
+db 0,$15,0
+
+dw BugCatcherPic
+db 0,$10,0
+
+dw LassPic
+db 0,$15,0
+
+dw SailorPic
+db 0,$30,0
+
+dw JrTrainerMPic
+db 0,$20,0
+
+dw JrTrainerFPic
+db 0,$20,0
+
+dw PokemaniacPic
+db 0,$50,0
+
+dw SuperNerdPic
+db 0,$25,0
+
+dw HikerPic
+db 0,$35,0
+
+dw BikerPic
+db 0,$20,0
+
+dw BurglarPic
+db 0,$90,0
+
+dw EngineerPic
+db 0,$50,0
+
+dw JugglerPic
+db 0,$35,0
+
+dw FisherPic
+db 0,$35,0
+
+dw SwimmerPic
+db 0,$05,0
+
+dw CueBallPic
+db 0,$25,0
+
+dw GamblerPic
+db 0,$70,0
+
+dw BeautyPic
+db 0,$70,0
+
+dw PsychicPic
+db 0,$10,0
+
+dw RockerPic
+db 0,$25,0
+
+dw JugglerPic
+db 0,$35,0
+
+dw TamerPic
+db 0,$40,0
+
+dw BirdKeeperPic
+db 0,$25,0
+
+dw BlackbeltPic
+db 0,$25,0
+
+dw Rival1Pic
+db 0,$35,0
+
+dw ProfOakPic
+db 0,$99,0
+
+dw ChiefPic
+db 0,$30,0
+
+dw ScientistPic
+db 0,$50,0
+
+dw GiovanniPic
+db 0,$99,0
+
+dw RocketPic
+db 0,$30,0
+
+dw CooltrainerMPic
+db 0,$35,0
+
+dw CooltrainerFPic
+db 0,$35,0
+
+dw BrunoPic
+db 0,$99,0
+
+dw BrockPic
+db 0,$99,0
+
+dw MistyPic
+db 0,$99,0
+
+dw LtSurgePic
+db 0,$99,0
+
+dw ErikaPic
+db 0,$99,0
+
+dw KogaPic
+db 0,$99,0
+
+dw BlainePic
+db 0,$99,0
+
+dw SabrinaPic
+db 0,$99,0
+
+dw GentlemanPic
+db 0,$70,0
+
+dw Rival2Pic
+db 0,$65,0
+
+dw Rival3Pic
+db 0,$99,0
+
+dw LoreleiPic
+db 0,$99,0
+
+dw ChannelerPic
+db 0,$30,0
+
+dw AgathaPic
+db 0,$99,0
+
+dw LancePic
+db 0,$99,0
+
+TrainerNames: ; 59FF
+	db "YOUNGSTER@"
+	db "BUG CATCHER@"
+	db "LASS@"
+	db "SAILOR@"
+	db "JR.TRAINER♂@"
+	db "JR.TRAINER♀@"
+	db "POKéMANIAC@"
+	db "SUPER NERD@"
+	db "HIKER@"
+	db "BIKER@"
+	db "BURGLAR@"
+	db "ENGINEER@"
+	db "JUGGLER@"
+	db "FISHERMAN@"
+	db "SWIMMER@"
+	db "CUE BALL@"
+	db "GAMBLER@"
+	db "BEAUTY@"
+	db "PSYCHIC@"
+	db "ROCKER@"
+	db "JUGGLER@"
+	db "TAMER@"
+	db "BIRD KEEPER@"
+	db "BLACKBELT@"
+	db "RIVAL1@"
+	db "PROF.OAK@"
+	db "CHIEF@"
+	db "SCIENTIST@"
+	db "GIOVANNI@"
+	db "ROCKET@"
+	db "COOLTRAINER♂@"
+	db "COOLTRAINER♀@"
+	db "BRUNO@"
+	db "BROCK@"
+	db "MISTY@"
+	db "LT.SURGE@"
+	db "ERIKA@"
+	db "KOGA@"
+	db "BLAINE@"
+	db "SABRINA@"
+	db "GENTLEMAN@"
+	db "RIVAL2@"
+	db "RIVAL3@"
+	db "LORELEI@"
+	db "CHANNELER@"
+	db "AGATHA@"
+	db "LANCE@"
+
+INCBIN "baserom.gbc",$39B87,$39C53 - $39B87
+
+ReadTrainer: ; 5C53
+
+; don't change any moves in a link battle
+	ld a,[W_ISLINKBATTLE]
+	and a
+	ret nz
+
+; set [W_ENEMYMONCOUNT] to 0, [$D89D] to FF
+; XXX first is total enemy pokemon?
+; XXX second is species of first pokemon?
+	ld hl,W_ENEMYMONCOUNT
+	xor a
+	ld [hli],a
+	dec a
+	ld [hl],a
+
+; get the pointer to trainer data for this class
+	ld a,[W_CUROPPONENT]
+	sub $C9 ; convert value from pokemon to trainer
+	add a,a
+	ld hl,TrainerDataPointers
+	ld c,a
+	ld b,0
+	add hl,bc ; hl points to trainer class
+	ld a,[hli]
+	ld h,[hl]
+	ld l,a
+	ld a,[W_TRAINERNO]
+	ld b,a
+; At this point b contains the trainer number,
+; and hl points to the trainer class.
+; Our next task is to iterate through the trainers,
+; decrementing b each time, until we get to the right one.
+.outer\@
+	dec b
+	jr z,.IterateTrainer
+.inner\@
+	ld a,[hli]
+	and a
+	jr nz,.inner\@
+	jr .outer\@
+
+; if the first byte of trainer data is FF,
+; - each pokemon has a specific level
+;      (as opposed to the whole team being of the same level)
+; - if [W_LONEATTACKNO] != 0, one pokemon on the team has a special move
+; else the first byte is the level of every pokemon on the team
+.IterateTrainer
+	ld a,[hli]
+	cp $FF ; is the trainer special?
+	jr z,.SpecialTrainer\@ ; if so, check for special attacks
+	ld [W_CURENEMYLVL],a
+.LoopTrainerData\@
+	ld a,[hli]
+	and a ; have we reached the end of the trainer data?
+	jr z,.FinishUp\@
+	ld [$CF91],a ; write species somewhere (XXX why?)
+	ld a,1
+	ld [$CC49],a
+	push hl
+	call AddPokemonToParty
+	pop hl
+	jr .LoopTrainerData\@
+.SpecialTrainer\@
+; if this code is being run:
+; - each pokemon has a specific level
+;      (as opposed to the whole team being of the same level)
+; - if [W_LONEATTACKNO] != 0, one pokemon on the team has a special move
+	ld a,[hli]
+	and a ; have we reached the end of the trainer data?
+	jr z,.AddLoneAttack\@
+	ld [W_CURENEMYLVL],a
+	ld a,[hli]
+	ld [$CF91],a
+	ld a,1
+	ld [$CC49],a
+	push hl
+	call AddPokemonToParty
+	pop hl
+	jr .SpecialTrainer\@
+.AddLoneAttack\@
+; does the trainer have a single monster with a different move
+	ld a,[W_LONEATTACKNO] ; Brock is 01, Misty is 02, Erika is 04, etc
+	and a
+	jr z,.AddTeamAttack\@
+	dec a
+	add a,a
+	ld c,a
+	ld b,0
+	ld hl,LoneAttacks
+	add hl,bc
+	ld a,[hli]
+	ld d,[hl]
+	ld hl,W_ENEMYMON1MOVE3
+	ld bc,W_ENEMYMON2MOVE3 - W_ENEMYMON1MOVE3
+	call AddNTimes
+	ld [hl],d
+	jr .FinishUp\@
+.AddTeamAttack\@
+; check if our trainer's team has special moves
+
+; get trainer class number
+	ld a,[$D059]
+	sub $C8
+	ld b,a
+	ld hl,TeamAttacks
+
+; iterate through entries in TeamAttacks, checking each for our trainer class
+.IterateTeamAttacks\@
+	ld a,[hli]
+	cp b
+	jr z,.GiveTeamAttacks\@ ; is there a match?
+	inc hl ; if not, go to the next entry
+	inc a
+	jr nz,.IterateTeamAttacks\@
+
+	; no matches found. is this trainer champion rival?
+	ld a,b
+	cp SONY3
+	jr z,.ChampionRival\@
+	jr .FinishUp\@ ; nope
+.GiveTeamAttacks\@
+	ld a,[hl]
+	ld [$D95E],a
+	jr .FinishUp\@
+.ChampionRival\@ ; give attacks to his team
+
+; pidgeot
+	ld a,SKY_ATTACK
+	ld [W_ENEMYMON1MOVE3],a
+
+; starter
+	ld a,[W_RIVALSTARTER]
+	cp BULBASAUR
+	ld b,MEGA_DRAIN
+	jr z,.GiveStarterMove\@
+	cp CHARMANDER
+	ld b,FIRE_BLAST
+	jr z,.GiveStarterMove\@
+	ld b,BLIZZARD ; must be squirtle
+.GiveStarterMove\@
+	ld a,b
+	ld [W_ENEMYMON6MOVE3],a
+.FinishUp\@ ; XXX this needs documenting
+	xor a       ; clear D079-D07B
+	ld de,$D079
+	ld [de],a
+	inc de
+	ld [de],a
+	inc de
+	ld [de],a
+	ld a,[W_CURENEMYLVL]
+	ld b,a
+.LastLoop\@
+	ld hl,$D047
+	ld c,2
+	push bc
+	ld a,$B
+	call Predef
+	pop bc
+	inc de
+	inc de
+	dec b
+	jr nz,.LastLoop\@
+	ret
+
+LoneAttacks: ; 5D22
+; these are used for gym leaders.
+; this is not automatic! you have to write the number you want to W_LONEATTACKNO
+; first. e.g., erika's script writes 4 to W_LONEATTACKNO to get mega drain,
+; the fourth entry in the list.
+
+; first byte:  pokemon in the trainer's party that gets the move
+; second byte: move
+; unterminated
+	db 1,BIDE
+	db 1,BUBBLEBEAM
+	db 2,THUNDERBOLT
+	db 2,MEGA_DRAIN
+	db 3,TOXIC
+	db 3,PSYWAVE
+	db 3,FIRE_BLAST
+	db 4,FISSURE
+
+TeamAttacks: ; 5D32
+; these are used for elite four.
+; this is automatic, based on trainer class.
+; don't be confused by LoneAttacks above, the two data structures are
+	; _completely_ unrelated.
+
+; first byte: trainer (all trainers in this class have this move)
+; second byte: move
+; ff-terminated
+	db LORELEI,BLIZZARD
+	db BRUNO,FISSURE
+	db AGATHA,TOXIC
+	db LANCE,BARRIER
+	db $FF
+
+TrainerDataPointers: ; 5D3B
+	dw YoungsterData,BugCatcherData,LassData,SailorData,JrTrainerMData
+	dw JrTrainerFData,PokemaniacData,SuperNerdData,HikerData,BikerData
+	dw BurglarData,EngineerData,Juggler1Data,FisherData,SwimmerData
+	dw CueBallData,GamblerData,BeautyData,PsychicData,RockerData
+	dw JugglerData,TamerData,BirdKeeperData,BlackbeltData,Green1Data
+	dw ProfOakData,ChiefData,ScientistData,GiovanniData,RocketData
+	dw CooltrainerMData,CooltrainerFData,BrunoData,BrockData,MistyData
+	dw LtSurgeData,ErikaData,KogaData,BlaineData,SabrinaData
+	dw GentlemanData,Green2Data,Green3Data,LoreleiData,ChannelerData
+	dw AgathaData,LanceData
+
+; if first byte != FF, then
+	; first byte is level (of all pokemon on this team)
+	; all the next bytes are pokemon species
+	; null-terminated
+; if first byte == FF, then
+	; first byte is FF (obviously)
+	; every next two bytes are a level and species
+	; null-terminated
+
+YoungsterData:
+	db 11,RATTATA,EKANS,0
+	db 14,SPEAROW,0
+	db 10,RATTATA,RATTATA,ZUBAT,0
+	db 14,RATTATA,EKANS,ZUBAT,0
+	db 15,RATTATA,SPEAROW,0
+	db 17,SLOWPOKE,0
+	db 14,EKANS,SANDSHREW,0
+	db 21,NIDORAN_M,0
+	db 21,EKANS,0
+	db 19,SANDSHREW,ZUBAT,0
+	db 17,RATTATA,RATTATA,RATICATE,0
+	db 18,NIDORAN_M,NIDORINO,0
+	db 17,SPEAROW,RATTATA,RATTATA,SPEAROW,0
+BugCatcherData:
+	db 6,WEEDLE,CATERPIE,0
+	db 7,WEEDLE,KAKUNA,WEEDLE,0
+	db 9,WEEDLE,0
+	db 10,CATERPIE,WEEDLE,CATERPIE,0
+	db 9,WEEDLE,KAKUNA,CATERPIE,METAPOD,0
+	db 11,CATERPIE,METAPOD,0
+	db 11,WEEDLE,KAKUNA,0
+	db 10,CATERPIE,METAPOD,CATERPIE,0
+	db 14,CATERPIE,WEEDLE,0
+	db 16,WEEDLE,CATERPIE,WEEDLE,0
+	db 20,BUTTERFREE,0
+	db 18,METAPOD,CATERPIE,VENONAT,0
+	db 19,BEEDRILL,BEEDRILL,0
+	db 20,CATERPIE,WEEDLE,VENONAT,0
+LassData:
+	db 9,PIDGEY,PIDGEY,0
+	db 10,RATTATA,NIDORAN_M,0
+	db 14,JIGGLYPUFF,0
+	db 31,PARAS,PARAS,PARASECT,0
+	db 11,ODDISH,BELLSPROUT,0
+	db 14,CLEFAIRY,0
+	db 16,PIDGEY,NIDORAN_F,0
+	db 14,PIDGEY,NIDORAN_F,0
+	db 15,NIDORAN_M,NIDORAN_F,0
+	db 13,ODDISH,PIDGEY,ODDISH,0
+	db 18,PIDGEY,NIDORAN_F,0
+	db 18,RATTATA,PIKACHU,0
+	db 23,NIDORAN_F,NIDORINA,0
+	db 24,MEOWTH,MEOWTH,MEOWTH,0
+	db 19,PIDGEY,RATTATA,NIDORAN_M,MEOWTH,PIKACHU,0
+	db 22,CLEFAIRY,CLEFAIRY,0
+	db 23,BELLSPROUT,WEEPINBELL,0
+	db 23,ODDISH,GLOOM,0
+SailorData:
+	db 18,MACHOP,SHELLDER,0
+	db 17,MACHOP,TENTACOOL,0
+	db 21,SHELLDER,0
+	db 17,HORSEA,SHELLDER,TENTACOOL,0
+	db 18,TENTACOOL,STARYU,0
+	db 17,HORSEA,HORSEA,HORSEA,0
+	db 20,MACHOP,0
+	db 21,PIKACHU,PIKACHU,0
+JrTrainerMData:
+	db 11,DIGLETT,SANDSHREW,0
+	db 14,RATTATA,EKANS,0
+	db 18,MANKEY,0
+	db 20,SQUIRTLE,0
+	db 16,SPEAROW,RATICATE,0
+	db 18,DIGLETT,DIGLETT,SANDSHREW,0
+	db 21,GROWLITHE,CHARMANDER,0
+	db 19,RATTATA,DIGLETT,EKANS,SANDSHREW,0
+	db 29,NIDORAN_M,NIDORINO,0
+JrTrainerFData:
+	db 19,GOLDEEN,0
+	db 16,RATTATA,PIKACHU,0
+	db 16,PIDGEY,PIDGEY,PIDGEY,0
+	db 22,BULBASAUR,0
+	db 18,ODDISH,BELLSPROUT,ODDISH,BELLSPROUT,0
+	db 23,MEOWTH,0
+	db 20,PIKACHU,CLEFAIRY,0
+	db 21,PIDGEY,PIDGEOTTO,0
+	db 21,JIGGLYPUFF,PIDGEY,MEOWTH,0
+	db 22,ODDISH,BULBASAUR,0
+	db 24,BULBASAUR,IVYSAUR,0
+	db 24,PIDGEY,MEOWTH,RATTATA,PIKACHU,MEOWTH,0
+	db 30,POLIWAG,POLIWAG,0
+	db 27,PIDGEY,MEOWTH,PIDGEY,PIDGEOTTO,0
+	db 28,GOLDEEN,POLIWAG,HORSEA,0
+	db 31,GOLDEEN,SEAKING,0
+	db 22,BELLSPROUT,CLEFAIRY,0
+	db 20,MEOWTH,ODDISH,PIDGEY,0
+	db 19,PIDGEY,RATTATA,RATTATA,BELLSPROUT,0
+	db 28,GLOOM,ODDISH,ODDISH,0
+	db 29,PIKACHU,RAICHU,0
+	db 33,CLEFAIRY,0
+	db 29,BELLSPROUT,ODDISH,TANGELA,0
+	db 30,TENTACOOL,HORSEA,SEEL,0
+PokemaniacData:
+	db 30,RHYHORN,LICKITUNG,0
+	db 20,CUBONE,SLOWPOKE,0
+	db 20,SLOWPOKE,SLOWPOKE,SLOWPOKE,0
+	db 22,CHARMANDER,CUBONE,0
+	db 25,SLOWPOKE,0
+	db 40,CHARMELEON,LAPRAS,LICKITUNG,0
+	db 23,CUBONE,SLOWPOKE,0
+SuperNerdData:
+	db 11,MAGNEMITE,VOLTORB,0
+	db 12,GRIMER,VOLTORB,KOFFING,0
+	db 20,VOLTORB,KOFFING,VOLTORB,MAGNEMITE,0
+	db 22,GRIMER,MUK,GRIMER,0
+	db 26,KOFFING,0
+	db 22,KOFFING,MAGNEMITE,WEEZING,0
+	db 20,MAGNEMITE,MAGNEMITE,KOFFING,MAGNEMITE,0
+	db 24,MAGNEMITE,VOLTORB,0
+	db 36,VULPIX,VULPIX,NINETALES,0
+	db 34,PONYTA,CHARMANDER,VULPIX,GROWLITHE,0
+	db 41,RAPIDASH,0
+	db 37,GROWLITHE,VULPIX,0
+HikerData:
+	db 10,GEODUDE,GEODUDE,ONIX,0
+	db 15,MACHOP,GEODUDE,0
+	db 13,GEODUDE,GEODUDE,MACHOP,GEODUDE,0
+	db 17,ONIX,0
+	db 21,GEODUDE,ONIX,0
+	db 20,GEODUDE,MACHOP,GEODUDE,0
+	db 21,GEODUDE,ONIX,0
+	db 19,ONIX,GRAVELER,0
+	db 21,GEODUDE,GEODUDE,GRAVELER,0
+	db 25,GEODUDE,0
+	db 20,MACHOP,ONIX,0
+	db 19,GEODUDE,MACHOP,GEODUDE,GEODUDE,0
+	db 20,ONIX,ONIX,GEODUDE,0
+	db 21,GEODUDE,GRAVELER,0
+BikerData:
+	db 28,KOFFING,KOFFING,KOFFING,0
+	db 29,KOFFING,GRIMER,0
+	db 25,KOFFING,KOFFING,WEEZING,KOFFING,GRIMER,0
+	db 28,KOFFING,GRIMER,WEEZING,0
+	db 29,GRIMER,KOFFING,0
+	db 33,WEEZING,0
+	db 26,GRIMER,GRIMER,GRIMER,GRIMER,0
+	db 28,WEEZING,KOFFING,WEEZING,0
+	db 33,MUK,0
+	db 29,VOLTORB,VOLTORB,0
+	db 29,WEEZING,MUK,0
+	db 25,KOFFING,WEEZING,KOFFING,KOFFING,WEEZING,0
+	db 26,KOFFING,KOFFING,GRIMER,KOFFING,0
+	db 28,GRIMER,GRIMER,KOFFING,0
+	db 29,KOFFING,MUK,0
+BurglarData:
+	db 29,GROWLITHE,VULPIX,0
+	db 33,GROWLITHE,0
+	db 28,VULPIX,CHARMANDER,PONYTA,0
+	db 36,GROWLITHE,VULPIX,NINETALES,0
+	db 41,PONYTA,0
+	db 37,VULPIX,GROWLITHE,0
+	db 34,CHARMANDER,CHARMELEON,0
+	db 38,NINETALES,0
+	db 34,GROWLITHE,PONYTA,0
+EngineerData:
+	db 21,VOLTORB,MAGNEMITE,0
+	db 21,MAGNEMITE,0
+	db 18,MAGNEMITE,MAGNEMITE,MAGNETON,0
+Juggler1Data:
+; none
+FisherData:
+	db 17,GOLDEEN,TENTACOOL,GOLDEEN,0
+	db 17,TENTACOOL,STARYU,SHELLDER,0
+	db 22,GOLDEEN,POLIWAG,GOLDEEN,0
+	db 24,TENTACOOL,GOLDEEN,0
+	db 27,GOLDEEN,0
+	db 21,POLIWAG,SHELLDER,GOLDEEN,HORSEA,0
+	db 28,SEAKING,GOLDEEN,SEAKING,SEAKING,0
+	db 31,SHELLDER,CLOYSTER,0
+	db 27,MAGIKARP,MAGIKARP,MAGIKARP,MAGIKARP,MAGIKARP,MAGIKARP,0
+	db 33,SEAKING,GOLDEEN,0
+	db 24,MAGIKARP,MAGIKARP,0
+SwimmerData:
+	db 16,HORSEA,SHELLDER,0
+	db 30,TENTACOOL,SHELLDER,0
+	db 29,GOLDEEN,HORSEA,STARYU,0
+	db 30,POLIWAG,POLIWHIRL,0
+	db 27,HORSEA,TENTACOOL,TENTACOOL,GOLDEEN,0
+	db 29,GOLDEEN,SHELLDER,SEAKING,0
+	db 30,HORSEA,HORSEA,0
+	db 27,TENTACOOL,TENTACOOL,STARYU,HORSEA,TENTACRUEL,0
+	db 31,SHELLDER,CLOYSTER,0
+	db 35,STARYU,0
+	db 28,HORSEA,HORSEA,SEADRA,HORSEA,0
+	db 33,SEADRA,TENTACRUEL,0
+	db 37,STARMIE,0
+	db 33,STARYU,WARTORTLE,0
+	db 32,POLIWHIRL,TENTACOOL,SEADRA,0
+CueBallData:
+	db 28,MACHOP,MANKEY,MACHOP,0
+	db 29,MANKEY,MACHOP,0
+	db 33,MACHOP,0
+	db 29,MANKEY,PRIMEAPE,0
+	db 29,MACHOP,MACHOKE,0
+	db 33,MACHOKE,0
+	db 26,MANKEY,MANKEY,MACHOKE,MACHOP,0
+	db 29,PRIMEAPE,MACHOKE,0
+	db 31,TENTACOOL,TENTACOOL,TENTACRUEL,0
+GamblerData:
+	db 18,POLIWAG,HORSEA,0
+	db 18,BELLSPROUT,ODDISH,0
+	db 18,VOLTORB,MAGNEMITE,0
+	db 18,GROWLITHE,VULPIX,0
+	db 22,POLIWAG,POLIWAG,POLIWHIRL,0
+	db 22,ONIX,GEODUDE,GRAVELER,0
+	db 24,GROWLITHE,VULPIX,0
+BeautyData:
+	db 21,ODDISH,BELLSPROUT,ODDISH,BELLSPROUT,0
+	db 24,BELLSPROUT,BELLSPROUT,0
+	db 26,EXEGGCUTE,0
+	db 27,RATTATA,PIKACHU,RATTATA,0
+	db 29,CLEFAIRY,MEOWTH,0
+	db 35,SEAKING,0
+	db 30,SHELLDER,SHELLDER,CLOYSTER,0
+	db 31,POLIWAG,SEAKING,0
+	db 29,PIDGEOTTO,WIGGLYTUFF,0
+	db 29,BULBASAUR,IVYSAUR,0
+	db 33,WEEPINBELL,BELLSPROUT,WEEPINBELL,0
+	db 27,POLIWAG,GOLDEEN,SEAKING,GOLDEEN,POLIWAG,0
+	db 30,GOLDEEN,SEAKING,0
+	db 29,STARYU,STARYU,STARYU,0
+	db 30,SEADRA,HORSEA,SEADRA,0
+PsychicData:
+	db 31,KADABRA,SLOWPOKE,MR_MIME,KADABRA,0
+	db 34,MR_MIME,KADABRA,0
+	db 33,SLOWPOKE,SLOWPOKE,SLOWBRO,0
+	db 38,SLOWBRO,0
+RockerData:
+	db 20,VOLTORB,MAGNEMITE,VOLTORB,0
+	db 29,VOLTORB,ELECTRODE,0
+JugglerData:
+	db 29,KADABRA,MR_MIME,0
+	db 41,DROWZEE,HYPNO,KADABRA,KADABRA,0
+	db 31,DROWZEE,DROWZEE,KADABRA,DROWZEE,0
+	db 34,DROWZEE,HYPNO,0
+	db 48,MR_MIME,0
+	db 33,HYPNO,0
+	db 38,HYPNO,0
+	db 34,DROWZEE,KADABRA,0
+TamerData:
+	db 34,SANDSLASH,ARBOK,0
+	db 33,ARBOK,SANDSLASH,ARBOK,0
+	db 43,RHYHORN,0
+	db 39,ARBOK,TAUROS,0
+	db 44,PERSIAN,GOLDUCK,0
+	db 42,RHYHORN,PRIMEAPE,ARBOK,TAUROS,0
+BirdKeeperData:
+	db 29,PIDGEY,PIDGEOTTO,0
+	db 25,SPEAROW,PIDGEY,PIDGEY,SPEAROW,SPEAROW,0
+	db 26,PIDGEY,PIDGEOTTO,SPEAROW,FEAROW,0
+	db 33,FARFETCH_D,0
+	db 29,SPEAROW,FEAROW,0
+	db 26,PIDGEOTTO,FARFETCH_D,DODUO,PIDGEY,0
+	db 28,DODRIO,DODUO,DODUO,0
+	db 29,SPEAROW,FEAROW,0
+	db 34,DODRIO,0
+	db 26,SPEAROW,SPEAROW,FEAROW,SPEAROW,0
+	db 30,FEAROW,FEAROW,PIDGEOTTO,0
+	db 39,PIDGEOTTO,PIDGEOTTO,PIDGEY,PIDGEOTTO,0
+	db 42,FARFETCH_D,FEAROW,0
+	db 28,PIDGEY,DODUO,PIDGEOTTO,0
+	db 26,PIDGEY,SPEAROW,PIDGEY,FEAROW,0
+	db 29,PIDGEOTTO,FEAROW,0
+	db 28,SPEAROW,DODUO,FEAROW,0
+BlackbeltData:
+	db 37,HITMONLEE,HITMONCHAN,0
+	db 31,MANKEY,MANKEY,PRIMEAPE,0
+	db 32,MACHOP,MACHOKE,0
+	db 36,PRIMEAPE,0
+	db 31,MACHOP,MANKEY,PRIMEAPE,0
+	db 40,MACHOP,MACHOKE,0
+	db 43,MACHOKE,0
+	db 38,MACHOKE,MACHOP,MACHOKE,0
+	db 43,MACHOKE,MACHOP,MACHOKE,0
+Green1Data:
+	db 5,SQUIRTLE,0
+	db 5,BULBASAUR,0
+	db 5,CHARMANDER,0
+	db $FF,9,PIDGEY,8,SQUIRTLE,0
+	db $FF,9,PIDGEY,8,BULBASAUR,0
+	db $FF,9,PIDGEY,8,CHARMANDER,0
+	db $FF,18,PIDGEOTTO,15,ABRA,15,RATTATA,17,SQUIRTLE,0
+	db $FF,18,PIDGEOTTO,15,ABRA,15,RATTATA,17,BULBASAUR,0
+	db $FF,18,PIDGEOTTO,15,ABRA,15,RATTATA,17,CHARMANDER,0
+ProfOakData:
+	db $FF,66,TAUROS,67,EXEGGUTOR,68,ARCANINE,69,BLASTOISE,70,GYARADOS,0
+	db $FF,66,TAUROS,67,EXEGGUTOR,68,ARCANINE,69,VENUSAUR,70,GYARADOS,0
+	db $FF,66,TAUROS,67,EXEGGUTOR,68,ARCANINE,69,CHARIZARD,70,GYARADOS,0
+ChiefData:
+; none
+ScientistData:
+	db 34,KOFFING,VOLTORB,0
+	db 26,GRIMER,WEEZING,KOFFING,WEEZING,0
+	db 28,MAGNEMITE,VOLTORB,MAGNETON,0
+	db 29,ELECTRODE,WEEZING,0
+	db 33,ELECTRODE,0
+	db 26,MAGNETON,KOFFING,WEEZING,MAGNEMITE,0
+	db 25,VOLTORB,KOFFING,MAGNETON,MAGNEMITE,KOFFING,0
+	db 29,ELECTRODE,MUK,0
+	db 29,GRIMER,ELECTRODE,0
+	db 28,VOLTORB,KOFFING,MAGNETON,0
+	db 29,MAGNEMITE,KOFFING,0
+	db 33,MAGNEMITE,MAGNETON,VOLTORB,0
+	db 34,MAGNEMITE,ELECTRODE,0
+GiovanniData:
+	db $FF,25,ONIX,24,RHYHORN,29,KANGASKHAN,0
+	db $FF,37,NIDORINO,35,KANGASKHAN,37,RHYHORN,41,NIDOQUEEN,0
+	db $FF,45,RHYHORN,42,DUGTRIO,44,NIDOQUEEN,45,NIDOKING,50,RHYDON,0
+RocketData:
+	db 13,RATTATA,ZUBAT,0
+	db 11,SANDSHREW,RATTATA,ZUBAT,0
+	db 12,ZUBAT,EKANS,0
+	db 16,RATICATE,0
+	db 17,MACHOP,DROWZEE,0
+	db 15,EKANS,ZUBAT,0
+	db 20,RATICATE,ZUBAT,0
+	db 21,DROWZEE,MACHOP,0
+	db 21,RATICATE,RATICATE,0
+	db 20,GRIMER,KOFFING,KOFFING,0
+	db 19,RATTATA,RATICATE,RATICATE,RATTATA,0
+	db 22,GRIMER,KOFFING,0
+	db 17,ZUBAT,KOFFING,GRIMER,ZUBAT,RATICATE,0
+	db 20,RATTATA,RATICATE,DROWZEE,0
+	db 21,MACHOP,MACHOP,0
+	db 23,SANDSHREW,EKANS,SANDSLASH,0
+	db 23,EKANS,SANDSHREW,ARBOK,0
+	db 21,KOFFING,ZUBAT,0
+	db 25,ZUBAT,ZUBAT,GOLBAT,0
+	db 26,KOFFING,DROWZEE,0
+	db 23,ZUBAT,RATTATA,RATICATE,ZUBAT,0
+	db 26,DROWZEE,KOFFING,0
+	db 29,CUBONE,ZUBAT,0
+	db 25,GOLBAT,ZUBAT,ZUBAT,RATICATE,ZUBAT,0
+	db 28,RATICATE,HYPNO,RATICATE,0
+	db 29,MACHOP,DROWZEE,0
+	db 28,EKANS,ZUBAT,CUBONE,0
+	db 33,ARBOK,0
+	db 33,HYPNO,0
+	db 29,MACHOP,MACHOKE,0
+	db 28,ZUBAT,ZUBAT,GOLBAT,0
+	db 26,RATICATE,ARBOK,KOFFING,GOLBAT,0
+	db 29,CUBONE,CUBONE,0
+	db 29,SANDSHREW,SANDSLASH,0
+	db 26,RATICATE,ZUBAT,GOLBAT,RATTATA,0
+	db 28,WEEZING,GOLBAT,KOFFING,0
+	db 28,DROWZEE,GRIMER,MACHOP,0
+	db 28,GOLBAT,DROWZEE,HYPNO,0
+	db 33,MACHOKE,0
+	db 25,RATTATA,RATTATA,ZUBAT,RATTATA,EKANS,0
+	db 32,CUBONE,DROWZEE,MAROWAK,0
+CooltrainerMData:
+	db 39,NIDORINO,NIDOKING,0
+	db 43,EXEGGUTOR,CLOYSTER,ARCANINE,0
+	db 43,KINGLER,TENTACRUEL,BLASTOISE,0
+	db 45,KINGLER,STARMIE,0
+	db 42,IVYSAUR,WARTORTLE,CHARMELEON,CHARIZARD,0
+	db 44,IVYSAUR,WARTORTLE,CHARMELEON,0
+	db 49,NIDOKING,0
+	db 44,KINGLER,CLOYSTER,0
+	db 39,SANDSLASH,DUGTRIO,0
+	db 43,RHYHORN,0
+CooltrainerFData:
+	db 24,WEEPINBELL,GLOOM,IVYSAUR,0
+	db 43,BELLSPROUT,WEEPINBELL,VICTREEBEL,0
+	db 43,PARASECT,DEWGONG,CHANSEY,0
+	db 46,VILEPLUME,BUTTERFREE,0
+	db 44,PERSIAN,NINETALES,0
+	db 45,IVYSAUR,VENUSAUR,0
+	db 45,NIDORINA,NIDOQUEEN,0
+	db 43,PERSIAN,NINETALES,RAICHU,0
+BrunoData:
+	db $FF,53,ONIX,55,HITMONCHAN,55,HITMONLEE,56,ONIX,58,MACHAMP,0
+BrockData:
+	db $FF,12,GEODUDE,14,ONIX,0
+MistyData:
+	db $FF,18,STARYU,21,STARMIE,0
+LtSurgeData:
+	db $FF,21,VOLTORB,18,PIKACHU,24,RAICHU,0
+ErikaData:
+	db $FF,29,VICTREEBEL,24,TANGELA,29,VILEPLUME,0
+KogaData:
+	db $FF,37,KOFFING,39,MUK,37,KOFFING,43,WEEZING,0
+BlaineData:
+	db $FF,42,GROWLITHE,40,PONYTA,42,RAPIDASH,47,ARCANINE,0
+SabrinaData:
+	db $FF,38,KADABRA,37,MR_MIME,38,VENOMOTH,43,ALAKAZAM,0
+GentlemanData:
+	db 18,GROWLITHE,GROWLITHE,0
+	db 19,NIDORAN_M,NIDORAN_F,0
+	db 23,PIKACHU,0
+	db 48,PRIMEAPE,0
+	db 17,GROWLITHE,PONYTA,0
+Green2Data:
+	db $FF,19,PIDGEOTTO,16,RATICATE,18,KADABRA,20,WARTORTLE,0
+	db $FF,19,PIDGEOTTO,16,RATICATE,18,KADABRA,20,IVYSAUR,0
+	db $FF,19,PIDGEOTTO,16,RATICATE,18,KADABRA,20,CHARMELEON,0
+	db $FF,25,PIDGEOTTO,23,GROWLITHE,22,EXEGGCUTE,20,KADABRA,25,WARTORTLE,0
+	db $FF,25,PIDGEOTTO,23,GYARADOS,22,GROWLITHE,20,KADABRA,25,IVYSAUR,0
+	db $FF,25,PIDGEOTTO,23,EXEGGCUTE,22,GYARADOS,20,KADABRA,25,CHARMELEON,0
+	db $FF,37,PIDGEOT,38,GROWLITHE,35,EXEGGCUTE,35,ALAKAZAM,40,BLASTOISE,0
+	db $FF,37,PIDGEOT,38,GYARADOS,35,GROWLITHE,35,ALAKAZAM,40,VENUSAUR,0
+	db $FF,37,PIDGEOT,38,EXEGGCUTE,35,GYARADOS,35,ALAKAZAM,40,CHARIZARD,0
+	db $FF,47,PIDGEOT,45,RHYHORN,45,GROWLITHE,47,EXEGGCUTE,50,ALAKAZAM ;\
+		db 53,BLASTOISE,0
+	db $FF,47,PIDGEOT,45,RHYHORN,45,GYARADOS,47,GROWLITHE,50,ALAKAZAM ;\
+		db 53,VENUSAUR,0
+	db $FF,47,PIDGEOT,45,RHYHORN,45,EXEGGCUTE,47,GYARADOS,50,ALAKAZAM ;\
+		db 53,CHARIZARD,0
+Green3Data:
+	db $FF,61,PIDGEOT,59,ALAKAZAM,61,RHYDON,61,ARCANINE,63,EXEGGUTOR ;\
+		db 65,BLASTOISE,0
+	db $FF,61,PIDGEOT,59,ALAKAZAM,61,RHYDON,61,GYARADOS,63,ARCANINE ;\
+		db 65,VENUSAUR,0
+	db $FF,61,PIDGEOT,59,ALAKAZAM,61,RHYDON,61,EXEGGUTOR,63,GYARADOS ;\
+		db 65,CHARIZARD,0
+LoreleiData:
+	db $FF,54,DEWGONG,53,CLOYSTER,54,SLOWBRO,56,JYNX,56,LAPRAS,0
+ChannelerData:
+	db 22,GASTLY,0
+	db 24,GASTLY,0
+	db 23,GASTLY,GASTLY,0
+	db 24,GASTLY,0
+	db 23,GASTLY,0
+	db 24,GASTLY,0
+	db 24,HAUNTER,0
+	db 22,GASTLY,0
+	db 24,GASTLY,0
+	db 23,GASTLY,GASTLY,0
+	db 24,GASTLY,0
+	db 22,GASTLY,0
+	db 24,GASTLY,0
+	db 23,HAUNTER,0
+	db 24,GASTLY,0
+	db 22,GASTLY,0
+	db 24,GASTLY,0
+	db 22,HAUNTER,0
+	db 22,GASTLY,GASTLY,GASTLY,0
+	db 24,GASTLY,0
+	db 24,GASTLY,0
+	db 34,GASTLY,HAUNTER,0
+	db 38,HAUNTER,0
+	db 33,GASTLY,GASTLY,HAUNTER,0
+AgathaData:
+	db $FF,56,GENGAR,56,GOLBAT,55,HAUNTER,58,ARBOK,60,GENGAR,0
+LanceData:
+	db $FF,58,GYARADOS,56,DRAGONAIR,56,DRAGONAIR,60,AERODACTYL ;\
+		db 62,DRAGONITE,0
+
+TrainerAI: ; 652E
+;XXX called at 34964, 3c342, 3c398
+	and a
+	ld a,[W_ISINBATTLE]
+	dec a
+	ret z ; if not a trainer, we're done here
+	ld a,[W_ISLINKBATTLE]
+	cp 4
+	ret z
+	ld a,[W_TRAINERCLASS] ; what trainer class is this?
+	dec a
+	ld c,a
+	ld b,0
+	ld hl,TrainerAIPointers
+	add hl,bc
+	add hl,bc
+	add hl,bc
+	ld a,[W_AICOUNT]
+	and a
+	ret z ; if no AI uses left, we're done here
+	inc hl
+	inc a
+	jr nz,.getpointer\@
+	dec hl
+	ld a,[hli]
+	ld [W_AICOUNT],a
+.getpointer\@
+	ld a,[hli]
+	ld h,[hl]
+	ld l,a
+	call GenRandom
+	jp [hl]
+
+TrainerAIPointers: ; 655C
+; one entry per trainer class
+; first byte, number of times (per Pokémon) it can occur
+; next two bytes, pointer to AI subroutine for trainer class
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,JugglerAI ; juggler_x
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 3,JugglerAI ; juggler
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 2,BlackbeltAI ; blackbelt
+	dbw 3,GenericAI
+	dbw 3,GenericAI
+	dbw 1,GenericAI ; chief
+	dbw 3,GenericAI
+	dbw 1,GiovanniAI ; giovanni
+	dbw 3,GenericAI
+	dbw 2,CooltrainerMAI ; cooltrainerm
+	dbw 1,CooltrainerFAI ; cooltrainerf
+	dbw 2,BrunoAI ; bruno
+	dbw 5,BrockAI ; brock
+	dbw 1,MistyAI ; misty
+	dbw 1,LtSurgeAI ; surge
+	dbw 1,ErikaAI ; erika
+	dbw 2,KogaAI ; koga
+	dbw 2,BlaineAI ; blaine
+	dbw 1,SabrinaAI ; sabrina
+	dbw 3,GenericAI
+	dbw 1,Sony2AI ; sony2
+	dbw 1,Sony3AI ; sony3
+	dbw 2,LoreleiAI ; lorelei
+	dbw 3,GenericAI
+	dbw 2,AgathaAI ; agatha
+	dbw 1,LanceAI ; lance
+
+JugglerAI:
+	cp $40
+	ret nc
+	jp $672A
+
+BlackbeltAI:
+	cp $20
+	ret nc
+	jp AIUseXAttack
+
+GiovanniAI:
+	cp $40
+	ret nc
+	jp AIUseGuardSpec
+
+CooltrainerMAI:
+	cp $40
+	ret nc
+	jp AIUseXAttack
+
+CooltrainerFAI:
+	cp $40
+	ld a,$A
+	call $67CF
+	jp c,AIUseHyperPotion
+	ld a,5
+	call $67CF
+	ret nc
+	jp $672A
+
+BrockAI:
+; if his active monster has a status condition, use a full heal
+	ld a,[W_OPPONENTSTATUS]
+	and a
+	ret z
+	jp AIUseFullHeal
+
+MistyAI:
+	cp $40
+	ret nc
+	jp AIUseXDefend
+
+LtSurgeAI:
+	cp $40
+	ret nc
+	jp AIUseXSpeed
+
+ErikaAI:
+	cp $80
+	ret nc
+	ld a,$A
+	call $67CF
+	ret nc
+	jp AIUseSuperPotion
+
+KogaAI:
+	cp $40
+	ret nc
+	jp AIUseXAttack
+
+BlaineAI:
+	cp $40
+	ret nc
+	jp AIUseSuperPotion
+
+SabrinaAI:
+	cp $40
+	ret nc
+	ld a,$A
+	call $67CF
+	ret nc
+	jp AIUseHyperPotion
+
+Sony2AI:
+	cp $20
+	ret nc
+	ld a,5
+	call $67CF
+	ret nc
+	jp AIUsePotion
+
+Sony3AI:
+	cp $20
+	ret nc
+	ld a,5
+	call $67CF
+	ret nc
+	jp AIUseFullRestore
+
+LoreleiAI:
+	cp $80
+	ret nc
+	ld a,5
+	call $67CF
+	ret nc
+	jp AIUseSuperPotion
+
+BrunoAI:
+	cp $40
+	ret nc
+	jp AIUseXDefend
+
+AgathaAI:
+	cp $14
+	jp c,$672A
+	cp $80
+	ret nc
+	ld a,4
+	call $67CF
+	ret nc
+	jp AIUseSuperPotion
+
+LanceAI:
+	cp $80
+	ret nc
+	ld a,5
+	call $67CF
+	ret nc
+	jp AIUseHyperPotion
+
+GenericAI:
+	and a ; clear carry
+	ret
+
+; end of individual trainer AI routines
+
+DecrementAICount: ; 6695
+	ld hl,W_AICOUNT
+	dec [hl]
+	scf
+	ret
+
+Function669B: ; 669B
+; XXX what does this do
+	ld a,$8E
+	jp $3740
+
+AIUseFullRestore:
+	call AICureStatus
+	ld a,FULL_RESTORE
+	ld [$CF05],a
+	ld de,$CEEB
+	ld hl,$CFE7
+	ld a,[hld]
+	ld [de],a
+	inc de
+	ld a,[hl]
+	ld [de],a
+	inc de
+	ld hl,$CFF5
+	ld a,[hld]
+	ld [de],a
+	inc de
+	ld [$CEE9],a
+	ld [$CFE7],a
+	ld a,[hl]
+	ld [de],a
+	ld [$CEEA],a
+	ld [W_OPPONENTHP],a
+	jr Function6718
+
+AIUsePotion:
+; enemy trainer heals his monster with a potion
+	ld a,POTION
+	ld b,20
+	jr AIRecoverHP
+
+AIUseSuperPotion:
+; enemy trainer heals his monster with a super potion
+	ld a,SUPER_POTION
+	ld b,50
+	jr AIRecoverHP
+
+AIUseHyperPotion:
+; enemy trainer heals his monster with a hyper potion
+	ld a,HYPER_POTION
+	ld b,200
+	; fallthrough
+
+AIRecoverHP: ; 66DA
+; heal b HP and print "trainer used $(a) on pokemon!"
+	ld [$CF05],a
+	ld hl,$CFE7
+	ld a,[hl]
+	ld [$CEEB],a
+	add b
+	ld [hld],a
+	ld [$CEED],a
+	ld a,[hl]
+	ld [$CEEC],a
+	ld [$CEEE],a
+	jr nc,.next\@
+	inc a
+	ld [hl],a
+	ld [$CEEE],a
+.next\@
+	inc hl
+	ld a,[hld]
+	ld b,a
+	ld de,$CFF5
+	ld a,[de]
+	dec de
+	ld [$CEE9],a
+	sub b
+	ld a,[hli]
+	ld b,a
+	ld a,[de]
+	ld [$CEEA],a
+	sbc b
+	jr nc,Function6718
+	inc de
+	ld a,[de]
+	dec de
+	ld [hld],a
+	ld [$CEED],a
+	ld a,[de]
+	ld [hl],a
+	ld [$CEEE],a
+	; fallthrough
+
+Function6718: ; 6718
+	call AIPrintItemUse_
+	ld hl,$C3CA
+	xor a
+	ld [$CF94],a
+	ld a,$48
+	call Predef
+	jp DecrementAICount
+
+Function672A: ; 672A
+	ld a,[W_ENEMYMONCOUNT]
+	ld c,a
+	ld hl,W_ENEMYMON1HP
+
+	ld d,0 ; keep count of unfainted monsters
+
+	; count how many monsters haven't fainted yet
+.loop\@
+	ld a,[hli]
+	ld b,a
+	ld a,[hld]
+	or b
+	jr z,.Fainted\@ ; has monster fainted?
+	inc d
+.Fainted\@
+	push bc
+	ld bc,$2C
+	add hl,bc
+	pop bc
+	dec c
+	jr nz,.loop\@
+
+	ld a,d ; how many available monsters are there?
+	cp 2 ; don't bother if only 1 or 2
+	jp nc,Function674B ; XXX check, does this jump when a = 2?
+	and a
+	ret
+
+Function674B: ; 674B
+
+; prepare to withdraw the active monster: copy hp, number, and status to roster
+
+	ld a,[W_OPPONENTNUMBER]
+	ld hl,W_ENEMYMON1HP
+	ld bc,$2C
+	call AddNTimes
+	ld d,h
+	ld e,l
+	ld hl,W_OPPONENTHP
+	ld bc,4
+	call CopyData
+
+	ld hl,AIBattleWithdrawText
+	call PrintText
+
+	ld a,1
+	ld [$D11D],a
+	ld hl,EnemySendOut
+	ld b,BANK(EnemySendOut)
+	call Bankswitch
+	xor a
+	ld [$D11D],a
+
+	ld a,[W_ISLINKBATTLE]
+	cp 4
+	ret z
+	scf
+	ret
+
+AIBattleWithdrawText:
+	TX_FAR _AIBattleWithdrawText
+	db "@"
+
+AIUseFullHeal:
+	call $669B
+	call AICureStatus
+	ld a,FULL_HEAL
+	jp AIPrintItemUse
+
+AICureStatus:
+; cures the status of enemy's active pokemon
+	ld a,[W_OPPONENTNUMBER]
+	ld hl,$D8A8
+	ld bc,$2C
+	call AddNTimes
+	xor a
+	ld [hl],a ; clear status in enemy team roster
+	ld [W_OPPONENTSTATUS],a ; clear status of active enemy
+	ld hl,$D069
+	res 0,[hl]
+	ret
+
+AIUseXAccuracy: ; unused
+	call $669B
+	ld hl,$D068
+	set 0,[hl]
+	ld a,X_ACCURACY
+	jp AIPrintItemUse
+
+AIUseGuardSpec:
+	call $669B
+	ld hl,$D068
+	set 1,[hl]
+	ld a,GUARD_SPEC_
+	jp AIPrintItemUse
+
+AIUseDireHit: ; unused
+	call $669B
+	ld hl,$D068
+	set 2,[hl]
+	ld a,DIRE_HIT
+	jp AIPrintItemUse
+
+Function67CF: ; 67CF
+	ld [$FF99],a
+	ld hl,$CFF4
+	ld a,[hli]
+	ld [$FF95],a
+	ld a,[hl]
+	ld [$FF96],a
+	ld b,2
+	call $38B9
+	ld a,[$FF98]
+	ld c,a
+	ld a,[$FF97]
+	ld b,a
+	ld hl,$CFE7
+	ld a,[hld]
+	ld e,a
+	ld a,[hl]
+	ld d,a
+	ld a,d
+	sub b
+	ret nz
+	ld a,e
+	sub c
+	ret
+
+AIUseXAttack:
+	ld b,$A
+	ld a,X_ATTACK
+	jr AIIncreaseStat
+
+AIUseXDefend:
+	ld b,$B
+	ld a,X_DEFEND
+	jr AIIncreaseStat
+
+AIUseXSpeed:
+	ld b,$C
+	ld a,X_SPEED
+	jr AIIncreaseStat
+
+AIUseXSpecial:
+	ld b,$D
+	ld a,X_SPECIAL
+	; fallthrough
+
+AIIncreaseStat:
+	ld [$CF05],a
+	push bc
+	call AIPrintItemUse_
+	pop bc
+	ld hl,$CFCD
+	ld a,[hld]
+	push af
+	ld a,[hl]
+	push af
+	push hl
+	ld a,$AF
+	ld [hli],a
+	ld [hl],b
+	ld hl,$7428
+	ld b,$F
+	call Bankswitch
+	pop hl
+	pop af
+	ld [hli],a
+	pop af
+	ld [hl],a
+	jp DecrementAICount
+
+AIPrintItemUse:
+	ld [$CF05],a
+	call AIPrintItemUse_
+	jp DecrementAICount
+
+AIPrintItemUse_:
+; print "x used [$CF05] on z!"
+	ld a,[$CF05]
+	ld [$D11E],a
+	call GetItemName
+	ld hl,AIBattleUseItemText
+	jp PrintText
+
+AIBattleUseItemText:
+	TX_FAR _AIBattleUseItemText
+	db "@"
+
+INCBIN "baserom.gbc",$3A849,$3B05C - $3A849
+
+EvosAttacksPointerTable: ; 705C
+	dw Mon112_EvosAttacks
+	dw Mon115_EvosAttacks
+	dw Mon032_EvosAttacks
+	dw Mon035_EvosAttacks
+	dw Mon021_EvosAttacks
+	dw Mon100_EvosAttacks
+	dw Mon034_EvosAttacks
+	dw Mon080_EvosAttacks
+	dw Mon002_EvosAttacks
+	dw Mon103_EvosAttacks
+	dw Mon108_EvosAttacks
+	dw Mon102_EvosAttacks
+	dw Mon088_EvosAttacks
+	dw Mon094_EvosAttacks
+	dw Mon029_EvosAttacks
+	dw Mon031_EvosAttacks
+	dw Mon104_EvosAttacks
+	dw Mon111_EvosAttacks
+	dw Mon131_EvosAttacks
+	dw Mon059_EvosAttacks
+	dw Mon151_EvosAttacks
+	dw Mon130_EvosAttacks
+	dw Mon090_EvosAttacks
+	dw Mon072_EvosAttacks
+	dw Mon092_EvosAttacks
+	dw Mon123_EvosAttacks
+	dw Mon120_EvosAttacks
+	dw Mon009_EvosAttacks
+	dw Mon127_EvosAttacks
+	dw Mon114_EvosAttacks
+	dw Mon152_EvosAttacks	;MissingNo
+	dw Mon153_EvosAttacks	;MissingNo
+	dw Mon058_EvosAttacks
+	dw Mon095_EvosAttacks
+	dw Mon022_EvosAttacks
+	dw Mon016_EvosAttacks
+	dw Mon079_EvosAttacks
+	dw Mon064_EvosAttacks
+	dw Mon075_EvosAttacks
+	dw Mon113_EvosAttacks
+	dw Mon067_EvosAttacks
+	dw Mon122_EvosAttacks
+	dw Mon106_EvosAttacks
+	dw Mon107_EvosAttacks
+	dw Mon024_EvosAttacks
+	dw Mon047_EvosAttacks
+	dw Mon054_EvosAttacks
+	dw Mon096_EvosAttacks
+	dw Mon076_EvosAttacks
+	dw Mon154_EvosAttacks	;MissingNo
+	dw Mon126_EvosAttacks
+	dw Mon155_EvosAttacks	;MissingNo
+	dw Mon125_EvosAttacks
+	dw Mon082_EvosAttacks
+	dw Mon109_EvosAttacks
+	dw Mon156_EvosAttacks	;MissingNo
+	dw Mon056_EvosAttacks
+	dw Mon086_EvosAttacks
+	dw Mon050_EvosAttacks
+	dw Mon128_EvosAttacks
+	dw Mon157_EvosAttacks	;MissingNo
+	dw Mon158_EvosAttacks	;MissingNo
+	dw Mon159_EvosAttacks	;MissingNo
+	dw Mon083_EvosAttacks
+	dw Mon048_EvosAttacks
+	dw Mon149_EvosAttacks
+	dw Mon160_EvosAttacks	;MissingNo
+	dw Mon161_EvosAttacks	;MissingNo
+	dw Mon162_EvosAttacks	;MissingNo
+	dw Mon084_EvosAttacks
+	dw Mon060_EvosAttacks
+	dw Mon124_EvosAttacks
+	dw Mon146_EvosAttacks
+	dw Mon144_EvosAttacks
+	dw Mon145_EvosAttacks
+	dw Mon132_EvosAttacks
+	dw Mon052_EvosAttacks
+	dw Mon098_EvosAttacks
+	dw Mon163_EvosAttacks	;MissingNo
+	dw Mon164_EvosAttacks	;MissingNo
+	dw Mon165_EvosAttacks	;MissingNo
+	dw Mon037_EvosAttacks
+	dw Mon038_EvosAttacks
+	dw Mon025_EvosAttacks
+	dw Mon026_EvosAttacks
+	dw Mon166_EvosAttacks	;MissingNo
+	dw Mon167_EvosAttacks	;MissingNo
+	dw Mon147_EvosAttacks
+	dw Mon148_EvosAttacks
+	dw Mon140_EvosAttacks
+	dw Mon141_EvosAttacks
+	dw Mon116_EvosAttacks
+	dw Mon117_EvosAttacks
+	dw Mon168_EvosAttacks	;MissingNo
+	dw Mon169_EvosAttacks	;MissingNo
+	dw Mon027_EvosAttacks
+	dw Mon028_EvosAttacks
+	dw Mon138_EvosAttacks
+	dw Mon139_EvosAttacks
+	dw Mon039_EvosAttacks
+	dw Mon040_EvosAttacks
+	dw Mon133_EvosAttacks
+	dw Mon136_EvosAttacks
+	dw Mon135_EvosAttacks
+	dw Mon134_EvosAttacks
+	dw Mon066_EvosAttacks
+	dw Mon041_EvosAttacks
+	dw Mon023_EvosAttacks
+	dw Mon046_EvosAttacks
+	dw Mon061_EvosAttacks
+	dw Mon062_EvosAttacks
+	dw Mon013_EvosAttacks
+	dw Mon014_EvosAttacks
+	dw Mon015_EvosAttacks
+	dw Mon170_EvosAttacks	;MissingNo
+	dw Mon085_EvosAttacks
+	dw Mon057_EvosAttacks
+	dw Mon051_EvosAttacks
+	dw Mon049_EvosAttacks
+	dw Mon087_EvosAttacks
+	dw Mon171_EvosAttacks	;MissingNo
+	dw Mon172_EvosAttacks	;MissingNo
+	dw Mon010_EvosAttacks
+	dw Mon011_EvosAttacks
+	dw Mon012_EvosAttacks
+	dw Mon068_EvosAttacks
+	dw Mon173_EvosAttacks	;MissingNo
+	dw Mon055_EvosAttacks
+	dw Mon097_EvosAttacks
+	dw Mon042_EvosAttacks
+	dw Mon150_EvosAttacks
+	dw Mon143_EvosAttacks
+	dw Mon129_EvosAttacks
+	dw Mon174_EvosAttacks	;MissingNo
+	dw Mon175_EvosAttacks	;MissingNo
+	dw Mon089_EvosAttacks
+	dw Mon176_EvosAttacks	;MissingNo
+	dw Mon099_EvosAttacks
+	dw Mon091_EvosAttacks
+	dw Mon177_EvosAttacks	;MissingNo
+	dw Mon101_EvosAttacks
+	dw Mon036_EvosAttacks
+	dw Mon110_EvosAttacks
+	dw Mon053_EvosAttacks
+	dw Mon105_EvosAttacks
+	dw Mon178_EvosAttacks	;MissingNo
+	dw Mon093_EvosAttacks
+	dw Mon063_EvosAttacks
+	dw Mon065_EvosAttacks
+	dw Mon017_EvosAttacks
+	dw Mon018_EvosAttacks
+	dw Mon121_EvosAttacks
+	dw Mon001_EvosAttacks
+	dw Mon003_EvosAttacks
+	dw Mon073_EvosAttacks
+	dw Mon179_EvosAttacks	;MissingNo
+	dw Mon118_EvosAttacks
+	dw Mon119_EvosAttacks
+	dw Mon180_EvosAttacks	;MissingNo
+	dw Mon181_EvosAttacks	;MissingNo
+	dw Mon182_EvosAttacks	;MissingNo
+	dw Mon183_EvosAttacks	;MissingNo
+	dw Mon077_EvosAttacks
+	dw Mon078_EvosAttacks
+	dw Mon019_EvosAttacks
+	dw Mon020_EvosAttacks
+	dw Mon033_EvosAttacks
+	dw Mon030_EvosAttacks
+	dw Mon074_EvosAttacks
+	dw Mon137_EvosAttacks
+	dw Mon142_EvosAttacks
+	dw Mon184_EvosAttacks	;MissingNo
+	dw Mon081_EvosAttacks
+	dw Mon185_EvosAttacks	;MissingNo
+	dw Mon186_EvosAttacks	;MissingNo
+	dw Mon004_EvosAttacks
+	dw Mon007_EvosAttacks
+	dw Mon005_EvosAttacks
+	dw Mon008_EvosAttacks
+	dw Mon006_EvosAttacks
+	dw Mon187_EvosAttacks	;MissingNo
+	dw Mon188_EvosAttacks	;MissingNo
+	dw Mon189_EvosAttacks	;MissingNo
+	dw Mon190_EvosAttacks	;MissingNo
+	dw Mon043_EvosAttacks
+	dw Mon044_EvosAttacks
+	dw Mon045_EvosAttacks
+	dw Mon069_EvosAttacks
+	dw Mon070_EvosAttacks
+	dw Mon071_EvosAttacks
+
+Mon112_EvosAttacks:
+;RHYDON
+;Evolutions
+	db 0
+;Learnset
+	db 30,STOMP
+	db 35,TAIL_WHIP
+	db 40,FURY_ATTACK
+	db 48,HORN_DRILL
+	db 55,LEER
+	db 64,TAKE_DOWN
+	db 0
+Mon115_EvosAttacks:
+;KANGASKHAN
+;Evolutions
+	db 0
+;Learnset
+	db 26,BITE
+	db 31,TAIL_WHIP
+	db 36,MEGA_PUNCH
+	db 41,LEER
+	db 46,DIZZY_PUNCH
+	db 0
+Mon032_EvosAttacks:
+;NIDORAN_M
+;Evolutions
+	db EV_LEVEL,16,NIDORINO
+	db 0
+;Learnset
+	db 8,HORN_ATTACK
+	db 14,POISON_STING
+	db 21,FOCUS_ENERGY
+	db 29,FURY_ATTACK
+	db 36,HORN_DRILL
+	db 43,DOUBLE_KICK
+	db 0
+Mon035_EvosAttacks:
+;CLEFAIRY
+;Evolutions
+	db EV_ITEM,MOON_STONE,1,CLEFABLE
+	db 0
+;Learnset
+	db 13,SING
+	db 18,DOUBLESLAP
+	db 24,MINIMIZE
+	db 31,METRONOME
+	db 39,DEFENSE_CURL
+	db 48,LIGHT_SCREEN
+	db 0
+Mon021_EvosAttacks:
+;SPEAROW
+;Evolutions
+	db EV_LEVEL,20,FEAROW
+	db 0
+;Learnset
+	db 9,LEER
+	db 15,FURY_ATTACK
+	db 22,MIRROR_MOVE
+	db 29,DRILL_PECK
+	db 36,AGILITY
+	db 0
+Mon100_EvosAttacks:
+;VOLTORB
+;Evolutions
+	db EV_LEVEL,30,ELECTRODE
+	db 0
+;Learnset
+	db 17,SONICBOOM
+	db 22,SELFDESTRUCT
+	db 29,LIGHT_SCREEN
+	db 36,SWIFT
+	db 43,EXPLOSION
+	db 0
+Mon034_EvosAttacks:
+;NIDOKING
+;Evolutions
+	db 0
+;Learnset
+	db 8,HORN_ATTACK
+	db 14,POISON_STING
+	db 23,THRASH
+	db 0
+Mon080_EvosAttacks:
+;SLOWBRO
+;Evolutions
+	db 0
+;Learnset
+	db 18,DISABLE
+	db 22,HEADBUTT
+	db 27,GROWL
+	db 33,WATER_GUN
+	db 37,WITHDRAW
+	db 44,AMNESIA
+	db 55,PSYCHIC_M
+	db 0
+Mon002_EvosAttacks:
+;IVYSAUR
+;Evolutions
+	db EV_LEVEL,32,VENUSAUR
+	db 0
+;Learnset
+	db 7,LEECH_SEED
+	db 13,VINE_WHIP
+	db 22,POISONPOWDER
+	db 30,RAZOR_LEAF
+	db 38,GROWTH
+	db 46,SLEEP_POWDER
+	db 54,SOLARBEAM
+	db 0
+Mon103_EvosAttacks:
+;EXEGGUTOR
+;Evolutions
+	db 0
+;Learnset
+	db 28,STOMP
+	db 0
+Mon108_EvosAttacks:
+;LICKITUNG
+;Evolutions
+	db 0
+;Learnset
+	db 7,STOMP
+	db 15,DISABLE
+	db 23,DEFENSE_CURL
+	db 31,SLAM
+	db 39,SCREECH
+	db 0
+Mon102_EvosAttacks:
+;EXEGGCUTE
+;Evolutions
+	db EV_ITEM,LEAF_STONE ,1,EXEGGUTOR
+	db 0
+;Learnset
+	db 25,REFLECT
+	db 28,LEECH_SEED
+	db 32,STUN_SPORE
+	db 37,POISONPOWDER
+	db 42,SOLARBEAM
+	db 48,SLEEP_POWDER
+	db 0
+Mon088_EvosAttacks:
+;GRIMER
+;Evolutions
+	db EV_LEVEL,38,MUK
+	db 0
+;Learnset
+	db 30,POISON_GAS
+	db 33,MINIMIZE
+	db 37,SLUDGE
+	db 42,HARDEN
+	db 48,SCREECH
+	db 55,ACID_ARMOR
+	db 0
+Mon094_EvosAttacks:
+;GENGAR
+;Evolutions
+	db 0
+;Learnset
+	db 29,HYPNOSIS
+	db 38,DREAM_EATER
+	db 0
+Mon029_EvosAttacks:
+;NIDORAN_F
+;Evolutions
+	db EV_LEVEL,16,NIDORINA
+	db 0
+;Learnset
+	db 8,SCRATCH
+	db 14,POISON_STING
+	db 21,TAIL_WHIP
+	db 29,BITE
+	db 36,FURY_SWIPES
+	db 43,DOUBLE_KICK
+	db 0
+Mon031_EvosAttacks:
+;NIDOQUEEN
+;Evolutions
+	db 0
+;Learnset
+	db 8,SCRATCH
+	db 14,POISON_STING
+	db 23,BODY_SLAM
+	db 0
+Mon104_EvosAttacks:
+;CUBONE
+;Evolutions
+	db EV_LEVEL,28,MAROWAK
+	db 0
+;Learnset
+	db 25,LEER
+	db 31,FOCUS_ENERGY
+	db 38,THRASH
+	db 43,BONEMERANG
+	db 46,RAGE
+	db 0
+Mon111_EvosAttacks:
+;RHYHORN
+;Evolutions
+	db EV_LEVEL,42,RHYDON
+	db 0
+;Learnset
+	db 30,STOMP
+	db 35,TAIL_WHIP
+	db 40,FURY_ATTACK
+	db 45,HORN_DRILL
+	db 50,LEER
+	db 55,TAKE_DOWN
+	db 0
+Mon131_EvosAttacks:
+;LAPRAS
+;Evolutions
+	db 0
+;Learnset
+	db 16,SING
+	db 20,MIST
+	db 25,BODY_SLAM
+	db 31,CONFUSE_RAY
+	db 38,ICE_BEAM
+	db 46,HYDRO_PUMP
+	db 0
+Mon059_EvosAttacks:
+;ARCANINE
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon151_EvosAttacks:
+;MEW
+;Evolutions
+	db 0
+;Learnset
+	db 10,TRANSFORM
+	db 20,MEGA_PUNCH
+	db 30,METRONOME
+	db 40,PSYCHIC_M
+	db 0
+Mon130_EvosAttacks:
+;GYARADOS
+;Evolutions
+	db 0
+;Learnset
+	db 20,BITE
+	db 25,DRAGON_RAGE
+	db 32,LEER
+	db 41,HYDRO_PUMP
+	db 52,HYPER_BEAM
+	db 0
+Mon090_EvosAttacks:
+;SHELLDER
+;Evolutions
+	db EV_ITEM,WATER_STONE ,1,CLOYSTER
+	db 0
+;Learnset
+	db 18,SUPERSONIC
+	db 23,CLAMP
+	db 30,AURORA_BEAM
+	db 39,LEER
+	db 50,ICE_BEAM
+	db 0
+Mon072_EvosAttacks:
+;TENTACOOL
+;Evolutions
+	db EV_LEVEL,30,TENTACRUEL
+	db 0
+;Learnset
+	db 7,SUPERSONIC
+	db 13,WRAP
+	db 18,POISON_STING
+	db 22,WATER_GUN
+	db 27,CONSTRICT
+	db 33,BARRIER
+	db 40,SCREECH
+	db 48,HYDRO_PUMP
+	db 0
+Mon092_EvosAttacks:
+;GASTLY
+;Evolutions
+	db EV_LEVEL,25,HAUNTER
+	db 0
+;Learnset
+	db 27,HYPNOSIS
+	db 35,DREAM_EATER
+	db 0
+Mon123_EvosAttacks:
+;SCYTHER
+;Evolutions
+	db 0
+;Learnset
+	db 17,LEER
+	db 20,FOCUS_ENERGY
+	db 24,DOUBLE_TEAM
+	db 29,SLASH
+	db 35,SWORDS_DANCE
+	db 42,AGILITY
+	db 0
+Mon120_EvosAttacks:
+;STARYU
+;Evolutions
+	db EV_ITEM,WATER_STONE ,1,STARMIE
+	db 0
+;Learnset
+	db 17,WATER_GUN
+	db 22,HARDEN
+	db 27,RECOVER
+	db 32,SWIFT
+	db 37,MINIMIZE
+	db 42,LIGHT_SCREEN
+	db 47,HYDRO_PUMP
+	db 0
+Mon009_EvosAttacks:
+;BLASTOISE
+;Evolutions
+	db 0
+;Learnset
+	db 8,BUBBLE
+	db 15,WATER_GUN
+	db 24,BITE
+	db 31,WITHDRAW
+	db 42,SKULL_BASH
+	db 52,HYDRO_PUMP
+	db 0
+Mon127_EvosAttacks:
+;PINSIR
+;Evolutions
+	db 0
+;Learnset
+	db 25,SEISMIC_TOSS
+	db 30,GUILLOTINE
+	db 36,FOCUS_ENERGY
+	db 43,HARDEN
+	db 49,SLASH
+	db 54,SWORDS_DANCE
+	db 0
+Mon114_EvosAttacks:
+;TANGELA
+;Evolutions
+	db 0
+;Learnset
+	db 29,ABSORB
+	db 32,POISONPOWDER
+	db 36,STUN_SPORE
+	db 39,SLEEP_POWDER
+	db 45,SLAM
+	db 49,GROWTH
+	db 0
+
+Mon152_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon153_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon058_EvosAttacks:
+;GROWLITHE
+;Evolutions
+	db EV_ITEM,FIRE_STONE,1,ARCANINE
+	db 0
+;Learnset
+	db 18,EMBER
+	db 23,LEER
+	db 30,TAKE_DOWN
+	db 39,AGILITY
+	db 50,FLAMETHROWER
+	db 0
+Mon095_EvosAttacks:
+;ONIX
+;Evolutions
+	db 0
+;Learnset
+	db 15,BIND
+	db 19,ROCK_THROW
+	db 25,RAGE
+	db 33,SLAM
+	db 43,HARDEN
+	db 0
+Mon022_EvosAttacks:
+;FEAROW
+;Evolutions
+	db 0
+;Learnset
+	db 9,LEER
+	db 15,FURY_ATTACK
+	db 25,MIRROR_MOVE
+	db 34,DRILL_PECK
+	db 43,AGILITY
+	db 0
+Mon016_EvosAttacks:
+;PIDGEY
+;Evolutions
+	db EV_LEVEL,18,PIDGEOTTO
+	db 0
+;Learnset
+	db 5,SAND_ATTACK
+	db 12,QUICK_ATTACK
+	db 19,WHIRLWIND
+	db 28,WING_ATTACK
+	db 36,AGILITY
+	db 44,MIRROR_MOVE
+	db 0
+Mon079_EvosAttacks:
+;SLOWPOKE
+;Evolutions
+	db EV_LEVEL,37,SLOWBRO
+	db 0
+;Learnset
+	db 18,DISABLE
+	db 22,HEADBUTT
+	db 27,GROWL
+	db 33,WATER_GUN
+	db 40,AMNESIA
+	db 48,PSYCHIC_M
+	db 0
+Mon064_EvosAttacks:
+;KADABRA
+;Evolutions
+	db EV_TRADE,1,ALAKAZAM
+	db 0
+;Learnset
+	db 16,CONFUSION
+	db 20,DISABLE
+	db 27,PSYBEAM
+	db 31,RECOVER
+	db 38,PSYCHIC_M
+	db 42,REFLECT
+	db 0
+Mon075_EvosAttacks:
+;GRAVELER
+;Evolutions
+	db EV_TRADE,1,GOLEM
+	db 0
+;Learnset
+	db 11,DEFENSE_CURL
+	db 16,ROCK_THROW
+	db 21,SELFDESTRUCT
+	db 29,HARDEN
+	db 36,EARTHQUAKE
+	db 43,EXPLOSION
+	db 0
+Mon113_EvosAttacks:
+;CHANSEY
+;Evolutions
+	db 0
+;Learnset
+	db 24,SING
+	db 30,GROWL
+	db 38,MINIMIZE
+	db 44,DEFENSE_CURL
+	db 48,LIGHT_SCREEN
+	db 54,DOUBLE_EDGE
+	db 0
+Mon067_EvosAttacks:
+;MACHOKE
+;Evolutions
+	db EV_TRADE,1,MACHAMP
+	db 0
+;Learnset
+	db 20,LOW_KICK
+	db 25,LEER
+	db 36,FOCUS_ENERGY
+	db 44,SEISMIC_TOSS
+	db 52,SUBMISSION
+	db 0
+Mon122_EvosAttacks:
+;MR_MIME
+;Evolutions
+	db 0
+;Learnset
+	db 15,CONFUSION
+	db 23,LIGHT_SCREEN
+	db 31,DOUBLESLAP
+	db 39,MEDITATE
+	db 47,SUBSTITUTE
+	db 0
+Mon106_EvosAttacks:
+;HITMONLEE
+;Evolutions
+	db 0
+;Learnset
+	db 33,ROLLING_KICK
+	db 38,JUMP_KICK
+	db 43,FOCUS_ENERGY
+	db 48,HI_JUMP_KICK
+	db 53,MEGA_KICK
+	db 0
+Mon107_EvosAttacks:
+;HITMONCHAN
+;Evolutions
+	db 0
+;Learnset
+	db 33,FIRE_PUNCH
+	db 38,ICE_PUNCH
+	db 43,THUNDERPUNCH
+	db 48,MEGA_PUNCH
+	db 53,COUNTER
+	db 0
+Mon024_EvosAttacks:
+;ARBOK
+;Evolutions
+	db 0
+;Learnset
+	db 10,POISON_STING
+	db 17,BITE
+	db 27,GLARE
+	db 36,SCREECH
+	db 47,ACID
+	db 0
+Mon047_EvosAttacks:
+;PARASECT
+;Evolutions
+	db 0
+;Learnset
+	db 13,STUN_SPORE
+	db 20,LEECH_LIFE
+	db 30,SPORE
+	db 39,SLASH
+	db 48,GROWTH
+	db 0
+Mon054_EvosAttacks:
+;PSYDUCK
+;Evolutions
+	db EV_LEVEL,33,GOLDUCK
+	db 0
+;Learnset
+	db 28,TAIL_WHIP
+	db 31,DISABLE
+	db 36,CONFUSION
+	db 43,FURY_SWIPES
+	db 52,HYDRO_PUMP
+	db 0
+Mon096_EvosAttacks:
+;DROWZEE
+;Evolutions
+	db EV_LEVEL,26,HYPNO
+	db 0
+;Learnset
+	db 12,DISABLE
+	db 17,CONFUSION
+	db 24,HEADBUTT
+	db 29,POISON_GAS
+	db 32,PSYCHIC_M
+	db 37,MEDITATE
+	db 0
+Mon076_EvosAttacks:
+;GOLEM
+;Evolutions
+	db 0
+;Learnset
+	db 11,DEFENSE_CURL
+	db 16,ROCK_THROW
+	db 21,SELFDESTRUCT
+	db 29,HARDEN
+	db 36,EARTHQUAKE
+	db 43,EXPLOSION
+	db 0
+
+Mon154_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon126_EvosAttacks:
+;MAGMAR
+;Evolutions
+	db 0
+;Learnset
+	db 36,LEER
+	db 39,CONFUSE_RAY
+	db 43,FIRE_PUNCH
+	db 48,SMOKESCREEN
+	db 52,SMOG
+	db 55,FLAMETHROWER
+	db 0
+
+Mon155_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon125_EvosAttacks:
+;ELECTABUZZ
+;Evolutions
+	db 0
+;Learnset
+	db 34,THUNDERSHOCK
+	db 37,SCREECH
+	db 42,THUNDERPUNCH
+	db 49,LIGHT_SCREEN
+	db 54,THUNDER
+	db 0
+Mon082_EvosAttacks:
+;MAGNETON
+;Evolutions
+	db 0
+;Learnset
+	db 21,SONICBOOM
+	db 25,THUNDERSHOCK
+	db 29,SUPERSONIC
+	db 38,THUNDER_WAVE
+	db 46,SWIFT
+	db 54,SCREECH
+	db 0
+Mon109_EvosAttacks:
+;KOFFING
+;Evolutions
+	db EV_LEVEL,35,WEEZING
+	db 0
+;Learnset
+	db 32,SLUDGE
+	db 37,SMOKESCREEN
+	db 40,SELFDESTRUCT
+	db 45,HAZE
+	db 48,EXPLOSION
+	db 0
+
+Mon156_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon056_EvosAttacks:
+;MANKEY
+;Evolutions
+	db EV_LEVEL,28,PRIMEAPE
+	db 0
+;Learnset
+	db 15,KARATE_CHOP
+	db 21,FURY_SWIPES
+	db 27,FOCUS_ENERGY
+	db 33,SEISMIC_TOSS
+	db 39,THRASH
+	db 0
+Mon086_EvosAttacks:
+;SEEL
+;Evolutions
+	db EV_LEVEL,34,DEWGONG
+	db 0
+;Learnset
+	db 30,GROWL
+	db 35,AURORA_BEAM
+	db 40,REST
+	db 45,TAKE_DOWN
+	db 50,ICE_BEAM
+	db 0
+Mon050_EvosAttacks:
+;DIGLETT
+;Evolutions
+	db EV_LEVEL,26,DUGTRIO
+	db 0
+;Learnset
+	db 15,GROWL
+	db 19,DIG
+	db 24,SAND_ATTACK
+	db 31,SLASH
+	db 40,EARTHQUAKE
+	db 0
+Mon128_EvosAttacks:
+;TAUROS
+;Evolutions
+	db 0
+;Learnset
+	db 21,STOMP
+	db 28,TAIL_WHIP
+	db 35,LEER
+	db 44,RAGE
+	db 51,TAKE_DOWN
+	db 0
+
+Mon157_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon158_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon159_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon083_EvosAttacks:
+;FARFETCH_D
+;Evolutions
+	db 0
+;Learnset
+	db 7,LEER
+	db 15,FURY_ATTACK
+	db 23,SWORDS_DANCE
+	db 31,AGILITY
+	db 39,SLASH
+	db 0
+Mon048_EvosAttacks:
+;VENONAT
+;Evolutions
+	db EV_LEVEL,31,VENOMOTH
+	db 0
+;Learnset
+	db 24,POISONPOWDER
+	db 27,LEECH_LIFE
+	db 30,STUN_SPORE
+	db 35,PSYBEAM
+	db 38,SLEEP_POWDER
+	db 43,PSYCHIC_M
+	db 0
+Mon149_EvosAttacks:
+;DRAGONITE
+;Evolutions
+	db 0
+;Learnset
+	db 10,THUNDER_WAVE
+	db 20,AGILITY
+	db 35,SLAM
+	db 45,DRAGON_RAGE
+	db 60,HYPER_BEAM
+	db 0
+
+Mon160_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon161_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon162_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon084_EvosAttacks:
+;DODUO
+;Evolutions
+	db EV_LEVEL,31,DODRIO
+	db 0
+;Learnset
+	db 20,GROWL
+	db 24,FURY_ATTACK
+	db 30,DRILL_PECK
+	db 36,RAGE
+	db 40,TRI_ATTACK
+	db 44,AGILITY
+	db 0
+Mon060_EvosAttacks:
+;POLIWAG
+;Evolutions
+	db EV_LEVEL,25,POLIWHIRL
+	db 0
+;Learnset
+	db 16,HYPNOSIS
+	db 19,WATER_GUN
+	db 25,DOUBLESLAP
+	db 31,BODY_SLAM
+	db 38,AMNESIA
+	db 45,HYDRO_PUMP
+	db 0
+Mon124_EvosAttacks:
+;JYNX
+;Evolutions
+	db 0
+;Learnset
+	db 18,LICK
+	db 23,DOUBLESLAP
+	db 31,ICE_PUNCH
+	db 39,BODY_SLAM
+	db 47,THRASH
+	db 58,BLIZZARD
+	db 0
+Mon146_EvosAttacks:
+;MOLTRES
+;Evolutions
+	db 0
+;Learnset
+	db 51,LEER
+	db 55,AGILITY
+	db 60,SKY_ATTACK
+	db 0
+Mon144_EvosAttacks:
+;ARTICUNO
+;Evolutions
+	db 0
+;Learnset
+	db 51,BLIZZARD
+	db 55,AGILITY
+	db 60,MIST
+	db 0
+Mon145_EvosAttacks:
+;ZAPDOS
+;Evolutions
+	db 0
+;Learnset
+	db 51,THUNDER
+	db 55,AGILITY
+	db 60,LIGHT_SCREEN
+	db 0
+Mon132_EvosAttacks:
+;DITTO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon052_EvosAttacks:
+;MEOWTH
+;Evolutions
+	db EV_LEVEL,28,PERSIAN
+	db 0
+;Learnset
+	db 12,BITE
+	db 17,PAY_DAY
+	db 24,SCREECH
+	db 33,FURY_SWIPES
+	db 44,SLASH
+	db 0
+Mon098_EvosAttacks:
+;KRABBY
+;Evolutions
+	db EV_LEVEL,28,KINGLER
+	db 0
+;Learnset
+	db 20,VICEGRIP
+	db 25,GUILLOTINE
+	db 30,STOMP
+	db 35,CRABHAMMER
+	db 40,HARDEN
+	db 0
+
+Mon163_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon164_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon165_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon037_EvosAttacks:
+;VULPIX
+;Evolutions
+	db EV_ITEM,FIRE_STONE,1,NINETALES
+	db 0
+;Learnset
+	db 16,QUICK_ATTACK
+	db 21,ROAR
+	db 28,CONFUSE_RAY
+	db 35,FLAMETHROWER
+	db 42,FIRE_SPIN
+	db 0
+Mon038_EvosAttacks:
+;NINETALES
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon025_EvosAttacks:
+;PIKACHU
+;Evolutions
+	db EV_ITEM,THUNDER_STONE ,1,RAICHU
+	db 0
+;Learnset
+	db 9,THUNDER_WAVE
+	db 16,QUICK_ATTACK
+	db 26,SWIFT
+	db 33,AGILITY
+	db 43,THUNDER
+	db 0
+Mon026_EvosAttacks:
+;RAICHU
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon166_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon167_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon147_EvosAttacks:
+;DRATINI
+;Evolutions
+	db EV_LEVEL,30,DRAGONAIR
+	db 0
+;Learnset
+	db 10,THUNDER_WAVE
+	db 20,AGILITY
+	db 30,SLAM
+	db 40,DRAGON_RAGE
+	db 50,HYPER_BEAM
+	db 0
+Mon148_EvosAttacks:
+;DRAGONAIR
+;Evolutions
+	db EV_LEVEL,55,DRAGONITE
+	db 0
+;Learnset
+	db 10,THUNDER_WAVE
+	db 20,AGILITY
+	db 35,SLAM
+	db 45,DRAGON_RAGE
+	db 55,HYPER_BEAM
+	db 0
+Mon140_EvosAttacks:
+;KABUTO
+;Evolutions
+	db EV_LEVEL,40,KABUTOPS
+	db 0
+;Learnset
+	db 34,ABSORB
+	db 39,SLASH
+	db 44,LEER
+	db 49,HYDRO_PUMP
+	db 0
+Mon141_EvosAttacks:
+;KABUTOPS
+;Evolutions
+	db 0
+;Learnset
+	db 34,ABSORB
+	db 39,SLASH
+	db 46,LEER
+	db 53,HYDRO_PUMP
+	db 0
+Mon116_EvosAttacks:
+;HORSEA
+;Evolutions
+	db EV_LEVEL,32,SEADRA
+	db 0
+;Learnset
+	db 19,SMOKESCREEN
+	db 24,LEER
+	db 30,WATER_GUN
+	db 37,AGILITY
+	db 45,HYDRO_PUMP
+	db 0
+Mon117_EvosAttacks:
+;SEADRA
+;Evolutions
+	db 0
+;Learnset
+	db 19,SMOKESCREEN
+	db 24,LEER
+	db 30,WATER_GUN
+	db 41,AGILITY
+	db 52,HYDRO_PUMP
+	db 0
+
+Mon168_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon169_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon027_EvosAttacks:
+;SANDSHREW
+;Evolutions
+	db EV_LEVEL,22,SANDSLASH
+	db 0
+;Learnset
+	db 10,SAND_ATTACK
+	db 17,SLASH
+	db 24,POISON_STING
+	db 31,SWIFT
+	db 38,FURY_SWIPES
+	db 0
+Mon028_EvosAttacks:
+;SANDSLASH
+;Evolutions
+	db 0
+;Learnset
+	db 10,SAND_ATTACK
+	db 17,SLASH
+	db 27,POISON_STING
+	db 36,SWIFT
+	db 47,FURY_SWIPES
+	db 0
+Mon138_EvosAttacks:
+;OMANYTE
+;Evolutions
+	db EV_LEVEL,40,OMASTAR
+	db 0
+;Learnset
+	db 34,HORN_ATTACK
+	db 39,LEER
+	db 46,SPIKE_CANNON
+	db 53,HYDRO_PUMP
+	db 0
+Mon139_EvosAttacks:
+;OMASTAR
+;Evolutions
+	db 0
+;Learnset
+	db 34,HORN_ATTACK
+	db 39,LEER
+	db 44,SPIKE_CANNON
+	db 49,HYDRO_PUMP
+	db 0
+Mon039_EvosAttacks:
+;JIGGLYPUFF
+;Evolutions
+	db EV_ITEM,MOON_STONE,1,WIGGLYTUFF
+	db 0
+;Learnset
+	db 9,POUND
+	db 14,DISABLE
+	db 19,DEFENSE_CURL
+	db 24,DOUBLESLAP
+	db 29,REST
+	db 34,BODY_SLAM
+	db 39,DOUBLE_EDGE
+	db 0
+Mon040_EvosAttacks:
+;WIGGLYTUFF
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon133_EvosAttacks:
+;EEVEE
+;Evolutions
+	db EV_ITEM,FIRE_STONE,1,FLAREON
+	db EV_ITEM,THUNDER_STONE ,1,JOLTEON
+	db EV_ITEM,WATER_STONE ,1,VAPOREON
+	db 0
+;Learnset
+	db 27,QUICK_ATTACK
+	db 31,TAIL_WHIP
+	db 37,BITE
+	db 45,TAKE_DOWN
+	db 0
+Mon136_EvosAttacks:
+;FLAREON
+;Evolutions
+	db 0
+;Learnset
+	db 27,QUICK_ATTACK
+	db 31,EMBER
+	db 37,TAIL_WHIP
+	db 40,BITE
+	db 42,LEER
+	db 44,FIRE_SPIN
+	db 48,RAGE
+	db 54,FLAMETHROWER
+	db 0
+Mon135_EvosAttacks:
+;JOLTEON
+;Evolutions
+	db 0
+;Learnset
+	db 27,QUICK_ATTACK
+	db 31,THUNDERSHOCK
+	db 37,TAIL_WHIP
+	db 40,THUNDER_WAVE
+	db 42,DOUBLE_KICK
+	db 44,AGILITY
+	db 48,PIN_MISSILE
+	db 54,THUNDER
+	db 0
+Mon134_EvosAttacks:
+;VAPOREON
+;Evolutions
+	db 0
+;Learnset
+	db 27,QUICK_ATTACK
+	db 31,WATER_GUN
+	db 37,TAIL_WHIP
+	db 40,BITE
+	db 42,ACID_ARMOR
+	db 44,HAZE
+	db 48,MIST
+	db 54,HYDRO_PUMP
+	db 0
+Mon066_EvosAttacks:
+;MACHOP
+;Evolutions
+	db EV_LEVEL,28,MACHOKE
+	db 0
+;Learnset
+	db 20,LOW_KICK
+	db 25,LEER
+	db 32,FOCUS_ENERGY
+	db 39,SEISMIC_TOSS
+	db 46,SUBMISSION
+	db 0
+Mon041_EvosAttacks:
+;ZUBAT
+;Evolutions
+	db EV_LEVEL,22,GOLBAT
+	db 0
+;Learnset
+	db 10,SUPERSONIC
+	db 15,BITE
+	db 21,CONFUSE_RAY
+	db 28,WING_ATTACK
+	db 36,HAZE
+	db 0
+Mon023_EvosAttacks:
+;EKANS
+;Evolutions
+	db EV_LEVEL,22,ARBOK
+	db 0
+;Learnset
+	db 10,POISON_STING
+	db 17,BITE
+	db 24,GLARE
+	db 31,SCREECH
+	db 38,ACID
+	db 0
+Mon046_EvosAttacks:
+;PARAS
+;Evolutions
+	db EV_LEVEL,24,PARASECT
+	db 0
+;Learnset
+	db 13,STUN_SPORE
+	db 20,LEECH_LIFE
+	db 27,SPORE
+	db 34,SLASH
+	db 41,GROWTH
+	db 0
+Mon061_EvosAttacks:
+;POLIWHIRL
+;Evolutions
+	db EV_ITEM,WATER_STONE ,1,POLIWRATH
+	db 0
+;Learnset
+	db 16,HYPNOSIS
+	db 19,WATER_GUN
+	db 26,DOUBLESLAP
+	db 33,BODY_SLAM
+	db 41,AMNESIA
+	db 49,HYDRO_PUMP
+	db 0
+Mon062_EvosAttacks:
+;POLIWRATH
+;Evolutions
+	db 0
+;Learnset
+	db 16,HYPNOSIS
+	db 19,WATER_GUN
+	db 0
+Mon013_EvosAttacks:
+;WEEDLE
+;Evolutions
+	db EV_LEVEL,7,KAKUNA
+	db 0
+;Learnset
+	db 0
+Mon014_EvosAttacks:
+;KAKUNA
+;Evolutions
+	db EV_LEVEL,10,BEEDRILL
+	db 0
+;Learnset
+	db 0
+Mon015_EvosAttacks:
+;BEEDRILL
+;Evolutions
+	db 0
+;Learnset
+	db 12,FURY_ATTACK
+	db 16,FOCUS_ENERGY
+	db 20,TWINEEDLE
+	db 25,RAGE
+	db 30,PIN_MISSILE
+	db 35,AGILITY
+	db 0
+
+Mon170_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon085_EvosAttacks:
+;DODRIO
+;Evolutions
+	db 0
+;Learnset
+	db 20,GROWL
+	db 24,FURY_ATTACK
+	db 30,DRILL_PECK
+	db 39,RAGE
+	db 45,TRI_ATTACK
+	db 51,AGILITY
+	db 0
+Mon057_EvosAttacks:
+;PRIMEAPE
+;Evolutions
+	db 0
+;Learnset
+	db 15,KARATE_CHOP
+	db 21,FURY_SWIPES
+	db 27,FOCUS_ENERGY
+	db 37,SEISMIC_TOSS
+	db 46,THRASH
+	db 0
+Mon051_EvosAttacks:
+;DUGTRIO
+;Evolutions
+	db 0
+;Learnset
+	db 15,GROWL
+	db 19,DIG
+	db 24,SAND_ATTACK
+	db 35,SLASH
+	db 47,EARTHQUAKE
+	db 0
+Mon049_EvosAttacks:
+;VENOMOTH
+;Evolutions
+	db 0
+;Learnset
+	db 24,POISONPOWDER
+	db 27,LEECH_LIFE
+	db 30,STUN_SPORE
+	db 38,PSYBEAM
+	db 43,SLEEP_POWDER
+	db 50,PSYCHIC_M
+	db 0
+Mon087_EvosAttacks:
+;DEWGONG
+;Evolutions
+	db 0
+;Learnset
+	db 30,GROWL
+	db 35,AURORA_BEAM
+	db 44,REST
+	db 50,TAKE_DOWN
+	db 56,ICE_BEAM
+	db 0
+
+Mon171_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon172_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon010_EvosAttacks:
+;CATERPIE
+;Evolutions
+	db EV_LEVEL,7,METAPOD
+	db 0
+;Learnset
+	db 0
+Mon011_EvosAttacks:
+;METAPOD
+;Evolutions
+	db EV_LEVEL,10,BUTTERFREE
+	db 0
+;Learnset
+	db 0
+Mon012_EvosAttacks:
+;BUTTERFREE
+;Evolutions
+	db 0
+;Learnset
+	db 12,CONFUSION
+	db 15,POISONPOWDER
+	db 16,STUN_SPORE
+	db 17,SLEEP_POWDER
+	db 21,SUPERSONIC
+	db 26,WHIRLWIND
+	db 32,PSYBEAM
+	db 0
+Mon068_EvosAttacks:
+;MACHAMP
+;Evolutions
+	db 0
+;Learnset
+	db 20,LOW_KICK
+	db 25,LEER
+	db 36,FOCUS_ENERGY
+	db 44,SEISMIC_TOSS
+	db 52,SUBMISSION
+	db 0
+
+Mon173_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon055_EvosAttacks:
+;GOLDUCK
+;Evolutions
+	db 0
+;Learnset
+	db 28,TAIL_WHIP
+	db 31,DISABLE
+	db 39,CONFUSION
+	db 48,FURY_SWIPES
+	db 59,HYDRO_PUMP
+	db 0
+Mon097_EvosAttacks:
+;HYPNO
+;Evolutions
+	db 0
+;Learnset
+	db 12,DISABLE
+	db 17,CONFUSION
+	db 24,HEADBUTT
+	db 33,POISON_GAS
+	db 37,PSYCHIC_M
+	db 43,MEDITATE
+	db 0
+Mon042_EvosAttacks:
+;GOLBAT
+;Evolutions
+	db 0
+;Learnset
+	db 10,SUPERSONIC
+	db 15,BITE
+	db 21,CONFUSE_RAY
+	db 32,WING_ATTACK
+	db 43,HAZE
+	db 0
+Mon150_EvosAttacks:
+;MEWTWO
+;Evolutions
+	db 0
+;Learnset
+	db 63,BARRIER
+	db 66,PSYCHIC_M
+	db 70,RECOVER
+	db 75,MIST
+	db 81,AMNESIA
+	db 0
+Mon143_EvosAttacks:
+;SNORLAX
+;Evolutions
+	db 0
+;Learnset
+	db 35,BODY_SLAM
+	db 41,HARDEN
+	db 48,DOUBLE_EDGE
+	db 56,HYPER_BEAM
+	db 0
+Mon129_EvosAttacks:
+;MAGIKARP
+;Evolutions
+	db EV_LEVEL,20,GYARADOS
+	db 0
+;Learnset
+	db 15,TACKLE
+	db 0
+
+Mon174_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon175_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon089_EvosAttacks:
+;MUK
+;Evolutions
+	db 0
+;Learnset
+	db 30,POISON_GAS
+	db 33,MINIMIZE
+	db 37,SLUDGE
+	db 45,HARDEN
+	db 53,SCREECH
+	db 60,ACID_ARMOR
+	db 0
+
+Mon176_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon099_EvosAttacks:
+;KINGLER
+;Evolutions
+	db 0
+;Learnset
+	db 20,VICEGRIP
+	db 25,GUILLOTINE
+	db 34,STOMP
+	db 42,CRABHAMMER
+	db 49,HARDEN
+	db 0
+Mon091_EvosAttacks:
+;CLOYSTER
+;Evolutions
+	db 0
+;Learnset
+	db 50,SPIKE_CANNON
+	db 0
+
+Mon177_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon101_EvosAttacks:
+;ELECTRODE
+;Evolutions
+	db 0
+;Learnset
+	db 17,SONICBOOM
+	db 22,SELFDESTRUCT
+	db 29,LIGHT_SCREEN
+	db 40,SWIFT
+	db 50,EXPLOSION
+	db 0
+Mon036_EvosAttacks:
+;CLEFABLE
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon110_EvosAttacks:
+;WEEZING
+;Evolutions
+	db 0
+;Learnset
+	db 32,SLUDGE
+	db 39,SMOKESCREEN
+	db 43,SELFDESTRUCT
+	db 49,HAZE
+	db 53,EXPLOSION
+	db 0
+Mon053_EvosAttacks:
+;PERSIAN
+;Evolutions
+	db 0
+;Learnset
+	db 12,BITE
+	db 17,PAY_DAY
+	db 24,SCREECH
+	db 37,FURY_SWIPES
+	db 51,SLASH
+	db 0
+Mon105_EvosAttacks:
+;MAROWAK
+;Evolutions
+	db 0
+;Learnset
+	db 25,LEER
+	db 33,FOCUS_ENERGY
+	db 41,THRASH
+	db 48,BONEMERANG
+	db 55,RAGE
+	db 0
+
+Mon178_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon093_EvosAttacks:
+;HAUNTER
+;Evolutions
+	db EV_TRADE,1,GENGAR
+	db 0
+;Learnset
+	db 29,HYPNOSIS
+	db 38,DREAM_EATER
+	db 0
+Mon063_EvosAttacks:
+;ABRA
+;Evolutions
+	db EV_LEVEL,16,KADABRA
+	db 0
+;Learnset
+	db 0
+Mon065_EvosAttacks:
+;ALAKAZAM
+;Evolutions
+	db 0
+;Learnset
+	db 16,CONFUSION
+	db 20,DISABLE
+	db 27,PSYBEAM
+	db 31,RECOVER
+	db 38,PSYCHIC_M
+	db 42,REFLECT
+	db 0
+Mon017_EvosAttacks:
+;PIDGEOTTO
+;Evolutions
+	db EV_LEVEL,36,PIDGEOT
+	db 0
+;Learnset
+	db 5,SAND_ATTACK
+	db 12,QUICK_ATTACK
+	db 21,WHIRLWIND
+	db 31,WING_ATTACK
+	db 40,AGILITY
+	db 49,MIRROR_MOVE
+	db 0
+Mon018_EvosAttacks:
+;PIDGEOT
+;Evolutions
+	db 0
+;Learnset
+	db 5,SAND_ATTACK
+	db 12,QUICK_ATTACK
+	db 21,WHIRLWIND
+	db 31,WING_ATTACK
+	db 44,AGILITY
+	db 54,MIRROR_MOVE
+	db 0
+Mon121_EvosAttacks:
+;STARMIE
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon001_EvosAttacks:
+;BULBASAUR
+;Evolutions
+	db EV_LEVEL,16,IVYSAUR
+	db 0
+;Learnset
+	db 7,LEECH_SEED
+	db 13,VINE_WHIP
+	db 20,POISONPOWDER
+	db 27,RAZOR_LEAF
+	db 34,GROWTH
+	db 41,SLEEP_POWDER
+	db 48,SOLARBEAM
+	db 0
+Mon003_EvosAttacks:
+;VENUSAUR
+;Evolutions
+	db 0
+;Learnset
+	db 7,LEECH_SEED
+	db 13,VINE_WHIP
+	db 22,POISONPOWDER
+	db 30,RAZOR_LEAF
+	db 43,GROWTH
+	db 55,SLEEP_POWDER
+	db 65,SOLARBEAM
+	db 0
+Mon073_EvosAttacks:
+;TENTACRUEL
+;Evolutions
+	db 0
+;Learnset
+	db 7,SUPERSONIC
+	db 13,WRAP
+	db 18,POISON_STING
+	db 22,WATER_GUN
+	db 27,CONSTRICT
+	db 35,BARRIER
+	db 43,SCREECH
+	db 50,HYDRO_PUMP
+	db 0
+
+Mon179_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon118_EvosAttacks:
+;GOLDEEN
+;Evolutions
+	db EV_LEVEL,33,SEAKING
+	db 0
+;Learnset
+	db 19,SUPERSONIC
+	db 24,HORN_ATTACK
+	db 30,FURY_ATTACK
+	db 37,WATERFALL
+	db 45,HORN_DRILL
+	db 54,AGILITY
+	db 0
+Mon119_EvosAttacks:
+;SEAKING
+;Evolutions
+	db 0
+;Learnset
+	db 19,SUPERSONIC
+	db 24,HORN_ATTACK
+	db 30,FURY_ATTACK
+	db 39,WATERFALL
+	db 48,HORN_DRILL
+	db 54,AGILITY
+	db 0
+
+Mon180_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon181_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon182_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon183_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon077_EvosAttacks:
+;PONYTA
+;Evolutions
+	db EV_LEVEL,40,RAPIDASH
+	db 0
+;Learnset
+	db 30,TAIL_WHIP
+	db 32,STOMP
+	db 35,GROWL
+	db 39,FIRE_SPIN
+	db 43,TAKE_DOWN
+	db 48,AGILITY
+	db 0
+Mon078_EvosAttacks:
+;RAPIDASH
+;Evolutions
+	db 0
+;Learnset
+	db 30,TAIL_WHIP
+	db 32,STOMP
+	db 35,GROWL
+	db 39,FIRE_SPIN
+	db 47,TAKE_DOWN
+	db 55,AGILITY
+	db 0
+Mon019_EvosAttacks:
+;RATTATA
+;Evolutions
+	db EV_LEVEL,20,RATICATE
+	db 0
+;Learnset
+	db 7,QUICK_ATTACK
+	db 14,HYPER_FANG
+	db 23,FOCUS_ENERGY
+	db 34,SUPER_FANG
+	db 0
+Mon020_EvosAttacks:
+;RATICATE
+;Evolutions
+	db 0
+;Learnset
+	db 7,QUICK_ATTACK
+	db 14,HYPER_FANG
+	db 27,FOCUS_ENERGY
+	db 41,SUPER_FANG
+	db 0
+Mon033_EvosAttacks:
+;NIDORINO
+;Evolutions
+	db EV_ITEM,MOON_STONE,1,NIDOKING
+	db 0
+;Learnset
+	db 8,HORN_ATTACK
+	db 14,POISON_STING
+	db 23,FOCUS_ENERGY
+	db 32,FURY_ATTACK
+	db 41,HORN_DRILL
+	db 50,DOUBLE_KICK
+	db 0
+Mon030_EvosAttacks:
+;NIDORINA
+;Evolutions
+	db EV_ITEM,MOON_STONE,1,NIDOQUEEN
+	db 0
+;Learnset
+	db 8,SCRATCH
+	db 14,POISON_STING
+	db 23,TAIL_WHIP
+	db 32,BITE
+	db 41,FURY_SWIPES
+	db 50,DOUBLE_KICK
+	db 0
+Mon074_EvosAttacks:
+;GEODUDE
+;Evolutions
+	db EV_LEVEL,25,GRAVELER
+	db 0
+;Learnset
+	db 11,DEFENSE_CURL
+	db 16,ROCK_THROW
+	db 21,SELFDESTRUCT
+	db 26,HARDEN
+	db 31,EARTHQUAKE
+	db 36,EXPLOSION
+	db 0
+Mon137_EvosAttacks:
+;PORYGON
+;Evolutions
+	db 0
+;Learnset
+	db 23,PSYBEAM
+	db 28,RECOVER
+	db 35,AGILITY
+	db 42,TRI_ATTACK
+	db 0
+Mon142_EvosAttacks:
+;AERODACTYL
+;Evolutions
+	db 0
+;Learnset
+	db 33,SUPERSONIC
+	db 38,BITE
+	db 45,TAKE_DOWN
+	db 54,HYPER_BEAM
+	db 0
+
+Mon184_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon081_EvosAttacks:
+;MAGNEMITE
+;Evolutions
+	db EV_LEVEL,30,MAGNETON
+	db 0
+;Learnset
+	db 21,SONICBOOM
+	db 25,THUNDERSHOCK
+	db 29,SUPERSONIC
+	db 35,THUNDER_WAVE
+	db 41,SWIFT
+	db 47,SCREECH
+	db 0
+
+Mon185_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon186_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon004_EvosAttacks:
+;CHARMANDER
+;Evolutions
+	db EV_LEVEL,16,CHARMELEON
+	db 0
+;Learnset
+	db 9,EMBER
+	db 15,LEER
+	db 22,RAGE
+	db 30,SLASH
+	db 38,FLAMETHROWER
+	db 46,FIRE_SPIN
+	db 0
+Mon007_EvosAttacks:
+;SQUIRTLE
+;Evolutions
+	db EV_LEVEL,16,WARTORTLE
+	db 0
+;Learnset
+	db 8,BUBBLE
+	db 15,WATER_GUN
+	db 22,BITE
+	db 28,WITHDRAW
+	db 35,SKULL_BASH
+	db 42,HYDRO_PUMP
+	db 0
+Mon005_EvosAttacks:
+;CHARMELEON
+;Evolutions
+	db EV_LEVEL,36,CHARIZARD
+	db 0
+;Learnset
+	db 9,EMBER
+	db 15,LEER
+	db 24,RAGE
+	db 33,SLASH
+	db 42,FLAMETHROWER
+	db 56,FIRE_SPIN
+	db 0
+Mon008_EvosAttacks:
+;WARTORTLE
+;Evolutions
+	db EV_LEVEL,36,BLASTOISE
+	db 0
+;Learnset
+	db 8,BUBBLE
+	db 15,WATER_GUN
+	db 24,BITE
+	db 31,WITHDRAW
+	db 39,SKULL_BASH
+	db 47,HYDRO_PUMP
+	db 0
+Mon006_EvosAttacks:
+;CHARIZARD
+;Evolutions
+	db 0
+;Learnset
+	db 9,EMBER
+	db 15,LEER
+	db 24,RAGE
+	db 36,SLASH
+	db 46,FLAMETHROWER
+	db 55,FIRE_SPIN
+	db 0
+
+Mon187_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon188_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon189_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+
+Mon190_EvosAttacks:
+;MISSINGNO
+;Evolutions
+	db 0
+;Learnset
+	db 0
+Mon043_EvosAttacks:
+;ODDISH
+;Evolutions
+	db EV_LEVEL,21,GLOOM
+	db 0
+;Learnset
+	db 15,POISONPOWDER
+	db 17,STUN_SPORE
+	db 19,SLEEP_POWDER
+	db 24,ACID
+	db 33,PETAL_DANCE
+	db 46,SOLARBEAM
+	db 0
+Mon044_EvosAttacks:
+;GLOOM
+;Evolutions
+	db EV_ITEM,LEAF_STONE ,1,VILEPLUME
+	db 0
+;Learnset
+	db 15,POISONPOWDER
+	db 17,STUN_SPORE
+	db 19,SLEEP_POWDER
+	db 28,ACID
+	db 38,PETAL_DANCE
+	db 52,SOLARBEAM
+	db 0
+Mon045_EvosAttacks:
+;VILEPLUME
+;Evolutions
+	db 0
+;Learnset
+	db 15,POISONPOWDER
+	db 17,STUN_SPORE
+	db 19,SLEEP_POWDER
+	db 0
+Mon069_EvosAttacks:
+;BELLSPROUT
+;Evolutions
+	db EV_LEVEL,21,WEEPINBELL
+	db 0
+;Learnset
+	db 13,WRAP
+	db 15,POISONPOWDER
+	db 18,SLEEP_POWDER
+	db 21,STUN_SPORE
+	db 26,ACID
+	db 33,RAZOR_LEAF
+	db 42,SLAM
+	db 0
+Mon070_EvosAttacks:
+;WEEPINBELL
+;Evolutions
+	db EV_ITEM,LEAF_STONE ,1,VICTREEBEL
+	db 0
+;Learnset
+	db 13,WRAP
+	db 15,POISONPOWDER
+	db 18,SLEEP_POWDER
+	db 23,STUN_SPORE
+	db 29,ACID
+	db 38,RAZOR_LEAF
+	db 49,SLAM
+	db 0
+Mon071_EvosAttacks:
+;VICTREEBEL
+;Evolutions
+	db 0
+;Learnset
+	db 13,WRAP
+	db 15,POISONPOWDER
+	db 18,SLEEP_POWDER
+	db 0
+
+INCBIN "baserom.gbc",$3B9EC, $3C000 - $3B9EC
+
+SECTION "bankF",DATA,BANK[$F]
+
+; These are move effects (second value from the Attacks table in bank $E).
+EffectsArray1: ; 4000
+	db $18,$19,$1C,$2E,$2F,$31,$38,$39,$40,$41,$42,$43,$4F,$52,$54,$55,$FF
+EffectsArray2: ; 4011
+; attacks that do damage but not through normal calculations
+; e.g., Super Fang, Psywave
+	db $28,$29,$FF
+EffectsArray3: ; 4014
+; non-damaging, stat‐affecting or status‐causing attacks?
+; e.g., Meditate, Bide, Hypnosis
+	db $01,$0A,$0B,$0C,$0D,$0E,$0F,$12,$13,$14,$15,$16,$17,$1A,$20,$32,$33,$34,$35,$36,$37,$3A,$3B,$3C,$3D,$3E,$3F,$FF
+EffectsArray4: ; 4030
+	db $03,$07,$08,$10,$1D,$1E,$2C,$30,$4D,$51,$FF
+EffectsArray5: ; 403B
+	db $03,$07,$08,$10,$11,$1D,$1E,$27,$28,$29,$2B,$2C,$2D,$30 ; fallthru
+EffectsArray5B: ; 4049
+; attacks that prevent the player from switching attacks?
+	db $1B,$2A,$FF
+
+INCBIN "baserom.gbc",$3C04C,$90E - $4C
+
+; XXX this needs cleaning up. it's what runs when a juggler switches pokemon
+EnemySendOut: ; 490E
+	ld hl,$D058
+	xor a
+	ld [hl],a
+	ld a,[$CC2F]
+	ld c,a
+	ld b,1
+	push bc
+	ld a,$10
+	call Predef
+	ld hl,$CCF5
+	xor a
+	ld [hl],a
+	pop bc
+	ld a,$10
+	call Predef
+	xor a
+	ld hl,$D065
+	ld [hli],a
+	ld [hli],a
+	ld [hli],a
+	ld [hli],a
+	ld [hl],a
+	ld [$D072],a
+	ld [$CCEF],a
+	ld [$CCF3],a
+	ld hl,$CCF1
+	ld [hli],a
+	ld [hl],a
+	dec a
+	ld [W_AICOUNT],a
+	ld hl,$D062
+	res 5,[hl]
+	ld hl,$C3B2
+	ld a,8
+	call $48DF
+	call $6E94
+	call $3719
+	ld a,[$D12B]
+	cp 4
+	jr nz,.next\@
+	ld a,[$CC3E]
+	sub 4
+	ld [$CF92],a
+	jr .next3\@
+.next\@
+	ld b,$FF
+.next2\@
+	inc b
+	ld a,[$CFE8]
+	cp b
+	jr z,.next2\@
+	ld hl,$D8A4
+	ld a,b
+	ld [$CF92],a
+	push bc
+	ld bc,$2C
+	call AddNTimes
+	pop bc
+	inc hl
+	ld a,[hli]
+	ld c,a
+	ld a,[hl]
+	or c
+	jr z,.next2\@
+.next3\@
+	ld a,[$CF92]
+	ld hl,$D8C5
+	ld bc,$2C
+	call AddNTimes
+	ld a,[hl]
+	ld [$D127],a
+	ld a,[$CF92]
+	inc a
+	ld hl,$D89C
+	ld c,a
+	ld b,0
+	add hl,bc
+	ld a,[hl]
+	ld [$CFD8],a
+	ld [$CF91],a
+	call $6B01
+	ld hl,$CFE6
+	ld a,[hli]
+	ld [$CCE3],a
+	ld a,[hl]
+	ld [$CCE4],a
+	ld a,1
+	ld [$CC26],a
+	ld a,[$D11D]
+	dec a
+	jr z,.next4\@
+	ld a,[W_NUMINPARTY]
+	dec a
+	jr z,.next4\@
+	ld a,[$D12B]
+	cp 4
+	jr z,.next4\@
+	ld a,[$D355]
+	bit 6,a
+	jr nz,.next4\@
+	ld hl,TrainerAboutToUseText
+	call PrintText
+	ld hl,$C42C
+	ld bc,$0801
+	ld a,$14
+	ld [$D125],a
+	call $30E8
+	ld a,[$CC26]
+	and a
+	jr nz,.next4\@
+	ld a,2
+	ld [$D07D],a
+	call $13FC
+.next9\@
+	ld a,1
+	ld [$CC26],a
+	jr c,.next7\@
+	ld hl,$CC2F
+	ld a,[$CF92]
+	cp [hl]
+	jr nz,.next6\@
+	ld hl,$51F5
+	call PrintText
+.next8\@
+	call $1411
+	jr .next9\@
+.next6\@
+	call $4A97
+	jr z,.next8\@
+	xor a
+	ld [$CC26],a
+.next7\@
+	call $3DE5
+	call $6E5B
+	call $3725
+.next4\@
+	call $0082
+	ld hl,$C3A0
+	ld bc,$040B
+	call $18C4
+	ld b,1
+	call $3DEF
+	call $3DDC
+	ld hl,TrainerSentOutText
+	call PrintText
+	ld a,[$CFD8]
+	ld [$CF91],a
+	ld [$D0B5],a
+	call $1537
+	ld de,$9000
+	call $1665
+	ld a,$CF
+	ld [$FFE1],a
+	ld hl,$C427
+	ld a,2
+	call Predef
+	ld a,[$CFD8]
+	call $13D0
+	call $4DEC
+	ld a,[$CC26]
+	and a
+	ret nz
+	xor a
+	ld [$D058],a
+	ld [$CCF5],a
+	call $3719
+	jp $51BA
+
+TrainerAboutToUseText:
+	TX_FAR _TrainerAboutToUseText
+	db "@"
+
+TrainerSentOutText:
+	TX_FAR _TrainerSentOutText
+	db "@"
+
+INCBIN "baserom.gbc",$3CA83,$3D6A9 - $3CA83
+
+; in-battle stuff
+	ld hl,$D062
+	res 4,[hl]
+	res 6,[hl]
+	call $5AF5
+	ld hl,DecrementPP
+	ld de,$CCDC ; pointer to the move just used
+	ld b,BANK(DecrementPP)
+	call Bankswitch
+	ld a,[$CFD3] ; effect of the attack just used
+	ld hl,EffectsArray1
+	ld de,1
+	call IsInArray
+	jp c,$7132
+	ld a,[$CFD3]
+	ld hl,EffectsArray5B
+	ld de,1
+	call IsInArray
+	call c,$7132
+	ld a,[$CFD3]
+	ld hl,EffectsArray2
+	ld de,1
+	call IsInArray
+	jp c,$5702
+	call $6023
+	call $6093
+	jr z,.next11\@
+	call $5DCF
+	call $5F65
+	jp z,$574B
+	call $63A5
+	call $6687
+	call $656B
+.next11\@
+	ld a,[$D05F]
+	and a
+	jr z,.next\@
+	ld a,[$CFD3]
+	sub a,7
+	jr z,.next2\@
+	jr .next3\@ ; 574B
+.next\@
+	ld a,[$CFD3]
+	and a
+	ld a,4
+	jr z,.next2\@
+	ld a,5
+.next2\@
+	push af
+	ld a,[$D063]
+	bit 4,a
+	ld hl,$5747
+	ld b,$1E
+	call nz,Bankswitch
+	pop af
+	ld [$CC5B],a
+	ld a,[$CFD2]
+	call $6F07
+	call $6ED3
+	call $4D60
+	ld a,[$D063]
+	bit 4,a
+	ld hl,$5771
+	ld b,$1E
+	call nz,Bankswitch
+	jr .next4\@
+.next3\@
+	ld c,$1E
+	call $3739
+	ld a,[$CFD3]
+	cp a,$2B
+	jr z,.next5\@
+	cp a,$27 ; XXX SLP | FRZ ?
+	jr z,.next5\@
+	jr .next4\@
+.next5\@
+	xor a
+	ld [$CC5B],a
+	ld a,$A7
+	call $6F07
+.next4\@
+	ld a,[$CFD3]
+	cp a,9
+	jr nz,.next6\@ ; 577A
+	call $62FD
+	jp z,Function580A
+	xor a
+	ld [$CCED],a
+	jp $569A
+.next6\@
+	cp a,$53
+	jr nz,.next7\@ ; 5784
+	call $6348
+	jp $569A
+.next7\@
+	ld a,[$CFD3]
+	ld hl,EffectsArray3
+	ld de,1
+	call IsInArray
+	jp c,$7132
+	ld a,[$D05F]
+	and a
+	jr z,.next8\@ ; 57A6
+	call $5BE2
+	ld a,[$CFD3]
+	cp a,7
+	jr z,.next9\@ ; 57B9
+	jp Function580A
+.next8\@
+	call $60DF
+	call $5C5C
+	ld hl,$7B7B ; MyFunction
+	ld b,$B ; BANK(MyFunction)
+	call Bankswitch
+	ld a,1
+	ld [$CCF4],a
+.next9\@
+	ld a,[$CFD3]
+	ld hl,EffectsArray4
+	ld de,1
+	call IsInArray
+	call c,$7132
+	ld hl,$CFE6
+	ld a,[hli]
+	ld b,[hl]
+	or b
+	ret z
+	call $62B6
+
+	ld hl,$D062
+	bit 2,[hl]
+	jr z,.next10\@ ; 57EF
+	ld a,[$D06A]
+	dec a
+	ld [$D06A],a
+	jp nz,$5714
+
+	res 2,[hl]
+	ld hl,MultiHitText
+	call PrintText
+	xor a
+	ld [W_NUMHITS],a ; reset
+.next10\@
+	ld a,[$CFD3]
+	and a
+	jp z,Function580A
+	ld hl,EffectsArray5
+	ld de,1
+	call IsInArray
+	call nc,$7132
+	jp Function580A
+
+MultiHitText:
+	TX_FAR _MultiHitText
+	db "@"
+
+Function580A: ; 580A
+	xor a
+	ld [$CD6A],a
+	ld b,1
+	ret
+
+Function5811: ; 5811
+; print the ghost battle messages
+	call $583A
+	ret nz
+	ld a,[H_WHOSETURN]
+	and a
+	jr nz,.Ghost\@
+	ld a,[W_CURMONSTATUS] ; player’s turn
+	and a,SLP | FRZ
+	ret nz
+	ld hl,ScaredText
+	call PrintText
+	xor a
+	ret
+.Ghost\@ ; ghost’s turn
+	ld hl,GetOutText
+	call PrintText
+	xor a
+	ret
+
+ScaredText:
+	TX_FAR _ScaredText
+	db "@"
+
+GetOutText:
+	TX_FAR _GetOutText
+	db "@"
+
+Function583A: ; 583A
+	ld a,[W_ISINBATTLE]
+	dec a
+	ret nz
+	ld a,[W_CURMAP]
+	cp a,$8E ; Lavender Town
+	jr c,.next\@
+	cp a,$95 ; Pokémon Tower
+	jr nc,.next\@
+	ld b,SILPH_SCOPE
+	call IsItemInBag ; $3493
+	ret z
+.next\@
+	ld a,1
+	and a
+	ret
+
+Function5854: ; 5854
+	ld hl,W_CURMONSTATUS
+	ld a,[hl]
+	and a,SLP
+	jr z,.FrozenCheck\@ ; to 5884
+
+	dec a
+	ld [W_CURMONSTATUS],a ; decrement sleep count
+	and a
+	jr z,.WakeUp\@ ; to 5874
+
+	xor a
+	ld [$CC5B],a
+	ld a,SLP_ANIM - 1
+	call $6F07
+	ld hl,FastAsleepText
+	call PrintText
+	jr .sleepDone\@
+.WakeUp\@
+	ld hl,WokeUpText
+	call PrintText
+.sleepDone\@
+	xor a
+	ld [$CCF1],a
+	ld hl,Function580A
+	jp $5A37
+
+.FrozenCheck\@
+	bit 5,[hl] ; frozen?
+	jr z,.HeldInPlaceCheck\@ ; to 5898
+	ld hl,FrozenText
+	call PrintText
+	xor a
+	ld [$CCF1],a
+	ld hl,Function580A
+	jp $5A37
+
+.HeldInPlaceCheck\@
+	ld a,[W_CURMONBATTSTATUS]
+	bit 5,a
+	jp z,FlinchedCheck
+	ld hl,CantMoveText
+	call PrintText
+	ld hl,Function580A
+	jp $5A37
+
+FlinchedCheck: ; 58AC
+	ld hl,$D062
+	bit 3,[hl]
+	jp z,HyperBeamCheck
+	res 3,[hl]
+	ld hl,FlinchedText
+	call PrintText
+	ld hl,Function580A
+	jp $5A37
+
+HyperBeamCheck: ; 58C2
+	ld hl,$D063
+	bit 5,[hl]
+	jr z,.next\@ ; 58D7
+	res 5,[hl]
+	ld hl,MustRechargeText
+	call PrintText
+	ld hl,$580A
+	jp $5A37
+.next\@
+	ld hl,$D06D
+	ld a,[hl]
+	and a
+	jr z,.next2\@ ; 58EE
+	dec a
+	ld [hl],a
+	and a,$F
+	jr nz,.next2\@
+	ld [hl],a
+	ld [$CCEE],a
+	ld hl,DisabledNoMoreText
+	call PrintText
+.next2\@
+	ld a,[$D062]
+	add a
+	jr nc,.next3\@ ; 5929
+	ld hl,$D06B
+	dec [hl]
+	jr nz,.next4\@ ; 5907
+	ld hl,$D062
+	res 7,[hl]
+	ld hl,ConfusedNoMoreText
+	call PrintText
+	jr .next3\@
+.next4\@
+	ld hl,IsConfusedText
+	call PrintText
+	xor a
+	ld [$CC5B],a
+	ld a,CONF_ANIM - 1
+	call $6F07
+	call $6E9B
+	cp a,$80
+	jr c,.next3\@
+	ld hl,$D062
+	ld a,[hl]
+	and a,$80
+	ld [hl],a
+	call $5AAD
+	jr .next5\@ ; 5952
+.next3\@
+	ld a,[$CCEE]
+	and a
+	jr z,.ParalysisCheck\@ ; 593E
+	ld hl,$CCDC
+	cp [hl]
+	jr nz,.ParalysisCheck\@
+	call $5A88
+	ld hl,$580A
+	jp $5A37
+.ParalysisCheck\@
+	ld hl,W_CURMONSTATUS
+	bit 6,[hl]
+	jr z,.next7\@ ; 5975
+	call $6E9B ; random number?
+	cp a,$3F
+	jr nc,.next7\@
+	ld hl,FullyParalyzedText
+	call PrintText
+.next5\@
+	ld hl,$D062
+	ld a,[hl]
+	and a,$CC
+	ld [hl],a
+	ld a,[$CFD3]
+	cp a,$2B
+	jr z,.next8\@ ; 5966
+	cp a,$27
+	jr z,.next8\@
+	jr .next9\@ ; 596F
+.next8\@
+	xor a
+	ld [$CC5B],a
+	ld a,$A7
+	call $6F07
+.next9\@
+	ld hl,$580A
+	jp $5A37
+.next7\@
+	ld hl,$D062
+	bit 0,[hl]
+	jr z,.next10\@ ; 59D0
+	xor a
+	ld [$CFD2],a
+	ld hl,$D0D7
+	ld a,[hli]
+	ld b,a
+	ld c,[hl]
+	ld hl,$D075
+	ld a,[hl]
+	add c
+	ld [hld],a
+	ld a,[hl]
+	adc b
+	ld [hl],a
+	ld hl,$D06A
+	dec [hl]
+	jr z,.next11\@ ; 599B
+	ld hl,$580A
+	jp $5A37
+.next11\@
+	ld hl,$D062
+	res 0,[hl]
+	ld hl,UnleashedEnergyText
+	call PrintText
+	ld a,1
+	ld [$CFD4],a
+	ld hl,$D075
+	ld a,[hld]
+	add a
+	ld b,a
+	ld [$D0D8],a
+	ld a,[hl]
+	rl a
+	ld [$D0D7],a
+	or b
+	jr nz,.next12\@ ; 59C2
+	ld a,1
+	ld [$D05F],a
+.next12\@
+	xor a
+	ld [hli],a
+	ld [hl],a
+	ld a,$75
+	ld [$CFD2],a
+	ld hl,$5705
+	jp $5A37
+.next10\@
+	bit 1,[hl]
+	jr z,.next13\@ ; 59FF
+	ld a,$25
+	ld [$CFD2],a
+	ld hl,ThrashingAboutText
+	call PrintText
+	ld hl,$D06A
+	dec [hl]
+	ld hl,$56DC
+	jp nz,$5A37
+	push hl
+	ld hl,$D062
+	res 1,[hl]
+	set 7,[hl]
+	call $6E9B ; random number?
+	and a,3
+	inc a
+	inc a
+	ld [$D06B],a
+	pop hl
+	jp $5A37
+.next13\@
+	bit 5,[hl]
+	jp z,$5A1A
+	ld hl,AttackContinuesText
+	call PrintText
+	ld a,[$D06A]
+	dec a
+	ld [$D06A],a
+	ld hl,$5714
+	jp nz,$5A37
+	jp $5A37
+
+INCBIN "baserom.gbc",$3DA1A,$3DA3D - $3DA1A
+
+FastAsleepText:
+	TX_FAR _FastAsleepText
+	db "@"
+
+WokeUpText:
+	TX_FAR _WokeUpText
+	db "@"
+
+FrozenText:
+	TX_FAR _FrozenText
+	db "@"
+
+FullyParalyzedText:
+	TX_FAR _FullyParalyzedText
+	db "@"
+
+FlinchedText:
+	TX_FAR _FlinchedText
+	db "@"
+
+MustRechargeText:
+	TX_FAR _MustRechargeText
+	db "@"
+
+DisabledNoMoreText:
+	TX_FAR _DisabledNoMoreText
+	db "@"
+
+IsConfusedText:
+	TX_FAR _IsConfusedText
+	db "@"
+
+HurtItselfText:
+	TX_FAR _HurtItselfText
+	db "@"
+
+ConfusedNoMoreText:
+	TX_FAR _ConfusedNoMoreText
+	db "@"
+
+SavingEnergyText:
+	TX_FAR _SavingEnergyText
+	db "@"
+
+UnleashedEnergyText:
+	TX_FAR _UnleashedEnergyText
+	db "@"
+
+ThrashingAboutText:
+	TX_FAR _ThrashingAboutText
+	db "@"
+
+AttackContinuesText:
+	TX_FAR _AttackContinuesText
+	db "@"
+
+CantMoveText:
+	TX_FAR _CantMoveText
+	db "@"
+
+INCBIN "baserom.gbc",$3DA88,$3E474 - $3DA88
+
+TypeEffects: ; 6474
+; format: attacking type, defending type, damage multiplier
+; the multiplier is a (decimal) fixed-point number:
+;     20 is ×2.0
+;     05 is ×0.5
+;     00 is ×0
+	db WATER,FIRE,20
+	db FIRE,GRASS,20
+	db FIRE,ICE,20
+	db GRASS,WATER,20
+	db ELECTRIC,WATER,20
+	db WATER,ROCK,20
+	db GROUND,FLYING,00
+	db WATER,WATER,05
+	db FIRE,FIRE,05
+	db ELECTRIC,ELECTRIC,05
+	db ICE,ICE,05
+	db GRASS,GRASS,05
+	db PSYCHIC,PSYCHIC,05
+	db FIRE,WATER,05
+	db GRASS,FIRE,05
+	db WATER,GRASS,05
+	db ELECTRIC,GRASS,05
+	db NORMAL,ROCK,05
+	db NORMAL,GHOST,00
+	db GHOST,GHOST,20
+	db FIRE,BUG,20
+	db FIRE,ROCK,05
+	db WATER,GROUND,20
+	db ELECTRIC,GROUND,00
+	db ELECTRIC,FLYING,20
+	db GRASS,GROUND,20
+	db GRASS,BUG,05
+	db GRASS,POISON,05
+	db GRASS,ROCK,20
+	db GRASS,FLYING,05
+	db ICE,WATER,05
+	db ICE,GRASS,20
+	db ICE,GROUND,20
+	db ICE,FLYING,20
+	db FIGHTING,NORMAL,20
+	db FIGHTING,POISON,05
+	db FIGHTING,FLYING,05
+	db FIGHTING,PSYCHIC,05
+	db FIGHTING,BUG,05
+	db FIGHTING,ROCK,20
+	db FIGHTING,ICE,20
+	db FIGHTING,GHOST,00
+	db POISON,GRASS,20
+	db POISON,POISON,05
+	db POISON,GROUND,05
+	db POISON,BUG,20
+	db POISON,ROCK,05
+	db POISON,GHOST,05
+	db GROUND,FIRE,20
+	db GROUND,ELECTRIC,20
+	db GROUND,GRASS,05
+	db GROUND,BUG,05
+	db GROUND,ROCK,20
+	db GROUND,POISON,20
+	db FLYING,ELECTRIC,05
+	db FLYING,FIGHTING,20
+	db FLYING,BUG,20
+	db FLYING,GRASS,20
+	db FLYING,ROCK,05
+	db PSYCHIC,FIGHTING,20
+	db PSYCHIC,POISON,20
+	db BUG,FIRE,05
+	db BUG,GRASS,20
+	db BUG,FIGHTING,05
+	db BUG,FLYING,05
+	db BUG,PSYCHIC,20
+	db BUG,GHOST,05
+	db BUG,POISON,20
+	db ROCK,FIRE,20
+	db ROCK,FIGHTING,05
+	db ROCK,GROUND,05
+	db ROCK,FLYING,20
+	db ROCK,BUG,20
+	db ROCK,ICE,20
+	db GHOST,NORMAL,00
+	db GHOST,PSYCHIC,00
+	db FIRE,DRAGON,05
+	db WATER,DRAGON,05
+	db ELECTRIC,DRAGON,05
+	db GRASS,DRAGON,05
+	db ICE,DRAGON,20
+	db DRAGON,DRAGON,20
+	db $FF
+
+INCBIN "baserom.gbc",$3E56B,$3EF07 - $3E56B
+
+PlayAttackAnimation: ; 6F07
+	ld [$D07C],a
+	call Delay3
+	ld a,8
+	jp Predef
+
+INCBIN "baserom.gbc",$3EF12,$40000 - $3EF12
+
+SECTION "bank10",DATA,BANK[$10]
+
+INCBIN "baserom.gbc",$40000,$47E
+
+PokedexEntryPointers: ; 447E
+	dw RhydonDexEntry
+	dw KangaskhanDexEntry
+	dw NidoranMDexEntry
+	dw ClefairyDexEntry
+	dw SpearowDexEntry
+	dw VoltorbDexEntry
+	dw NidokingDexEntry
+	dw SlowbroDexEntry
+	dw IvysaurDexEntry
+	dw ExeggutorDexEntry
+	dw LickitungDexEntry
+	dw ExeggcuteDexEntry
+	dw GrimerDexEntry
+	dw GengarDexEntry
+	dw NidoranFDexEntry
+	dw NidoqueenDexEntry
+	dw CuboneDexEntry
+	dw RhyhornDexEntry
+	dw LaprasDexEntry
+	dw ArcanineDexEntry
+	dw MewDexEntry
+	dw GyaradosDexEntry
+	dw ShellderDexEntry
+	dw TentacoolDexEntry
+	dw GastlyDexEntry
+	dw ScytherDexEntry
+	dw StaryuDexEntry
+	dw BlastoiseDexEntry
+	dw PinsirDexEntry
+	dw TangelaDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw GrowlitheDexEntry
+	dw OnixDexEntry
+	dw FearowDexEntry
+	dw PidgeyDexEntry
+	dw SlowpokeDexEntry
+	dw KadabraDexEntry
+	dw GravelerDexEntry
+	dw ChanseyDexEntry
+	dw MachokeDexEntry
+	dw MrMimeDexEntry
+	dw HitmonleeDexEntry
+	dw HitmonchanDexEntry
+	dw ArbokDexEntry
+	dw ParasectDexEntry
+	dw PsyduckDexEntry
+	dw DrowzeeDexEntry
+	dw GolemDexEntry
+	dw MissingNoDexEntry
+	dw MagmarDexEntry
+	dw MissingNoDexEntry
+	dw ElectabuzzDexEntry
+	dw MagnetonDexEntry
+	dw KoffingDexEntry
+	dw MissingNoDexEntry
+	dw MankeyDexEntry
+	dw SeelDexEntry
+	dw DiglettDexEntry
+	dw TaurosDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw FarfetchdDexEntry
+	dw VenonatDexEntry
+	dw DragoniteDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw DoduoDexEntry
+	dw PoliwagDexEntry
+	dw JynxDexEntry
+	dw MoltresDexEntry
+	dw ArticunoDexEntry
+	dw ZapdosDexEntry
+	dw DittoDexEntry
+	dw MeowthDexEntry
+	dw KrabbyDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw VulpixDexEntry
+	dw NinetalesDexEntry
+	dw PikachuDexEntry
+	dw RaichuDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw DratiniDexEntry
+	dw DragonairDexEntry
+	dw KabutoDexEntry
+	dw KabutopsDexEntry
+	dw HorseaDexEntry
+	dw SeadraDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw SandshrewDexEntry
+	dw SandslashDexEntry
+	dw OmanyteDexEntry
+	dw OmastarDexEntry
+	dw JigglypuffDexEntry
+	dw WigglytuffDexEntry
+	dw EeveeDexEntry
+	dw FlareonDexEntry
+	dw JolteonDexEntry
+	dw VaporeonDexEntry
+	dw MachopDexEntry
+	dw ZubatDexEntry
+	dw EkansDexEntry
+	dw ParasDexEntry
+	dw PoliwhirlDexEntry
+	dw PoliwrathDexEntry
+	dw WeedleDexEntry
+	dw KakunaDexEntry
+	dw BeedrillDexEntry
+	dw MissingNoDexEntry
+	dw DodrioDexEntry
+	dw PrimeapeDexEntry
+	dw DugtrioDexEntry
+	dw VenomothDexEntry
+	dw DewgongDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw CaterpieDexEntry
+	dw MetapodDexEntry
+	dw ButterfreeDexEntry
+	dw MachampDexEntry
+	dw MissingNoDexEntry
+	dw GolduckDexEntry
+	dw HypnoDexEntry
+	dw GolbatDexEntry
+	dw MewtwoDexEntry
+	dw SnorlaxDexEntry
+	dw MagikarpDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw MukDexEntry
+	dw MissingNoDexEntry
+	dw KinglerDexEntry
+	dw CloysterDexEntry
+	dw MissingNoDexEntry
+	dw ElectrodeDexEntry
+	dw ClefableDexEntry
+	dw WeezingDexEntry
+	dw PersianDexEntry
+	dw MarowakDexEntry
+	dw MissingNoDexEntry
+	dw HaunterDexEntry
+	dw AbraDexEntry
+	dw AlakazamDexEntry
+	dw PidgeottoDexEntry
+	dw PidgeotDexEntry
+	dw StarmieDexEntry
+	dw BulbasaurDexEntry
+	dw VenusaurDexEntry
+	dw TentacruelDexEntry
+	dw MissingNoDexEntry
+	dw GoldeenDexEntry
+	dw SeakingDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw PonytaDexEntry
+	dw RapidashDexEntry
+	dw RattataDexEntry
+	dw RaticateDexEntry
+	dw NidorinoDexEntry
+	dw NidorinaDexEntry
+	dw GeodudeDexEntry
+	dw PorygonDexEntry
+	dw AerodactylDexEntry
+	dw MissingNoDexEntry
+	dw MagnemiteDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw CharmanderDexEntry
+	dw SquirtleDexEntry
+	dw CharmeleonDexEntry
+	dw WartortleDexEntry
+	dw CharizardDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw MissingNoDexEntry
+	dw OddishDexEntry
+	dw GloomDexEntry
+	dw VileplumeDexEntry
+	dw BellsproutDexEntry
+	dw WeepinbellDexEntry
+	dw VictreebelDexEntry
+
+; string: species name
+; height in feet, inches
+; weight in pounds
+; text entry
+
+RhydonDexEntry:
+	db "DRILL@"
+	db 6,3
+	dw 2650
+	TX_FAR _RhydonDexEntry
+	db "@"
+
+KangaskhanDexEntry:
+	db "PARENT@"
+	db 7,3
+	dw 1760
+	TX_FAR _KangaskhanDexEntry
+	db "@"
+
+NidoranMDexEntry:
+	db "POISON PIN@"
+	db 1,8
+	dw 200
+	TX_FAR _NidoranMDexEntry
+	db "@"
+
+ClefairyDexEntry:
+	db "FAIRY@"
+	db 2,0
+	dw 170
+	TX_FAR _ClefairyDexEntry
+	db "@"
+
+SpearowDexEntry:
+	db "TINY BIRD@"
+	db 1,0
+	dw 40
+	TX_FAR _SpearowDexEntry
+	db "@"
+
+VoltorbDexEntry:
+	db "BALL@"
+	db 1,8
+	dw 230
+	TX_FAR _VoltorbDexEntry
+	db "@"
+
+NidokingDexEntry:
+	db "DRILL@"
+	db 4,7
+	dw 1370
+	TX_FAR _NidokingDexEntry
+	db "@"
+
+SlowbroDexEntry:
+	db "HERMITCRAB@"
+	db 5,3
+	dw 1730
+	TX_FAR _SlowbroDexEntry
+	db "@"
+
+IvysaurDexEntry:
+	db "SEED@"
+	db 3,3
+	dw 290
+	TX_FAR _IvysaurDexEntry
+	db "@"
+
+ExeggutorDexEntry:
+	db "COCONUT@"
+	db 6,7
+	dw 2650
+	TX_FAR _ExeggutorDexEntry
+	db "@"
+
+LickitungDexEntry:
+	db "LICKING@"
+	db 3,11
+	dw 1440
+	TX_FAR _LickitungDexEntry
+	db "@"
+
+ExeggcuteDexEntry:
+	db "EGG@"
+	db 1,4
+	dw 60
+	TX_FAR _ExeggcuteDexEntry
+	db "@"
+
+GrimerDexEntry:
+	db "SLUDGE@"
+	db 2,11
+	dw 660
+	TX_FAR _GrimerDexEntry
+	db "@"
+
+GengarDexEntry:
+	db "SHADOW@"
+	db 4,11
+	dw 890
+	TX_FAR _GengarDexEntry
+	db "@"
+
+NidoranFDexEntry:
+	db "POISON PIN@"
+	db 1,4
+	dw 150
+	TX_FAR _NidoranFDexEntry
+	db "@"
+
+NidoqueenDexEntry:
+	db "DRILL@"
+	db 4,3
+	dw 1320
+	TX_FAR _NidoqueenDexEntry
+	db "@"
+
+CuboneDexEntry:
+	db "LONELY@"
+	db 1,4
+	dw 140
+	TX_FAR _CuboneDexEntry
+	db "@"
+
+RhyhornDexEntry:
+	db "SPIKES@"
+	db 3,3
+	dw 2540
+	TX_FAR _RhyhornDexEntry
+	db "@"
+
+LaprasDexEntry:
+	db "TRANSPORT@"
+	db 8,2
+	dw 4850
+	TX_FAR _LaprasDexEntry
+	db "@"
+
+ArcanineDexEntry:
+	db "LEGENDARY@"
+	db 6,3
+	dw 3420
+	TX_FAR _ArcanineDexEntry
+	db "@"
+
+MewDexEntry:
+	db "NEW SPECIE@"
+	db 1,4
+	dw 90
+	TX_FAR _MewDexEntry
+	db "@"
+
+GyaradosDexEntry:
+	db "ATROCIOUS@"
+	db 21,4
+	dw 5180
+	TX_FAR _GyaradosDexEntry
+	db "@"
+
+ShellderDexEntry:
+	db "BIVALVE@"
+	db 1,0
+	dw 90
+	TX_FAR _ShellderDexEntry
+	db "@"
+
+TentacoolDexEntry:
+	db "JELLYFISH@"
+	db 2,11
+	dw 1000
+	TX_FAR _TentacoolDexEntry
+	db "@"
+
+GastlyDexEntry:
+	db "GAS@"
+	db 4,3
+	dw 2
+	TX_FAR _GastlyDexEntry
+	db "@"
+
+ScytherDexEntry:
+	db "MANTIS@"
+	db 4,11
+	dw 1230
+	TX_FAR _ScytherDexEntry
+	db "@"
+
+StaryuDexEntry:
+	db "STARSHAPE@"
+	db 2,7
+	dw 760
+	TX_FAR _StaryuDexEntry
+	db "@"
+
+BlastoiseDexEntry:
+	db "SHELLFISH@"
+	db 5,3
+	dw 1890
+	TX_FAR _BlastoiseDexEntry
+	db "@"
+
+PinsirDexEntry:
+	db "STAGBEETLE@"
+	db 4,11
+	dw 1210
+	TX_FAR _PinsirDexEntry
+	db "@"
+
+TangelaDexEntry:
+	db "VINE@"
+	db 3,3
+	dw 770
+	TX_FAR _TangelaDexEntry
+	db "@"
+
+GrowlitheDexEntry:
+	db "PUPPY@"
+	db 2,4
+	dw 420
+	TX_FAR _GrowlitheDexEntry
+	db "@"
+
+OnixDexEntry:
+	db "ROCK SNAKE@"
+	db 28,10
+	dw 4630
+	TX_FAR _OnixDexEntry
+	db "@"
+
+FearowDexEntry:
+	db "BEAK@"
+	db 3,11
+	dw 840
+	TX_FAR _FearowDexEntry
+	db "@"
+
+PidgeyDexEntry:
+	db "TINY BIRD@"
+	db 1,0
+	dw 40
+	TX_FAR _PidgeyDexEntry
+	db "@"
+
+SlowpokeDexEntry:
+	db "DOPEY@"
+	db 3,11
+	dw 790
+	TX_FAR _SlowpokeDexEntry
+	db "@"
+
+KadabraDexEntry:
+	db "PSI@"
+	db 4,3
+	dw 1250
+	TX_FAR _KadabraDexEntry
+	db "@"
+
+GravelerDexEntry:
+	db "ROCK@"
+	db 3,3
+	dw 2320
+	TX_FAR _GravelerDexEntry
+	db "@"
+
+ChanseyDexEntry:
+	db "EGG@"
+	db 3,7
+	dw 760
+	TX_FAR _ChanseyDexEntry
+	db "@"
+
+MachokeDexEntry:
+	db "SUPERPOWER@"
+	db 4,11
+	dw 1550
+	TX_FAR _MachokeDexEntry
+	db "@"
+
+MrMimeDexEntry:
+	db "BARRIER@"
+	db 4,3
+	dw 1200
+	TX_FAR _MrMimeDexEntry
+	db "@"
+
+HitmonleeDexEntry:
+	db "KICKING@"
+	db 4,11
+	dw 1100
+	TX_FAR _HitmonleeDexEntry
+	db "@"
+
+HitmonchanDexEntry:
+	db "PUNCHING@"
+	db 4,7
+	dw 1110
+	TX_FAR _HitmonchanDexEntry
+	db "@"
+
+ArbokDexEntry:
+	db "COBRA@"
+	db 11,6
+	dw 1430
+	TX_FAR _ArbokDexEntry
+	db "@"
+
+ParasectDexEntry:
+	db "MUSHROOM@"
+	db 3,3
+	dw 650
+	TX_FAR _ParasectDexEntry
+	db "@"
+
+PsyduckDexEntry:
+	db "DUCK@"
+	db 2,7
+	dw 430
+	TX_FAR _PsyduckDexEntry
+	db "@"
+
+DrowzeeDexEntry:
+	db "HYPNOSIS@"
+	db 3,3
+	dw 710
+	TX_FAR _DrowzeeDexEntry
+	db "@"
+
+GolemDexEntry:
+	db "MEGATON@"
+	db 4,7
+	dw 6620
+	TX_FAR _GolemDexEntry
+	db "@"
+
+MagmarDexEntry:
+	db "SPITFIRE@"
+	db 4,3
+	dw 980
+	TX_FAR _MagmarDexEntry
+	db "@"
+
+ElectabuzzDexEntry:
+	db "ELECTRIC@"
+	db 3,7
+	dw 660
+	TX_FAR _ElectabuzzDexEntry
+	db "@"
+
+MagnetonDexEntry:
+	db "MAGNET@"
+	db 3,3
+	dw 1320
+	TX_FAR _MagnetonDexEntry
+	db "@"
+
+KoffingDexEntry:
+	db "POISON GAS@"
+	db 2,0
+	dw 20
+	TX_FAR _KoffingDexEntry
+	db "@"
+
+MankeyDexEntry:
+	db "PIG MONKEY@"
+	db 1,8
+	dw 620
+	TX_FAR _MankeyDexEntry
+	db "@"
+
+SeelDexEntry:
+	db "SEA LION@"
+	db 3,7
+	dw 1980
+	TX_FAR _SeelDexEntry
+	db "@"
+
+DiglettDexEntry:
+	db "MOLE@"
+	db 0,8
+	dw 20
+	TX_FAR _DiglettDexEntry
+	db "@"
+
+TaurosDexEntry:
+	db "WILD BULL@"
+	db 4,7
+	dw 1950
+	TX_FAR _TaurosDexEntry
+	db "@"
+
+FarfetchdDexEntry:
+	db "WILD DUCK@"
+	db 2,7
+	dw 330
+	TX_FAR _FarfetchdDexEntry
+	db "@"
+
+VenonatDexEntry:
+	db "INSECT@"
+	db 3,3
+	dw 660
+	TX_FAR _VenonatDexEntry
+	db "@"
+
+DragoniteDexEntry:
+	db "DRAGON@"
+	db 7,3
+	dw 4630
+	TX_FAR _DragoniteDexEntry
+	db "@"
+
+DoduoDexEntry:
+	db "TWIN BIRD@"
+	db 4,7
+	dw 860
+	TX_FAR _DoduoDexEntry
+	db "@"
+
+PoliwagDexEntry:
+	db "TADPOLE@"
+	db 2,0
+	dw 270
+	TX_FAR _PoliwagDexEntry
+	db "@"
+
+JynxDexEntry:
+	db "HUMANSHAPE@"
+	db 4,7
+	dw 900
+	TX_FAR _JynxDexEntry
+	db "@"
+
+MoltresDexEntry:
+	db "FLAME@"
+	db 6,7
+	dw 1320
+	TX_FAR _MoltresDexEntry
+	db "@"
+
+ArticunoDexEntry:
+	db "FREEZE@"
+	db 5,7
+	dw 1220
+	TX_FAR _ArticunoDexEntry
+	db "@"
+
+ZapdosDexEntry:
+	db "ELECTRIC@"
+	db 5,3
+	dw 1160
+	TX_FAR _ZapdosDexEntry
+	db "@"
+
+DittoDexEntry:
+	db "TRANSFORM@"
+	db 1,0
+	dw 90
+	TX_FAR _DittoDexEntry
+	db "@"
+
+MeowthDexEntry:
+	db "SCRATCHCAT@"
+	db 1,4
+	dw 90
+	TX_FAR _MeowthDexEntry
+	db "@"
+
+KrabbyDexEntry:
+	db "RIVER CRAB@"
+	db 1,4
+	dw 140
+	TX_FAR _KrabbyDexEntry
+	db "@"
+
+VulpixDexEntry:
+	db "FOX@"
+	db 2,0
+	dw 220
+	TX_FAR _VulpixDexEntry
+	db "@"
+
+NinetalesDexEntry:
+	db "FOX@"
+	db 3,7
+	dw 440
+	TX_FAR _NinetalesDexEntry
+	db "@"
+
+PikachuDexEntry:
+	db "MOUSE@"
+	db 1,4
+	dw 130
+	TX_FAR _PikachuDexEntry
+	db "@"
+
+RaichuDexEntry:
+	db "MOUSE@"
+	db 2,7
+	dw 660
+	TX_FAR _RaichuDexEntry
+	db "@"
+
+DratiniDexEntry:
+	db "DRAGON@"
+	db 5,11
+	dw 70
+	TX_FAR _DratiniDexEntry
+	db "@"
+
+DragonairDexEntry:
+	db "DRAGON@"
+	db 13,1
+	dw 360
+	TX_FAR _DragonairDexEntry
+	db "@"
+
+KabutoDexEntry:
+	db "SHELLFISH@"
+	db 1,8
+	dw 250
+	TX_FAR _KabutoDexEntry
+	db "@"
+
+KabutopsDexEntry:
+	db "SHELLFISH@"
+	db 4,3
+	dw 890
+	TX_FAR _KabutopsDexEntry
+	db "@"
+
+HorseaDexEntry:
+	db "DRAGON@"
+	db 1,4
+	dw 180
+	TX_FAR _HorseaDexEntry
+	db "@"
+
+SeadraDexEntry:
+	db "DRAGON@"
+	db 3,11
+	dw 550
+	TX_FAR _SeadraDexEntry
+	db "@"
+
+SandshrewDexEntry:
+	db "MOUSE@"
+	db 2,0
+	dw 260
+	TX_FAR _SandshrewDexEntry
+	db "@"
+
+SandslashDexEntry:
+	db "MOUSE@"
+	db 3,3
+	dw 650
+	TX_FAR _SandslashDexEntry
+	db "@"
+
+OmanyteDexEntry:
+	db "SPIRAL@"
+	db 1,4
+	dw 170
+	TX_FAR _OmanyteDexEntry
+	db "@"
+
+OmastarDexEntry:
+	db "SPIRAL@"
+	db 3,3
+	dw 770
+	TX_FAR _OmastarDexEntry
+	db "@"
+
+JigglypuffDexEntry:
+	db "BALLOON@"
+	db 1,8
+	dw 120
+	TX_FAR _JigglypuffDexEntry
+	db "@"
+
+WigglytuffDexEntry:
+	db "BALLOON@"
+	db 3,3
+	dw 260
+	TX_FAR _WigglytuffDexEntry
+	db "@"
+
+EeveeDexEntry:
+	db "EVOLUTION@"
+	db 1,0
+	dw 140
+	TX_FAR _EeveeDexEntry
+	db "@"
+
+FlareonDexEntry:
+	db "FLAME@"
+	db 2,11
+	dw 550
+	TX_FAR _FlareonDexEntry
+	db "@"
+
+JolteonDexEntry:
+	db "LIGHTNING@"
+	db 2,7
+	dw 540
+	TX_FAR _JolteonDexEntry
+	db "@"
+
+VaporeonDexEntry:
+	db "BUBBLE JET@"
+	db 3,3
+	dw 640
+	TX_FAR _VaporeonDexEntry
+	db "@"
+
+MachopDexEntry:
+	db "SUPERPOWER@"
+	db 2,7
+	dw 430
+	TX_FAR _MachopDexEntry
+	db "@"
+
+ZubatDexEntry:
+	db "BAT@"
+	db 2,7
+	dw 170
+	TX_FAR _ZubatDexEntry
+	db "@"
+
+EkansDexEntry:
+	db "SNAKE@"
+	db 6,7
+	dw 150
+	TX_FAR _EkansDexEntry
+	db "@"
+
+ParasDexEntry:
+	db "MUSHROOM@"
+	db 1,0
+	dw 120
+	TX_FAR _ParasDexEntry
+	db "@"
+
+PoliwhirlDexEntry:
+	db "TADPOLE@"
+	db 3,3
+	dw 440
+	TX_FAR _PoliwhirlDexEntry
+	db "@"
+
+PoliwrathDexEntry:
+	db "TADPOLE@"
+	db 4,3
+	dw 1190
+	TX_FAR _PoliwrathDexEntry
+	db "@"
+
+WeedleDexEntry:
+	db "HAIRY BUG@"
+	db 1,0
+	dw 70
+	TX_FAR _WeedleDexEntry
+	db "@"
+
+KakunaDexEntry:
+	db "COCOON@"
+	db 2,0
+	dw 220
+	TX_FAR _KakunaDexEntry
+	db "@"
+
+BeedrillDexEntry:
+	db "POISON BEE@"
+	db 3,3
+	dw 650
+	TX_FAR _BeedrillDexEntry
+	db "@"
+
+DodrioDexEntry:
+	db "TRIPLEBIRD@"
+	db 5,11
+	dw 1880
+	TX_FAR _DodrioDexEntry
+	db "@"
+
+PrimeapeDexEntry:
+	db "PIG MONKEY@"
+	db 3,3
+	dw 710
+	TX_FAR _PrimeapeDexEntry
+	db "@"
+
+DugtrioDexEntry:
+	db "MOLE@"
+	db 2,4
+	dw 730
+	TX_FAR _DugtrioDexEntry
+	db "@"
+
+VenomothDexEntry:
+	db "POISONMOTH@"
+	db 4,11
+	dw 280
+	TX_FAR _VenomothDexEntry
+	db "@"
+
+DewgongDexEntry:
+	db "SEA LION@"
+	db 5,7
+	dw 2650
+	TX_FAR _DewgongDexEntry
+	db "@"
+
+CaterpieDexEntry:
+	db "WORM@"
+	db 1,0
+	dw 60
+	TX_FAR _CaterpieDexEntry
+	db "@"
+
+MetapodDexEntry:
+	db "COCOON@"
+	db 2,4
+	dw 220
+	TX_FAR _MetapodDexEntry
+	db "@"
+
+ButterfreeDexEntry:
+	db "BUTTERFLY@"
+	db 3,7
+	dw 710
+	TX_FAR _ButterfreeDexEntry
+	db "@"
+
+MachampDexEntry:
+	db "SUPERPOWER@"
+	db 5,3
+	dw 2870
+	TX_FAR _MachampDexEntry
+	db "@"
+
+GolduckDexEntry:
+	db "DUCK@"
+	db 5,7
+	dw 1690
+	TX_FAR _GolduckDexEntry
+	db "@"
+
+HypnoDexEntry:
+	db "HYPNOSIS@"
+	db 5,3
+	dw 1670
+	TX_FAR _HypnoDexEntry
+	db "@"
+
+GolbatDexEntry:
+	db "BAT@"
+	db 5,3
+	dw 1210
+	TX_FAR _GolbatDexEntry
+	db "@"
+
+MewtwoDexEntry:
+	db "GENETIC@"
+	db 6,7
+	dw 2690
+	TX_FAR _MewtwoDexEntry
+	db "@"
+
+SnorlaxDexEntry:
+	db "SLEEPING@"
+	db 6,11
+	dw 10140
+	TX_FAR _SnorlaxDexEntry
+	db "@"
+
+MagikarpDexEntry:
+	db "FISH@"
+	db 2,11
+	dw 220
+	TX_FAR _MagikarpDexEntry
+	db "@"
+
+MukDexEntry:
+	db "SLUDGE@"
+	db 3,11
+	dw 660
+	TX_FAR _MukDexEntry
+	db "@"
+
+KinglerDexEntry:
+	db "PINCER@"
+	db 4,3
+	dw 1320
+	TX_FAR _KinglerDexEntry
+	db "@"
+
+CloysterDexEntry:
+	db "BIVALVE@"
+	db 4,11
+	dw 2920
+	TX_FAR _CloysterDexEntry
+	db "@"
+
+ElectrodeDexEntry:
+	db "BALL@"
+	db 3,11
+	dw 1470
+	TX_FAR _ElectrodeDexEntry
+	db "@"
+
+ClefableDexEntry:
+	db "FAIRY@"
+	db 4,3
+	dw 880
+	TX_FAR _ClefableDexEntry
+	db "@"
+
+WeezingDexEntry:
+	db "POISON GAS@"
+	db 3,11
+	dw 210
+	TX_FAR _WeezingDexEntry
+	db "@"
+
+PersianDexEntry:
+	db "CLASSY CAT@"
+	db 3,3
+	dw 710
+	TX_FAR _PersianDexEntry
+	db "@"
+
+MarowakDexEntry:
+	db "BONEKEEPER@"
+	db 3,3
+	dw 990
+	TX_FAR _MarowakDexEntry
+	db "@"
+
+HaunterDexEntry:
+	db "GAS@"
+	db 5,3
+	dw 2
+	TX_FAR _HaunterDexEntry
+	db "@"
+
+AbraDexEntry:
+	db "PSI@"
+	db 2,11
+	dw 430
+	TX_FAR _AbraDexEntry
+	db "@"
+
+AlakazamDexEntry:
+	db "PSI@"
+	db 4,11
+	dw 1060
+	TX_FAR _AlakazamDexEntry
+	db "@"
+
+PidgeottoDexEntry:
+	db "BIRD@"
+	db 3,7
+	dw 660
+	TX_FAR _PidgeottoDexEntry
+	db "@"
+
+PidgeotDexEntry:
+	db "BIRD@"
+	db 4,11
+	dw 870
+	TX_FAR _PidgeotDexEntry
+	db "@"
+
+StarmieDexEntry:
+	db "MYSTERIOUS@"
+	db 3,7
+	dw 1760
+	TX_FAR _StarmieDexEntry
+	db "@"
+
+BulbasaurDexEntry:
+	db "SEED@"
+	db 2,4
+	dw 150
+	TX_FAR _BulbasaurDexEntry
+	db "@"
+
+VenusaurDexEntry:
+	db "SEED@"
+	db 6,7
+	dw 2210
+	TX_FAR _VenusaurDexEntry
+	db "@"
+
+TentacruelDexEntry:
+	db "JELLYFISH@"
+	db 5,3
+	dw 1210
+	TX_FAR _TentacruelDexEntry
+	db "@"
+
+GoldeenDexEntry:
+	db "GOLDFISH@"
+	db 2,0
+	dw 330
+	TX_FAR _GoldeenDexEntry
+	db "@"
+
+SeakingDexEntry:
+	db "GOLDFISH@"
+	db 4,3
+	dw 860
+	TX_FAR _SeakingDexEntry
+	db "@"
+
+PonytaDexEntry:
+	db "FIRE HORSE@"
+	db 3,3
+	dw 660
+	TX_FAR _PonytaDexEntry
+	db "@"
+
+RapidashDexEntry:
+	db "FIRE HORSE@"
+	db 5,7
+	dw 2090
+	TX_FAR _RapidashDexEntry
+	db "@"
+
+RattataDexEntry:
+	db "RAT@"
+	db 1,0
+	dw 80
+	TX_FAR _RattataDexEntry
+	db "@"
+
+RaticateDexEntry:
+	db "RAT@"
+	db 2,4
+	dw 410
+	TX_FAR _RaticateDexEntry
+	db "@"
+
+NidorinoDexEntry:
+	db "POISON PIN@"
+	db 2,11
+	dw 430
+	TX_FAR _NidorinoDexEntry
+	db "@"
+
+NidorinaDexEntry:
+	db "POISON PIN@"
+	db 2,7
+	dw 440
+	TX_FAR _NidorinaDexEntry
+	db "@"
+
+GeodudeDexEntry:
+	db "ROCK@"
+	db 1,4
+	dw 440
+	TX_FAR _GeodudeDexEntry
+	db "@"
+
+PorygonDexEntry:
+	db "VIRTUAL@"
+	db 2,7
+	dw 800
+	TX_FAR _PorygonDexEntry
+	db "@"
+
+AerodactylDexEntry:
+	db "FOSSIL@"
+	db 5,11
+	dw 1300
+	TX_FAR _AerodactylDexEntry
+	db "@"
+
+MagnemiteDexEntry:
+	db "MAGNET@"
+	db 1,0
+	dw 130
+	TX_FAR _MagnemiteDexEntry
+	db "@"
+
+CharmanderDexEntry:
+	db "LIZARD@"
+	db 2,0
+	dw 190
+	TX_FAR _CharmanderDexEntry
+	db "@"
+
+SquirtleDexEntry:
+	db "TINYTURTLE@"
+	db 1,8
+	dw 200
+	TX_FAR _SquirtleDexEntry
+	db "@"
+
+CharmeleonDexEntry:
+	db "FLAME@"
+	db 3,7
+	dw 420
+	TX_FAR _CharmeleonDexEntry
+	db "@"
+
+WartortleDexEntry:
+	db "TURTLE@"
+	db 3,3
+	dw 500
+	TX_FAR _WartortleDexEntry
+	db "@"
+
+CharizardDexEntry:
+	db "FLAME@"
+	db 5,7
+	dw 2000
+	TX_FAR _CharizardDexEntry
+	db "@"
+
+OddishDexEntry:
+	db "WEED@"
+	db 1,8
+	dw 120
+	TX_FAR _OddishDexEntry
+	db "@"
+
+GloomDexEntry:
+	db "WEED@"
+	db 2,7
+	dw 190
+	TX_FAR _GloomDexEntry
+	db "@"
+
+VileplumeDexEntry:
+	db "FLOWER@"
+	db 3,11
+	dw 410
+	TX_FAR _VileplumeDexEntry
+	db "@"
+
+BellsproutDexEntry:
+	db "FLOWER@"
+	db 2,4
+	dw 90
+	TX_FAR _BellsproutDexEntry
+	db "@"
+
+WeepinbellDexEntry:
+	db "FLYCATCHER@"
+	db 3,3
+	dw 140
+	TX_FAR _WeepinbellDexEntry
+	db "@"
+
+VictreebelDexEntry:
+	db "FLYCATCHER@"
+	db 5,7
+	dw 340
+	TX_FAR _VictreebelDexEntry
+	db "@"
+
+MissingNoDexEntry:
+	db "???@"
+	db 10 ; 1.0 m
+	db 100 ; 10.0 kg
+	db 0,"コメント さくせいちゅう@" ; コメント作成中 (Comment to be written)
+
+PokedexToIndex:
+	; converts the Pokédex number at $D11E to an index
+	push bc
+	push hl
+	ld a,[$D11E]
+	ld b,a
+	ld c,0
+	ld hl,PokedexOrder
+
+.loop\@ ; go through the list until we find an entry with a matching dex number
+	inc c
+	ld a,[hli]
+	cp b
+	jr nz,.loop\@
+
+	ld a,c
+	ld [$D11E],a
+	pop hl
+	pop bc
+	ret
+
+IndexToPokedex:
+	; converts the indexédex number at $D11E to a Pokédex number
+	push bc
+	push hl
+	ld a,[$D11E]
+	dec a
+	ld hl,PokedexOrder
+	ld b,0
+	ld c,a
+	add hl,bc
+	ld a,[hl]
+	ld [$D11E],a
+	pop hl
+	pop bc
+	ret
+
+PokedexOrder: ; 5024
+	db DEX_RHYDON
+	db DEX_KANGASKHAN
+	db DEX_NIDORAN_M
+	db DEX_CLEFAIRY
+	db DEX_SPEAROW
+	db DEX_VOLTORB
+	db DEX_NIDOKING
+	db DEX_SLOWBRO
+	db DEX_IVYSAUR
+	db DEX_EXEGGUTOR
+	db DEX_LICKITUNG
+	db DEX_EXEGGCUTE
+	db DEX_GRIMER
+	db DEX_GENGAR
+	db DEX_NIDORAN_F
+	db DEX_NIDOQUEEN
+	db DEX_CUBONE
+	db DEX_RHYHORN
+	db DEX_LAPRAS
+	db DEX_ARCANINE
+	db DEX_MEW
+	db DEX_GYARADOS
+	db DEX_SHELLDER
+	db DEX_TENTACOOL
+	db DEX_GASTLY
+	db DEX_SCYTHER
+	db DEX_STARYU
+	db DEX_BLASTOISE
+	db DEX_PINSIR
+	db DEX_TANGELA
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_GROWLITHE
+	db DEX_ONIX
+	db DEX_FEAROW
+	db DEX_PIDGEY
+	db DEX_SLOWPOKE
+	db DEX_KADABRA
+	db DEX_GRAVELER
+	db DEX_CHANSEY
+	db DEX_MACHOKE
+	db DEX_MR_MIME
+	db DEX_HITMONLEE
+	db DEX_HITMONCHAN
+	db DEX_ARBOK
+	db DEX_PARASECT
+	db DEX_PSYDUCK
+	db DEX_DROWZEE
+	db DEX_GOLEM
+	db 0 ; MISSINGNO.
+	db DEX_MAGMAR
+	db 0 ; MISSINGNO.
+	db DEX_ELECTABUZZ
+	db DEX_MAGNETON
+	db DEX_KOFFING
+	db 0 ; MISSINGNO.
+	db DEX_MANKEY
+	db DEX_SEEL
+	db DEX_DIGLETT
+	db DEX_TAUROS
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_FARFETCH_D
+	db DEX_VENONAT
+	db DEX_DRAGONITE
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_DODUO
+	db DEX_POLIWAG
+	db DEX_JYNX
+	db DEX_MOLTRES
+	db DEX_ARTICUNO
+	db DEX_ZAPDOS
+	db DEX_DITTO
+	db DEX_MEOWTH
+	db DEX_KRABBY
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_VULPIX
+	db DEX_NINETALES
+	db DEX_PIKACHU
+	db DEX_RAICHU
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_DRATINI
+	db DEX_DRAGONAIR
+	db DEX_KABUTO
+	db DEX_KABUTOPS
+	db DEX_HORSEA
+	db DEX_SEADRA
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_SANDSHREW
+	db DEX_SANDSLASH
+	db DEX_OMANYTE
+	db DEX_OMASTAR
+	db DEX_JIGGLYPUFF
+	db DEX_WIGGLYTUFF
+	db DEX_EEVEE
+	db DEX_FLAREON
+	db DEX_JOLTEON
+	db DEX_VAPOREON
+	db DEX_MACHOP
+	db DEX_ZUBAT
+	db DEX_EKANS
+	db DEX_PARAS
+	db DEX_POLIWHIRL
+	db DEX_POLIWRATH
+	db DEX_WEEDLE
+	db DEX_KAKUNA
+	db DEX_BEEDRILL
+	db 0 ; MISSINGNO.
+	db DEX_DODRIO
+	db DEX_PRIMEAPE
+	db DEX_DUGTRIO
+	db DEX_VENOMOTH
+	db DEX_DEWGONG
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_CATERPIE
+	db DEX_METAPOD
+	db DEX_BUTTERFREE
+	db DEX_MACHAMP
+	db 0 ; MISSINGNO.
+	db DEX_GOLDUCK
+	db DEX_HYPNO
+	db DEX_GOLBAT
+	db DEX_MEWTWO
+	db DEX_SNORLAX
+	db DEX_MAGIKARP
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_MUK
+	db 0 ; MISSINGNO.
+	db DEX_KINGLER
+	db DEX_CLOYSTER
+	db 0 ; MISSINGNO.
+	db DEX_ELECTRODE
+	db DEX_CLEFABLE
+	db DEX_WEEZING
+	db DEX_PERSIAN
+	db DEX_MAROWAK
+	db 0 ; MISSINGNO.
+	db DEX_HAUNTER
+	db DEX_ABRA
+	db DEX_ALAKAZAM
+	db DEX_PIDGEOTTO
+	db DEX_PIDGEOT
+	db DEX_STARMIE
+	db DEX_BULBASAUR
+	db DEX_VENUSAUR
+	db DEX_TENTACRUEL
+	db 0 ; MISSINGNO.
+	db DEX_GOLDEEN
+	db DEX_SEAKING
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_PONYTA
+	db DEX_RAPIDASH
+	db DEX_RATTATA
+	db DEX_RATICATE
+	db DEX_NIDORINO
+	db DEX_NIDORINA
+	db DEX_GEODUDE
+	db DEX_PORYGON
+	db DEX_AERODACTYL
+	db 0 ; MISSINGNO.
+	db DEX_MAGNEMITE
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_CHARMANDER
+	db DEX_SQUIRTLE
+	db DEX_CHARMELEON
+	db DEX_WARTORTLE
+	db DEX_CHARIZARD
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db 0 ; MISSINGNO.
+	db DEX_ODDISH
+	db DEX_GLOOM
+	db DEX_VILEPLUME
+	db DEX_BELLSPROUT
+	db DEX_WEEPINBELL
+	db DEX_VICTREEBEL
+INCBIN "baserom.gbc",$410E2,$2769 - $10E2
+
+; XXX what do these do
+	FuncCoord 5,0
+	ld hl,Coord
+	ld de,OTString67E5
+	call PlaceString
+	ld a,[$CD3D]
+	ld [$D11E],a
+	ld a,$3A
+	call Predef
+	ld hl,$C3A9
+	ld de,$D11E
+	ld bc,$8103
+	call $3C5F
+	FuncCoord 5,2
+	ld hl,Coord
+	ld de,$CF4B
+	call PlaceString
+	FuncCoord 8,4
+	ld hl,Coord
+	ld de,$CD41
+	call PlaceString
+	ld hl,$C420
+	ld de,$CD4C
+	ld bc,$8205
+	jp $3C5F
+
+	FuncCoord 5,10
+	ld hl,Coord
+	ld de,OTString67E5
+	call PlaceString
+	ld a,[$CD3E]
+	ld [$D11E],a
+	ld a,$3A
+	call Predef
+	ld hl,$C471
+	ld de,$D11E
+	ld bc,$8103
+	call $3C5F
+	FuncCoord 5,12
+	ld hl,Coord
+	ld de,$CD6D
+	call PlaceString
+	FuncCoord 8,14
+	ld hl,Coord
+	ld de,$CD4E
+	call PlaceString
+	ld hl,$C4E8
+	ld de,$CD59
+	ld bc,$8205
+	jp $3C5F
+
+OTString67E5: ; 67E5
+	db "──",$74,$F2,$4E
+	db $4E
+	db "OT/",$4E
+	db $73,"№",$F2,"@"
+
+SECTION "bank11",DATA,BANK[$11]
+
+LavenderTown_h: ; 0x44000 to 0x4402d (45 bytes) (bank=11) (id=4)
+    db $00 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw LavenderTownBlocks, LavenderTownTexts, LavenderTownScript ; blocks, texts, scripts
+    db NORTH | SOUTH | WEST ; connections
+
+    ; connections data
+
+	db ROUTE_10
+    dw $44a0, $c6eb ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $47, $00 ; alignments (y, x)
+    dw $c929 ; window
+
+	db ROUTE_12
+    dw $4710, $c7ab ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+	db ROUTE_8
+    dw $41e1, $c718 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $00, $3b ; alignments (y, x)
+    dw $c72a ; window
+
+    ; end connection data
+
+    dw LavenderTownObject ; objects
+
+LavenderTownObject: ; 0x4402d (size=88)
+    db $2c ; border tile
+
+    db $6 ; warps
+    db $5, $3, $0, LAVENDER_POKECENTER
+    db $5, $e, $0, POKEMONTOWER_1
+    db $9, $7, $0, LAVENDER_HOUSE_1
+    db $d, $f, $0, LAVENDER_MART
+    db $d, $3, $0, LAVENDER_HOUSE_2
+    db $d, $7, $0, NAME_RATERS_HOUSE
+
+    db $6 ; signs
+    db $9, $b, $4 ; LavenderTownText4
+    db $3, $9, $5 ; LavenderTownText5
+    db $d, $10, $6 ; LavenderTownText6
+    db $5, $4, $7 ; LavenderTownText7
+    db $9, $5, $8 ; LavenderTownText8
+    db $7, $11, $9 ; LavenderTownText9
+
+    db $3 ; people
+    db SPRITE_LITTLE_GIRL, $9 + 4, $f + 4, $fe, $0, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $a + 4, $9 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $7 + 4, $8 + 4, $fe, $2, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $5, $3 ; LAVENDER_POKECENTER
+    EVENT_DISP $a, $5, $e ; POKEMONTOWER_1
+    EVENT_DISP $a, $9, $7 ; LAVENDER_HOUSE_1
+    EVENT_DISP $a, $d, $f ; LAVENDER_MART
+    EVENT_DISP $a, $d, $3 ; LAVENDER_HOUSE_2
+    EVENT_DISP $a, $d, $7 ; NAME_RATERS_HOUSE
+
+LavenderTownBlocks: ; 90
+    INCBIN "maps/lavendertown.blk"
+
+ViridianPokecenterBlocks: ; 28
+    INCBIN "maps/viridianpokecenter.blk"
+
+SafariZoneRestHouse1Blocks: ; 16
+    INCBIN "maps/safarizoneresthouse1.blk"
+
+LavenderTownScript: ; 0x4410b
+    jp $3c3c
+; 0x4410e
+
+LavenderTownTexts: ; 0x4410e
+    dw LavenderTownText1, LavenderTownText2, LavenderTownText3, LavenderTownText4, LavenderTownText5, LavenderTownText6, LavenderTownText7, LavenderTownText8, LavenderTownText9
+
+LavenderTownText1: ; 0x44120
+    db $08 ; asm
+    ld hl, $413c
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    ld hl, $4146
+    jr nz, .asm_40831 ; 0x44131
+    ld hl, $4141
+.asm_40831 ; 0x44136
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$4413c,$f
+
+LavenderTownText2: ; 0x4414b
+    TX_FAR _LavenderTownText2
+    db $50
+
+LavenderTownText3: ; 0x44150
+    TX_FAR _LavenderTownText3
+    db $50
+
+LavenderTownText4: ; 0x44155
+    TX_FAR _LavenderTownText4
+    db $50
+
+LavenderTownText5: ; 0x4415a
+    TX_FAR _LavenderTownText5
+    db $50
+
+LavenderTownText8: ; 0x4415f
+    TX_FAR _LavenderTownText8
+    db $50
+
+LavenderTownText9: ; 0x44164
+    TX_FAR _LavenderTownText9
+    db $50
+
+INCBIN "baserom.gbc",$44169,$e8
+
+ViridianPokecenter_h: ; 0x44251 to 0x4425d (12 bytes) (bank=11) (id=41)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw ViridianPokecenterBlocks, ViridianPokecenterTexts, ViridianPokeCenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw ViridianPokecenterObject ; objects
+
+ViridianPokeCenterScript: ; 0x4425d
+    call $22fa
+    jp $3c3c
+; 0x44263
+
+ViridianPokecenterTexts: ; 0x44263
+    dw ViridianPokeCenterText1, ViridianPokeCenterText2, ViridianPokeCenterText3, ViridianPokeCenterText4
+
+ViridianPokeCenterText1: ; 0x4426b
+    db $ff
+
+ViridianPokeCenterText2: ; 0x4426c
+    TX_FAR _ViridianPokeCenterText1
+    db $50
+
+INCBIN "baserom.gbc",$44271,$44271 - $44271
+
+ViridianPokeCenterText3: ; 0x44271
+    TX_FAR _ViridianPokeCenterText3
+    db $50
+
+ViridianPokeCenterText4:
+    db $f6
+
+ViridianPokecenterObject: ; 0x44277 (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $0, $ff
+    db $7, $4, $0, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GENTLEMAN, $5 + 4, $a + 4, $fe, $1, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $3 + 4, $4 + 4, $ff, $ff, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+Mansion1_h: ; 0x442a3 to 0x442af (12 bytes) (bank=11) (id=165)
+    db $16 ; tileset
+    db $0e, $0f ; dimensions (y, x)
+    dw Mansion1Blocks, Mansion1Texts, Mansion1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Mansion1Object ; objects
+
+Mansion1Script:
+    call Mansion1Subscript1
+    call $3c3c
+    ld hl, $4334
+    ld de, $4326
+    ld a, [$d63a]
+    call $3160
+    ld [$d63a], a
+    ret
+; 0x442c5
+
+Mansion1Subscript1: ; 0x442c5
+    ld hl, $d126
+    bit 5, [hl]
+    res 5, [hl]
+    ret z
+    ld a, [$d796]
+    bit 0, a
+    jr nz, .asm_442ec ; 0x442d2 $18
+    ld bc, $060c
+    call $430b
+    ld bc, $0308
+    call $4304
+    ld bc, $080a
+    call $4304
+    ld bc, $0d0d
+    jp $4304
+.asm_442ec
+    ld bc, $060c
+    call $4304
+    ld bc, $0308
+    call $430b
+    ld bc, $080a
+    call $430b
+    ld bc, $0d0d
+    jp $430b
+; 0x44304
+
+INCBIN "baserom.gbc",$44304,$4432c - $44304
+
+Mansion1Texts: ; 4432c
+INCBIN "baserom.gbc",$4432c,$44341 - $4432c
+
+Mansion1Text1: ; 0x44341
+    db $08 ; asm
+    ld hl, $4334
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$4434b,$59
+
+Mansion1Object: ; 0x443a4 (size=90)
+    db $2e ; border tile
+
+    db $8 ; warps
+    db $1b, $4, $0, $ff
+    db $1b, $5, $0, $ff
+    db $1b, $6, $0, $ff
+    db $1b, $7, $0, $ff
+    db $a, $5, $0, MANSION_2
+    db $17, $15, $0, MANSION_4
+    db $1b, $1a, $0, $ff
+    db $1b, $1b, $0, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_OAK_AIDE, $11 + 4, $11 + 4, $ff, $d2, $41, SCIENTIST + $C8, $4 ; trainer
+	db SPRITE_BALL, $3 + 4, $e + 4, $ff, $ff, $82, ESCAPE_ROPE ; item
+	db SPRITE_BALL, $15 + 4, $12 + 4, $ff, $ff, $83, CARBOS ; item
+
+    ; warp-to
+    EVENT_DISP $f, $1b, $4
+    EVENT_DISP $f, $1b, $5
+    EVENT_DISP $f, $1b, $6
+    EVENT_DISP $f, $1b, $7
+    EVENT_DISP $f, $a, $5 ; MANSION_2
+    EVENT_DISP $f, $17, $15 ; MANSION_4
+    EVENT_DISP $f, $1b, $1a
+    EVENT_DISP $f, $1b, $1b
+
+Mansion1Blocks: ; 203
+    INCBIN "maps/mansion1.blk"
+
+RockTunnel1_h: ; 0x444d0 to 0x444dc (12 bytes) (bank=11) (id=82)
+    db $11 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw RockTunnel1Blocks, RockTunnel1Texts, RockTunnel1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw RockTunnel1Object ; objects
+
+RockTunnel1Script: ; 0x444dc
+    call $3c3c
+    ld hl, $4505
+    ld de, $44ef
+    ld a, [$d621]
+    call $3160
+    ld [$d621], a
+    ret
+; 0x444ef
+
+INCBIN "baserom.gbc",$444ef,$6
+
+RockTunnel1Texts: ; 0x444f5
+    dw RockTunnel1Text1, RockTunnel1Text2, RockTunnel1Text3, RockTunnel1Text4, RockTunnel1Text5, RockTunnel1Text6, RockTunnel1Text7, RockTunnel1Text8
+
+INCBIN "baserom.gbc",$44505,$55
+
+RockTunnel1Text1: ; 0x4455a
+    db $8
+    ld hl, $4505
+    jr asm_0c916 ; 0x4455e $22
+
+RockTunnel1Text2:
+    db $8
+    ld hl, $4511
+    jr asm_0c916 ; 0x44564 $1c
+
+RockTunnel1Text3:
+    db $8
+    ld hl, $451d
+    jr asm_0c916 ; 0x4456a $16
+
+RockTunnel1Text4:
+    db $8
+    ld hl, $4529
+    jr asm_0c916 ; 0x44570 $10
+
+RockTunnel1Text5:
+    db $8
+    ld hl, $4535
+    jr asm_0c916 ; 0x44576 $a
+
+RockTunnel1Text6:
+    db $8
+    ld hl, $4541
+    jr asm_0c916 ; 0x4457c $4
+
+RockTunnel1Text7:
+    db $8
+    ld hl, $454d
+asm_0c916: ; 0x44582
+    call $31cc
+    jp $24d7
+
+INCBIN "baserom.gbc",$44588,$69
+
+RockTunnel1Text8: ; 0x445f1
+    TX_FAR _RockTunnel1Text8
+    db $50
+
+RockTunnel1Object: ; 0x445f6 (size=127)
+    db $3 ; border tile
+
+    db $8 ; warps
+    db $3, $f, $1, $ff
+    db $0, $f, $1, $ff
+    db $21, $f, $2, $ff
+    db $23, $f, $2, $ff
+    db $3, $25, $0, ROCK_TUNNEL_2
+    db $3, $5, $1, ROCK_TUNNEL_2
+    db $b, $11, $2, ROCK_TUNNEL_2
+    db $11, $25, $3, ROCK_TUNNEL_2
+
+    db $1 ; signs
+    db $1d, $b, $8 ; RockTunnel1Text8
+
+    db $7 ; people
+    db SPRITE_HIKER, $5 + 4, $7 + 4, $ff, $d0, $41, HIKER + $C8, $c ; trainer
+    db SPRITE_HIKER, $10 + 4, $5 + 4, $ff, $d0, $42, HIKER + $C8, $d ; trainer
+    db SPRITE_HIKER, $f + 4, $11 + 4, $ff, $d2, $43, HIKER + $C8, $e ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $8 + 4, $17 + 4, $ff, $d2, $44, POKEMANIAC + $C8, $7 ; trainer
+    db SPRITE_LASS, $15 + 4, $25 + 4, $ff, $d2, $45, JR__TRAINER_F + $C8, $11 ; trainer
+    db SPRITE_LASS, $18 + 4, $16 + 4, $ff, $d0, $46, JR__TRAINER_F + $C8, $12 ; trainer
+    db SPRITE_LASS, $18 + 4, $20 + 4, $ff, $d3, $47, JR__TRAINER_F + $C8, $13 ; trainer
+
+    ; warp-to
+    EVENT_DISP $14, $3, $f
+    EVENT_DISP $14, $0, $f
+    EVENT_DISP $14, $21, $f
+    EVENT_DISP $14, $23, $f
+    EVENT_DISP $14, $3, $25 ; ROCK_TUNNEL_2
+    EVENT_DISP $14, $3, $5 ; ROCK_TUNNEL_2
+    EVENT_DISP $14, $b, $11 ; ROCK_TUNNEL_2
+    EVENT_DISP $14, $11, $25 ; ROCK_TUNNEL_2
+
+RockTunnel1Blocks: ; 360
+    INCBIN "maps/rocktunnel1.blk"
+
+SeafoamIslands1_h: ; 0x447dd to 0x447e9 (12 bytes) (bank=11) (id=192)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SeafoamIslands1Blocks, SeafoamIslands1Texts, SeafoamIslands1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SeafoamIslands1Object ; objects
+
+SeafoamIslands1Script: ; 0x447e9
+    call $3c3c
+    ld hl, $d7e7
+    set 0, [hl]
+    ld hl, $cd60
+    bit 7, [hl]
+    res 7, [hl]
+    jr z, .asm_4483b ; 0x447f8 $41
+    ld hl, $4846
+    call $34e4
+    ret nc
+    ld hl, $d7e8
+    ld a, [$cd3d]
+    cp $1
+    jr nz, .asm_44819 ; 0x44809 $e
+    set 6, [hl]
+    ld a, $d7
+    ld [$d079], a
+    ld a, $d9
+    ld [$d07a], a
+    jr .asm_44825 ; 0x44817 $c
+.asm_44819
+    set 7, [hl]
+    ld a, $d8
+    ld [$d079], a
+    ld a, $da
+    ld [$d07a], a
+.asm_44825
+    ld a, [$d079]
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld a, [$d07a]
+    ld [$cc4d], a
+    ld a, $15
+    jp $3e6d
+.asm_4483b
+    ld a, $9f
+    ld [$d71d], a
+    ld hl, $4846
+    jp $6981
+; 0x44846
+
+INCBIN "baserom.gbc",$44846,$5
+
+SeafoamIslands1Texts: ; 0x4484b
+    dw SeafoamIslands1Text1, SeafoamIslands1Text2
+
+SeafoamIslands1Object: ; 0x4484f (size=72)
+    db $7d ; border tile
+
+    db $7 ; warps
+    db $11, $4, $0, $ff
+    db $11, $5, $0, $ff
+    db $11, $1a, $1, $ff
+    db $11, $1b, $1, $ff
+    db $5, $7, $1, SEAFOAM_ISLANDS_2
+    db $3, $19, $6, SEAFOAM_ISLANDS_2
+    db $f, $17, $4, SEAFOAM_ISLANDS_2
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_BOULDER, $a + 4, $12 + 4, $ff, $10, $1 ; person
+    db SPRITE_BOULDER, $7 + 4, $1a + 4, $ff, $10, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $f, $11, $4
+    EVENT_DISP $f, $11, $5
+    EVENT_DISP $f, $11, $1a
+    EVENT_DISP $f, $11, $1b
+    EVENT_DISP $f, $5, $7 ; SEAFOAM_ISLANDS_2
+    EVENT_DISP $f, $3, $19 ; SEAFOAM_ISLANDS_2
+    EVENT_DISP $f, $f, $17 ; SEAFOAM_ISLANDS_2
+
+INCBIN "baserom.gbc",$44897,$8
+
+SeafoamIslands1Blocks: ; 135
+    INCBIN "maps/seafoamislands1.blk"
+
+SSAnne3_h: ; 0x44926 to 0x44932 (12 bytes) (bank=11) (id=97)
+    db $0d ; tileset
+    db $03, $0a ; dimensions (y, x)
+    dw SSAnne3Blocks, SSAnne3Texts, SSAnne3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne3Object ; objects
+
+SSAnne3Script: ; 0x44932
+    jp $3c3c
+; 0x44935
+
+SSAnne3Texts: ; 0x44935
+    dw SSAnne3Text1
+
+SSAnne3Text1: ; 0x44937
+    TX_FAR _SSAnne3Text1
+    db $50
+
+SSAnne3Object: ; 0x4493c (size=26)
+    db $c ; border tile
+
+    db $2 ; warps
+    db $3, $0, $0, SS_ANNE_5
+    db $3, $13, $7, SS_ANNE_2
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_SAILOR, $3 + 4, $9 + 4, $fe, $2, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $3, $0 ; SS_ANNE_5
+    EVENT_DISP $a, $3, $13 ; SS_ANNE_2
+
+SSAnne3Blocks: ; 30
+    INCBIN "maps/ssanne3.blk"
+
+VictoryRoad3_h: ; 0x44974 to 0x44980 (12 bytes) (bank=11) (id=198)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw VictoryRoad3Blocks, VictoryRoad3Texts, VictoryRoad3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VictoryRoad3Object ; objects
+
+VictoryRoad3Script: ; 0x44980
+    call $4996
+    call $3c3c
+    ld hl, $4a38
+    ld de, $49b1
+    ld a, [$d640]
+    call $3160
+    ld [$d640], a
+    ret
+; 0x44996
+
+INCBIN "baserom.gbc",$44996,$8e
+
+VictoryRoad3Texts: ; 0x44a24
+    dw VictoryRoad3Text1, VictoryRoad3Text2, VictoryRoad3Text3, VictoryRoad3Text4, VictoryRoad3Text5, VictoryRoad3Text6, VictoryRoad3Text7, VictoryRoad3Text8, VictoryRoad3Text9, VictoryRoad3Text10
+
+INCBIN "baserom.gbc",$44a38,$31
+
+VictoryRoad3Text1: ; 0x44a69
+    db $08 ; asm
+    ld hl, $4a38
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad3Text2: ; 0x44a73
+    db $08 ; asm
+    ld hl, $4a44
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad3Text3: ; 0x44a7d
+    db $08 ; asm
+    ld hl, $4a50
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad3Text4: ; 0x44a87
+    db $08 ; asm
+    ld hl, $4a5c
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$44a91,$3c
+
+VictoryRoad3Object: ; 0x44acd (size=106)
+    db $7d ; border tile
+
+    db $4 ; warps
+    db $7, $17, $3, VICTORY_ROAD_2
+    db $8, $1a, $5, VICTORY_ROAD_2
+    db $f, $1b, $4, VICTORY_ROAD_2
+    db $0, $2, $6, VICTORY_ROAD_2
+
+    db $0 ; signs
+
+    db $a ; people
+    db SPRITE_BLACK_HAIR_BOY_1, $5 + 4, $1c + 4, $ff, $d2, $41, COOLTRAINER_M + $C8, $2 ; trainer
+    db SPRITE_LASS, $d + 4, $7 + 4, $ff, $d3, $42, COOLTRAINER_F + $C8, $2 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $e + 4, $6 + 4, $ff, $d2, $43, COOLTRAINER_M + $C8, $3 ; trainer
+    db SPRITE_LASS, $3 + 4, $d + 4, $ff, $d3, $44, COOLTRAINER_F + $C8, $3 ; trainer
+	db SPRITE_BALL, $5 + 4, $1a + 4, $ff, $ff, $85, MAX_REVIVE ; item
+	db SPRITE_BALL, $7 + 4, $7 + 4, $ff, $ff, $86, TM_47 ; item
+    db SPRITE_BOULDER, $3 + 4, $16 + 4, $ff, $10, $7 ; person
+    db SPRITE_BOULDER, $c + 4, $d + 4, $ff, $10, $8 ; person
+    db SPRITE_BOULDER, $a + 4, $18 + 4, $ff, $10, $9 ; person
+    db SPRITE_BOULDER, $f + 4, $16 + 4, $ff, $10, $a ; person
+
+    ; warp-to
+    EVENT_DISP $f, $7, $17 ; VICTORY_ROAD_2
+    EVENT_DISP $f, $8, $1a ; VICTORY_ROAD_2
+    EVENT_DISP $f, $f, $1b ; VICTORY_ROAD_2
+    EVENT_DISP $f, $0, $2 ; VICTORY_ROAD_2
+
+VictoryRoad3Blocks: ; 135
+    INCBIN "maps/victoryroad3.blk"
+
+RocketHideout1_h: ; 0x44bbe to 0x44bca (12 bytes) (bank=11) (id=199)
+    db $16 ; tileset
+    db $0e, $0f ; dimensions (y, x)
+    dw RocketHideout1Blocks, RocketHideout1Texts, RocketHideout1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw RocketHideout1Object ; objects
+
+RocketHideout1Script: ; 0x44bca
+    call $4be0
+    call $3c3c
+    ld hl, $4c22
+    ld de, $4c0e
+    ld a, [$d631]
+    call $3160
+    ld [$d631], a
+    ret
+; 0x44be0
+
+INCBIN "baserom.gbc",$44be0,$34
+
+RocketHideout1Texts: ; 0x44c14
+    dw RocketHideout1Text1, RocketHideout1Text2, RocketHideout1Text3, RocketHideout1Text4, RocketHideout1Text5, RocketHideout1Text6, RocketHideout1Text7
+
+INCBIN "baserom.gbc",$44c22,$3d
+
+RocketHideout1Text1: ; 0x44c5f
+    db $08 ; asm
+    ld hl, $4c22
+    call LoadTrainerHeader
+    jp $24d7
+
+RocketHideout1Text2: ; 0x44c69
+    db $08 ; asm
+    ld hl, $4c2e
+    call LoadTrainerHeader
+    jp $24d7
+
+RocketHideout1Text3: ; 0x44c73
+    db $08 ; asm
+    ld hl, $4c3a
+    call LoadTrainerHeader
+    jp $24d7
+
+RocketHideout1Text4: ; 0x44c7d
+    db $08 ; asm
+    ld hl, $4c46
+    call LoadTrainerHeader
+    jp $24d7
+
+RocketHideout1Text5: ; 0x44c87
+    db $08 ; asm
+    ld hl, $4c52
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$44c91,$56
+
+RocketHideout1Object: ; 0x44ce7 (size=98)
+    db $2e ; border tile
+
+    db $5 ; warps
+    db $2, $17, $0, ROCKET_HIDEOUT_2
+    db $2, $15, $2, GAME_CORNER
+    db $13, $18, $0, ROCKET_HIDEOUT_ELEVATOR
+    db $18, $15, $3, ROCKET_HIDEOUT_2
+    db $13, $19, $1, ROCKET_HIDEOUT_ELEVATOR
+
+    db $0 ; signs
+
+    db $7 ; people
+    db SPRITE_ROCKET, $8 + 4, $1a + 4, $ff, $d2, $41, ROCKET + $C8, $8 ; trainer
+    db SPRITE_ROCKET, $6 + 4, $c + 4, $ff, $d3, $42, ROCKET + $C8, $9 ; trainer
+    db SPRITE_ROCKET, $11 + 4, $12 + 4, $ff, $d0, $43, ROCKET + $C8, $a ; trainer
+    db SPRITE_ROCKET, $19 + 4, $f + 4, $ff, $d3, $44, ROCKET + $C8, $b ; trainer
+    db SPRITE_ROCKET, $12 + 4, $1c + 4, $ff, $d2, $45, ROCKET + $C8, $c ; trainer
+	db SPRITE_BALL, $e + 4, $b + 4, $ff, $ff, $86, ESCAPE_ROPE ; item
+	db SPRITE_BALL, $11 + 4, $9 + 4, $ff, $ff, $87, HYPER_POTION ; item
+
+    ; warp-to
+    EVENT_DISP $f, $2, $17 ; ROCKET_HIDEOUT_2
+    EVENT_DISP $f, $2, $15 ; GAME_CORNER
+    EVENT_DISP $f, $13, $18 ; ROCKET_HIDEOUT_ELEVATOR
+    EVENT_DISP $f, $18, $15 ; ROCKET_HIDEOUT_2
+    EVENT_DISP $f, $13, $19 ; ROCKET_HIDEOUT_ELEVATOR
+
+RocketHideout1Blocks: ; 210
+    INCBIN "maps/rockethideout1.blk"
+
+RocketHideout2_h: ; 0x44e1b to 0x44e27 (12 bytes) (bank=11) (id=200)
+    db $16 ; tileset
+    db $0e, $0f ; dimensions (y, x)
+    dw RocketHideout2Blocks, RocketHideout2Texts, RocketHideout2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw RocketHideout2Object ; objects
+
+RocketHideout2Script: ; 0x44e27
+    call $3c3c
+    ld hl, $50d1
+    ld de, $4e3a
+    ld a, [$d632]
+    call $3160
+    ld [$d632], a
+    ret
+; 0x44e3a
+
+INCBIN "baserom.gbc",$44e3a,$28d
+
+RocketHideout2Texts: ; 0x450c7
+    dw RocketHideout2Text1, RocketHideout2Text2, RocketHideout2Text3, RocketHideout2Text4, RocketHideout2Text5
+
+INCBIN "baserom.gbc",$450d1,$d
+
+RocketHideout2Text1: ; 0x450de
+    db $08 ; asm
+    ld hl, $50d1
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$450e8,$f
+
+RocketHideout2Object: ; 0x450f7 (size=80)
+    db $2e ; border tile
+
+    db $5 ; warps
+    db $8, $1b, $0, ROCKET_HIDEOUT_1
+    db $8, $15, $0, ROCKET_HIDEOUT_3
+    db $13, $18, $0, ROCKET_HIDEOUT_ELEVATOR
+    db $16, $15, $3, ROCKET_HIDEOUT_1
+    db $13, $19, $1, ROCKET_HIDEOUT_ELEVATOR
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_ROCKET, $c + 4, $14 + 4, $ff, $d0, $41, ROCKET + $C8, $d ; trainer
+	db SPRITE_BALL, $b + 4, $1 + 4, $ff, $ff, $82, MOON_STONE ; item
+	db SPRITE_BALL, $8 + 4, $10 + 4, $ff, $ff, $83, NUGGET ; item
+	db SPRITE_BALL, $c + 4, $6 + 4, $ff, $ff, $84, TM_07 ; item
+	db SPRITE_BALL, $15 + 4, $3 + 4, $ff, $ff, $85, SUPER_POTION ; item
+
+    ; warp-to
+    EVENT_DISP $f, $8, $1b ; ROCKET_HIDEOUT_1
+    EVENT_DISP $f, $8, $15 ; ROCKET_HIDEOUT_3
+    EVENT_DISP $f, $13, $18 ; ROCKET_HIDEOUT_ELEVATOR
+    EVENT_DISP $f, $16, $15 ; ROCKET_HIDEOUT_1
+    EVENT_DISP $f, $13, $19 ; ROCKET_HIDEOUT_ELEVATOR
+
+RocketHideout2Blocks: ; 210
+    INCBIN "maps/rockethideout2.blk"
+
+RocketHideout3_h: ; 0x45219 to 0x45225 (12 bytes) (bank=11) (id=201)
+    db $16 ; tileset
+    db $0e, $0f ; dimensions (y, x)
+    dw RocketHideout3Blocks, RocketHideout3Texts, RocketHideout3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw RocketHideout3Object ; objects
+
+RocketHideout3Script: ; 0x45225
+    call $3c3c
+    ld hl, $5302
+    ld de, $5238
+    ld a, [$d633]
+    call $3160
+    ld [$d633], a
+    ret
+; 0x45238
+
+INCBIN "baserom.gbc",$45238,$c2
+
+RocketHideout3Texts: ; 0x452fa
+    dw RocketHideout3Text1, RocketHideout3Text2, RocketHideout3Text3, RocketHideout3Text4
+
+INCBIN "baserom.gbc",$45302,$19
+
+RocketHideout3Text1: ; 0x4531b
+    db $08 ; asm
+    ld hl, $5302
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$45325,$45334 - $45325
+
+RocketHideout3Text2: ; 0x45334
+    db $08 ; asm
+    ld hl, $530e
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$4533e,$f
+
+RocketHideout3Object: ; 0x4534d (size=50)
+    db $2e ; border tile
+
+    db $2 ; warps
+    db $6, $19, $1, ROCKET_HIDEOUT_2
+    db $12, $13, $0, ROCKET_HIDEOUT_4
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_ROCKET, $16 + 4, $a + 4, $ff, $d3, $41, ROCKET + $C8, $e ; trainer
+    db SPRITE_ROCKET, $c + 4, $1a + 4, $ff, $d1, $42, ROCKET + $C8, $f ; trainer
+	db SPRITE_BALL, $11 + 4, $1a + 4, $ff, $ff, $83, TM_10 ; item
+	db SPRITE_BALL, $e + 4, $14 + 4, $ff, $ff, $84, RARE_CANDY ; item
+
+    ; warp-to
+    EVENT_DISP $f, $6, $19 ; ROCKET_HIDEOUT_2
+    EVENT_DISP $f, $12, $13 ; ROCKET_HIDEOUT_4
+
+RocketHideout3Blocks: ; 210
+    INCBIN "maps/rockethideout3.blk"
+
+RocketHideout4_h: ; 0x45451 to 0x4545d (12 bytes) (bank=11) (id=202)
+    db $16 ; tileset
+    db $0c, $0f ; dimensions (y, x)
+    dw RocketHideout4Blocks, RocketHideout4Texts, RocketHideout4Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw RocketHideout4Object ; objects
+
+RocketHideout4Script: ; 0x4545d
+    call $5473
+    call $3c3c
+    ld hl, $5515
+    ld de, $54ae
+    ld a, [$d634]
+    call $3160
+    ld [$d634], a
+    ret
+; 0x45473
+
+INCBIN "baserom.gbc",$45473,$8e
+
+RocketHideout4Texts: ; 0x45501
+    dw RocketHideout4Text1, RocketHideout4Text2, RocketHideout4Text3, RocketHideout4Text4, RocketHideout4Text5, RocketHideout4Text6, RocketHideout4Text7, RocketHideout4Text8, RocketHideout4Text9, RocketHideout4Text10
+
+INCBIN "baserom.gbc",$45515,$25
+
+RocketHideout4Text1: ; 0x4553a
+    db $08 ; asm
+    ld a, [$d81b]
+    bit 7, a
+    jp nz, $5571
+    ld hl, $557a
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $557f
+    ld de, $557f
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    xor a
+    ldh [$b4], a
+    ld a, $3
+    ld [$d634], a
+    ld [$da39], a
+    jr .asm_209f0 ; 0x4556f
+    ld hl, $5584
+    call PrintText
+.asm_209f0 ; 0x45577
+    jp $24d7
+
+INCBIN "baserom.gbc",$4557a,$45584 - $4557a
+
+RocketHideout4Text10: ; 0x45584
+INCBIN "baserom.gbc",$45584,5
+
+RocketHideout4Text2: ; 0x45589
+    db $08 ; asm
+    ld hl, $5515
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$45593,$455a2 - $45593
+
+RocketHideout4Text3: ; 0x455a2
+    db $08 ; asm
+    ld hl, $5521
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$455ac,$455bb - $455ac
+
+RocketHideout4Text4: ; 0x455bb
+    db $08 ; asm
+    ld hl, $552d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$455c5,$2c
+
+RocketHideout4Object: ; 0x455f1 (size=95)
+    db $2e ; border tile
+
+    db $3 ; warps
+    db $a, $13, $1, ROCKET_HIDEOUT_3
+    db $f, $18, $0, ROCKET_HIDEOUT_ELEVATOR
+    db $f, $19, $1, ROCKET_HIDEOUT_ELEVATOR
+
+    db $0 ; signs
+
+    db $9 ; people
+    db SPRITE_GIOVANNI, $3 + 4, $19 + 4, $ff, $d0, $41, GIOVANNI + $C8, $1 ; trainer
+    db SPRITE_ROCKET, $c + 4, $17 + 4, $ff, $d0, $42, ROCKET + $C8, $10 ; trainer
+    db SPRITE_ROCKET, $c + 4, $1a + 4, $ff, $d0, $43, ROCKET + $C8, $11 ; trainer
+    db SPRITE_ROCKET, $2 + 4, $b + 4, $ff, $d0, $44, ROCKET + $C8, $12 ; trainer
+	db SPRITE_BALL, $c + 4, $a + 4, $ff, $ff, $85, HP_UP ; item
+	db SPRITE_BALL, $4 + 4, $9 + 4, $ff, $ff, $86, TM_02 ; item
+	db SPRITE_BALL, $14 + 4, $c + 4, $ff, $ff, $87, IRON ; item
+	db SPRITE_BALL, $2 + 4, $19 + 4, $ff, $ff, $88, SILPH_SCOPE ; item
+	db SPRITE_BALL, $2 + 4, $a + 4, $ff, $ff, $89, LIFT_KEY ; item
+
+    ; warp-to
+    EVENT_DISP $f, $a, $13 ; ROCKET_HIDEOUT_3
+    EVENT_DISP $f, $f, $18 ; ROCKET_HIDEOUT_ELEVATOR
+    EVENT_DISP $f, $f, $19 ; ROCKET_HIDEOUT_ELEVATOR
+
+RocketHideout4Blocks: ; 180
+    INCBIN "maps/rockethideout4.blk"
+
+RocketHideoutElevator_h: ; 0x45704 to 0x45710 (12 bytes) (bank=11) (id=203)
+    db $12 ; tileset
+    db $04, $03 ; dimensions (y, x)
+    dw RocketHideoutElevatorBlocks, RocketHideoutElevatorTexts, RocketHideoutElevatorScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw RocketHideoutElevatorObject ; objects
+
+RocketHideoutElevatorScript: ; 0x45710
+    ld hl, $d126
+    bit 5, [hl]
+    res 5, [hl]
+    push hl
+    call nz, $572c
+    pop hl
+    bit 7, [hl]
+    res 7, [hl]
+    call nz, $575f
+    xor a
+    ld [$cf0c], a
+    inc a
+    ld [$cc3c], a
+    ret
+; 0x4572c
+
+INCBIN "baserom.gbc",$4572c,$3f
+
+RocketHideoutElevatorTexts: ; 0x4576b
+    dw RocketHideoutElevatorText1
+
+RocketHideoutElevatorText1: ; 0x4576d
+    db $08 ; asm
+    ld b,LIFT_KEY
+    call $3493
+    jr z, .asm_8d8f0 ; 0x45773
+    call $5741
+    ld hl, $5759
+    ld a, $61
+    call Predef
+    jr .asm_46c43 ; 0x45780
+.asm_8d8f0 ; 0x45782
+    ld hl, $578b
+    call PrintText
+.asm_46c43 ; 0x45788
+    jp $24d7
+
+INCBIN "baserom.gbc",$4578b,$6
+
+RocketHideoutElevatorObject: ; 0x45791 (size=23)
+    db $f ; border tile
+
+    db $2 ; warps
+    db $1, $2, $2, ROCKET_HIDEOUT_1
+    db $1, $3, $4, ROCKET_HIDEOUT_1
+
+    db $1 ; signs
+    db $1, $1, $1 ; RocketHideoutElevatorText1
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $3, $1, $2 ; ROCKET_HIDEOUT_1
+    EVENT_DISP $3, $1, $3 ; ROCKET_HIDEOUT_1
+
+RocketHideoutElevatorBlocks: ; 12
+    INCBIN "maps/rockethideoutelevator.blk"
+
+SilphCoElevator_h: ; 0x457b4 to 0x457c0 (12 bytes) (bank=11) (id=236)
+    db $12 ; tileset
+    db $02, $02 ; dimensions (y, x)
+    dw SilphCoElevatorBlocks, SilphCoElevatorTexts, SilphCoElevatorScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCoElevatorObject ; objects
+
+SilphCoElevatorScript: ; 0x457c0
+    ld hl, $d126
+    bit 5, [hl]
+    res 5, [hl]
+    push hl
+    call nz, $57dc
+    pop hl
+    bit 7, [hl]
+    res 7, [hl]
+    call nz, $5827
+    xor a
+    ld [$cf0c], a
+    inc a
+    ld [$cc3c], a
+    ret
+; 0x457dc
+
+INCBIN "baserom.gbc",$457dc,$57
+
+SilphCoElevatorTexts: ; 0x45833
+    dw SilphCoElevatorText1
+
+SilphCoElevatorText1: ; 0x45835
+    db $08 ; asm
+    call $57f1
+    ld hl, $5811
+    ld a, $61
+    call Predef
+    jp $24d7
+
+SilphCoElevatorObject: ; 0x45844 (size=23)
+    db $f ; border tile
+
+    db $2 ; warps
+    db $3, $1, $0, $ed
+    db $3, $2, $0, $ed
+
+    db $1 ; signs
+    db $0, $3, $1 ; SilphCoElevatorText1
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $2, $3, $1
+    EVENT_DISP $2, $3, $2
+
+SilphCoElevatorBlocks: ; 4
+    INCBIN "maps/silphcoelevator.blk"
+
+SafariZoneEast_h: ; 0x4585f to 0x4586b (12 bytes) (bank=11) (id=217)
+    db $03 ; tileset
+    db $0d, $0f ; dimensions (y, x)
+    dw SafariZoneEastBlocks, SafariZoneEastTexts, SafariZoneEastScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneEastObject ; objects
+
+SafariZoneEastScript: ; 0x4586b
+    jp $3c3c
+; 0x4586e
+
+SafariZoneEastTexts: ; 0x4586e
+    dw SafariZoneEastText1, SafariZoneEastText2, SafariZoneEastText3, SafariZoneEastText4, SafariZoneEastText5, SafariZoneEastText6, SafariZoneEastText7
+
+SafariZoneEastText5: ; 0x4587c
+    TX_FAR _SafariZoneEastText5
+    db $50
+
+SafariZoneEastText6: ; 0x45881
+    TX_FAR _SafariZoneEastText6
+    db $50
+
+SafariZoneEastText7: ; 0x45886
+    TX_FAR _SafariZoneEastText7
+    db $50
+
+SafariZoneEastObject: ; 0x4588b (size=81)
+    db $0 ; border tile
+
+    db $5 ; warps
+    db $4, $0, $6, SAFARI_ZONE_NORTH
+    db $5, $0, $7, SAFARI_ZONE_NORTH
+    db $16, $0, $6, SAFARI_ZONE_CENTER
+    db $17, $0, $6, SAFARI_ZONE_CENTER
+    db $9, $19, $0, SAFARI_ZONE_REST_HOUSE_3
+
+    db $3 ; signs
+    db $a, $1a, $5 ; SafariZoneEastText5
+    db $4, $6, $6 ; SafariZoneEastText6
+    db $17, $5, $7 ; SafariZoneEastText7
+
+    db $4 ; people
+	db SPRITE_BALL, $a + 4, $15 + 4, $ff, $ff, $81, FULL_RESTORE ; item
+	db SPRITE_BALL, $7 + 4, $3 + 4, $ff, $ff, $82, MAX_POTION ; item
+	db SPRITE_BALL, $d + 4, $14 + 4, $ff, $ff, $83, CARBOS ; item
+	db SPRITE_BALL, $c + 4, $f + 4, $ff, $ff, $84, TM_37 ; item
+
+    ; warp-to
+    EVENT_DISP $f, $4, $0 ; SAFARI_ZONE_NORTH
+    EVENT_DISP $f, $5, $0 ; SAFARI_ZONE_NORTH
+    EVENT_DISP $f, $16, $0 ; SAFARI_ZONE_CENTER
+    EVENT_DISP $f, $17, $0 ; SAFARI_ZONE_CENTER
+    EVENT_DISP $f, $9, $19 ; SAFARI_ZONE_REST_HOUSE_3
+
+SafariZoneEastBlocks: ; 195
+    INCBIN "maps/safarizoneeast.blk"
+
+SafariZoneNorth_h: ; 0x4599f to 0x459ab (12 bytes) (bank=11) (id=218)
+    db $03 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw SafariZoneNorthBlocks, SafariZoneNorthTexts, SafariZoneNorthScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneNorthObject ; objects
+
+SafariZoneNorthScript: ; 0x459ab
+    jp $3c3c
+; 0x459ae
+
+SafariZoneNorthTexts: ; 0x459ae
+    dw SafariZoneNorthText1, SafariZoneNorthText2, SafariZoneNorthText3, SafariZoneNorthText4, SafariZoneNorthText5, SafariZoneNorthText6, SafariZoneNorthText7
+
+SafariZoneNorthText3: ; 0x459bc
+    TX_FAR _SafariZoneNorthText3
+    db $50
+
+SafariZoneNorthText4: ; 0x459c1
+    TX_FAR _SafariZoneNorthText4
+    db $50
+
+SafariZoneNorthText5: ; 0x459c6
+    TX_FAR _SafariZoneNorthText5
+    db $50
+
+SafariZoneNorthText6: ; 0x459cb
+    TX_FAR _SafariZoneNorthText6
+    db $50
+
+SafariZoneNorthText7: ; 0x459d0
+    TX_FAR _SafariZoneNorthText7
+    db $50
+
+SafariZoneNorthObject: ; 0x459d5 (size=105)
+    db $0 ; border tile
+
+    db $9 ; warps
+    db $23, $2, $0, SAFARI_ZONE_WEST
+    db $23, $3, $1, SAFARI_ZONE_WEST
+    db $23, $8, $2, SAFARI_ZONE_WEST
+    db $23, $9, $3, SAFARI_ZONE_WEST
+    db $23, $14, $4, SAFARI_ZONE_CENTER
+    db $23, $15, $5, SAFARI_ZONE_CENTER
+    db $1e, $27, $0, SAFARI_ZONE_EAST
+    db $1f, $27, $1, SAFARI_ZONE_EAST
+    db $3, $23, $0, SAFARI_ZONE_REST_HOUSE_4
+
+    db $5 ; signs
+    db $4, $24, $3 ; SafariZoneNorthText3
+    db $19, $4, $4 ; SafariZoneNorthText4
+    db $1f, $d, $5 ; SafariZoneNorthText5
+    db $21, $13, $6 ; SafariZoneNorthText6
+    db $1c, $1a, $7 ; SafariZoneNorthText7
+
+    db $2 ; people
+	db SPRITE_BALL, $1 + 4, $19 + 4, $ff, $ff, $81, PROTEIN ; item
+	db SPRITE_BALL, $7 + 4, $13 + 4, $ff, $ff, $82, TM_40 ; item
+
+    ; warp-to
+    EVENT_DISP $14, $23, $2 ; SAFARI_ZONE_WEST
+    EVENT_DISP $14, $23, $3 ; SAFARI_ZONE_WEST
+    EVENT_DISP $14, $23, $8 ; SAFARI_ZONE_WEST
+    EVENT_DISP $14, $23, $9 ; SAFARI_ZONE_WEST
+    EVENT_DISP $14, $23, $14 ; SAFARI_ZONE_CENTER
+    EVENT_DISP $14, $23, $15 ; SAFARI_ZONE_CENTER
+    EVENT_DISP $14, $1e, $27 ; SAFARI_ZONE_EAST
+    EVENT_DISP $14, $1f, $27 ; SAFARI_ZONE_EAST
+    EVENT_DISP $14, $3, $23 ; SAFARI_ZONE_REST_HOUSE_4
+
+SafariZoneNorthBlocks: ; 360
+    INCBIN "maps/safarizonenorth.blk"
+
+SafariZoneCenter_h: ; 0x45ba6 to 0x45bb2 (12 bytes) (bank=11) (id=220)
+    db $03 ; tileset
+    db $0d, $0f ; dimensions (y, x)
+    dw SafariZoneCenterBlocks, SafariZoneCenterTexts, SafariZoneCenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneCenterObject ; objects
+
+SafariZoneCenterScript: ; 0x45bb2
+    jp $3c3c
+; 0x45bb5
+
+SafariZoneCenterTexts: ; 0x45bb5
+    dw SafariZoneCenterText1, SafariZoneCenterText2, SafariZoneCenterText3
+
+SafariZoneCenterText2: ; 0x45bbb
+    TX_FAR _SafariZoneCenterText2
+    db $50
+
+SafariZoneCenterText3: ; 0x45bc0
+    TX_FAR _SafariZoneCenterText3
+    db $50
+
+SafariZoneCenterObject: ; 0x45bc5 (size=89)
+    db $0 ; border tile
+
+    db $9 ; warps
+    db $19, $e, $2, SAFARIZONEENTRANCE
+    db $19, $f, $3, SAFARIZONEENTRANCE
+    db $a, $0, $4, SAFARI_ZONE_WEST
+    db $b, $0, $5, SAFARI_ZONE_WEST
+    db $0, $e, $4, SAFARI_ZONE_NORTH
+    db $0, $f, $5, SAFARI_ZONE_NORTH
+    db $a, $1d, $2, SAFARI_ZONE_EAST
+    db $b, $1d, $3, SAFARI_ZONE_EAST
+    db $13, $11, $0, SAFARI_ZONE_REST_HOUSE_1
+
+    db $2 ; signs
+    db $14, $12, $2 ; SafariZoneCenterText2
+    db $16, $e, $3 ; SafariZoneCenterText3
+
+    db $1 ; people
+	db SPRITE_BALL, $a + 4, $e + 4, $ff, $ff, $81, NUGGET ; item
+
+    ; warp-to
+    EVENT_DISP $f, $19, $e ; SAFARIZONEENTRANCE
+    EVENT_DISP $f, $19, $f ; SAFARIZONEENTRANCE
+    EVENT_DISP $f, $a, $0 ; SAFARI_ZONE_WEST
+    EVENT_DISP $f, $b, $0 ; SAFARI_ZONE_WEST
+    EVENT_DISP $f, $0, $e ; SAFARI_ZONE_NORTH
+    EVENT_DISP $f, $0, $f ; SAFARI_ZONE_NORTH
+    EVENT_DISP $f, $a, $1d ; SAFARI_ZONE_EAST
+    EVENT_DISP $f, $b, $1d ; SAFARI_ZONE_EAST
+    EVENT_DISP $f, $13, $11 ; SAFARI_ZONE_REST_HOUSE_1
+
+SafariZoneCenterBlocks: ; 195
+    INCBIN "maps/safarizonecenter.blk"
+
+SafariZoneRestHouse1_h: ; 0x45ce1 to 0x45ced (12 bytes) (bank=11) (id=221)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw SafariZoneRestHouse1Blocks, SafariZoneRestHouse1Texts, SafariZoneRestHouse1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneRestHouse1Object ; objects
+
+SafariZoneRestHouse1Script: ; 0x45ced
+    jp $3c3c
+; 0x45cf0
+
+SafariZoneRestHouse1Texts: ; 0x45cf0
+    dw SafariZoneRestHouse1Text1, SafariZoneRestHouse1Text2
+
+SafariZoneRestHouse1Text1: ; 0x45cf4
+    TX_FAR _SafariZoneRestHouse1Text1
+    db $50
+
+SafariZoneRestHouse1Text2: ; 0x45cf9
+    TX_FAR _SafariZoneRestHouse1Text2
+    db $50
+
+SafariZoneRestHouse1Object: ; 0x45cfe (size=32)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $8, SAFARI_ZONE_CENTER
+    db $7, $3, $8, SAFARI_ZONE_CENTER
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_GIRL, $2 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_OAK_AIDE, $4 + 4, $1 + 4, $fe, $1, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; SAFARI_ZONE_CENTER
+    EVENT_DISP $4, $7, $3 ; SAFARI_ZONE_CENTER
+
+SafariZoneRestHouse2_h: ; 0x45d1e to 0x45d2a (12 bytes) (bank=11) (id=223)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $40fb, SafariZoneRestHouse2Texts, SafariZoneRestHouse2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneRestHouse2Object ; objects
+
+SafariZoneRestHouse2Script: ; 0x45d2a
+    call $3c3c
+    ret
+; 0x45d2e
+
+SafariZoneRestHouse2Texts: ; 0x45d2e
+    dw SafariZoneRestHouse2Text1, SafariZoneRestHouse2Text2, SafariZoneRestHouse2Text3
+
+SafariZoneRestHouse2Text1: ; 0x45d34
+    TX_FAR _SafariZoneRestHouse2Text1
+    db $50
+
+SafariZoneRestHouse2Text2: ; 0x45d39
+    TX_FAR _SafariZoneRestHouse2Text2
+    db $50
+
+SafariZoneRestHouse2Text3: ; 0x45d3e
+    TX_FAR _SafariZoneRestHouse2Text3
+    db $50
+
+SafariZoneRestHouse2Object: ; 0x45d43 (size=38)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $7, SAFARI_ZONE_WEST
+    db $7, $3, $7, SAFARI_ZONE_WEST
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_OAK_AIDE, $4 + 4, $4 + 4, $fe, $0, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $2 + 4, $0 + 4, $ff, $d3, $2 ; person
+    db SPRITE_ERIKA, $2 + 4, $6 + 4, $ff, $d0, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; SAFARI_ZONE_WEST
+    EVENT_DISP $4, $7, $3 ; SAFARI_ZONE_WEST
+
+SafariZoneRestHouse3_h: ; 0x45d69 to 0x45d75 (12 bytes) (bank=11) (id=224)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $40fb, SafariZoneRestHouse3Texts, SafariZoneRestHouse3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneRestHouse3Object ; objects
+
+SafariZoneRestHouse3Script: ; 0x45d75
+    call $3c3c
+    ret
+; 0x45d79
+
+SafariZoneRestHouse3Texts: ; 0x45d79
+    dw SafariZoneRestHouse3Text1, SafariZoneRestHouse3Text2, SafariZoneRestHouse3Text3
+
+SafariZoneRestHouse3Text1: ; 0x45d7f
+    TX_FAR _SafariZoneRestHouse3Text1
+    db $50
+
+SafariZoneRestHouse3Text2: ; 0x45d84
+    TX_FAR _SafariZoneRestHouse3Text2
+    db $50
+
+SafariZoneRestHouse3Text3: ; 0x45d89
+    TX_FAR _SafariZoneRestHouse3Text3
+    db $50
+
+SafariZoneRestHouse3Object: ; 0x45d8e (size=38)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $4, SAFARI_ZONE_EAST
+    db $7, $3, $4, SAFARI_ZONE_EAST
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_OAK_AIDE, $3 + 4, $1 + 4, $fe, $1, $1 ; person
+    db SPRITE_ROCKER, $2 + 4, $4 + 4, $ff, $ff, $2 ; person
+    db SPRITE_LAPRAS_GIVER, $2 + 4, $5 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; SAFARI_ZONE_EAST
+    EVENT_DISP $4, $7, $3 ; SAFARI_ZONE_EAST
+
+SafariZoneRestHouse4_h: ; 0x45db4 to 0x45dc0 (12 bytes) (bank=11) (id=225)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $40fb, SafariZoneRestHouse4Texts, SafariZoneRestHouse4Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneRestHouse4Object ; objects
+
+SafariZoneRestHouse4Script: ; 0x45dc0
+    call $3c3c
+    ret
+; 0x45dc4
+
+SafariZoneRestHouse4Texts: ; 0x45dc4
+    dw SafariZoneRestHouse4Text1, SafariZoneRestHouse4Text2, SafariZoneRestHouse4Text3
+
+SafariZoneRestHouse4Text1: ; 0x45dca
+    TX_FAR _SafariZoneRestHouse4Text1
+    db $50
+
+SafariZoneRestHouse4Text2: ; 0x45dcf
+    TX_FAR _SafariZoneRestHouse4Text2
+    db $50
+
+SafariZoneRestHouse4Text3: ; 0x45dd4
+    TX_FAR _SafariZoneRestHouse4Text3
+    db $50
+
+SafariZoneRestHouse4Object: ; 0x45dd9 (size=38)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $8, SAFARI_ZONE_NORTH
+    db $7, $3, $8, SAFARI_ZONE_NORTH
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_OAK_AIDE, $3 + 4, $6 + 4, $fe, $2, $1 ; person
+    db SPRITE_WHITE_PLAYER, $4 + 4, $3 + 4, $ff, $ff, $2 ; person
+    db SPRITE_GENTLEMAN, $5 + 4, $1 + 4, $fe, $1, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; SAFARI_ZONE_NORTH
+    EVENT_DISP $4, $7, $3 ; SAFARI_ZONE_NORTH
+
+UnknownDungeon2_h: ; 0x45dff to 0x45e0b (12 bytes) (bank=11) (id=226)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw UnknownDungeon2Blocks, UnknownDungeon2Texts, UnknownDungeon2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UnknownDungeon2Object ; objects
+
+UnknownDungeon2Script: ; 0x45e0b
+    jp $3c3c
+; 0x45e0e
+
+UnknownDungeon2Texts: ; 0x45e0e
+    dw UnknownDungeon2Text1, UnknownDungeon2Text2, UnknownDungeon2Text3
+
+UnknownDungeon2Object: ; 0x45e14 (size=73)
+    db $7d ; border tile
+
+    db $6 ; warps
+    db $1, $1d, $2, UNKNOWN_DUNGEON_1
+    db $6, $16, $3, UNKNOWN_DUNGEON_1
+    db $7, $13, $4, UNKNOWN_DUNGEON_1
+    db $1, $9, $5, UNKNOWN_DUNGEON_1
+    db $3, $1, $6, UNKNOWN_DUNGEON_1
+    db $b, $3, $7, UNKNOWN_DUNGEON_1
+
+    db $0 ; signs
+
+    db $3 ; people
+	db SPRITE_BALL, $9 + 4, $1d + 4, $ff, $ff, $81, PP_UP ; item
+	db SPRITE_BALL, $f + 4, $4 + 4, $ff, $ff, $82, ULTRA_BALL ; item
+	db SPRITE_BALL, $6 + 4, $d + 4, $ff, $ff, $83, FULL_RESTORE ; item
+
+    ; warp-to
+    EVENT_DISP $f, $1, $1d ; UNKNOWN_DUNGEON_1
+    EVENT_DISP $f, $6, $16 ; UNKNOWN_DUNGEON_1
+    EVENT_DISP $f, $7, $13 ; UNKNOWN_DUNGEON_1
+    EVENT_DISP $f, $1, $9 ; UNKNOWN_DUNGEON_1
+    EVENT_DISP $f, $3, $1 ; UNKNOWN_DUNGEON_1
+    EVENT_DISP $f, $b, $3 ; UNKNOWN_DUNGEON_1
+
+UnknownDungeon2Blocks: ; 135
+    INCBIN "maps/unknowndungeon2.blk"
+
+UnknownDungeon3_h: ; 0x45ee4 to 0x45ef0 (12 bytes) (bank=11) (id=227)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw UnknownDungeon3Blocks, UnknownDungeon3Texts, UnknownDungeon3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UnknownDungeon3Object ; objects
+
+UnknownDungeon3Script: ; 0x45ef0
+    call $3c3c
+    ld hl, $5f0f
+    ld de, $5f03
+    ld a, [$d650]
+    call $3160
+    ld [$d650], a
+    ret
+; 0x45f03
+
+INCBIN "baserom.gbc",$45f03,$6
+
+UnknownDungeon3Texts: ; 0x45f09
+    dw UnknownDungeon3Text1, UnknownDungeon3Text2, UnknownDungeon3Text3
+
+INCBIN "baserom.gbc",$45f0f,$d
+
+UnknownDungeon3Text1: ; 0x45f1c
+    db $08 ; asm
+    ld hl, $5f0f
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$45f26,$10
+
+UnknownDungeon3Object: ; 0x45f36 (size=34)
+    db $7d ; border tile
+
+    db $1 ; warps
+    db $6, $3, $8, UNKNOWN_DUNGEON_1
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_SLOWBRO, $d + 4, $1b + 4, $ff, $d0, $41, MEWTWO, $46 ; trainer
+	db SPRITE_BALL, $9 + 4, $10 + 4, $ff, $ff, $82, ULTRA_BALL ; item
+	db SPRITE_BALL, $1 + 4, $12 + 4, $ff, $ff, $83, MAX_REVIVE ; item
+
+    ; warp-to
+    EVENT_DISP $f, $6, $3 ; UNKNOWN_DUNGEON_1
+
+UnknownDungeon3Blocks: ; 135
+    INCBIN "maps/unknowndungeon3.blk"
+
+RockTunnel2_h: ; 0x45fdf to 0x45feb (12 bytes) (bank=11) (id=232)
+    db $11 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw RockTunnel2Blocks, RockTunnel2Texts, RockTunnel2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw RockTunnel2Object ; objects
+
+RockTunnel2Script: ; 0x45feb
+    call $3c3c
+    ld hl, $6014
+    ld de, $5ffe
+    ld a, [$d620]
+    call $3160
+    ld [$d620], a
+    ret
+; 0x45ffe
+
+INCBIN "baserom.gbc",$45ffe,$6
+
+RockTunnel2Texts: ; 0x46004
+    dw RockTunnel2Text1, RockTunnel2Text2, RockTunnel2Text3, RockTunnel2Text4, RockTunnel2Text5, RockTunnel2Text6, RockTunnel2Text7, RockTunnel2Text8
+
+INCBIN "baserom.gbc",$46014,$61
+
+RockTunnel2Text1: ; 0x46075
+    db $08 ; asm
+    ld hl, $6014
+    call LoadTrainerHeader
+    jp $24d7
+
+RockTunnel2Text2: ; 0x4607f
+    db $08 ; asm
+    ld hl, $6020
+    call LoadTrainerHeader
+    jp $24d7
+
+RockTunnel2Text3: ; 0x46089
+    db $08 ; asm
+    ld hl, $602c
+    call LoadTrainerHeader
+    jp $24d7
+
+RockTunnel2Text4: ; 0x46093
+    db $08 ; asm
+    ld hl, $6038
+    call LoadTrainerHeader
+    jp $24d7
+
+RockTunnel2Text5: ; 0x4609d
+    db $08 ; asm
+    ld hl, $6044
+    call LoadTrainerHeader
+    jp $24d7
+
+RockTunnel2Text6: ; 0x460a7
+    db $08 ; asm
+    ld hl, $6050
+    call LoadTrainerHeader
+    jp $24d7
+
+RockTunnel2Text7: ; 0x460b1
+    db $08 ; asm
+    ld hl, $605c
+    call LoadTrainerHeader
+    jp $24d7
+
+RockTunnel2Text8: ; 0x460bb
+    db $08 ; asm
+    ld hl, $6068
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$460c5,$78
+
+RockTunnel2Object: ; 0x4613d (size=100)
+    db $3 ; border tile
+
+    db $4 ; warps
+    db $19, $21, $4, ROCK_TUNNEL_1
+    db $3, $1b, $5, ROCK_TUNNEL_1
+    db $b, $17, $6, ROCK_TUNNEL_1
+    db $3, $3, $7, ROCK_TUNNEL_1
+
+    db $0 ; signs
+
+    db $8 ; people
+    db SPRITE_LASS, $d + 4, $b + 4, $ff, $d0, $41, JR__TRAINER_F + $C8, $9 ; trainer
+    db SPRITE_HIKER, $a + 4, $6 + 4, $ff, $d0, $42, HIKER + $C8, $9 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $5 + 4, $3 + 4, $ff, $d0, $43, POKEMANIAC + $C8, $3 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $15 + 4, $14 + 4, $ff, $d3, $44, POKEMANIAC + $C8, $4 ; trainer
+    db SPRITE_HIKER, $a + 4, $1e + 4, $ff, $d0, $45, HIKER + $C8, $a ; trainer
+    db SPRITE_LASS, $1c + 4, $e + 4, $ff, $d3, $46, JR__TRAINER_F + $C8, $a ; trainer
+    db SPRITE_HIKER, $5 + 4, $21 + 4, $ff, $d3, $47, HIKER + $C8, $b ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $1e + 4, $1a + 4, $ff, $d0, $48, POKEMANIAC + $C8, $5 ; trainer
+
+    ; warp-to
+    EVENT_DISP $14, $19, $21 ; ROCK_TUNNEL_1
+    EVENT_DISP $14, $3, $1b ; ROCK_TUNNEL_1
+    EVENT_DISP $14, $b, $17 ; ROCK_TUNNEL_1
+    EVENT_DISP $14, $3, $3 ; ROCK_TUNNEL_1
+
+RockTunnel2Blocks: ; 360
+    INCBIN "maps/rocktunnel2.blk"
+
+SeafoamIslands2_h: ; 0x46309 to 0x46315 (12 bytes) (bank=11) (id=159)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SeafoamIslands2Blocks, SeafoamIslands2Texts, SeafoamIslands2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SeafoamIslands2Object ; objects
+
+SeafoamIslands2Script: ; 0x46315
+    call $3c3c
+    ld hl, $cd60
+    bit 7, [hl]
+    res 7, [hl]
+    jr z, .asm_46362 ; 0x4631f $41
+    ld hl, $636d
+    call $34e4
+    ret nc
+    ld hl, $d87f
+    ld a, [$cd3d]
+    cp $1
+    jr nz, .asm_46340 ; 0x46330 $e
+    set 0, [hl]
+    ld a, $d9
+    ld [$d079], a
+    ld a, $db
+    ld [$d07a], a
+    jr .asm_4634c ; 0x4633e $c
+.asm_46340
+    set 1, [hl]
+    ld a, $da
+    ld [$d079], a
+    ld a, $dc
+    ld [$d07a], a
+.asm_4634c
+    ld a, [$d079]
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld a, [$d07a]
+    ld [$cc4d], a
+    ld a, $15
+    jp $3e6d
+.asm_46362
+    ld a, $a0
+    ld [$d71d], a
+    ld hl, $636d
+    jp $6981
+; 0x4636d
+
+INCBIN "baserom.gbc",$4636d,$5
+
+SeafoamIslands2Texts: ; 0x46372
+    dw SeafoamIslands2Text1, SeafoamIslands2Text2
+
+SeafoamIslands2Object: ; 0x46376 (size=72)
+    db $7d ; border tile
+
+    db $7 ; warps
+    db $2, $4, $0, SEAFOAM_ISLANDS_3
+    db $5, $7, $4, SEAFOAM_ISLANDS_1
+    db $7, $d, $2, SEAFOAM_ISLANDS_3
+    db $f, $13, $3, SEAFOAM_ISLANDS_3
+    db $f, $17, $6, SEAFOAM_ISLANDS_1
+    db $b, $19, $5, SEAFOAM_ISLANDS_3
+    db $3, $19, $5, SEAFOAM_ISLANDS_1
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_BOULDER, $6 + 4, $11 + 4, $ff, $10, $1 ; person
+    db SPRITE_BOULDER, $6 + 4, $16 + 4, $ff, $10, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $f, $2, $4 ; SEAFOAM_ISLANDS_3
+    EVENT_DISP $f, $5, $7 ; SEAFOAM_ISLANDS_1
+    EVENT_DISP $f, $7, $d ; SEAFOAM_ISLANDS_3
+    EVENT_DISP $f, $f, $13 ; SEAFOAM_ISLANDS_3
+    EVENT_DISP $f, $f, $17 ; SEAFOAM_ISLANDS_1
+    EVENT_DISP $f, $b, $19 ; SEAFOAM_ISLANDS_3
+    EVENT_DISP $f, $3, $19 ; SEAFOAM_ISLANDS_1
+
+SeafoamIslands2Blocks: ; 135
+    INCBIN "maps/seafoamislands2.blk"
+
+SeafoamIslands3_h: ; 0x46445 to 0x46451 (12 bytes) (bank=11) (id=160)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SeafoamIslands3Blocks, SeafoamIslands3Texts, SeafoamIslands3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SeafoamIslands3Object ; objects
+
+SeafoamIslands3Script: ; 0x46451
+    call $3c3c
+    ld hl, $cd60
+    bit 7, [hl]
+    res 7, [hl]
+    jr z, .asm_4649e ; 0x4645b $41
+    ld hl, $64a9
+    call $34e4
+    ret nc
+    ld hl, $d880
+    ld a, [$cd3d]
+    cp $1
+    jr nz, .asm_4647c ; 0x4646c $e
+    set 0, [hl]
+    ld a, $db
+    ld [$d079], a
+    ld a, $df
+    ld [$d07a], a
+    jr .asm_46488 ; 0x4647a $c
+.asm_4647c
+    set 1, [hl]
+    ld a, $dc
+    ld [$d079], a
+    ld a, $e0
+    ld [$d07a], a
+.asm_46488
+    ld a, [$d079]
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld a, [$d07a]
+    ld [$cc4d], a
+    ld a, $15
+    jp $3e6d
+.asm_4649e
+    ld a, $a1
+    ld [$d71d], a
+    ld hl, $64a9
+    jp $6981
+; 0x464a9
+
+INCBIN "baserom.gbc",$464a9,$5
+
+SeafoamIslands3Texts: ; 0x464ae
+    dw SeafoamIslands3Text1, SeafoamIslands3Text2
+
+SeafoamIslands3Object: ; 0x464b2 (size=72)
+    db $7d ; border tile
+
+    db $7 ; warps
+    db $3, $5, $0, SEAFOAM_ISLANDS_2
+    db $d, $5, $0, SEAFOAM_ISLANDS_4
+    db $7, $d, $2, SEAFOAM_ISLANDS_2
+    db $f, $13, $3, SEAFOAM_ISLANDS_2
+    db $3, $19, $3, SEAFOAM_ISLANDS_4
+    db $b, $19, $5, SEAFOAM_ISLANDS_2
+    db $e, $19, $4, SEAFOAM_ISLANDS_4
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_BOULDER, $6 + 4, $12 + 4, $ff, $10, $1 ; person
+    db SPRITE_BOULDER, $6 + 4, $17 + 4, $ff, $10, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $f, $3, $5 ; SEAFOAM_ISLANDS_2
+    EVENT_DISP $f, $d, $5 ; SEAFOAM_ISLANDS_4
+    EVENT_DISP $f, $7, $d ; SEAFOAM_ISLANDS_2
+    EVENT_DISP $f, $f, $13 ; SEAFOAM_ISLANDS_2
+    EVENT_DISP $f, $3, $19 ; SEAFOAM_ISLANDS_4
+    EVENT_DISP $f, $b, $19 ; SEAFOAM_ISLANDS_2
+    EVENT_DISP $f, $e, $19 ; SEAFOAM_ISLANDS_4
+
+SeafoamIslands3Blocks: ; 135
+    INCBIN "maps/seafoamislands3.blk"
+
+SeafoamIslands4_h: ; 0x46581 to 0x4658d (12 bytes) (bank=11) (id=161)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SeafoamIslands4Blocks, SeafoamIslands4Texts, SeafoamIslands4Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SeafoamIslands4Object ; objects
+
+SeafoamIslands4Script: ; 0x4658d
+    call $3c3c
+    ld hl, $cd60
+    bit 7, [hl]
+    res 7, [hl]
+    jr z, .asm_465dc ; 0x46597 $43
+    ld hl, $65f6
+    call $34e4
+    ret nc
+    ld hl, $d881
+    ld a, [$cd3d]
+    cp $1
+    jr nz, .asm_465b8 ; 0x465a8 $e
+    set 0, [hl]
+    ld a, $dd
+    ld [$d079], a
+    ld a, $e1
+    ld [$d07a], a
+    jr .asm_465c4 ; 0x465b6 $c
+.asm_465b8
+    set 1, [hl]
+    ld a, $de
+    ld [$d079], a
+    ld a, $e2
+    ld [$d07a], a
+.asm_465c4
+    ld a, [$d079]
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld a, [$d07a]
+    ld [$cc4d], a
+    ld a, $15
+    call Predef
+    jr .asm_465ed ; 0x465da $11
+.asm_465dc
+    ld a, $a2
+    ld [$d71d], a
+    ld hl, $65f6
+    call $6981
+    ld a, [$d732]
+    bit 4, a
+    ret nz
+.asm_465ed
+    ld hl, $65fb
+    ld a, [$d666]
+    jp $3d97
+; 0x465f6
+
+INCBIN "baserom.gbc",$465f6,$465fb - $465f6
+
+SeafoamIslands4Scripts: ; 0x465fb
+    dw SeafoamIslands4Script0, SeafoamIslands4Script1
+
+INCBIN "baserom.gbc",$465ff,$4
+
+SeafoamIslands4Script0: ; 0x46603
+    ld a, [$d880]
+    and $3
+    cp $3
+    ret z
+    ld a, [$d361]
+    cp $8
+    ret nz
+    ld a, [$d362]
+    cp $f
+    ret nz
+    ld hl, $ccd3
+    ld de, $6632
+    call $350c
+    dec a
+    ld [$cd38], a
+    call $3486
+    ld hl, $d733
+    set 2, [hl]
+    ld a, $1
+    ld [$d666], a
+    ret
+; 0x46632
+
+INCBIN "baserom.gbc",$46632,$46639 - $46632
+
+SeafoamIslands4Script1: ; 0x46639
+    ld a, [$cd38]
+    and a
+    ret nz
+    ld a, $0
+    ld [$d666], a
+    ret
+; 0x46644
+
+INCBIN "baserom.gbc",$46644,$56
+
+SeafoamIslands4Texts: ; 0x4669a
+    dw SeafoamIslands4Text1, SeafoamIslands4Text2, SeafoamIslands4Text3, SeafoamIslands4Text4, SeafoamIslands4Text5, SeafoamIslands4Text6
+
+SeafoamIslands4Object: ; 0x466a6 (size=96)
+    db $7d ; border tile
+
+    db $7 ; warps
+    db $c, $5, $1, SEAFOAM_ISLANDS_3
+    db $6, $8, $2, SEAFOAM_ISLANDS_5
+    db $4, $19, $3, SEAFOAM_ISLANDS_5
+    db $3, $19, $4, SEAFOAM_ISLANDS_3
+    db $e, $19, $6, SEAFOAM_ISLANDS_3
+    db $11, $14, $0, SEAFOAM_ISLANDS_5
+    db $11, $15, $1, SEAFOAM_ISLANDS_5
+
+    db $0 ; signs
+
+    db $6 ; people
+    db SPRITE_BOULDER, $e + 4, $5 + 4, $ff, $10, $1 ; person
+    db SPRITE_BOULDER, $f + 4, $3 + 4, $ff, $10, $2 ; person
+    db SPRITE_BOULDER, $e + 4, $8 + 4, $ff, $10, $3 ; person
+    db SPRITE_BOULDER, $e + 4, $9 + 4, $ff, $10, $4 ; person
+    db SPRITE_BOULDER, $6 + 4, $12 + 4, $ff, $ff, $5 ; person
+    db SPRITE_BOULDER, $6 + 4, $13 + 4, $ff, $ff, $6 ; person
+
+    ; warp-to
+    EVENT_DISP $f, $c, $5 ; SEAFOAM_ISLANDS_3
+    EVENT_DISP $f, $6, $8 ; SEAFOAM_ISLANDS_5
+    EVENT_DISP $f, $4, $19 ; SEAFOAM_ISLANDS_5
+    EVENT_DISP $f, $3, $19 ; SEAFOAM_ISLANDS_3
+    EVENT_DISP $f, $e, $19 ; SEAFOAM_ISLANDS_3
+    EVENT_DISP $f, $11, $14 ; SEAFOAM_ISLANDS_5
+    EVENT_DISP $f, $11, $15 ; SEAFOAM_ISLANDS_5
+
+SeafoamIslands4Blocks: ; 135
+    INCBIN "maps/seafoamislands4.blk"
+
+SeafoamIslands5_h: ; 0x4678d to 0x46799 (12 bytes) (bank=11) (id=162)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SeafoamIslands5Blocks, SeafoamIslands5Texts, SeafoamIslands5Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SeafoamIslands5Object ; objects
+
+SeafoamIslands5Script: ; 0x46799
+    call $3c3c
+    ld a, [$d668]
+    ld hl, $67ad
+    jp $3d97
+; 0x467a5
+
+INCBIN "baserom.gbc",$467a5,$467ad - $467a5
+
+SeafoamIslands5Scripts: ; 0x467ad
+    dw SeafoamIslands5Script0, SeafoamIslands5Script1
+
+INCBIN "baserom.gbc",$467b1,$16
+
+SeafoamIslands5Script0: ; 0x467c7
+    ld a, [$d880]
+    and $3
+    cp $3
+    ret z
+    ld hl, $67fe
+    call $34bf
+    ret nc
+    ld a, [$cd3d]
+    cp $3
+    jr nc, .asm_467e6 ; 0x467db $9
+    ld a, $40
+    ld [$ccd4], a
+    ld a, $2
+    jr .asm_467e8 ; 0x467e4 $2
+.asm_467e6
+    ld a, $1
+.asm_467e8
+    ld [$cd38], a
+    ld a, $40
+    ld [$ccd3], a
+    call $3486
+    ld hl, $d733
+    res 2, [hl]
+    ld a, $1
+    ld [$d668], a
+    ret
+; 0x467fe
+
+INCBIN "baserom.gbc",$467fe,$46807 - $467fe
+
+SeafoamIslands5Script1: ; 0x46807
+    ld a, [$cd38]
+    and a
+    ret nz
+    xor a
+    ld [$cd6b], a
+    ld a, $0
+    ld [$d668], a
+    ret
+; 0x46816
+
+INCBIN "baserom.gbc",$46816,$66
+
+SeafoamIslands5Texts: ; 0x4687c
+    dw SeafoamIslands5Text1, SeafoamIslands5Text2, SeafoamIslands5Text3, SeafoamIslands5Text4, SeafoamIslands5Text5
+
+INCBIN "baserom.gbc",$46886,$d
+
+SeafoamIslands5Text3: ; 0x46893
+    db $08 ; asm
+    ld hl, $6886
+    call LoadTrainerHeader
+    ld a, $4
+    ld [$d668], a
+    jp $24d7
+
+; 0x468a2 TX_FAR
+db $17, $75, $40, $22
+; 0x468a6
+    db $8
+    ld a, $4a
+    call $13d0
+    call $3748
+    jp TextScriptEnd
+; 0x468b2
+
+SeafoamIslands5Text4: ; 0x468b2
+    TX_FAR _SeafoamIslands5Text4
+    db $50
+
+SeafoamIslands5Text5: ; 0x468b7
+    TX_FAR _SeafoamIslands5Text5
+    db $50
+
+SeafoamIslands5Object: ; 0x468bc (size=62)
+    db $7d ; border tile
+
+    db $4 ; warps
+    db $11, $14, $5, SEAFOAM_ISLANDS_4
+    db $11, $15, $6, SEAFOAM_ISLANDS_4
+    db $7, $b, $1, SEAFOAM_ISLANDS_4
+    db $4, $19, $2, SEAFOAM_ISLANDS_4
+
+    db $2 ; signs
+    db $f, $9, $4 ; SeafoamIslands5Text4
+    db $1, $17, $5 ; SeafoamIslands5Text5
+
+    db $3 ; people
+    db SPRITE_BOULDER, $f + 4, $4 + 4, $ff, $ff, $1 ; person
+    db SPRITE_BOULDER, $f + 4, $5 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BIRD, $1 + 4, $6 + 4, $ff, $d0, $43, ARTICUNO, $32 ; trainer
+
+    ; warp-to
+    EVENT_DISP $f, $11, $14 ; SEAFOAM_ISLANDS_4
+    EVENT_DISP $f, $11, $15 ; SEAFOAM_ISLANDS_4
+    EVENT_DISP $f, $7, $b ; SEAFOAM_ISLANDS_4
+    EVENT_DISP $f, $4, $19 ; SEAFOAM_ISLANDS_4
+
+SeafoamIslands5Blocks: ; 135
+    INCBIN "maps/seafoamislands5.blk"
+
+INCBIN "baserom.gbc",$46981,$167f
+
+SECTION "bank12",DATA,BANK[$12]
+
+Route7_h: ; 0x48000 to 0x48022 (34 bytes) (bank=12) (id=18)
+    db $00 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw Route7Blocks, $4155, Route7Script ; blocks, texts, scripts
+    db WEST | EAST ; connections
+
+    ; connections data
+
+	db CELADON_CITY
+    dw $410e, $c6e8 ; pointers (connected, current) (strip)
+    db $0f, $19 ; bigness, width
+    db $08, $31 ; alignments (y, x)
+    dw $c720 ; window
+
+	db SAFFRON_CITY
+    dw $4aac, $c6f5 ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $00 ; alignments (y, x)
+    dw $c703 ; window
+
+    ; end connection data
+
+    dw Route7Object ; objects
+
+Route7Object: ; 0x48022 (size=47)
+    db $f ; border tile
+
+    db $5 ; warps
+    db $9, $12, $2, ROUTE_7_GATE
+    db $a, $12, $3, ROUTE_7_GATE
+    db $9, $b, $0, ROUTE_7_GATE
+    db $a, $b, $1, ROUTE_7_GATE
+    db $d, $5, $0, PATH_ENTRANCE_ROUTE_7
+
+    db $1 ; signs
+    db $d, $3, $1 ; Route7Text1
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $a, $9, $12 ; ROUTE_7_GATE
+    EVENT_DISP $a, $a, $12 ; ROUTE_7_GATE
+    EVENT_DISP $a, $9, $b ; ROUTE_7_GATE
+    EVENT_DISP $a, $a, $b ; ROUTE_7_GATE
+    EVENT_DISP $a, $d, $5 ; PATH_ENTRANCE_ROUTE_7
+
+Route7Blocks: ; 90
+    INCBIN "maps/route7.blk"
+
+MtMoonPokecenterBlocks: ; 28
+    INCBIN "maps/mtmoonpokecenter.blk"
+
+Route11GateBlocks: ; 20
+    INCBIN "maps/route11gate.blk"
+
+Route11GateUpstairsBlocks: ; 16
+    INCBIN "maps/route11gateupstairs.blk"
+
+INCBIN "baserom.gbc",$480eb,$48152 - $480eb
+
+Route7Script: ; 0x48152
+    jp $3c3c
+; 0x48155
+
+INCBIN "baserom.gbc",$48155,$2
+
+Route7Text1: ; 0x48157
+    TX_FAR _Route7Text1
+    db $50
+
+RedsHouse1F_h: ; 415C
+	db $01 ; tileset
+	db $04,$04 ; dimensions
+	dw RedsHouse1FBlocks, RedsHouse1FTexts, RedsHouse1FScript
+	db 0 ; no connections
+	dw RedsHouse1FObject
+
+RedsHouse1FScript: ; 4168
+	jp $3C3C
+
+RedsHouse1FTexts: ; 416B
+	dw RedsHouse1FText1,RedsHouse1FText2
+
+RedsHouse1FText1: ; Mom
+	db 8
+	ld a,[$D72E]
+	bit 3,a
+	jr nz,.heal\@ ; if player has received a Pokémon from Oak, heal team
+	ld hl,MomWakeUpText
+	call PrintText
+	jr .done\@
+.heal\@
+	call MomHealPokemon
+.done\@
+	jp $24D7
+
+MomWakeUpText:
+	TX_FAR _MomWakeUpText
+	db "@"
+
+MomHealPokemon:
+	ld hl,MomHealText1
+	call PrintText
+	call GBFadeOut2
+	call $3071
+	ld a,7
+	call Predef
+	ld a,$E8
+	ld [$C0EE],a
+	call $23B1 ; play sound?
+.next\@
+	ld a,[$C026]
+	cp $E8
+	jr z,.next\@
+	ld a,[$D35B]
+	ld [$C0EE],a
+	call $23B1
+	call GBFadeIn2
+	ld hl,MomHealText2
+	jp PrintText
+
+MomHealText1:
+	TX_FAR _MomHealText1
+	db "@"
+MomHealText2:
+	TX_FAR _MomHealText2
+	db "@"
+
+RedsHouse1FText2: ; TV
+	db 8
+	ld a,[$C109]
+	cp 4
+	ld hl,TVWrongSideText
+	jr nz,.done\@ ; if player is not facing up
+	ld hl,StandByMeText
+.done\@
+	call PrintText
+	jp $24D7
+
+StandByMeText:
+	TX_FAR _StandByMeText
+	db "@"
+
+TVWrongSideText:
+	TX_FAR _TVWrongSideText
+	db "@"
+
+RedsHouse1FObject:
+	db $0A ; border tile
+
+	db 3 ; warps
+	db 7,2,0,$FF ; exit1
+	db 7,3,0,$FF ; exit2
+	db 1,7,0,$26 ; staircase
+
+	db 1 ; signs
+	db 1,3,2 ; TV
+
+	db 1 ; people
+	db $33,4+4,5+4,$FF,$D2,1 ; Mom
+
+	; warp-to
+
+	dw $C6EF + 4 + (4 + 6) * (3) + 1
+	db 7,2
+
+	dw $C6EF + 4 + (4 + 6) * (3) + 1
+	db 7,3
+
+	dw $C6EF + 4 + (4 + 6) * (0) + 3
+	db 1,7
+
+RedsHouse1FBlocks:
+	INCBIN "maps/redshouse1f.blk"
+
+CeladonMart3_h: ; 0x48219 to 0x48225 (12 bytes) (bank=12) (id=124)
+    db $12 ; tileset
+    db $04, $0a ; dimensions (y, x)
+    dw CeladonMart3Blocks, CeladonMart3Texts, CeladonMart3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMart3Object ; objects
+
+CeladonMart3Script: ; 0x48225
+    jp $3c3c
+; 0x48228
+
+CeladonMart3Texts: ; 0x48228
+    dw CeladonMart3Text1, CeladonMart3Text2, CeladonMart3Text3, CeladonMart3Text4, CeladonMart3Text5, CeladonMart3Text6, CeladonMart3Text7, CeladonMart3Text8, CeladonMart3Text9, CeladonMart3Text10, CeladonMart3Text11, CeladonMart3Text12, CeladonMart3Text13, CeladonMart3Text14, CeladonMart3Text15, CeladonMart3Text16, CeladonMart3Text17
+
+CeladonMart3Text1: ; 0x4824a
+    db $08 ; asm
+    ld a, [$d778]
+    bit 7, a
+    jr nz, .asm_a5463 ; 0x48250
+    ld hl, $4278
+    call PrintText
+    ld bc,(TM_18 << 8) | 1
+    call $3e2e
+    jr nc, .asm_95f37 ; 0x4825e
+    ld hl, $d778
+    set 7, [hl]
+    ld hl, $427d
+    jr .asm_81359 ; 0x48268
+.asm_95f37 ; 0x4826a
+    ld hl, $4288
+    jr .asm_81359 ; 0x4826d
+.asm_a5463 ; 0x4826f
+    ld hl, $4283
+.asm_81359 ; 0x48272
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$48278,$15
+
+CeladonMart3Text2: ; 0x4828d
+    TX_FAR _CeladonMart3Text2
+    db $50
+
+CeladonMart3Text3: ; 0x48292
+    TX_FAR _CeladonMart3Text3
+    db $50
+
+CeladonMart3Text4: ; 0x48297
+    TX_FAR _CeladonMart3Text4
+    db $50
+
+CeladonMart3Text5: ; 0x4829c
+    TX_FAR _CeladonMart3Text5
+    db $50
+
+CeladonMart3Text12
+CeladonMart3Text10:
+CeladonMart3Text8:
+CeladonMart3Text6: ; 0x482a1
+    TX_FAR _CeladonMart3Text6
+    db $50
+
+CeladonMart3Text7: ; 0x482a6
+    TX_FAR _CeladonMart3Text7
+    db $50
+
+CeladonMart3Text9: ; 0x482ab
+    TX_FAR _CeladonMart3Text9
+    db $50
+
+CeladonMart3Text11: ; 0x482b0
+    TX_FAR _CeladonMart3Text11
+    db $50
+
+CeladonMart3Text13: ; 0x482b5
+    TX_FAR _CeladonMart3Text13
+    db $50
+
+CeladonMart3Text14: ; 0x482ba
+    TX_FAR _CeladonMart3Text14
+    db $50
+
+CeladonMart3Text17:
+CeladonMart3Text16:
+CeladonMart3Text15: ; 0x482bf
+    TX_FAR _CeladonMart3Text15
+    db $50
+
+CeladonMart3Object: ; 0x482c4 (size=94)
+    db $f ; border tile
+
+    db $3 ; warps
+    db $1, $c, $0, CELADON_MART_4
+    db $1, $10, $1, CELADON_MART_2
+    db $1, $1, $0, CELADON_MART_ELEVATOR
+
+    db $c ; signs
+    db $4, $2, $6 ; CeladonMart3Text6
+    db $4, $3, $7 ; CeladonMart3Text7
+    db $4, $5, $8 ; CeladonMart3Text8
+    db $4, $6, $9 ; CeladonMart3Text9
+    db $6, $2, $a ; CeladonMart3Text10
+    db $6, $3, $b ; CeladonMart3Text11
+    db $6, $5, $c ; CeladonMart3Text12
+    db $6, $6, $d ; CeladonMart3Text13
+    db $1, $e, $e ; CeladonMart3Text14
+    db $1, $4, $f ; CeladonMart3Text15
+    db $1, $6, $10 ; CeladonMart3Text16
+    db $1, $a, $11 ; CeladonMart3Text17
+
+    db $5 ; people
+    db SPRITE_MART_GUY, $5 + 4, $10 + 4, $ff, $ff, $1 ; person
+    db SPRITE_GAMEBOY_KID_COPY, $6 + 4, $b + 4, $ff, $d3, $2 ; person
+    db SPRITE_GAMEBOY_KID_COPY, $2 + 4, $7 + 4, $ff, $d0, $3 ; person
+    db SPRITE_GAMEBOY_KID_COPY, $2 + 4, $8 + 4, $ff, $d0, $4 ; person
+    db SPRITE_YOUNG_BOY, $5 + 4, $2 + 4, $ff, $d1, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $1, $c ; CELADON_MART_4
+    EVENT_DISP $a, $1, $10 ; CELADON_MART_2
+    EVENT_DISP $a, $1, $1 ; CELADON_MART_ELEVATOR
+
+CeladonMart3Blocks: ; 40
+    INCBIN "maps/celadonmart3.blk"
+
+CeladonMart4_h: ; 0x4834a to 0x48356 (12 bytes) (bank=12) (id=125)
+    db $12 ; tileset
+    db $04, $0a ; dimensions (y, x)
+    dw CeladonMart4Blocks, CeladonMart4Texts, CeladonMart4Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMart4Object ; objects
+
+CeladonMart4Script: ; 0x48356
+    jp $3c3c
+; 0x48359
+
+CeladonMart4Texts: ; 0x48359
+    dw CeladonMart4Text1, CeladonMart4Text2, CeladonMart4Text3, CeladonMart4Text4
+
+CeladonMart4Text2: ; 0x48361
+    TX_FAR _CeladonMart4Text2
+    db $50
+
+CeladonMart4Text3: ; 0x48366
+    TX_FAR _CeladonMart4Text3
+    db $50
+
+CeladonMart4Text4: ; 0x4836b
+    TX_FAR _CeladonMart4Text4
+    db $50
+
+CeladonMart4Object: ; 0x48370 (size=49)
+    db $f ; border tile
+
+    db $3 ; warps
+    db $1, $c, $0, CELADON_MART_3
+    db $1, $10, $1, CELADON_MART_5
+    db $1, $1, $0, CELADON_MART_ELEVATOR
+
+    db $1 ; signs
+    db $1, $e, $4 ; CeladonMart4Text4
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $7 + 4, $5 + 4, $ff, $ff, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $5 + 4, $f + 4, $fe, $2, $2 ; person
+    db SPRITE_BUG_CATCHER, $2 + 4, $5 + 4, $fe, $2, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $1, $c ; CELADON_MART_3
+    EVENT_DISP $a, $1, $10 ; CELADON_MART_5
+    EVENT_DISP $a, $1, $1 ; CELADON_MART_ELEVATOR
+
+CeladonMart4Blocks: ; 40
+    INCBIN "maps/celadonmart4.blk"
+
+CeladonMartRoof_h: ; 0x483c9 to 0x483d5 (12 bytes) (bank=12) (id=126)
+    db $12 ; tileset
+    db $04, $0a ; dimensions (y, x)
+    dw CeladonMartRoofBlocks, $455b, CeladonMartRoofScript ; blocks, texts, scripts
+    db $00 ; connections
+    
+    dw CeladonMartRoofObject ; objects
+
+CeladonMartRoofScript: ; 0x483d5
+    jp $3c3c
+; 0x483d8
+
+INCBIN "baserom.gbc",$483d8,$18f
+
+CeladonMartRoofText1: ; 0x48567
+    TX_FAR _CeladonMartRoofText1
+    db $50
+
+CeladonMartRoofText2: ; 0x4856c
+    db $08 ; asm
+    call $43d8
+    ld a, [$cd37]
+    and a
+    jr z, .asm_914b9 ; 0x48574
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $459d
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_05aa4 ; 0x48588
+    call $440c
+    jr .asm_05aa4 ; 0x4858d
+.asm_914b9 ; 0x4858f
+    ld hl, $4598
+    call PrintText
+.asm_05aa4 ; 0x48595
+    jp $24d7
+
+INCBIN "baserom.gbc",$48598,$b
+
+CeladonMartRoofText6: ; 0x485a3
+    TX_FAR _CeladonMartRoofText6
+    db $50
+
+CeladonMartRoofObject: ; 0x485a8 (size=36)
+    db $42 ; border tile
+
+    db $1 ; warps
+    db $2, $f, $0, CELADON_MART_5
+
+    db $4 ; signs
+    db $1, $a, $3 ; CeladonMartRoofText3
+    db $1, $b, $4 ; CeladonMartRoofText4
+    db $2, $c, $5 ; CeladonMartRoofText5
+    db $2, $d, $6 ; CeladonMartRoofText6
+
+    db $2 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $4 + 4, $a + 4, $ff, $d2, $1 ; person
+    db SPRITE_LITTLE_GIRL, $5 + 4, $5 + 4, $fe, $0, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $2, $f ; CELADON_MART_5
+
+CeladonMartRoofBlocks: ; 40
+    INCBIN "maps/celadonmart5.blk"
+
+CeladonMartElevator_h: ; 0x485f4 to 0x48600 (12 bytes) (bank=12) (id=127)
+    db $12 ; tileset
+    db $02, $02 ; dimensions (y, x)
+    dw CeladonMartElevatorBlocks, CeladonMartElevatorTexts, CeladonMartElevatorScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMartElevatorObject ; objects
+
+CeladonMartElevatorScript: ; 0x48600
+    ld hl, $d126
+    bit 5, [hl]
+    res 5, [hl]
+    push hl
+    call nz, $461c
+    pop hl
+    bit 7, [hl]
+    res 7, [hl]
+    call nz, $4654
+    xor a
+    ld [$cf0c], a
+    inc a
+    ld [$cc3c], a
+    ret
+; 0x4861c
+
+INCBIN "baserom.gbc",$4861c,$40
+
+CeladonMartElevatorTexts: ; 0x4865c
+    dw CeladonMartElevatorText1
+
+CeladonMartElevatorText1: ; 0x4865e
+    db $08 ; asm
+    call $4631
+    ld hl, $464a
+    ld a, $61
+    call Predef
+    jp $24d7
+
+CeladonMartElevatorObject: ; 0x4866d (size=23)
+    db $f ; border tile
+
+    db $2 ; warps
+    db $3, $1, $5, CELADON_MART_1
+    db $3, $2, $5, CELADON_MART_1
+
+    db $1 ; signs
+    db $0, $3, $1 ; CeladonMartElevatorText1
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $2, $3, $1 ; CELADON_MART_1
+    EVENT_DISP $2, $3, $2 ; CELADON_MART_1
+
+CeladonMartElevatorBlocks: ; 4
+    INCBIN "maps/celadonmart6.blk"
+
+CeladonMansion1_h: ; 0x48688 to 0x48694 (12 bytes) (bank=12) (id=128)
+    db $13 ; tileset
+    db $06, $04 ; dimensions (y, x)
+    dw CeladonMansion1Blocks, CeladonMansion1Texts, CeladonMansion1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMansion1Object ; objects
+
+CeladonMansion1Script: ; 0x48694
+    jp $3c3c
+; 0x48697
+
+CeladonMansion1Texts: ; 0x48697
+    dw CeladonMansion1Text1, CeladonMansion1Text2, CeladonMansion1Text3, CeladonMansion1Text4, CeladonMansion1Text5
+
+;0x486a1
+    call $13d0
+    jp TextScriptEnd
+; 0x486a7
+
+CeladonMansion1Text1: ; 0x486a7
+    TX_FAR _CeladonMansion1Text1
+    db $08 ; asm
+    ld a, $4d
+    jp $46a1
+
+CeladonMansion1Text2: ; 0x486b1
+    TX_FAR _CeladonMansion1Text2
+    db $50
+
+CeladonMansion1Text3: ; 0x486b6
+    TX_FAR _CeladonMansion1Text3
+    db $8
+    ld a, $4
+    jp $46a1
+; 0x486c0
+
+CeladonMansion1Text4: ; 0x486c0
+    TX_FAR _CeladonMansion1Text4
+    db $8
+    ld a, $f
+    jp $46a1
+; 0x486ca
+
+CeladonMansion1Text5: ; 0x486ca
+    TX_FAR _CeladonMansion1Text5
+    db $50
+
+CeladonMansion1Object: ; 0x486cf (size=71)
+    db $f ; border tile
+
+    db $5 ; warps
+    db $b, $4, $2, $ff
+    db $b, $5, $2, $ff
+    db $0, $4, $4, $ff
+    db $1, $7, $1, CELADON_MANSION_2
+    db $1, $2, $2, CELADON_MANSION_2
+
+    db $1 ; signs
+    db $9, $4, $5 ; CeladonMansion1Text5
+
+    db $4 ; people
+    db SPRITE_SLOWBRO, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_OLD_MEDIUM_WOMAN, $5 + 4, $1 + 4, $ff, $d0, $2 ; person
+    db SPRITE_CLEFAIRY, $8 + 4, $1 + 4, $fe, $2, $3 ; person
+    db SPRITE_SLOWBRO, $4 + 4, $4 + 4, $fe, $1, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $b, $4
+    EVENT_DISP $4, $b, $5
+    EVENT_DISP $4, $0, $4
+    EVENT_DISP $4, $1, $7 ; CELADON_MANSION_2
+    EVENT_DISP $4, $1, $2 ; CELADON_MANSION_2
+
+CeladonMansion1Blocks: ; 24
+    INCBIN "maps/celadonmansion1.blk"
+
+CeladonMansion2_h: ; 0x4872e to 0x4873a (12 bytes) (bank=12) (id=129)
+    db $13 ; tileset
+    db $06, $04 ; dimensions (y, x)
+    dw CeladonMansion2Blocks, CeladonMansion2Texts, CeladonMansion2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMansion2Object ; objects
+
+CeladonMansion2Script: ; 0x4873a
+    call $3c3c
+    ret
+; 0x4873e
+
+CeladonMansion2Texts: ; 0x4873e
+    dw CeladonMansion2Text1
+
+CeladonMansion2Text1: ; 0x48740
+    TX_FAR _CeladonMansion2Text1
+    db $50
+
+CeladonMansion2Object: ; 0x48745 (size=39)
+    db $f ; border tile
+
+    db $4 ; warps
+    db $1, $6, $0, CELADON_MANSION_3
+    db $1, $7, $3, CELADON_MANSION_1
+    db $1, $2, $4, CELADON_MANSION_1
+    db $1, $4, $3, CELADON_MANSION_3
+
+    db $1 ; signs
+    db $9, $4, $1 ; CeladonMansion2Text1
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $4, $1, $6 ; CELADON_MANSION_3
+    EVENT_DISP $4, $1, $7 ; CELADON_MANSION_1
+    EVENT_DISP $4, $1, $2 ; CELADON_MANSION_1
+    EVENT_DISP $4, $1, $4 ; CELADON_MANSION_3
+
+CeladonMansion2Blocks: ; 24
+    INCBIN "maps/celadonmansion2.blk"
+
+CeladonMansion3_h: ; 0x48784 to 0x48790 (12 bytes) (bank=12) (id=130)
+    db $13 ; tileset
+    db $06, $04 ; dimensions (y, x)
+    dw CeladonMansion3Blocks, CeladonMansion3Texts, CeladonMansion3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMansion3Object ; objects
+
+CeladonMansion3Script: ; 0x48790
+    jp $3c3c
+; 0x48793
+
+CeladonMansion3Texts: ; 0x48793
+    dw CeladonMansion3Text1, CeladonMansion3Text2, CeladonMansion3Text3, CeladonMansion3Text4, CeladonMansion3Text5, CeladonMansion3Text6, CeladonMansion3Text7, CeladonMansion3Text8
+
+CeladonMansion3Text1: ; 0x487a3
+    TX_FAR _CeladonMansion3Text1
+    db $50
+
+CeladonMansion3Text2: ; 0x487a8
+    TX_FAR _CeladonMansion3Text2
+    db $50
+
+CeladonMansion3Text3: ; 0x487ad
+    TX_FAR _CeladonMansion3Text3
+    db $50
+
+CeladonMansion3Text4: ; 0x487b2
+    db $08 ; asm
+    ld hl, $d2f7
+    ld b, $13
+    call $2b7f
+    ld a, [$d11e]
+    cp $96
+    jr nc, .asm_f03d0 ; 0x487c0
+    ld hl, $47d0
+    jr .asm_c13f0 ; 0x487c5
+.asm_f03d0 ; 0x487c7
+    ld hl, $47d5
+.asm_c13f0 ; 0x487ca
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$487d0,$1b
+
+CeladonMansion3Text5: ; 0x487eb
+    TX_FAR _CeladonMansion3Text5
+    db $50
+
+CeladonMansion3Text6: ; 0x487f0
+    TX_FAR _CeladonMansion3Text6
+    db $50
+
+CeladonMansion3Text7: ; 0x487f5
+    TX_FAR _CeladonMansion3Text7
+    db $50
+
+CeladonMansion3Text8: ; 0x487fa
+    TX_FAR _CeladonMansion3Text8
+    db $50
+
+CeladonMansion3Object: ; 0x487ff (size=72)
+    db $f ; border tile
+
+    db $4 ; warps
+    db $1, $6, $0, CELADON_MANSION_2
+    db $1, $7, $0, CELADON_MANSION_4
+    db $1, $2, $1, CELADON_MANSION_4
+    db $1, $4, $3, CELADON_MANSION_2
+
+    db $4 ; signs
+    db $3, $1, $5 ; CeladonMansion3Text5
+    db $3, $4, $6 ; CeladonMansion3Text6
+    db $6, $1, $7 ; CeladonMansion3Text7
+    db $9, $4, $8 ; CeladonMansion3Text8
+
+    db $4 ; people
+    db SPRITE_BIKE_SHOP_GUY, $4 + 4, $0 + 4, $ff, $d1, $1 ; person
+    db SPRITE_MART_GUY, $4 + 4, $3 + 4, $ff, $d1, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $7 + 4, $0 + 4, $ff, $d1, $3 ; person
+    db SPRITE_LAPRAS_GIVER, $3 + 4, $2 + 4, $ff, $ff, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $1, $6 ; CELADON_MANSION_2
+    EVENT_DISP $4, $1, $7 ; CELADON_MANSION_4
+    EVENT_DISP $4, $1, $2 ; CELADON_MANSION_4
+    EVENT_DISP $4, $1, $4 ; CELADON_MANSION_2
+
+CeladonMansion3Blocks: ; 24
+    INCBIN "maps/celadonmansion3.blk"
+
+CeladonMansion4_h: ; 0x4885f to 0x4886b (12 bytes) (bank=12) (id=131)
+    db $13 ; tileset
+    db $06, $04 ; dimensions (y, x)
+    dw CeladonMansion4Blocks, CeladonMansion4Texts, CeladonMansion4Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMansion4Object ; objects
+
+CeladonMansion4Script: ; 0x4886b
+    jp $3c3c
+; 0x4886e
+
+CeladonMansion4Texts: ; 0x4886e
+    dw CeladonMansion4Text1
+
+CeladonMansion4Text1: ; 0x48870
+    TX_FAR _CeladonMansion4Text1
+    db $50
+
+CeladonMansion4Object: ; 0x48875 (size=31)
+    db $9 ; border tile
+
+    db $3 ; warps
+    db $1, $6, $1, CELADON_MANSION_3
+    db $1, $2, $2, CELADON_MANSION_3
+    db $7, $2, $0, CELADON_MANSION_5
+
+    db $1 ; signs
+    db $7, $3, $1 ; CeladonMansion4Text1
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $4, $1, $6 ; CELADON_MANSION_3
+    EVENT_DISP $4, $1, $2 ; CELADON_MANSION_3
+    EVENT_DISP $4, $7, $2 ; CELADON_MANSION_5
+
+CeladonMansion4Blocks: ; 24
+    INCBIN "maps/celadonmansion4.blk"
+
+CeladonPokecenter_h: ; 0x488ac to 0x488b8 (12 bytes) (bank=12) (id=133)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw $40ab, $48be, CeladonPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonPokecenterObject ; objects
+
+CeladonPokecenterScript: ; 0x488b8
+    call $22fa
+    jp $3c3c
+; 0x488be
+
+INCBIN "baserom.gbc",$488be,$8
+
+CeladonPokecenterText4:
+    db $f6, $ff
+
+CeladonPokecenterText2: ; _CeladonPokecenterText2
+CeladonPokecenterText1: ; 0x488c8
+    TX_FAR _CeladonPokecenterText1
+
+INCBIN "baserom.gbc",$488cc,$488cd - $488cc
+
+CeladonPokecenterText3: ; 0x488cd
+    TX_FAR _CeladonPokecenterText3
+    db $50
+
+CeladonPokecenterObject: ; 0x488d2 (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $5, $ff
+    db $7, $4, $5, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GENTLEMAN, $3 + 4, $7 + 4, $fe, $2, $2 ; person
+    db SPRITE_FOULARD_WOMAN, $5 + 4, $a + 4, $fe, $0, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+CeladonGym_h: ; 0x488fe to 0x4890a (12 bytes) (bank=12) (id=134)
+    db $07 ; tileset
+    db $09, $05 ; dimensions (y, x)
+    dw CeladonGymBlocks, CeladonGymTexts, CeladonGymScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonGymObject ; objects
+
+CeladonGymScript: ; 0x4890a
+    ld hl, $d126
+    bit 6, [hl]
+    res 6, [hl]
+    call nz, $4927
+    call $3c3c
+    ld hl, $49bc
+    ld de, $494e
+    ld a, [$d5ff]
+    call $3160
+    ld [$d5ff], a
+    ret
+; 0x48927
+
+INCBIN "baserom.gbc",$48927,$7f
+
+CeladonGymTexts: ; 0x489a6
+    dw CeladonGymText1, CeladonGymText2, CeladonGymText3, CeladonGymText4, CeladonGymText5, CeladonGymText6, CeladonGymText7, CeladonGymText8, CeladonGymText9, CeladonGymText10, CeladonGymText11
+
+INCBIN "baserom.gbc",$489bc,$55
+
+CeladonGymText1: ; 0x48a11
+    db $08 ; asm
+    ld a, [$d77c]
+    bit 1, a
+    jr z, .asm_16064 ; 0x48a17
+    bit 0, a
+    jr nz, .asm_3b22c ; 0x48a1b
+    call z, $4963
+    call $30b6
+    jr .asm_96252 ; 0x48a23
+.asm_3b22c ; 0x48a25
+    ld hl, $4a68
+    call PrintText
+    jr .asm_96252 ; 0x48a2b
+.asm_16064 ; 0x48a2d
+    ld hl, $4a5e
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $4a63
+    ld de, $4a63
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $4
+    ld [$d05c], a
+    ld a, $3
+    ld [$d5ff], a
+    ld [$da39], a
+.asm_96252 ; 0x48a5b
+    jp $24d7
+
+INCBIN "baserom.gbc",$48a5e,$48a6d - $48a5e
+
+CeladonGymText9: ; 0x48a6d
+INCBIN "baserom.gbc",$48a6d,$5
+
+CeladonGymText10: ; 0x48a72
+INCBIN "baserom.gbc",$48a72,$4
+db $0b
+
+INCBIN "baserom.gbc",$48a77,$48a7c - $48a77
+
+CeladonGymText11: ; 0x48a7c
+INCBIN "baserom.gbc",$48a7c,$5
+
+CeladonGymText2: ; 0x48a81
+    db $08 ; asm
+    ld hl, $49bc
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$48a8b,$48a9a - $48a8b
+
+CeladonGymText3: ; 0x48a9a
+    db $08 ; asm
+    ld hl, $49c8
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$48aa4,$48ab3 - $48aa4
+
+CeladonGymText4: ; 0x48ab3
+    db $08 ; asm
+    ld hl, $49d4
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$48abd,$48acc - $48abd
+
+CeladonGymText5: ; 0x48acc
+    db $08 ; asm
+    ld hl, $49e0
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$48ad6,$48ae5 - $48ad6
+
+CeladonGymText6: ; 0x48ae5
+    db $08 ; asm
+    ld hl, $49ec
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$48aef,$48afe - $48aef
+
+CeladonGymText7: ; 0x48afe
+    db $08 ; asm
+    ld hl, $49f8
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$48b08,$48b17 - $48b08
+
+CeladonGymText8: ; 0x48b17
+    db $08 ; asm
+    ld hl, $4a04
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$48b21,$f
+
+CeladonGymObject: ; 0x48b30 (size=84)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $11, $4, $6, $ff
+    db $11, $5, $6, $ff
+
+    db $0 ; signs
+
+    db $8 ; people
+    db SPRITE_ERIKA, $3 + 4, $4 + 4, $ff, $d0, $41, ERIKA + $C8, $1 ; trainer
+    db SPRITE_LASS, $b + 4, $2 + 4, $ff, $d3, $42, LASS + $C8, $11 ; trainer
+    db SPRITE_FOULARD_WOMAN, $a + 4, $7 + 4, $ff, $d2, $43, BEAUTY + $C8, $1 ; trainer
+    db SPRITE_LASS, $5 + 4, $9 + 4, $ff, $d0, $44, JR__TRAINER_F + $C8, $b ; trainer
+    db SPRITE_FOULARD_WOMAN, $5 + 4, $1 + 4, $ff, $d0, $45, BEAUTY + $C8, $2 ; trainer
+    db SPRITE_LASS, $3 + 4, $6 + 4, $ff, $d0, $46, LASS + $C8, $12 ; trainer
+    db SPRITE_FOULARD_WOMAN, $3 + 4, $3 + 4, $ff, $d0, $47, BEAUTY + $C8, $3 ; trainer
+    db SPRITE_LASS, $3 + 4, $5 + 4, $ff, $d0, $48, COOLTRAINER_F + $C8, $1 ; trainer
+
+    ; warp-to
+    EVENT_DISP $5, $11, $4
+    EVENT_DISP $5, $11, $5
+
+CeladonGymBlocks: ; 45
+    INCBIN "maps/celadongym.blk"
+
+CeladonGameCorner_h: ; 0x48bb1 to 0x48bbd (12 bytes) (bank=12) (id=135)
+    db $12 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw CeladonGameCornerBlocks, CeladonGameCornerTexts, CeladonGameCornerScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonGameCornerObject ; objects
+
+CeladonGameCornerScript: ; 0x48bbd
+    call $4bcf
+    call $4bec
+    call $3c3c
+    ld hl, $4c12
+    ld a, [$d65f]
+    jp $3d97
+; 0x48bcf
+
+INCBIN "baserom.gbc",$48bcf,$48c12 - $48bcf
+
+CeladonGameCornerScripts: ; 0x48c12
+    dw CeladonGameCornerScript0
+
+INCBIN "baserom.gbc",$48c14,$4
+
+CeladonGameCornerScript0: ; 0x48c18
+    ret
+; 0x48c19
+
+INCBIN "baserom.gbc",$48c19,$71
+
+CeladonGameCornerTexts: ; 0x48c8a
+    dw CeladonGameCornerText1, CeladonGameCornerText2, CeladonGameCornerText3, CeladonGameCornerText4, CeladonGameCornerText5, CeladonGameCornerText6, CeladonGameCornerText7, CeladonGameCornerText8, CeladonGameCornerText9, CeladonGameCornerText10, CeladonGameCornerText11, CeladonGameCornerText12, CeladonGameCornerText13
+
+CeladonGameCornerText1: ; 0x48ca4
+    TX_FAR _CeladonGameCornerText1
+    db $50
+
+CeladonGameCornerText2: ; 0x48ca9
+    db $08 ; asm
+    call $4f1e
+    ld hl, $4d22
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_c650b ; 0x48cba
+    ld b,COIN_CASE
+    call $3493
+    jr z, .asm_ed086 ; 0x48cc1
+    call $4f95
+    jr nc, .asm_31338 ; 0x48cc6
+    xor a
+    ldh [$9f], a
+    ldh [$a1], a
+    ld a, $10
+    ldh [$a0], a
+    call $35a6
+    jr nc, .asm_b6ef0 ; 0x48cd4
+    ld hl, $4d31
+    jr .asm_e2afd ; 0x48cd9
+.asm_b6ef0 ; 0x48cdb
+    xor a
+    ldh [$9f], a
+    ldh [$a1], a
+    ld a, $10
+    ldh [$a0], a
+    ld hl, $ffa1
+    ld de, $d349
+    ld c, $3
+    ld a, $c
+    call Predef
+    xor a
+    ldh [$9f], a
+    ldh [$a0], a
+    ld a, $50
+    ldh [$a1], a
+    ld de, $d5a5
+    ld hl, $ffa1
+    ld c, $2
+    ld a, $b
+    call Predef
+    call $4f1e
+    ld hl, $4d27
+    jr .asm_e2afd ; 0x48d0d
+.asm_c650b ; 0x48d0f
+    ld hl, $4d2c
+    jr .asm_e2afd ; 0x48d12
+.asm_31338 ; 0x48d14
+    ld hl, $4d36
+    jr .asm_e2afd ; 0x48d17
+.asm_ed086 ; 0x48d19
+    ld hl, $4d3b
+.asm_e2afd ; 0x48d1c
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$48d22,$1e
+
+CeladonGameCornerText3: ; 0x48d40
+    TX_FAR _CeladonGameCornerText3
+    db $50
+
+CeladonGameCornerText4: ; 0x48d45
+    TX_FAR _CeladonGameCornerText4
+    db $50
+
+CeladonGameCornerText5: ; 0x48d4a
+    db $08 ; asm
+    ld a, [$d77e]
+    bit 2, a
+    jr nz, .asm_d0957 ; 0x48d50
+    ld hl, $4d9c
+    call PrintText
+    ld b,COIN_CASE
+    call $3493
+    jr z, .asm_5aef9 ; 0x48d5d
+    call $4f95
+    jr nc, .asm_98546 ; 0x48d62
+    xor a
+    ldh [$9f], a
+    ldh [$a0], a
+    ld a, $10
+    ldh [$a1], a
+    ld de, $d5a5
+    ld hl, $ffa1
+    ld c, $2
+    ld a, $b
+    call Predef
+    ld hl, $d77e
+    set 2, [hl]
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $4da1
+    jr .asm_c7d1a ; 0x48d87
+.asm_d0957 ; 0x48d89
+    ld hl, $4dac
+    jr .asm_c7d1a ; 0x48d8c
+.asm_98546 ; 0x48d8e
+    ld hl, $4da7
+    jr .asm_c7d1a ; 0x48d91
+.asm_5aef9 ; 0x48d93
+    ld hl, $4f19
+.asm_c7d1a ; 0x48d96
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$48d9c,$15
+
+CeladonGameCornerText6: ; 0x48db1
+    TX_FAR _CeladonGameCornerText6
+    db $50
+
+CeladonGameCornerText7: ; 0x48db6
+    db $08 ; asm
+    ld a, [$d77c]
+    bit 1, a
+    ld hl, $4dca
+    jr z, .asm_be3fd ; 0x48dbf
+    ld hl, $4dcf
+.asm_be3fd ; 0x48dc4
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$48dca,$a
+
+CeladonGameCornerText8: ; 0x48dd4
+    TX_FAR _CeladonGameCornerText8
+    db $50
+
+CeladonGameCornerText9: ; 0x48dd9
+    db $08 ; asm
+    ld a, [$d77e]
+    bit 4, a
+    jr nz, .asm_ed8bc ; 0x48ddf
+    ld hl, $4e26
+    call PrintText
+    ld b,COIN_CASE
+    call $3493
+    jr z, .asm_df794 ; 0x48dec
+    call $4f95
+    jr nc, .asm_f17c3 ; 0x48df1
+    xor a
+    ldh [$9f], a
+    ldh [$a0], a
+    ld a, $20
+    ldh [$a1], a
+    ld de, $d5a5
+    ld hl, $ffa1
+    ld c, $2
+    ld a, $b
+    call Predef
+    ld hl, $d77e
+    set 4, [hl]
+    ld hl, $4e2b
+    jr .asm_0ddc2 ; 0x48e11
+.asm_ed8bc ; 0x48e13
+    ld hl, $4e36
+    jr .asm_0ddc2 ; 0x48e16
+.asm_f17c3 ; 0x48e18
+    ld hl, $4e31
+    jr .asm_0ddc2 ; 0x48e1b
+.asm_df794 ; 0x48e1d
+    ld hl, $4f19
+.asm_0ddc2 ; 0x48e20
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$48e26,$48e3b - $48e26
+
+CeladonGameCornerText10: ; 0x48e3b
+    db $08 ; asm
+    ld a, [$d77e]
+    bit 3, a
+    jr nz, .asm_ff080 ; 0x48e41
+    ld hl, $4e88
+    call PrintText
+    ld b,COIN_CASE
+    call $3493
+    jr z, .asm_4fb0c ; 0x48e4e
+    call $4f95
+    jr z, .asm_9505a ; 0x48e53
+    xor a
+    ldh [$9f], a
+    ldh [$a0], a
+    ld a, $20
+    ldh [$a1], a
+    ld de, $d5a5
+    ld hl, $ffa1
+    ld c, $2
+    ld a, $b
+    call Predef
+    ld hl, $d77e
+    set 3, [hl]
+    ld hl, $4e8d
+    jr .asm_78d65 ; 0x48e73
+.asm_ff080 ; 0x48e75
+    ld hl, $4e98
+    jr .asm_78d65 ; 0x48e78
+.asm_9505a ; 0x48e7a
+    ld hl, $4e93
+    jr .asm_78d65 ; 0x48e7d
+.asm_4fb0c ; 0x48e7f
+    ld hl, $4f19
+.asm_78d65 ; 0x48e82
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$48e88,$48e9d - $48e88
+
+CeladonGameCornerText11: ; 0x48e9d
+    db $08 ; asm
+    ld hl, $4ece
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $4ed3
+    ld de, $4ed3
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    xor a
+    ldh [$b4], a
+    ldh [$b3], a
+    ldh [$b2], a
+    ld a, $1
+    ld [$d65f], a
+    jp $24d7
+
+INCBIN "baserom.gbc",$48ece,$48ed8 - $48ece
+
+CeladonGameCornerText13: ; 0x48ed8
+INCBIN "baserom.gbc",$48ed8,5
+
+CeladonGameCornerText12: ; 0x48edd
+    db $08 ; asm
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $4f09
+    call PrintText
+    call $3748
+    ld a, $ad
+    call $23b1
+    call $3748
+    ld hl, $d77e
+    set 1, [hl]
+    ld a, $43
+    ld [$d09f], a
+    ld bc, $0208
+    ld a, $17
+    call Predef
+    jp $24d7
+
+INCBIN "baserom.gbc",$48f09,$97
+
+CeladonGameCornerObject: ; 0x48fa0 (size=99)
+    db $f ; border tile
+
+    db $3 ; warps
+    db $11, $f, $7, $ff
+    db $11, $10, $7, $ff
+    db $4, $11, $1, ROCKET_HIDEOUT_1
+
+    db $1 ; signs
+    db $4, $9, $c ; CeladonGameCornerText12
+
+    db $b ; people
+    db SPRITE_FOULARD_WOMAN, $6 + 4, $2 + 4, $ff, $d0, $1 ; person
+    db SPRITE_MART_GUY, $6 + 4, $5 + 4, $ff, $d0, $2 ; person
+    db SPRITE_FAT_BALD_GUY, $a + 4, $2 + 4, $ff, $d2, $3 ; person
+    db SPRITE_FOULARD_WOMAN, $d + 4, $2 + 4, $ff, $d2, $4 ; person
+    db SPRITE_FISHER, $b + 4, $5 + 4, $ff, $d3, $5 ; person
+    db SPRITE_MOM_GEISHA, $b + 4, $8 + 4, $ff, $d2, $6 ; person
+    db SPRITE_GYM_HELPER, $e + 4, $8 + 4, $ff, $d2, $7 ; person
+    db SPRITE_GAMBLER, $f + 4, $b + 4, $ff, $d3, $8 ; person
+    db SPRITE_MART_GUY, $b + 4, $e + 4, $ff, $d2, $9 ; person
+    db SPRITE_GENTLEMAN, $d + 4, $11 + 4, $ff, $d3, $a ; person
+    db SPRITE_ROCKET, $5 + 4, $9 + 4, $ff, $d1, $4b, ROCKET + $C8, $7 ; trainer
+
+    ; warp-to
+    EVENT_DISP $a, $11, $f
+    EVENT_DISP $a, $11, $10
+    EVENT_DISP $a, $4, $11 ; ROCKET_HIDEOUT_1
+
+CeladonGameCornerBlocks: ; 90
+    INCBIN "maps/celadongamecorner.blk"
+
+CeladonMart5_h: ; 0x4905d to 0x49069 (12 bytes) (bank=12) (id=136)
+    db $12 ; tileset
+    db $04, $0a ; dimensions (y, x)
+    dw CeladonMart5Blocks, CeladonMart5Texts, CeladonMart5Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMart5Object ; objects
+
+CeladonMart5Script: ; 0x49069
+    jp $3c3c
+; 0x4906c
+
+CeladonMart5Texts: ; 0x4906c
+    dw CeladonMart5Text1, CeladonMart5Text2, CeladonMart5Text3, CeladonMart5Text4, CeladonMart5Text5
+
+CeladonMart5Text1: ; 0x49076
+    TX_FAR _CeladonMart5Text1
+    db $50
+
+CeladonMart5Text2: ; 0x4907b
+    TX_FAR _CeladonMart5Text2
+    db $50
+
+CeladonMart5Text5: ; 0x49080
+    TX_FAR _CeladonMart5Text5
+    db $50
+
+CeladonMart5Object: ; 0x49085 (size=55)
+    db $f ; border tile
+
+    db $3 ; warps
+    db $1, $c, $0, CELADON_MART_ROOF
+    db $1, $10, $1, CELADON_MART_4
+    db $1, $1, $0, CELADON_MART_ELEVATOR
+
+    db $1 ; signs
+    db $1, $e, $5 ; CeladonMart5Text5
+
+    db $4 ; people
+    db SPRITE_GENTLEMAN, $5 + 4, $e + 4, $fe, $1, $1 ; person
+    db SPRITE_SAILOR, $6 + 4, $2 + 4, $ff, $ff, $2 ; person
+    db SPRITE_MART_GUY, $3 + 4, $5 + 4, $ff, $d0, $3 ; person
+    db SPRITE_MART_GUY, $3 + 4, $6 + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $1, $c ; CELADON_MART_ROOF
+    EVENT_DISP $a, $1, $10 ; CELADON_MART_4
+    EVENT_DISP $a, $1, $1 ; CELADON_MART_ELEVATOR
+
+CeladonMart5Blocks: ; 40
+    INCBIN "maps/celadonhouse.blk"
+
+CeladonPrizeRoom_h: ; 0x490e4 to 0x490f0 (12 bytes) (bank=12) (id=137)
+    db $12 ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw CeladonPrizeRoomBlocks, $50f3, $50f0 ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonPrizeRoomObject ; objects
+
+CeladonPrizeRoomScript: ; 0x490f0
+    jp $3c3c
+; 0x490f3
+
+INCBIN "baserom.gbc",$490f3,$a
+
+CeladonPrizeRoomText1: ; 0x490fd
+    TX_FAR _CeladonPrizeRoomText1
+    db $50
+
+CeladonPrizeRoomText2: ; 0x49102
+    TX_FAR _CeladonPrizeRoomText2
+    db $50
+
+INCBIN "baserom.gbc",$49107,$1
+
+CeladonPrizeRoomObject: ; 0x49108 (size=41)
+    db $f ; border tile
+
+    db $2 ; warps
+    db $7, $4, $9, $ff
+    db $7, $5, $9, $ff
+
+    db $3 ; signs
+    db $2, $2, $3 ; CeladonPrizeRoomText3
+    db $2, $4, $4 ; CeladonPrizeRoomText4
+    db $2, $6, $5 ; CeladonPrizeRoomText5
+
+    db $2 ; people
+    db SPRITE_BALDING_GUY, $4 + 4, $1 + 4, $ff, $ff, $1 ; person
+    db SPRITE_GAMBLER, $3 + 4, $7 + 4, $fe, $2, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $7, $4
+    EVENT_DISP $5, $7, $5
+
+CeladonPrizeRoomBlocks: ; 20
+    INCBIN "maps/celadonprizeroom.blk"
+
+CeladonDiner_h: ; 0x49145 to 0x49151 (12 bytes) (bank=12) (id=138)
+    db $12 ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw CeladonDinerBlocks, CeladonDinerTexts, CeladonDinerScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonDinerObject ; objects
+
+CeladonDinerScript: ; 0x49151
+    call $3c3c
+    ret
+; 0x49155
+
+CeladonDinerTexts: ; 0x49155
+    dw CeladonDinerText1, CeladonDinerText2, CeladonDinerText3, CeladonDinerText4, CeladonDinerText5
+
+CeladonDinerText1: ; 0x4915f
+    TX_FAR _CeladonDinerText1
+    db $50
+
+CeladonDinerText2: ; 0x49164
+    TX_FAR _CeladonDinerText2
+    db $50
+
+CeladonDinerText3: ; 0x49169
+    TX_FAR _CeladonDinerText3
+    db $50
+
+CeladonDinerText4: ; 0x4916e
+    TX_FAR _CeladonDinerText4
+    db $50
+
+CeladonDinerText5: ; 0x49173
+    db $08 ; asm
+    ld a, [$d783]
+    bit 0, a
+    jr nz, .asm_eb14d ; 0x49179
+    ld hl, $51a7
+    call PrintText
+    ld bc,(COIN_CASE << 8) | 1
+    call $3e2e
+    jr nc, .asm_78e93 ; 0x49187
+    ld hl, $d783
+    set 0, [hl]
+    ld hl, $51ac
+    call PrintText
+    jr .asm_68b61 ; 0x49194
+.asm_78e93 ; 0x49196
+    ld hl, $51b2
+    call PrintText
+    jr .asm_68b61 ; 0x4919c
+.asm_eb14d ; 0x4919e
+    ld hl, $51b7
+    call PrintText
+.asm_68b61 ; 0x491a4
+    jp $24d7
+
+INCBIN "baserom.gbc",$491a7,$15
+
+CeladonDinerObject: ; 0x491bc (size=50)
+    db $f ; border tile
+
+    db $2 ; warps
+    db $7, $3, $a, $ff
+    db $7, $4, $a, $ff
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_COOK, $5 + 4, $8 + 4, $fe, $2, $1 ; person
+    db SPRITE_MOM_GEISHA, $2 + 4, $7 + 4, $ff, $ff, $2 ; person
+    db SPRITE_FAT_BALD_GUY, $4 + 4, $1 + 4, $ff, $d0, $3 ; person
+    db SPRITE_FISHER2, $3 + 4, $5 + 4, $ff, $d3, $4 ; person
+    db SPRITE_GYM_HELPER, $1 + 4, $0 + 4, $ff, $d0, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $7, $3
+    EVENT_DISP $5, $7, $4
+
+CeladonDinerBlocks: ; 20
+    INCBIN "maps/celadondiner.blk"
+
+CeladonHouse_h: ; 0x49202 to 0x4920e (12 bytes) (bank=12) (id=139)
+    db $13 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw CeladonHouseBlocks, CeladonHouseTexts, CeladonHouseScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonHouseObject ; objects
+
+CeladonHouseScript: ; 0x4920e
+    call $3c3c
+    ret
+; 0x49212
+
+CeladonHouseTexts: ; 0x49212
+    dw CeladonHouseText1, CeladonHouseText2, CeladonHouseText3
+
+CeladonHouseText1: ; 0x49218
+    TX_FAR _CeladonHouseText1
+    db $50
+
+CeladonHouseText2: ; 0x4921d
+    TX_FAR _CeladonHouseText2
+    db $50
+
+CeladonHouseText3: ; 0x49222
+    TX_FAR _CeladonHouseText3
+    db $50
+
+CeladonHouseObject: ; 0x49227 (size=38)
+    db $f ; border tile
+
+    db $2 ; warps
+    db $7, $2, $b, $ff
+    db $7, $3, $b, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_OLD_PERSON, $2 + 4, $4 + 4, $ff, $d0, $1 ; person
+    db SPRITE_ROCKET, $4 + 4, $1 + 4, $fe, $0, $2 ; person
+    db SPRITE_SAILOR, $6 + 4, $5 + 4, $ff, $d2, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+CeladonHouseBlocks: ; 16
+    INCBIN "maps/celadonhouse2.blk"
+
+CeladonHotel_h: ; 0x4925d to 0x49269 (12 bytes) (bank=12) (id=140)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw CeladonHotelBlocks, CeladonHotelTexts, CeladonHotelScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonHotelObject ; objects
+
+CeladonHotelScript: ; 0x49269
+    jp $3c3c
+; 0x4926c
+
+CeladonHotelTexts: ; 0x4926c
+    dw CeladonHotelText1, CeladonHotelText2, CeladonHotelText3
+
+CeladonHotelText1: ; 0x49272
+    TX_FAR _CeladonHotelText1
+    db $50
+
+CeladonHotelText2: ; 0x49277
+    TX_FAR _CeladonHotelText2
+    db $50
+
+CeladonHotelText3: ; 0x4927c
+    TX_FAR _CeladonHotelText3
+    db $50
+
+CeladonHotelObject: ; 0x49281 (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $c, $ff
+    db $7, $4, $c, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_OLD_MEDIUM_WOMAN, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_FOULARD_WOMAN, $4 + 4, $2 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $4 + 4, $8 + 4, $fe, $2, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+CeladonHotelBlocks: ; 28
+    INCBIN "maps/celadonhotel.blk"
+
+MtMoonPokecenter_h: ; 0x492c3 to 0x492cf (12 bytes) (bank=12) (id=68)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw MtMoonPokecenterBlocks, $52d5, MtMoonPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw MtMoonPokecenterObject ; objects
+
+MtMoonPokecenterScript: ; 0x492cf
+    call $22fa
+    jp $3c3c
+; 0x492d5
+
+INCBIN "baserom.gbc",$492d5,$d
+
+MtMoonPokecenterText2:
+MtMoonPokecenterText1: ; 0x492e2
+    TX_FAR _MtMoonPokecenterText1
+    db $50
+
+MtMoonPokecenterText3: ; 0x492e7
+    TX_FAR _MtMoonPokecenterText3
+    db $50
+
+MtMoonPokecenterText4: ; 0x492ec
+    db $08 ; asm
+    ld a, [$d7c6]
+    add a
+    jp c, $5353
+    ld hl, $535c
+    call PrintText
+    ld a, $13
+    ld [$d125], a
+    call $30e8
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jp nz, $534e
+    ldh [$9f], a
+    ldh [$a1], a
+    ld a, $5
+    ldh [$a0], a
+    call $35a6
+    jr nc, .asm_faa09 ; 0x49317
+    ld hl, $5366
+    jr .asm_ae354 ; 0x4931c
+.asm_faa09 ; 0x4931e
+	ld bc,(MAGIKARP << 8) | 5
+    call GivePokemon
+    jr nc, .asm_38361 ; 0x49324
+    xor a
+    ld [W_WHICHTRADE], a
+    ld [$cd3f], a
+    ld a, $5
+    ld [$cd3e], a
+    ld hl, $cd3f
+    ld de, $d349
+    ld c, $3
+    ld a, $c
+    call Predef
+    ld a, $13
+    ld [$d125], a
+    call $30e8
+    ld hl, $d7c6
+    set 7, [hl]
+    jr .asm_38361 ; 0x4934c
+    ld hl, $5361
+    jr .asm_ae354 ; 0x49351
+    ld hl, $536b
+.asm_ae354 ; 0x49356
+    call PrintText
+.asm_38361 ; 0x49359
+    jp $24d7
+
+INCBIN "baserom.gbc",$4935c,$14
+
+MtMoonPokecenterText5: ; 0x49370
+    TX_FAR _MtMoonPokecenterText5
+    db $50
+
+MtMoonPokecenterText6:
+    db $f6
+
+MtMoonPokecenterObject: ; 0x49376 (size=56)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $0, $ff
+    db $7, $4, $0, $ff
+
+    db $0 ; signs
+
+    db $6 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_BUG_CATCHER, $3 + 4, $4 + 4, $ff, $d1, $2 ; person
+    db SPRITE_GENTLEMAN, $3 + 4, $7 + 4, $ff, $d1, $3 ; person
+    db SPRITE_FAT_BALD_GUY, $6 + 4, $a + 4, $fe, $2, $4 ; person
+    db SPRITE_CLIPBOARD, $2 + 4, $7 + 4, $ff, $ff, $5 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $6 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+RockTunnelPokecenter_h: ; 0x493ae to 0x493ba (12 bytes) (id=81)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw $40ab, $53c0, RockTunnelPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw RockTunnelPokecenterObject ; objects
+
+RockTunnelPokecenterScript: ; 0x493ba
+    call $22fa
+    jp $3c3c
+; 0x493c0
+
+INCBIN "baserom.gbc",$493c0,$9
+
+RockTunnelPokecenterText2:
+RockTunnelPokecenterText1: ; 0x493c9
+    TX_FAR _RockTunnelPokecenterText1
+
+INCBIN "baserom.gbc",$493cd,$493ce - $493cd
+
+RockTunnelPokecenterText3: ; 0x493ce
+    TX_FAR _RockTunnelPokecenterText3
+    db $50
+
+RockTunnelPokecenterText4: ; 0x493d3
+    db $f6
+
+RockTunnelPokecenterObject: ; 0x493d4 (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $0, $ff
+    db $7, $4, $0, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GENTLEMAN, $3 + 4, $7 + 4, $fe, $2, $2 ; person
+    db SPRITE_FISHER2, $5 + 4, $2 + 4, $ff, $ff, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+Route11Gate_h: ; 0x49400 to 0x4940c (12 bytes) (id=84)
+    db $0c ; tileset
+    db $05, $04 ; dimensions (y, x)
+    dw Route11GateBlocks, Route11GateTexts, Route11GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route11GateObject ; objects
+
+Route11GateScript: ; 0x4940c
+    jp $3c3c
+; 0x4940f
+
+Route11GateTexts: ; 0x4940f
+    dw Route11GateText1
+
+Route11GateText1: ; 0x49411
+    TX_FAR _Route11GateText1
+    db $50
+
+Route11GateObject: ; 0x49416 (size=50)
+    db $a ; border tile
+
+    db $5 ; warps
+    db $4, $0, $0, $ff
+    db $5, $0, $1, $ff
+    db $4, $7, $2, $ff
+    db $5, $7, $3, $ff
+    db $8, $6, $0, ROUTE_11_GATE_2F
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $1 + 4, $4 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $4, $0
+    EVENT_DISP $4, $5, $0
+    EVENT_DISP $4, $4, $7
+    EVENT_DISP $4, $5, $7
+    EVENT_DISP $4, $8, $6 ; ROUTE_11_GATE_2F
+
+Route11GateUpstairs_h: ; 0x49448 to 0x49454 (12 bytes) (id=86)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw Route11GateUpstairsBlocks, $5457, Route11GateUpstairsScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route11GateUpstairsObject ; objects
+
+Route11GateUpstairsScript: ; 0x49454
+    jp $3c3f
+; 0x49457
+
+INCBIN "baserom.gbc",$49457,$8
+
+Route11GateUpstairsText1: ; 0x4945f
+    db $08 ; asm
+    xor a
+    ld [W_WHICHTRADE], a
+    ld a, $54
+    call Predef
+asm_49469:
+    jp $24d7
+
+Route11GateUpstairsText2: ; 0x4946c
+    db $8
+    ld a, [$d7d6]
+    add a
+    jr c, .asm_4949b ; 0x49471 $28
+    ld a, $1e
+    ld [$ff00+$db], a
+    ld a, $47
+    ld [$ff00+$dc], a
+    ld [$d11e], a
+    call $2fcf
+    ld h, d
+    ld l, e
+    ld de, $cc5b
+    ld bc, $000d
+    call CopyData
+    ld a, $62
+    call Predef
+    ld a, [$ff00+$db]
+    dec a
+    jr nz, .asm_494a1 ; 0x49494 $b
+    ld hl, $d7d6
+    set 7, [hl]
+.asm_4949b
+    ld hl, $54a3
+    call PrintText
+.asm_494a1
+    jr asm_49469 ; 0x494a1 $c6
+; 0x494a3
+
+INCBIN "baserom.gbc",$494a3,$5
+
+Route11GateUpstairsText3: ; 0x494a8
+    db $08 ; asm
+    ld a, [$c109]
+    cp $4
+    jp nz, $55c9
+    ld a, [$d7d8]
+    bit 7, a
+    ld hl, $54c4
+    jr z, .asm_5ac80 ; 0x494b9
+    ld hl, $54c9
+.asm_5ac80 ; 0x494be
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$494c4,$494ce - $494c4
+
+Route11GateUpstairsText4: ; 0x494ce
+    db $8
+    ld hl, $54d5
+    jp $55c9
+; 0x494d5
+
+INCBIN "baserom.gbc",$494d5,$5
+
+Route11GateUpstairsObject: ; 0x494da (size=30)
+    db $a ; border tile
+
+    db $1 ; warps
+    db $7, $7, $4, ROUTE_11_GATE_1F
+
+    db $2 ; signs
+    db $2, $1, $3 ; Route11GateUpstairsText3
+    db $2, $6, $4 ; Route11GateUpstairsText4
+
+    db $2 ; people
+    db SPRITE_BUG_CATCHER, $2 + 4, $4 + 4, $fe, $2, $1 ; person
+    db SPRITE_OAK_AIDE, $6 + 4, $2 + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $7 ; ROUTE_11_GATE_1F
+
+Route12Gate_h: ; 0x494f8 to 0x49504 (12 bytes) (id=87)
+    db $0c ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw Route12GateBlocks, Route12GateTexts, Route12GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route12GateObject ; objects
+
+Route12GateScript: ; 0x49504
+    jp $3c3c
+; 0x49507
+
+Route12GateTexts: ; 0x49507
+    dw Route12GateText1
+
+Route12GateText1: ; 0x49509
+    TX_FAR _Route12GateText1
+    db $50
+
+Route12GateObject: ; 0x4950e (size=50)
+    db $a ; border tile
+
+    db $5 ; warps
+    db $0, $4, $0, $ff
+    db $0, $5, $1, $ff
+    db $7, $4, $2, $ff
+    db $7, $5, $2, $ff
+    db $6, $8, $0, ROUTE_12_GATE_2F
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $3 + 4, $1 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $0, $4
+    EVENT_DISP $5, $0, $5
+    EVENT_DISP $5, $7, $4
+    EVENT_DISP $5, $7, $5
+    EVENT_DISP $5, $6, $8 ; ROUTE_12_GATE_2F
+
+Route12GateBlocks: ; 20
+    INCBIN "maps/route12gate.blk"
+
+Route12GateUpstairs_h: ; 0x49554 to 0x49560 (12 bytes) (id=195)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $40db, Route12GateUpstairsTexts, Route12GateUpstairsScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route12GateUpstairsObject ; objects
+
+Route12GateUpstairsScript: ; 0x49560
+    jp $3c3f
+; 0x49563
+
+Route12GateUpstairsTexts: ; 0x49563
+    dw Route12GateUpstairsText1, Route12GateUpstairsText2, Route12GateUpstairsText3
+
+Route12GateUpstairsText1: ; 0x49569
+    db $08 ; asm
+    ld a, [$d7d7]
+    rrca
+    jr c, .asm_0ad3c ; 0x4956e
+    ld hl, $559c
+    call PrintText
+    ld bc,(TM_39 << 8) | 1
+    call $3e2e
+    jr nc, .asm_4c2be ; 0x4957c
+    ld hl, $55a1
+    call PrintText
+    ld hl, $d7d7
+    set 0, [hl]
+    jr .asm_4ba56 ; 0x49589
+.asm_4c2be ; 0x4958b
+    ld hl, $55ac
+    call PrintText
+    jr .asm_4ba56 ; 0x49591
+.asm_0ad3c ; 0x49593
+    ld hl, $55a7
+    call PrintText
+.asm_4ba56 ; 0x49599
+    jp $24d7
+
+INCBIN "baserom.gbc",$4959c,$495b1 - $4959c
+
+Route12GateUpstairsText2: ; 0x495b1
+    db $08 ; asm
+    ld hl, $55b8
+    jp $55c9
+
+;TX_FAR at 0x495b8
+db $17, $5a, $49, $23, $50
+
+Route12GateUpstairsText3: ; 0x495bd
+    db $8
+    ld hl, $55c4
+    jp $55c9
+; 0x495c4
+
+INCBIN "baserom.gbc",$495c4,$495de-$495c4
+
+Route12GateUpstairsObject: ; 0x495de (size=24)
+    db $a ; border tile
+
+    db $1 ; warps
+    db $7, $7, $4, ROUTE_12_GATE
+
+    db $2 ; signs
+    db $2, $1, $2 ; Route12GateUpstairsText2
+    db $2, $6, $3 ; Route12GateUpstairsText3
+
+    db $1 ; people
+    db SPRITE_BRUNETTE_GIRL, $4 + 4, $3 + 4, $fe, $1, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $7 ; ROUTE_12_GATE
+
+Route15Gate_h: ; 0x495f6 to 0x49602 (12 bytes) (id=184)
+    db $0c ; tileset
+    db $05, $04 ; dimensions (y, x)
+    dw $40c7, Route15GateTexts, Route15GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route15GateObject ; objects
+
+Route15GateScript: ; 0x49602
+    jp $3c3c
+; 0x49605
+
+Route15GateTexts: ; 0x49605
+    dw Route15GateText1
+
+Route15GateText1: ; 0x49607
+    TX_FAR _Route15GateText1
+    db $50
+
+Route15GateObject: ; 0x4960c (size=50)
+    db $a ; border tile
+
+    db $5 ; warps
+    db $4, $0, $0, $ff
+    db $5, $0, $1, $ff
+    db $4, $7, $2, $ff
+    db $5, $7, $3, $ff
+    db $8, $6, $0, $b9
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $1 + 4, $4 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $4, $0
+    EVENT_DISP $4, $5, $0
+    EVENT_DISP $4, $4, $7
+    EVENT_DISP $4, $5, $7
+    EVENT_DISP $4, $8, $6
+
+INCBIN "baserom.gbc",$4963e,$74
+
+Route16GateMap_h: ; 0x496b2 to 0x496be (12 bytes) (id=186)
+    db $0c ; tileset
+    db $07, $04 ; dimensions (y, x)
+    dw Route16GateMapBlocks, Route16GateMapTexts, Route16GateMapScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route16GateMapObject ; objects
+
+Route16GateMapScript: ; 0x496be
+    ld hl, $d732
+    res 5, [hl]
+    call $3c3c
+    ld a, [$d660]
+    ld hl, $56cf
+    jp $3d97
+; 0x496cf
+
+Route16GateMapScripts: ; 0x496cf
+    dw Route16GateMapScript0
+
+INCBIN "baserom.gbc",$496d1,$6
+
+Route16GateMapScript0: ; 0x496d7
+    call $5755
+    ret nz
+    ld hl, $5714
+    call $34bf
+    ret nc
+    ld a, $3
+    ld [$ff00+$8c], a
+    call $2920
+    xor a
+    ld [$ff00+$b4], a
+    ld a, [$cd3d]
+    cp $1
+    jr z, .asm_4970e ; 0x496f1 $1b
+    ld a, [$cd3d]
+    dec a
+    ld [$cd38], a
+    ld b, $0
+    ld c, a
+    ld a, $40
+    ld hl, $ccd3
+    call $36e0
+    call $3486
+    ld a, $1
+    ld [$d660], a
+    ret
+.asm_4970e
+    ld a, $2
+    ld [$d660], a
+    ret
+; 0x49714
+
+INCBIN "baserom.gbc",$49714,$46
+
+Route16GateMapTexts: ; 0x4975a
+    dw Route16GateMapText1, Route16GateMapText2, Route16GateMapText3
+
+Route16GateMapText1: ; 0x49760
+    db $08 ; asm
+    call $5755
+    jr z, .asm_0bdf3 ; 0x49764
+    ld hl, $577c
+    call PrintText
+    jr .asm_56c9d ; 0x4976c
+.asm_0bdf3 ; 0x4976e
+    ld hl, $5777
+    call PrintText
+.asm_56c9d ; 0x49774
+    jp $24d7
+
+INCBIN "baserom.gbc",$49777,$49781 - $49777
+
+Route16GateMapText3: ; 0x49781
+INCBIN "baserom.gbc",$49781,5
+
+Route16GateMapText2: ; 0x49786
+    TX_FAR _Route16GateMapText2
+    db $50
+
+Route16GateMapObject: ; 0x4978b (size=88)
+    db $a ; border tile
+
+    db $9 ; warps
+    db $8, $0, $0, $ff
+    db $9, $0, $1, $ff
+    db $8, $7, $2, $ff
+    db $9, $7, $2, $ff
+    db $2, $0, $4, $ff
+    db $3, $0, $5, $ff
+    db $2, $7, $6, $ff
+    db $3, $7, $7, $ff
+    db $c, $6, $0, ROUTE_16_GATE_2F
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_GUARD, $5 + 4, $4 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GAMBLER, $3 + 4, $4 + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $8, $0
+    EVENT_DISP $4, $9, $0
+    EVENT_DISP $4, $8, $7
+    EVENT_DISP $4, $9, $7
+    EVENT_DISP $4, $2, $0
+    EVENT_DISP $4, $3, $0
+    EVENT_DISP $4, $2, $7
+    EVENT_DISP $4, $3, $7
+    EVENT_DISP $4, $c, $6 ; ROUTE_16_GATE_2F
+
+Route16GateMapBlocks: ; 28
+    INCBIN "maps/route16gatemap.blk"
+
+Route16GateUpstairs_h: ; 0x497ff to 0x4980b (12 bytes) (id=187)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $40db, Route16GateUpstairsTexts, Route16GateUpstairsScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route16GateUpstairsObject ; objects
+
+Route16GateUpstairsScript: ; 0x4980b
+    jp $3c3f
+; 0x4980e
+
+Route16GateUpstairsTexts: ; 0x4980e
+    dw Route16GateUpstairsText1, Route16GateUpstairsText2, Route16GateUpstairsText3, Route16GateUpstairsText4
+
+Route16GateUpstairsText1: ; 0x49816
+    db $08 ; asm
+    ld hl, $5820
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$49820,$49825 - $49820
+
+Route16GateUpstairsText2: ; 0x49825
+    db $08 ; asm
+    ld hl, $582f
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$4982f,$49834 - $4982f
+
+Route16GateUpstairsText3: ; 0x49834
+    db $8
+    ld hl, $583b
+    jp $55c9
+; 0x4983b
+
+INCBIN "baserom.gbc",$4983b,$5
+
+Route16GateUpstairsText4: ; 0x49840
+    db $8
+    ld hl, $5847
+    jp $55c9
+; 0x49847
+
+INCBIN "baserom.gbc",$49847,$5
+
+Route16GateUpstairsObject: ; 0x4984c (size=30)
+    db $a ; border tile
+
+    db $1 ; warps
+    db $7, $7, $8, ROUTE_16_GATE_1F
+
+    db $2 ; signs
+    db $2, $1, $3 ; Route16GateUpstairsText3
+    db $2, $6, $4 ; Route16GateUpstairsText4
+
+    db $2 ; people
+    db SPRITE_YOUNG_BOY, $2 + 4, $4 + 4, $ff, $ff, $1 ; person
+    db SPRITE_LITTLE_GIRL, $5 + 4, $2 + 4, $fe, $2, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $7 ; ROUTE_16_GATE_1F
+
+Route18Gate_h: ; 0x4986a to 0x49876 (12 bytes) (id=190)
+    db $0c ; tileset
+    db $05, $04 ; dimensions (y, x)
+    dw $40c7, Route18GateTexts, Route18GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route18GateObject ; objects
+
+Route18GateScript: ; 0x49876
+    ld hl, $d732
+    res 5, [hl]
+    call $3c3c
+    ld a, [$d669]
+    ld hl, $5887
+    jp $3d97
+; 0x49887
+
+Route18GateScripts: ; 0x49887
+    dw Route18GateScript0
+
+INCBIN "baserom.gbc",$49889,$6
+
+Route18GateScript0: ; 0x4988f
+    call $5755
+    ret nz
+    ld hl, $58cc
+    call $34bf
+    ret nc
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $2920
+    xor a
+    ld [$ff00+$b4], a
+    ld a, [$cd3d]
+    cp $1
+    jr z, .asm_498c6 ; 0x498a9 $1b
+    ld a, [$cd3d]
+    dec a
+    ld [$cd38], a
+    ld b, $0
+    ld c, a
+    ld a, $40
+    ld hl, $ccd3
+    call $36e0
+    call $3486
+    ld a, $1
+    ld [$d669], a
+    ret
+.asm_498c6
+    ld a, $2
+    ld [$d669], a
+    ret
+; 0x498cc
+
+INCBIN "baserom.gbc",$498cc,$41
+
+Route18GateTexts: ; 0x4990d
+    dw Route18GateText1, Route18GateText2
+
+Route18GateText1: ; 0x49911
+    db $08 ; asm
+    call $5755
+    jr z, .asm_3c84d ; 0x49915
+    ld hl, $592d
+    call PrintText
+    jr .asm_a8410 ; 0x4991d
+.asm_3c84d ; 0x4991f
+    ld hl, $5928
+    call PrintText
+.asm_a8410 ; 0x49925
+    jp $24d7
+
+INCBIN "baserom.gbc",$49928,$49932 - $49928
+
+Route18GateText2: ; 0x49932
+INCBIN "baserom.gbc",$49932,5
+
+Route18GateObject: ; 0x49937 (size=50)
+    db $a ; border tile
+
+    db $5 ; warps
+    db $4, $0, $0, $ff
+    db $5, $0, $1, $ff
+    db $4, $7, $2, $ff
+    db $5, $7, $3, $ff
+    db $8, $6, $0, ROUTE_18_GATE_2F
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GUARD, $1 + 4, $4 + 4, $ff, $d0, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $4, $0
+    EVENT_DISP $4, $5, $0
+    EVENT_DISP $4, $4, $7
+    EVENT_DISP $4, $5, $7
+    EVENT_DISP $4, $8, $6 ; ROUTE_18_GATE_2F
+
+Route18GateHeader_h: ; 0x49969 to 0x49975 (12 bytes) (id=191)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $40db, Route18GateHeaderTexts, Route18GateHeaderScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route18GateHeaderObject ; objects
+
+Route18GateHeaderScript: ; 0x49975
+    jp $3c3f
+; 0x49978
+
+Route18GateHeaderTexts: ; 0x49978
+    dw Route18GateHeaderText1, Route18GateHeaderText2, Route18GateHeaderText3
+
+Route18GateHeaderText1: ; 0x4997e
+    db $08 ; asm
+    ld a, $5
+    ld [W_WHICHTRADE], a
+    ld a, $54
+    call Predef
+    jp $24d7
+
+Route18GateHeaderText2: ; 0x4998c
+    db $8
+    ld hl, $5993
+    jp $55c9
+; 0x49993
+
+INCBIN "baserom.gbc",$49993,$5
+
+Route18GateHeaderText3: ; 0x49998
+    db $8
+    ld hl, $599f
+    jp $55c9
+; 0x4999f
+
+INCBIN "baserom.gbc",$4999f,$5
+
+Route18GateHeaderObject: ; 0x499a4 (size=24)
+    db $a ; border tile
+
+    db $1 ; warps
+    db $7, $7, $4, ROUTE_18_GATE_1F
+
+    db $2 ; signs
+    db $2, $1, $2 ; Route18GateHeaderText2
+    db $2, $6, $3 ; Route18GateHeaderText3
+
+    db $1 ; people
+    db SPRITE_BUG_CATCHER, $2 + 4, $4 + 4, $fe, $2, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $7 ; ROUTE_18_GATE_1F
+
+MtMoon1_h: ; 0x499bc to 0x499c8 (12 bytes) (id=59)
+    db $11 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw MtMoon1Blocks, MtMoon1Texts, MtMoon1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw MtMoon1Object ; objects
+
+MtMoon1Script: ; 0x499c8
+    call $3c3c
+    ld hl, $59fd
+    ld de, $59db
+    ld a, [$d606]
+    call $3160
+    ld [$d606], a
+    ret
+; 0x499db
+
+INCBIN "baserom.gbc",$499db,$6
+
+MtMoon1Texts: ; 0x499e1
+    dw MtMoon1Text1, MtMoon1Text2, MtMoon1Text3, MtMoon1Text4, MtMoon1Text5, MtMoon1Text6, MtMoon1Text7, MtMoon1Text8, MtMoon1Text9, MtMoon1Text10, MtMoon1Text11, MtMoon1Text12, MtMoon1Text13, MtMoon1Text14
+
+INCBIN "baserom.gbc",$499fd,$55
+
+MtMoon1Text1: ; 0x49a52
+    db $08 ; asm
+    ld hl, $59fd
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon1Text2: ; 0x49a5c
+    db $08 ; asm
+    ld hl, $5a09
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon1Text3: ; 0x49a66
+    db $08 ; asm
+    ld hl, $5a15
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon1Text4: ; 0x49a70
+    db $08 ; asm
+    ld hl, $5a21
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon1Text5: ; 0x49a7a
+    db $08 ; asm
+    ld hl, $5a2d
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon1Text6: ; 0x49a84
+    db $08 ; asm
+    ld hl, $5a39
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon1Text7: ; 0x49a8e
+    db $08 ; asm
+    ld hl, $5a45
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$49a98,$69
+
+MtMoon1Text14: ; 0x49b01
+    TX_FAR _MtMoon1Text14
+    db $50
+
+MtMoon1Object: ; 0x49b06 (size=145)
+    db $3 ; border tile
+
+    db $5 ; warps
+    db $23, $e, $1, $ff
+    db $23, $f, $1, $ff
+    db $5, $5, $0, MT_MOON_2
+    db $b, $11, $2, MT_MOON_2
+    db $f, $19, $3, MT_MOON_2
+
+    db $1 ; signs
+    db $17, $f, $e ; MtMoon1Text14
+
+    db $d ; people
+    db SPRITE_HIKER, $6 + 4, $5 + 4, $ff, $d0, $41, HIKER + $C8, $1 ; trainer
+    db SPRITE_BUG_CATCHER, $10 + 4, $c + 4, $ff, $d3, $42, YOUNGSTER + $C8, $3 ; trainer
+    db SPRITE_LASS, $4 + 4, $1e + 4, $ff, $d0, $43, LASS + $C8, $5 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $1f + 4, $18 + 4, $ff, $d1, $44, SUPER_NERD + $C8, $1 ; trainer
+    db SPRITE_LASS, $17 + 4, $10 + 4, $ff, $d0, $45, LASS + $C8, $6 ; trainer
+    db SPRITE_BUG_CATCHER, $16 + 4, $7 + 4, $ff, $d0, $46, BUG_CATCHER + $C8, $7 ; trainer
+    db SPRITE_BUG_CATCHER, $1b + 4, $1e + 4, $ff, $d3, $47, BUG_CATCHER + $C8, $8 ; trainer
+	db SPRITE_BALL, $14 + 4, $2 + 4, $ff, $ff, $88, POTION ; item
+	db SPRITE_BALL, $2 + 4, $2 + 4, $ff, $ff, $89, MOON_STONE ; item
+	db SPRITE_BALL, $1f + 4, $23 + 4, $ff, $ff, $8a, RARE_CANDY ; item
+	db SPRITE_BALL, $17 + 4, $24 + 4, $ff, $ff, $8b, ESCAPE_ROPE ; item
+	db SPRITE_BALL, $21 + 4, $14 + 4, $ff, $ff, $8c, POTION ; item
+	db SPRITE_BALL, $20 + 4, $5 + 4, $ff, $ff, $8d, TM_12 ; item
+
+    ; warp-to
+    EVENT_DISP $14, $23, $e
+    EVENT_DISP $14, $23, $f
+    EVENT_DISP $14, $5, $5 ; MT_MOON_2
+    EVENT_DISP $14, $b, $11 ; MT_MOON_2
+    EVENT_DISP $14, $f, $19 ; MT_MOON_2
+
+MtMoon1Blocks: ; 360
+    INCBIN "maps/mtmoon1.blk"
+
+MtMoon3_h: ; 0x49cff to 0x49d0b (12 bytes) (id=61)
+    db $11 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw MtMoon3Blocks, MtMoon3Texts, MtMoon3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw MtMoon3Object ; objects
+
+MtMoon3Script: ; 0x49d0b
+    call $3c3c
+    ld hl, $5e48
+    ld de, $5d63
+    ld a, [$d607]
+    call $3160
+    ld [$d607], a
+    ld a, [$d7f6]
+    bit 1, a
+    ret z
+    ld hl, $5d37
+    call $34bf
+    jr nc, .asm_49d31 ; 0x49d29 $6
+    ld hl, $d72e
+    set 4, [hl]
+    ret
+.asm_49d31
+    ld hl, $d72e
+    res 4, [hl]
+    ret
+; 0x49d37
+
+INCBIN "baserom.gbc",$49d37,$fd
+
+MtMoon3Texts: ; 0x49e34
+    dw MtMoon3Text1, MtMoon3Text2, MtMoon3Text3, MtMoon3Text4, MtMoon3Text5, MtMoon3Text6, MtMoon3Text7, MtMoon3Text8, MtMoon3Text9
+
+INCBIN "baserom.gbc",$49e46,$33
+
+MtMoon3Text1: ; 0x49e79
+    db $08 ; asm
+    ld a, [$d7f6]
+    bit 1, a
+    jr z, .asm_be1e0 ; 0x49e7f
+    and $c0
+    jr nz, .asm_f8cd4 ; 0x49e83
+    ld hl, $5f8f
+    call PrintText
+    jr .asm_f1fba ; 0x49e8b
+.asm_be1e0 ; 0x49e8d
+    ld hl, $5f85
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $5f8a
+    ld de, $5f8a
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $3
+    ld [$d607], a
+    ld [$da39], a
+    jr .asm_f1fba ; 0x49eb6
+.asm_f8cd4 ; 0x49eb8
+    ld hl, $5f94
+    call PrintText
+.asm_f1fba ; 0x49ebe
+    jp $24d7
+
+MtMoon3Text2: ; 0x49ec1
+    db $08 ; asm
+    ld hl, $5e48
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon3Text3: ; 0x49ecb
+    db $08 ; asm
+    ld hl, $5e54
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon3Text4: ; 0x49ed5
+    db $08 ; asm
+    ld hl, $5e60
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon3Text5: ; 0x49edf
+    db $08 ; asm
+    ld hl, $5e6c
+    call LoadTrainerHeader
+    jp $24d7
+
+MtMoon3Text6: ; 0x49ee9
+    db $08 ; asm
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $5f24
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_1fa5e ; 0x49efc
+    ld bc,(DOME_FOSSIL << 8) | 1
+    call $3e2e
+    jp nc, $5f76
+    call $5f69
+    ld a, $6d
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld hl, $d7f6
+    set 6, [hl]
+    ld a, $4
+    ld [$d607], a
+    ld [$da39], a
+.asm_1fa5e ; 0x49f21
+    jp $24d7
+
+INCBIN "baserom.gbc",$49f24,$49f29 - $49f24
+
+MtMoon3Text7: ; 0x49f29
+    db $08 ; asm
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $5f64
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_8e988 ; 0x49f3c
+    ld bc,(HELIX_FOSSIL << 8) | 1
+    call $3e2e
+    jp nc, $5f76
+    call $5f69
+    ld a, $6e
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld hl, $d7f6
+    set 7, [hl]
+    ld a, $4
+    ld [$d607], a
+    ld [$da39], a
+.asm_8e988 ; 0x49f61
+    jp $24d7
+
+INCBIN "baserom.gbc",$49f64,$77
+
+MtMoon3Object: ; 0x49fdb (size=102)
+    db $3 ; border tile
+
+    db $4 ; warps
+    db $9, $19, $1, MT_MOON_2
+    db $11, $15, $4, MT_MOON_2
+    db $1b, $f, $5, MT_MOON_2
+    db $7, $5, $6, MT_MOON_2
+
+    db $0 ; signs
+
+    db $9 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $8 + 4, $c + 4, $ff, $d3, $41, SUPER_NERD + $C8, $2 ; trainer
+    db SPRITE_ROCKET, $10 + 4, $b + 4, $ff, $d0, $42, ROCKET + $C8, $1 ; trainer
+    db SPRITE_ROCKET, $16 + 4, $f + 4, $ff, $d0, $43, ROCKET + $C8, $2 ; trainer
+    db SPRITE_ROCKET, $b + 4, $1d + 4, $ff, $d1, $44, ROCKET + $C8, $3 ; trainer
+    db SPRITE_ROCKET, $11 + 4, $1d + 4, $ff, $d2, $45, ROCKET + $C8, $4 ; trainer
+    db SPRITE_OMANYTE, $6 + 4, $c + 4, $ff, $ff, $6 ; person
+    db SPRITE_OMANYTE, $6 + 4, $d + 4, $ff, $ff, $7 ; person
+	db SPRITE_BALL, $15 + 4, $19 + 4, $ff, $ff, $88, HP_UP ; item
+	db SPRITE_BALL, $5 + 4, $1d + 4, $ff, $ff, $89, TM_01 ; item
+
+    ; warp-to
+    EVENT_DISP $14, $9, $19 ; MT_MOON_2
+    EVENT_DISP $14, $11, $15 ; MT_MOON_2
+    EVENT_DISP $14, $1b, $f ; MT_MOON_2
+    EVENT_DISP $14, $7, $5 ; MT_MOON_2
+
+MtMoon3Blocks: ; 360
+    INCBIN "maps/mtmoon3.blk"
+
+SafariZoneWest_h: ; 0x4a1a9 to 0x4a1b5 (12 bytes) (id=219)
+    db $03 ; tileset
+    db $0d, $0f ; dimensions (y, x)
+    dw SafariZoneWestBlocks, SafariZoneWestTexts, SafariZoneWestScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneWestObject ; objects
+
+SafariZoneWestScript: ; 0x4a1b5
+    jp $3c3c
+; 0x4a1b8
+
+SafariZoneWestTexts: ; 0x4a1b8
+    dw SafariZoneWestText1, SafariZoneWestText2, SafariZoneWestText3, SafariZoneWestText4, SafariZoneWestText5, SafariZoneWestText6, SafariZoneWestText7, SafariZoneWestText8
+
+SafariZoneWestText5: ; 0x4a1c8
+    TX_FAR _SafariZoneWestText5
+    db $50
+
+SafariZoneWestText6: ; 0x4a1cd
+    TX_FAR _SafariZoneWestText6
+    db $50
+
+SafariZoneWestText7: ; 0x4a1d2
+    TX_FAR _SafariZoneWestText7
+    db $50
+
+SafariZoneWestText8: ; 0x4a1d7
+    TX_FAR _SafariZoneWestText8
+    db $50
+
+SafariZoneWestObject: ; 0x4a1dc (size=108)
+    db $0 ; border tile
+
+    db $8 ; warps
+    db $0, $14, $0, SAFARI_ZONE_NORTH
+    db $0, $15, $1, SAFARI_ZONE_NORTH
+    db $0, $1a, $2, SAFARI_ZONE_NORTH
+    db $0, $1b, $3, SAFARI_ZONE_NORTH
+    db $16, $1d, $2, SAFARI_ZONE_CENTER
+    db $17, $1d, $3, SAFARI_ZONE_CENTER
+    db $3, $3, $0, SAFARI_ZONE_SECRET_HOUSE
+    db $b, $b, $0, SAFARI_ZONE_REST_HOUSE_2
+
+    db $4 ; signs
+    db $c, $c, $5 ; SafariZoneWestText5
+    db $3, $11, $6 ; SafariZoneWestText6
+    db $4, $1a, $7 ; SafariZoneWestText7
+    db $16, $18, $8 ; SafariZoneWestText8
+
+    db $4 ; people
+	db SPRITE_BALL, $14 + 4, $8 + 4, $ff, $ff, $81, MAX_POTION ; item
+	db SPRITE_BALL, $7 + 4, $9 + 4, $ff, $ff, $82, TM_32 ; item
+	db SPRITE_BALL, $12 + 4, $12 + 4, $ff, $ff, $83, MAX_REVIVE ; item
+	db SPRITE_BALL, $7 + 4, $13 + 4, $ff, $ff, $84, GOLD_TEETH ; item
+
+    ; warp-to
+    EVENT_DISP $f, $0, $14 ; SAFARI_ZONE_NORTH
+    EVENT_DISP $f, $0, $15 ; SAFARI_ZONE_NORTH
+    EVENT_DISP $f, $0, $1a ; SAFARI_ZONE_NORTH
+    EVENT_DISP $f, $0, $1b ; SAFARI_ZONE_NORTH
+    EVENT_DISP $f, $16, $1d ; SAFARI_ZONE_CENTER
+    EVENT_DISP $f, $17, $1d ; SAFARI_ZONE_CENTER
+    EVENT_DISP $f, $3, $3 ; SAFARI_ZONE_SECRET_HOUSE
+    EVENT_DISP $f, $b, $b ; SAFARI_ZONE_REST_HOUSE_2
+
+SafariZoneWestBlocks: ; 195
+    INCBIN "maps/safarizonewest.blk"
+
+SafariZoneSecretHouse_h: ; 0x4a30b to 0x4a317 (12 bytes) (id=222)
+    db $14 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw SafariZoneSecretHouseBlocks, SafariZoneSecretHouseTexts, SafariZoneSecretHouseScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneSecretHouseObject ; objects
+
+SafariZoneSecretHouseScript: ; 0x4a317
+    jp $3c3c
+; 0x4a31a
+
+SafariZoneSecretHouseTexts: ; 0x4a31a
+    dw SafariZoneSecretHouseText1
+
+SafariZoneSecretHouseText1: ; 0x4a31c
+    db $08 ; asm
+    ld a, [$d857]
+    bit 0, a
+    jr nz, .asm_20a9b ; 0x4a322
+    ld hl, $6350
+    call PrintText
+    ld bc,(HM_03 << 8) | 1
+    call $3e2e
+    jr nc, .asm_a21d2 ; 0x4a330
+    ld hl, $6355
+    call PrintText
+    ld hl, $d857
+    set 0, [hl]
+    jr .asm_8f1fc ; 0x4a33d
+.asm_a21d2 ; 0x4a33f
+    ld hl, $6360
+    call PrintText
+    jr .asm_8f1fc ; 0x4a345
+.asm_20a9b ; 0x4a347
+    ld hl, $635b
+    call PrintText
+.asm_8f1fc ; 0x4a34d
+    jp $24d7
+
+INCBIN "baserom.gbc",$4a350,$15
+
+SafariZoneSecretHouseObject: ; 0x4a365 (size=26)
+    db $17 ; border tile
+
+    db $2 ; warps
+    db $7, $2, $6, SAFARI_ZONE_WEST
+    db $7, $3, $6, SAFARI_ZONE_WEST
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_FISHER, $3 + 4, $3 + 4, $ff, $d0, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; SAFARI_ZONE_WEST
+    EVENT_DISP $4, $7, $3 ; SAFARI_ZONE_WEST
+
+SafariZoneSecretHouseBlocks: ; 16
+    INCBIN "maps/safarizonesecrethouse.blk"
+
+INCBIN "baserom.gbc",$4a38f,$1c71
+
+SECTION "bank13",DATA,BANK[$13]
+
+YoungsterPic:
+	INCBIN "pic/trainer/youngster.pic"
+BugCatcherPic:
+	INCBIN "pic/trainer/bugcatcher.pic"
+LassPic:
+	INCBIN "pic/trainer/lass.pic"
+SailorPic:
+	INCBIN "pic/trainer/sailor.pic"
+JrTrainerMPic:
+	INCBIN "pic/trainer/jr.trainerm.pic"
+JrTrainerFPic:
+	INCBIN "pic/trainer/jr.trainerf.pic"
+PokemaniacPic:
+	INCBIN "pic/trainer/pokemaniac.pic"
+SuperNerdPic:
+	INCBIN "pic/trainer/supernerd.pic"
+HikerPic:
+	INCBIN "pic/trainer/hiker.pic"
+BikerPic:
+	INCBIN "pic/trainer/biker.pic"
+BurglarPic:
+	INCBIN "pic/trainer/burglar.pic"
+EngineerPic:
+	INCBIN "pic/trainer/engineer.pic"
+FisherPic:
+	INCBIN "pic/trainer/fisher.pic"
+SwimmerPic:
+	INCBIN "pic/trainer/swimmer.pic"
+CueBallPic:
+	INCBIN "pic/trainer/cueball.pic"
+GamblerPic:
+	INCBIN "pic/trainer/gambler.pic"
+BeautyPic:
+	INCBIN "pic/trainer/beauty.pic"
+PsychicPic:
+	INCBIN "pic/trainer/psychic.pic"
+RockerPic:
+	INCBIN "pic/trainer/rocker.pic"
+JugglerPic:
+	INCBIN "pic/trainer/juggler.pic"
+TamerPic:
+	INCBIN "pic/trainer/tamer.pic"
+BirdKeeperPic:
+	INCBIN "pic/trainer/birdkeeper.pic"
+BlackbeltPic:
+	INCBIN "pic/trainer/blackbelt.pic"
+Rival1Pic:
+	INCBIN "pic/trainer/rival1.pic"
+ProfOakPic:
+	INCBIN "pic/trainer/prof.oak.pic"
+ChiefPic:
+ScientistPic:
+	INCBIN "pic/trainer/scientist.pic"
+GiovanniPic:
+	INCBIN "pic/trainer/giovanni.pic"
+RocketPic:
+	INCBIN "pic/trainer/rocket.pic"
+CooltrainerMPic:
+	INCBIN "pic/trainer/cooltrainerm.pic"
+CooltrainerFPic:
+	INCBIN "pic/trainer/cooltrainerf.pic"
+BrunoPic:
+	INCBIN "pic/trainer/bruno.pic"
+BrockPic:
+	INCBIN "pic/trainer/brock.pic"
+MistyPic:
+	INCBIN "pic/trainer/misty.pic"
+LtSurgePic:
+	INCBIN "pic/trainer/lt.surge.pic"
+ErikaPic:
+	INCBIN "pic/trainer/erika.pic"
+KogaPic:
+	INCBIN "pic/trainer/koga.pic"
+BlainePic:
+	INCBIN "pic/trainer/blaine.pic"
+SabrinaPic:
+	INCBIN "pic/trainer/sabrina.pic"
+GentlemanPic:
+	INCBIN "pic/trainer/gentleman.pic"
+Rival2Pic:
+	INCBIN "pic/trainer/rival2.pic"
+Rival3Pic:
+	INCBIN "pic/trainer/rival3.pic"
+LoreleiPic:
+	INCBIN "pic/trainer/lorelei.pic"
+ChannelerPic:
+	INCBIN "pic/trainer/channeler.pic"
+AgathaPic:
+	INCBIN "pic/trainer/agatha.pic"
+LancePic:
+	INCBIN "pic/trainer/lance.pic"
+
+BattleCenterM_h: ; 0x4fd04 to 0x4fd10 (12 bytes) (id=239)
+    db $15 ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw BattleCenterMBlocks, BattleCenterMTexts, BattleCenterMScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw BattleCenterMObject ; objects
+
+BattleCenterMScript: ; 0x4fd10
+    call $3c3c
+    ld a, [$ff00+$aa]
+    cp $2
+    ld a, $8
+    jr z, .asm_4fd1d ; 0x4fd19 $2
+    ld a, $c
+.asm_4fd1d
+    ld [$ff00+$8d], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $34ae
+    ld hl, $d72d
+    bit 0, [hl]
+    set 0, [hl]
+    ret nz
+    ld hl, $c214
+    ld a, $8
+    ld [hli], a
+    ld a, $a
+    ld [hl], a
+    ld a, $8
+    ld [$c119], a
+    ld a, [$ff00+$aa]
+    cp $2
+    ret z
+    ld a, $7
+    ld [$c215], a
+    ld a, $c
+    ld [$c119], a
+    ret
+; 0x4fd4c
+
+BattleCenterMTexts: ; 0x4fd4c
+    dw BattleCenterMText1
+
+BattleCenterMText1: ; 0x4fd4e
+    TX_FAR _BattleCenterMText1
+    db $50
+
+BattleCenterMObject: ; 0x4fd53 (size=10)
+    db $e ; border tile
+
+    db $0 ; warps
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_RED, $2 + 4, $2 + 4, $ff, $0, $1 ; person
+
+BattleCenterMBlocks: ; 20
+    INCBIN "maps/battlecenterm.blk"
+
+TradeCenterM_h: ; 0x4fd71 to 0x4fd7d (12 bytes) (id=240)
+    db $15 ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw TradeCenterMBlocks, TradeCenterMTexts, TradeCenterMScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw TradeCenterMObject ; objects
+
+TradeCenterMScript: ; 0x4fd7d
+    jp $7d10
+; 0x4fd80
+
+TradeCenterMTexts: ; 0x4fd80
+    dw TradeCenterMText1
+
+TradeCenterMText1: ; 0x4fd82
+    TX_FAR _TradeCenterMText1
+    db $50
+
+TradeCenterMObject: ; 0x4fd87 (size=10)
+    db $e ; border tile
+
+    db $0 ; warps
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_RED, $2 + 4, $2 + 4, $ff, $0, $1 ; person
+
+TradeCenterMBlocks: ; 20
+    INCBIN "maps/tradecenterm.blk"
+
+INCBIN "baserom.gbc",$4fda5,$a4
+
+GetPredefPointer: ; 7E49
+; stores hl in $CC4F,$CC50
+; stores de in $CC51,$CC52
+; stores bc in $CC53,$CC54
+; grabs a byte "n" from $CC4E,
+;    and gets the nth (3-byte) pointer in PredefPointers
+; stores the bank of said pointer in [$D0B7]
+; stores the pointer in hl and returns
+        ; ld $CC4F,hl
+        ld a,h
+        ld [$CC4F],a
+        ld a,l
+        ld [$CC50],a
+
+        ; ld $CC51,de
+        ld hl,$CC51
+        ld a,d
+        ld [hli],a
+        ld a,e
+        ld [hli],a
+
+        ; ld $CC53,bc
+        ld a,b
+        ld [hli],a
+        ld [hl],c
+
+        ld hl,PredefPointers
+        ld de,0
+
+        ; de = 3 * [$CC4E]
+        ld a,[$CC4E]
+        ld e,a
+        add a,a
+        add a,e
+        ld e,a
+        jr nc,.next\@
+        inc d
+
+.next\@
+        add hl,de
+        ld d,h
+        ld e,l
+
+	; get bank of predef routine
+        ld a,[de]
+        ld [$D0B7],a
+
+	; get pointer
+        inc de
+        ld a,[de]
+        ld l,a
+        inc de
+        ld a,[de]
+        ld h,a
+
+        ret
+
+PredefPointers: ; 7E79
+; these are pointers to ASM routines.
+; they appear to be used in overworld map scripts.
+        dbw $0F,$4D60
+        dbw $0F,$70C6
+        dbw $0F,$7073
+        dbw $0B,$7E40
+        dbw $0F,$7103
+        dbw $1E,$5ABA
+        dbw $03,$7132
+        dbw $03,$76A5
+        dbw BANK(AttackAnimation),AttackAnimation; 08 play attack animation
+        dbw $03,$771E
+        dbw $03,$771E
+        dbw $03,$781D
+        dbw $03,$7836
+        dbw $03,$771E
+        dbw $03,$771E
+        dbw $03,$7850
+        dbw $03,$7666
+        dbw $03,$71D7
+        dbw $03,$71A6
+        dbw $03,$469C
+        dbw $0F,$4A83
+        dbw $03,$71C8
+        dbw $03,$71C8
+        dbw $03,$6E9E
+        dbw $03,$7850
+        dbw $03,$4754
+        dbw $0E,$6F5B
+        dbw $01,$6E43
+        dbw $03,$78A5; 1C, used in Pokémon Tower
+        dbw $03,$3EB5
+        dbw $03,$3E2E
+        dbw $12,$40EB
+        dbw $03,$78BA
+        dbw $12,$40FF
+        dbw $03,$7929
+        dbw $03,$79A0
+        dbw $12,$4125
+        dbw $03,$7A1D
+        dbw $03,$79DC
+        dbw $01,$5AB0
+        dbw $0F,$6D02
+        dbw $10,$4000
+        dbw $0E,$6D1C
+        dbw $1C,$778C
+        dbw $0F,$6F18
+        dbw $01,$5A5F
+        dbw $03,$6A03
+        dbw $10,$50F3
+        dbw $1C,$496D
+        dbw $1E,$5DDA
+        dbw $10,$5682
+        dbw $1E,$5869
+        dbw $1C,$4B5D
+        dbw $03,$4586
+        dbw $04,$6953
+        dbw $04,$6B57
+        dbw $10,$50E2
+        dbw $15,$690F
+        dbw $10,$5010
+        dbw BANK(Predef3B),Predef3B; 3B display pic?
+        dbw $03,$6F54
+        dbw $10,$42D1
+        dbw $0E,$6FB8
+        dbw $1C,$770A
+        dbw $1C,$602B
+        dbw $03,$7113
+	dbw $17,$5B5E
+        dbw $04,$773E
+        dbw $04,$7763
+        dbw $1C,$5DDF
+        dbw $17,$40DC; 46 load dex screen
+        dbw $03,$72E5
+        dbw $03,$7A1D
+        dbw $0F,$4DEC
+        dbw $1C,$4F60
+        dbw $09,$7D6B
+        dbw $05,$7C47; 4C player exclamation
+        dbw $01,$5AAF
+        dbw $01,$64EB
+        dbw $0D,$7CA1
+        dbw $1C,$780F
+        dbw $1C,$76BD
+        dbw $1C,$75E8
+        dbw $1C,$77E2
+        dbw BANK(Predef54),Predef54 ; 54 initiate trade
+        dbw $1D,$405C
+        dbw $11,$4169
+        dbw $1E,$45BA
+        dbw $1E,$4510
+        dbw $03,$45BE
+        dbw $03,$460B
+        dbw $03,$4D99
+        dbw $01,$4DE1
+        dbw $09,$7D98
+        dbw $03,$7473
+        dbw $04,$68EF
+        dbw $04,$68F6
+        dbw $07,$49C6
+        dbw $16,$5035
+
+SECTION "bank14",DATA,BANK[$14]
+
+Route22_h: ; 0x50000 to 0x50022 (34 bytes) (id=33)
+    db $00 ; tileset
+    db $09, $14 ; dimensions (y, x)
+    dw Route22Blocks, Route22Texts, Route22Script ; blocks, texts, scripts
+    db NORTH | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_23
+    dw $4664, $c6eb ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $8f, $00 ; alignments (y, x)
+    dw $cb69 ; window
+
+	db VIRIDIAN_CITY
+    dw $4400, $c6ff ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $00 ; alignments (y, x)
+    dw $c703 ; window
+
+    ; end connection data
+
+    dw Route22Object ; objects
+
+Route22Object: ; 0x50022 (size=27)
+    db $2c ; border tile
+
+    db $1 ; warps
+    db $5, $8, $0, ROUTE_22_GATE
+
+    db $1 ; signs
+    db $b, $7, $3 ; Route22Text3
+
+    db $2 ; people
+    db SPRITE_BLUE, $5 + 4, $19 + 4, $ff, $ff, $1 ; person
+    db SPRITE_BLUE, $5 + 4, $19 + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $14, $5, $8 ; ROUTE_22_GATE
+
+Route22Blocks: ; 180
+    INCBIN "maps/route22.blk"
+
+Route20_h: ; 0x500f1 to 0x50113 (34 bytes) (id=31)
+    db $00 ; tileset
+    db $09, $32 ; dimensions (y, x)
+    dw Route20Blocks, Route20Texts, Route20Script ; blocks, texts, scripts
+    db WEST | EAST ; connections
+
+    ; connections data
+
+	db CINNABAR_ISLAND
+    dw $4070, $c790 ; pointers (connected, current) (strip)
+    db $09, $0a ; bigness, width
+    db $00, $13 ; alignments (y, x)
+    dw $c702 ; window
+
+	db ROUTE_19
+    dw $4f87, $c71d ; pointers (connected, current) (strip)
+    db $0c, $0a ; bigness, width
+    db $24, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+    ; end connection data
+
+    dw Route20Object ; objects
+
+Route20Object: ; 0x50113 (size=106)
+    db $43 ; border tile
+
+    db $2 ; warps
+    db $5, $30, $0, SEAFOAM_ISLANDS_1
+    db $9, $3a, $2, SEAFOAM_ISLANDS_1
+
+    db $2 ; signs
+    db $7, $33, $b ; Route20Text11
+    db $b, $39, $c ; Route20Text12
+
+    db $a ; people
+    db SPRITE_SWIMMER, $8 + 4, $57 + 4, $ff, $d1, $41, SWIMMER + $C8, $9 ; trainer
+    db SPRITE_SWIMMER, $b + 4, $44 + 4, $ff, $d1, $42, BEAUTY + $C8, $f ; trainer
+    db SPRITE_SWIMMER, $a + 4, $2d + 4, $ff, $d0, $43, BEAUTY + $C8, $6 ; trainer
+    db SPRITE_SWIMMER, $e + 4, $37 + 4, $ff, $d3, $44, JR__TRAINER_F + $C8, $18 ; trainer
+    db SPRITE_SWIMMER, $d + 4, $26 + 4, $ff, $d0, $45, SWIMMER + $C8, $a ; trainer
+    db SPRITE_SWIMMER, $d + 4, $57 + 4, $ff, $d1, $46, SWIMMER + $C8, $b ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $9 + 4, $22 + 4, $ff, $d1, $47, BIRD_KEEPER + $C8, $b ; trainer
+    db SPRITE_SWIMMER, $7 + 4, $19 + 4, $ff, $d1, $48, BEAUTY + $C8, $7 ; trainer
+    db SPRITE_SWIMMER, $c + 4, $18 + 4, $ff, $d0, $49, JR__TRAINER_F + $C8, $10 ; trainer
+    db SPRITE_SWIMMER, $8 + 4, $f + 4, $ff, $d1, $4a, BEAUTY + $C8, $8 ; trainer
+
+    ; warp-to
+    EVENT_DISP $32, $5, $30 ; SEAFOAM_ISLANDS_1
+    EVENT_DISP $32, $9, $3a ; SEAFOAM_ISLANDS_1
+
+Route20Blocks: ; 450
+    INCBIN "maps/route20.blk"
+
+Route23_h: ; 0x5033f to 0x50361 (34 bytes) (id=34)
+    db $17 ; tileset
+    db $48, $0a ; dimensions (y, x)
+    dw Route23Blocks, Route23Texts, Route23Script ; blocks, texts, scripts
+    db NORTH | SOUTH ; connections
+
+    ; connections data
+
+	db INDIGO_PLATEAU
+    dw $4986, $c6eb ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $11, $00 ; alignments (y, x)
+    dw $c779 ; window
+
+	db ROUTE_22
+    dw $403d, $cb9b ; pointers (connected, current) (strip)
+    db $0d, $14 ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c703 ; window
+
+    ; end connection data
+
+    dw Route23Object ; objects
+
+Route23Object: ; 0x50361 (size=81)
+    db $f ; border tile
+
+    db $4 ; warps
+    db $8b, $7, $2, ROUTE_22_GATE
+    db $8b, $8, $3, ROUTE_22_GATE
+    db $1f, $4, $0, VICTORY_ROAD_1
+    db $1f, $e, $1, VICTORY_ROAD_2
+
+    db $1 ; signs
+    db $21, $3, $8 ; Route23Text8
+
+    db $7 ; people
+    db SPRITE_GUARD, $23 + 4, $4 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GUARD, $38 + 4, $a + 4, $ff, $d0, $2 ; person
+    db SPRITE_SWIMMER, $55 + 4, $8 + 4, $ff, $d0, $3 ; person
+    db SPRITE_SWIMMER, $60 + 4, $b + 4, $ff, $d0, $4 ; person
+    db SPRITE_GUARD, $69 + 4, $c + 4, $ff, $d0, $5 ; person
+    db SPRITE_GUARD, $77 + 4, $8 + 4, $ff, $d0, $6 ; person
+    db SPRITE_GUARD, $88 + 4, $8 + 4, $ff, $d0, $7 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $8b, $7 ; ROUTE_22_GATE
+    EVENT_DISP $a, $8b, $8 ; ROUTE_22_GATE
+    EVENT_DISP $a, $1f, $4 ; VICTORY_ROAD_1
+    EVENT_DISP $a, $1f, $e ; VICTORY_ROAD_2
+
+Route23Blocks: ; 720
+    INCBIN "maps/route23.blk"
+
+Route24_h: ; 0x50682 to 0x506a4 (34 bytes) (id=35)
+    db $00 ; tileset
+    db $12, $0a ; dimensions (y, x)
+    dw Route24Blocks, Route24Texts, Route24Script ; blocks, texts, scripts
+    db SOUTH | EAST ; connections
+
+    ; connections data
+
+	db CERULEAN_CITY
+    dw $4832, $c838 ; pointers (connected, current) (strip)
+    db $10, $14 ; bigness, width
+    db $00, $0a ; alignments (y, x)
+    dw $c703 ; window
+
+	db ROUTE_25
+    dw $4810, $c725 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c70d ; window
+
+    ; end connection data
+
+    dw Route24Object ; objects
+
+Route24Object: ; 0x506a4 (size=67)
+    db $2c ; border tile
+
+    db $0 ; warps
+
+    db $0 ; signs
+
+    db $8 ; people
+    db SPRITE_BLACK_HAIR_BOY_1, $f + 4, $b + 4, $ff, $d2, $41, ROCKET + $C8, $6 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $14 + 4, $5 + 4, $ff, $d1, $42, JR__TRAINER_M + $C8, $2 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $13 + 4, $b + 4, $ff, $d2, $43, JR__TRAINER_M + $C8, $3 ; trainer
+    db SPRITE_LASS, $16 + 4, $a + 4, $ff, $d3, $44, LASS + $C8, $7 ; trainer
+    db SPRITE_BUG_CATCHER, $19 + 4, $b + 4, $ff, $d2, $45, YOUNGSTER + $C8, $4 ; trainer
+    db SPRITE_LASS, $1c + 4, $a + 4, $ff, $d3, $46, LASS + $C8, $8 ; trainer
+    db SPRITE_BUG_CATCHER, $1f + 4, $b + 4, $ff, $d2, $47, BUG_CATCHER + $C8, $9 ; trainer
+	db SPRITE_BALL, $5 + 4, $a + 4, $ff, $ff, $88, TM_45 ; item
+
+Route24Blocks: ; 180
+    INCBIN "maps/route24.blk"
+
+Route25_h: ; 0x5079b to 0x507b2 (23 bytes) (id=36)
+    db $00 ; tileset
+    db $09, $1e ; dimensions (y, x)
+    dw Route25Blocks, Route25Texts, Route25Script ; blocks, texts, scripts
+    db WEST ; connections
+
+    ; connections data
+
+	db ROUTE_24
+    dw $46ee, $c754 ; pointers (connected, current) (strip)
+    db $0c, $0a ; bigness, width
+    db $00, $13 ; alignments (y, x)
+    dw $c702 ; window
+
+    ; end connection data
+
+    dw Route25Object ; objects
+
+Route25Object: ; 0x507b2 (size=94)
+    db $2c ; border tile
+
+    db $1 ; warps
+    db $3, $2d, $0, BILLS_HOUSE
+
+    db $1 ; signs
+    db $3, $2b, $b ; Route25Text11
+
+    db $a ; people
+    db SPRITE_BUG_CATCHER, $2 + 4, $e + 4, $ff, $d0, $41, YOUNGSTER + $C8, $5 ; trainer
+    db SPRITE_BUG_CATCHER, $5 + 4, $12 + 4, $ff, $d1, $42, YOUNGSTER + $C8, $6 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $4 + 4, $18 + 4, $ff, $d0, $43, JR__TRAINER_M + $C8, $2 ; trainer
+    db SPRITE_LASS, $8 + 4, $12 + 4, $ff, $d3, $44, LASS + $C8, $9 ; trainer
+    db SPRITE_BUG_CATCHER, $3 + 4, $20 + 4, $ff, $d2, $45, YOUNGSTER + $C8, $7 ; trainer
+    db SPRITE_LASS, $4 + 4, $25 + 4, $ff, $d0, $46, LASS + $C8, $a ; trainer
+    db SPRITE_HIKER, $4 + 4, $8 + 4, $ff, $d3, $47, HIKER + $C8, $2 ; trainer
+    db SPRITE_HIKER, $9 + 4, $17 + 4, $ff, $d1, $48, HIKER + $C8, $3 ; trainer
+    db SPRITE_HIKER, $7 + 4, $d + 4, $ff, $d3, $49, HIKER + $C8, $4 ; trainer
+	db SPRITE_BALL, $2 + 4, $16 + 4, $ff, $ff, $8a, TM_19 ; item
+
+    ; warp-to
+    EVENT_DISP $1e, $3, $2d ; BILLS_HOUSE
+
+Route25Blocks: ; 270
+    INCBIN "maps/route25.blk"
+
+IndigoPlateau_h: ; 0x5091e to 0x50935 (23 bytes) (id=9)
+    db $17 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw IndigoPlateauBlocks, $4936, IndigoPlateauScript ; blocks, texts, scripts
+    db SOUTH ; connections
+
+    ; connections data
+
+	db ROUTE_23
+    dw $43b2, $c7ab ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+    ; end connection data
+
+    dw IndigoPlateauObject ; objects
+
+IndigoPlateauScript: ; 0x50935
+    ret
+; 0x50936
+
+IndigoPlateauObject: ; 0x50936 (size=20)
+    db $e ; border tile
+
+    db $2 ; warps
+    db $5, $9, $0, INDIGO_PLATEAU_LOBBY
+    db $5, $a, $0, INDIGO_PLATEAU_LOBBY
+
+    db $0 ; signs
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $a, $5, $9 ; INDIGO_PLATEAU_LOBBY
+    EVENT_DISP $a, $5, $a ; INDIGO_PLATEAU_LOBBY
+
+IndigoPlateauBlocks: ; 90
+    INCBIN "maps/indigoplateau.blk"
+
+SaffronCity_h: ; 0x509a4 to 0x509dc (56 bytes) (id=10)
+    db $00 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw SaffronCityBlocks, SaffronCityTexts, SaffronCityScript ; blocks, texts, scripts
+    db NORTH | SOUTH | WEST | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_5
+    dw $4668, $c6f0 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $23, $f6 ; alignments (y, x)
+    dw $c809 ; window
+
+	db ROUTE_6
+    dw $4079, $c912 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $f6 ; alignments (y, x)
+    dw $c6f9 ; window
+
+	db ROUTE_7
+    dw $4058, $c79e ; pointers (connected, current) (strip)
+    db $09, $0a ; bigness, width
+    db $f8, $13 ; alignments (y, x)
+    dw $c702 ; window
+
+	db ROUTE_8
+    dw $41c6, $c7b5 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $f8, $00 ; alignments (y, x)
+    dw $c70d ; window
+
+    ; end connection data
+
+    dw SaffronCityObject ; objects
+
+SaffronCityObject: ; 0x509dc (size=188)
+    db $f ; border tile
+
+    db $8 ; warps
+    db $5, $7, $0, COPYCATS_HOUSE_1F
+    db $3, $1a, $0, FIGHTINGDOJO
+    db $3, $22, $0, SAFFRON_GYM
+    db $b, $d, $0, SAFFRON_HOUSE_1
+    db $b, $19, $0, SAFFRON_MART
+    db $15, $12, $0, SILPH_CO_1F
+    db $1d, $9, $0, SAFFRON_POKECENTER
+    db $1d, $1d, $0, SAFFRON_HOUSE_2
+
+    db $a ; signs
+    db $5, $11, $10 ; SaffronCityText16
+    db $5, $1b, $11 ; SaffronCityText17
+    db $5, $23, $12 ; SaffronCityText18
+    db $b, $1a, $13 ; SaffronCityText19
+    db $13, $27, $14 ; SaffronCityText20
+    db $15, $5, $15 ; SaffronCityText21
+    db $15, $f, $16 ; SaffronCityText22
+    db $1d, $a, $17 ; SaffronCityText23
+    db $1d, $1b, $18 ; SaffronCityText24
+    db $13, $1, $19 ; SaffronCityText25
+
+    db $f ; people
+    db SPRITE_ROCKET, $6 + 4, $7 + 4, $ff, $ff, $1 ; person
+    db SPRITE_ROCKET, $8 + 4, $14 + 4, $fe, $2, $2 ; person
+    db SPRITE_ROCKET, $4 + 4, $22 + 4, $ff, $ff, $3 ; person
+    db SPRITE_ROCKET, $c + 4, $d + 4, $ff, $ff, $4 ; person
+    db SPRITE_ROCKET, $19 + 4, $b + 4, $fe, $2, $5 ; person
+    db SPRITE_ROCKET, $d + 4, $20 + 4, $fe, $2, $6 ; person
+    db SPRITE_ROCKET, $1e + 4, $12 + 4, $fe, $2, $7 ; person
+    db SPRITE_OAK_AIDE, $e + 4, $8 + 4, $fe, $0, $8 ; person
+    db SPRITE_LAPRAS_GIVER, $17 + 4, $17 + 4, $ff, $ff, $9 ; person
+    db SPRITE_ERIKA, $1e + 4, $11 + 4, $fe, $2, $a ; person
+    db SPRITE_GENTLEMAN, $c + 4, $1e + 4, $ff, $d0, $b ; person
+    db SPRITE_BIRD, $c + 4, $1f + 4, $ff, $d0, $c ; person
+    db SPRITE_ROCKER, $8 + 4, $12 + 4, $ff, $d1, $d ; person
+    db SPRITE_ROCKET, $16 + 4, $12 + 4, $ff, $d0, $e ; person
+    db SPRITE_ROCKET, $16 + 4, $13 + 4, $ff, $d0, $f ; person
+
+    ; warp-to
+    EVENT_DISP $14, $5, $7 ; COPYCATS_HOUSE_1F
+    EVENT_DISP $14, $3, $1a ; FIGHTINGDOJO
+    EVENT_DISP $14, $3, $22 ; SAFFRON_GYM
+    EVENT_DISP $14, $b, $d ; SAFFRON_HOUSE_1
+    EVENT_DISP $14, $b, $19 ; SAFFRON_MART
+    EVENT_DISP $14, $15, $12 ; SILPH_CO_1F
+    EVENT_DISP $14, $1d, $9 ; SAFFRON_POKECENTER
+    EVENT_DISP $14, $1d, $1d ; SAFFRON_HOUSE_2
+
+SaffronCityBlocks: ; 360
+    INCBIN "maps/saffroncity.blk"
+
+SaffronCityScript: ; 0x50c00
+    jp $3c3c
+; 0x50c03
+
+SaffronCityTexts: ; 0x50c03
+    dw SaffronCityText1, SaffronCityText2, SaffronCityText3, SaffronCityText4, SaffronCityText5, SaffronCityText6, SaffronCityText7, SaffronCityText8, SaffronCityText9, SaffronCityText10, SaffronCityText11, SaffronCityText12, SaffronCityText13, SaffronCityText14, SaffronCityText15, SaffronCityText16, SaffronCityText17, SaffronCityText18, SaffronCityText19, SaffronCityText20, SaffronCityText21, SaffronCityText22, SaffronCityText23, SaffronCityText24, SaffronCityText25
+
+SaffronCityText1: ; 0x50c35
+    TX_FAR _SaffronCityText1
+    db $50
+
+SaffronCityText2: ; 0x50c3a
+    TX_FAR _SaffronCityText2
+    db $50
+
+SaffronCityText3: ; 0x50c3f
+    TX_FAR _SaffronCityText3
+    db $50
+
+SaffronCityText4: ; 0x50c44
+    TX_FAR _SaffronCityText4
+    db $50
+
+SaffronCityText5: ; 0x50c49
+    TX_FAR _SaffronCityText5
+    db $50
+
+SaffronCityText6: ; 0x50c4e
+    TX_FAR _SaffronCityText6
+    db $50
+
+SaffronCityText7: ; 0x50c53
+    TX_FAR _SaffronCityText7
+    db $50
+
+SaffronCityText8: ; 0x50c58
+    TX_FAR _SaffronCityText8
+    db $50
+
+SaffronCityText9: ; 0x50c5d
+    TX_FAR _SaffronCityText9
+    db $50
+
+SaffronCityText10: ; 0x50c62
+    TX_FAR _SaffronCityText10
+    db $50
+
+SaffronCityText11: ; 0x50c67
+    TX_FAR _SaffronCityText11
+    db $50
+
+SaffronCityText12: ; 0x50c6c
+    TX_FAR _SaffronCityText12
+
+INCBIN "baserom.gbc",$50c70,$50c72 - $50c70
+
+SaffronCityText13: ; 0x50c72
+    TX_FAR _SaffronCityText13
+    db $50
+
+SaffronCityText14: ; 0x50c77
+    TX_FAR _SaffronCityText14
+    db $50
+
+SaffronCityText15: ; 0x50c7c
+    TX_FAR _SaffronCityText15
+    db $50
+
+SaffronCityText16: ; 0x50c81
+    TX_FAR _SaffronCityText16
+    db $50
+
+SaffronCityText17: ; 0x50c86
+    TX_FAR _SaffronCityText17
+    db $50
+
+SaffronCityText18: ; 0x50c8b
+    TX_FAR _SaffronCityText18
+    db $50
+
+SaffronCityText20: ; 0x50c90
+    TX_FAR _SaffronCityText20
+    db $50
+
+SaffronCityText21: ; 0x50c95
+    TX_FAR _SaffronCityText21
+    db $50
+
+SaffronCityText22: ; 0x50c9a
+    TX_FAR _SaffronCityText22
+    db $50
+
+SaffronCityText24: ; 0x50c9f
+    TX_FAR _SaffronCityText24
+    db $50
+
+SaffronCityText25: ; 0x50ca4
+    TX_FAR _SaffronCityText25
+    db $50
+
+Route20Script: ; 0x50ca9
+    ld hl, $d7e7
+    bit 0, [hl]
+    res 0, [hl]
+    call nz, $4cc6
+    call $3c3c
+    ld hl, $4d3a
+    ld de, $4d1c
+    ld a, [$d628]
+    call $3160
+    ld [$d628], a
+    ret
+; 0x50cc6
+
+INCBIN "baserom.gbc",$50cc6,$5c
+
+Route20Texts: ; 0x50d22
+    dw Route20Text1, Route20Text2, Route20Text3, Route20Text4, Route20Text5, Route20Text6, Route20Text7, Route20Text8, Route20Text9, Route20Text10, Route20Text11, Route20Text12
+
+INCBIN "baserom.gbc",$50d3a,$79
+
+Route20Text1: ; 0x50db3
+    db $08 ; asm
+    ld hl, $4d3a
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text2: ; 0x50dbd
+    db $08 ; asm
+    ld hl, $4d46
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text3: ; 0x50dc7
+    db $08 ; asm
+    ld hl, $4d52
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text4: ; 0x50dd1
+    db $08 ; asm
+    ld hl, $4d5e
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text5: ; 0x50ddb
+    db $08 ; asm
+    ld hl, $4d6a
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text6: ; 0x50de5
+    db $08 ; asm
+    ld hl, $4d76
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text7: ; 0x50def
+    db $08 ; asm
+    ld hl, $4d82
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text8: ; 0x50df9
+    db $08 ; asm
+    ld hl, $4d8e
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text9: ; 0x50e03
+    db $08 ; asm
+    ld hl, $4d9a
+    call LoadTrainerHeader
+    jp $24d7
+
+Route20Text10: ; 0x50e0d
+    db $08 ; asm
+    ld hl, $4da6
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$50e17,$96
+
+Route20Text12:
+Route20Text11: ; 0x50ead
+    TX_FAR _Route20Text11
+    db $50
+
+Route22Script: ; 0x50eb2
+    call $3c3c
+    ld hl, $4ebe
+    ld a, [$d60a]
+    jp $3d97
+; 0x50ebe
+
+Route22Scripts: ; 0x50ebe
+    dw Route22Script0, Route22Script1, Route22Script2, Route22Script3
+
+INCBIN "baserom.gbc",$50ec6,$3a
+
+Route22Script0: ; 0x50f00
+    ld a, [$d7eb]
+    bit 7, a
+    ret z
+    ld hl, $4f2d
+    call $34bf
+    ret nc
+    ld a, [$cd3d]
+    ld [$cf0d], a
+    xor a
+    ld [$ff00+$b4], a
+    ld a, $f0
+    ld [$cd6b], a
+    ld a, $2
+    ld [$d528], a
+    ld a, [$d7eb]
+    bit 0, a
+    jr nz, .asm_50f32 ; 0x50f25 $b
+    bit 1, a
+    jp nz, $504e
+    ret
+    inc b
+    dec e
+    dec b
+    dec e
+    rst $38
+.asm_50f32
+    ld a, $1
+    ld [$cd4f], a
+    xor a
+    ld [$cd50], a
+    ld a, $4c
+    call Predef
+    ld a, [$d700]
+    and a
+    jr z, .asm_50f4e ; 0x50f44 $8
+    ld a, $ff
+    ld [$c0ee], a
+    call $23b1
+.asm_50f4e
+    ld c, $2
+    ld a, $de
+    call $23a1
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $4ee6
+    ld a, $1
+    ld [$d60a], a
+    ret
+; 0x50f62
+
+Route22Script1: ; 0x50f62
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    ld a, [$cf0d]
+    cp $1
+    jr nz, .asm_50f78 ; 0x50f6d $9
+    ld a, $4
+    ld [$d528], a
+    ld a, $4
+    jr .asm_50f7a ; 0x50f76 $2
+.asm_50f78
+    ld a, $c
+.asm_50f7a
+    ld [$ff00+$8d], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $34a6
+    xor a
+    ld [$cd6b], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $2920
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $51b7
+    ld de, $51bc
+    call $3354
+    ld a, $e1
+    ld [$d059], a
+    ld hl, $4faf
+    call $4ed6
+    ld a, $2
+    ld [$d60a], a
+    ret
+; 0x50faf
+
+INCBIN "baserom.gbc",$50faf,$50fb5 - $50faf
+
+Route22Script2: ; 0x50fb5
+    ld a, [$d057]
+    cp $ff
+    jp z, $4ece
+    ld a, [$c109]
+    and a
+    jr nz, .asm_50fc7 ; 0x50fc1 $4
+    ld a, $4
+    jr .asm_50fc9 ; 0x50fc5 $2
+.asm_50fc7
+    ld a, $c
+.asm_50fc9
+    ld [$ff00+$8d], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $34a6
+    ld a, $f0
+    ld [$cd6b], a
+    ld hl, $d7eb
+    set 5, [hl]
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $2920
+    ld a, $ff
+    ld [$c0ee], a
+    call $23b1
+    ld b, $2
+    ld hl, $5b47
+    call Bankswitch
+    ld a, [$cf0d]
+    cp $1
+    jr nz, .asm_50fff ; 0x50ff8 $5
+    call $5008
+    jr .asm_51002 ; 0x50ffd $3
+.asm_50fff
+    call $500d
+.asm_51002
+    ld a, $3
+    ld [$d60a], a
+    ret
+; 0x51008
+
+INCBIN "baserom.gbc",$51008,$5102a - $51008
+
+Route22Script3: ; 0x5102a
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    xor a
+    ld [$cd6b], a
+    ld a, $22
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    call $2307
+    ld hl, $d7eb
+    res 0, [hl]
+    res 7, [hl]
+    ld a, $0
+    ld [$d60a], a
+    ret
+; 0x5104e
+
+INCBIN "baserom.gbc",$5104e,$127
+
+Route22Texts: ; 0x51175
+    dw Route22Text1, Route22Text2, Route22Text3
+
+Route22Text1: ; 0x5117b
+    db $08 ; asm
+    ld a, [$d7eb]
+    bit 5, a
+    jr z, .asm_a88cf ; 0x51181
+    ld hl, $51b2
+    call PrintText
+    jr .asm_48088 ; 0x51189
+.asm_a88cf ; 0x5118b
+    ld hl, $51ad
+    call PrintText
+.asm_48088 ; 0x51191
+    jp $24d7
+
+Route22Text2: ; 0x51194
+    db $08 ; asm
+    ld a, [$d7eb]
+    bit 6, a
+    jr z, .asm_58c0a ; 0x5119a
+    ld hl, $51c6
+    call PrintText
+    jr .asm_673ee ; 0x511a2
+.asm_58c0a ; 0x511a4
+    ld hl, $51c1
+    call PrintText
+.asm_673ee ; 0x511aa
+    jp $24d7
+
+INCBIN "baserom.gbc",$511ad,$28
+
+Route22Text3: ; 0x511d5
+    TX_FAR _Route22Text3
+    db $50
+
+Route23Script: ; 0x511da
+    call $51e9
+    call $3c3c
+    ld hl, $5213
+    ld a, [$d667]
+    jp $3d97
+; 0x511e9
+
+INCBIN "baserom.gbc",$511e9,$51213 - $511e9
+
+Route23Scripts: ; 0x51213
+    dw Route23Script0
+
+INCBIN "baserom.gbc",$51215,$4
+
+Route23Script0: ; 0x51219
+    ld hl, $5255
+    ld a, [$d361]
+    ld b, a
+    ld e, $0
+    ld c, $7
+.asm_51224
+    ld a, [hli]
+    cp $ff
+    ret z
+    inc e
+    dec c
+    cp b
+    jr nz, .asm_51224 ; 0x5122b $f7
+    cp $23
+    jr nz, .asm_51237 ; 0x5122f $6
+    ld a, [$d362]
+    cp $e
+    ret nc
+.asm_51237
+    ld a, e
+    ld [$ff00+$8c], a
+    ld a, c
+    ld [$cd3d], a
+    ld b, $2
+    ld hl, $d7ed
+    ld a, $10
+    call Predef
+    ld a, c
+    and a
+    ret nz
+    call $525d
+    call $2920
+    xor a
+    ld [$ff00+$b4], a
+    ret
+; 0x51255
+
+INCBIN "baserom.gbc",$51255,$a2
+
+Route23Texts: ; 0x512f7
+    dw Route23Text1, Route23Text2, Route23Text3, Route23Text4, Route23Text5, Route23Text6, Route23Text7, Route23Text8
+
+Route23Text1: ; 0x51307
+    db $08 ; asm
+    ld a, $6
+    call $5346
+    jp $24d7
+
+Route23Text2: ; 0x51310
+    db $08 ; asm
+    ld a, $5
+    call $5346
+    jp $24d7
+
+Route23Text3: ; 0x51319
+    db $08 ; asm
+    ld a, $4
+    call $5346
+    jp $24d7
+
+Route23Text4: ; 0x51322
+    db $08 ; asm
+    ld a, $3
+    call $5346
+    jp $24d7
+
+Route23Text5: ; 0x5132b
+    db $08 ; asm
+    ld a, $2
+    call $5346
+    jp $24d7
+
+Route23Text6: ; 0x51334
+    db $08 ; asm
+    ld a, $1
+    call $5346
+    jp $24d7
+
+Route23Text7: ; 0x5133d
+    db $8
+    ld a, $0
+    call $5346
+    jp $24d7
+; 0x51346
+
+INCBIN "baserom.gbc",$51346,$62
+
+Route23Text8: ; 0x513a8
+    TX_FAR _Route23Text8
+    db $50
+
+Route24Script: ; 0x513ad
+    call $3c3c
+    ld hl, $545b
+    ld de, $53cb
+    ld a, [$d602]
+    call $3160
+    ld [$d602], a
+    ret
+; 0x513c0
+
+INCBIN "baserom.gbc",$513c0,$8b
+
+Route24Texts: ; 0x5144b
+    dw Route24Text1, Route24Text2, Route24Text3, Route24Text4, Route24Text5, Route24Text6, Route24Text7, Route24Text8
+
+INCBIN "baserom.gbc",$5145b,$49
+
+Route24Text1: ; 0x514a4
+    db $8
+    ld hl, $d7f0
+    res 1, [hl]
+    ld a, [$d7ef]
+    bit 0, a
+    jr nz, .asm_a03f5 ; 0x514af $48
+    ld hl, $5510
+    call PrintText
+    ld bc, $3101
+    call GiveItem
+    jr nc, .asm_3a23d ; 0x514bd $43
+    ld hl, $d7ef
+    set 0, [hl]
+    ld hl, $551a
+    call PrintText
+    ld hl, $5526
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $552b
+    ld de, $552b
+    call $3354
+    ld a, [$ff00+$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    xor a
+    ld [$ff00+$b4], a
+    ld a, $3
+    ld [$d602], a
+    ld [$da39], a
+    jp $24d7
+.asm_a03f5 ; 0x514f9
+    ld hl, $5530
+    call PrintText
+    jp $24d7
+.asm_3a23d ; 0x51502
+    ld hl, $5521
+    call PrintText
+    ld hl, $d7f0
+    set 1, [hl]
+    jp $24d7
+; 0x51510
+
+INCBIN "baserom.gbc",$51510,$25
+
+Route24Text2: ; 0x51535
+    db $08 ; asm
+    ld hl, $545b
+    call LoadTrainerHeader
+    jp $24d7
+
+Route24Text3: ; 0x5153f
+    db $08 ; asm
+    ld hl, $5467
+    call LoadTrainerHeader
+    jp $24d7
+
+Route24Text4: ; 0x51549
+    db $08 ; asm
+    ld hl, $5473
+    call LoadTrainerHeader
+    jp $24d7
+
+Route24Text5: ; 0x51553
+    db $08 ; asm
+    ld hl, $547f
+    call LoadTrainerHeader
+    jp $24d7
+
+Route24Text6: ; 0x5155d
+    db $08 ; asm
+    ld hl, $548b
+    call LoadTrainerHeader
+    jp $24d7
+
+Route24Text7: ; 0x51567
+    db $08 ; asm
+    ld hl, $5497
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$51571,$515cb - $51571
+
+Route25Script: ; 0x515cb
+    call $55e1
+    call $3c3c
+    ld hl, $563e
+    ld de, $5622
+    ld a, [$d603]
+    call $3160
+    ld [$d603], a
+    ret
+; 0x515e1
+
+INCBIN "baserom.gbc",$515e1,$47
+
+Route25Texts: ; 0x51628
+    dw Route25Text1, Route25Text2, Route25Text3, Route25Text4, Route25Text5, Route25Text6, Route25Text7, Route25Text8, Route25Text9, Route25Text10, Route25Text11
+
+INCBIN "baserom.gbc",$5163e,$6d
+
+Route25Text1: ; 0x516ab
+    db $08 ; asm
+    ld hl, $563e
+    call LoadTrainerHeader
+    jp $24d7
+
+Route25Text2: ; 0x516b5
+    db $08 ; asm
+    ld hl, $564a
+    call LoadTrainerHeader
+    jp $24d7
+
+Route25Text3: ; 0x516bf
+    db $08 ; asm
+    ld hl, $5656
+    call LoadTrainerHeader
+    jp $24d7
+
+Route25Text4: ; 0x516c9
+    db $08 ; asm
+    ld hl, $5662
+    call LoadTrainerHeader
+    jp $24d7
+
+Route25Text5: ; 0x516d3
+    db $08 ; asm
+    ld hl, $566e
+    call LoadTrainerHeader
+    jp $24d7
+
+Route25Text6: ; 0x516dd
+    db $08 ; asm
+    ld hl, $567a
+    call LoadTrainerHeader
+    jp $24d7
+
+Route25Text7: ; 0x516e7
+    db $08 ; asm
+    ld hl, $5686
+    call LoadTrainerHeader
+    jp $24d7
+
+Route25Text8: ; 0x516f1
+    db $08 ; asm
+    ld hl, $5692
+    call LoadTrainerHeader
+    jp $24d7
+
+Route25Text9: ; 0x516fb
+    db $08 ; asm
+    ld hl, $569e
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$51705,$87
+
+Route25Text11: ; 0x5178c
+    TX_FAR _Route25Text11
+    db $50
+
+VictoryRoad2_h: ; 0x51791 to 0x5179d (12 bytes) (id=194)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw VictoryRoad2Blocks, VictoryRoad2Texts, VictoryRoad2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VictoryRoad2Object ; objects
+
+VictoryRoad2Script: ; 0x5179d
+    ld hl, $d126
+    bit 6, [hl]
+    res 6, [hl]
+    call nz, $57c4
+    ld hl, $d126
+    bit 5, [hl]
+    res 5, [hl]
+    call nz, $57c9
+    call $3c3c
+    ld hl, $5835
+    ld de, $57eb
+    ld a, [$d63f]
+    call $3160
+    ld [$d63f], a
+    ret
+; 0x517c4
+
+INCBIN "baserom.gbc",$517c4,$57
+
+VictoryRoad2Texts: ; 0x5181b
+    dw VictoryRoad2Text1, VictoryRoad2Text2, VictoryRoad2Text3, VictoryRoad2Text4, VictoryRoad2Text5, VictoryRoad2Text6, VictoryRoad2Text7, VictoryRoad2Text8, VictoryRoad2Text9, VictoryRoad2Text10, VictoryRoad2Text11, VictoryRoad2Text12, VictoryRoad2Text13
+
+INCBIN "baserom.gbc",$51835,$49
+
+VictoryRoad2Text1: ; 0x5187e
+    db $08 ; asm
+    ld hl, $5835
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad2Text2: ; 0x51888
+    db $08 ; asm
+    ld hl, $5841
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad2Text3: ; 0x51892
+    db $08 ; asm
+    ld hl, $584d
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad2Text4: ; 0x5189c
+    db $08 ; asm
+    ld hl, $5859
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad2Text5: ; 0x518a6
+    db $08 ; asm
+    ld hl, $5865
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad2Text6: ; 0x518b0
+    db $08 ; asm
+    ld hl, $5871
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$518ba,$5b
+
+VictoryRoad2Object: ; 0x51915 (size=154)
+    db $7d ; border tile
+
+    db $7 ; warps
+    db $8, $0, $2, VICTORY_ROAD_1
+    db $7, $1d, $3, $ff
+    db $8, $1d, $3, $ff
+    db $7, $17, $0, VICTORY_ROAD_3
+    db $e, $19, $2, VICTORY_ROAD_3
+    db $7, $1b, $1, VICTORY_ROAD_3
+    db $1, $1, $3, VICTORY_ROAD_3
+
+    db $0 ; signs
+
+    db $d ; people
+    db SPRITE_HIKER, $9 + 4, $c + 4, $ff, $d2, $41, BLACKBELT + $C8, $9 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $d + 4, $15 + 4, $ff, $d2, $42, JUGGLER + $C8, $2 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $8 + 4, $13 + 4, $ff, $d0, $43, TAMER + $C8, $5 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $2 + 4, $4 + 4, $ff, $d0, $44, POKEMANIAC + $C8, $6 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $3 + 4, $1a + 4, $ff, $d2, $45, JUGGLER + $C8, $5 ; trainer
+    db SPRITE_BIRD, $5 + 4, $b + 4, $ff, $d1, $46, MOLTRES, $32 ; trainer
+	db SPRITE_BALL, $5 + 4, $1b + 4, $ff, $ff, $87, TM_17 ; item
+	db SPRITE_BALL, $9 + 4, $12 + 4, $ff, $ff, $88, FULL_HEAL ; item
+	db SPRITE_BALL, $b + 4, $9 + 4, $ff, $ff, $89, TM_05 ; item
+	db SPRITE_BALL, $0 + 4, $b + 4, $ff, $ff, $8a, GUARD_SPEC_ ; item
+    db SPRITE_BOULDER, $e + 4, $4 + 4, $ff, $10, $b ; person
+    db SPRITE_BOULDER, $5 + 4, $5 + 4, $ff, $10, $c ; person
+    db SPRITE_BOULDER, $10 + 4, $17 + 4, $ff, $10, $d ; person
+
+    ; warp-to
+    EVENT_DISP $f, $8, $0 ; VICTORY_ROAD_1
+    EVENT_DISP $f, $7, $1d
+    EVENT_DISP $f, $8, $1d
+    EVENT_DISP $f, $7, $17 ; VICTORY_ROAD_3
+    EVENT_DISP $f, $e, $19 ; VICTORY_ROAD_3
+    EVENT_DISP $f, $7, $1b ; VICTORY_ROAD_3
+    EVENT_DISP $f, $1, $1 ; VICTORY_ROAD_3
+
+VictoryRoad2Blocks: ; 135
+    INCBIN "maps/victoryroad2.blk"
+
+MtMoon2_h: ; 0x51a36 to 0x51a42 (12 bytes) (id=60)
+    db $11 ; tileset
+    db $0e, $0e ; dimensions (y, x)
+    dw MtMoon2Blocks, $5a46, MtMoon2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw MtMoon2Object ; objects
+
+MtMoon2Script: ; 0x51a42
+    call $3c3c
+    ret
+; 0x51a46
+
+INCBIN "baserom.gbc",$51a46,$7
+
+MtMoon2Object: ; 0x51a4d (size=68)
+    db $3 ; border tile
+
+    db $8 ; warps
+    db $5, $5, $2, MT_MOON_1
+    db $b, $11, $0, MT_MOON_3
+    db $9, $19, $3, MT_MOON_1
+    db $f, $19, $4, MT_MOON_1
+    db $11, $15, $1, MT_MOON_3
+    db $1b, $d, $2, MT_MOON_3
+    db $3, $17, $3, MT_MOON_3
+    db $3, $1b, $2, $ff
+
+    db $0 ; signs
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $e, $5, $5 ; MT_MOON_1
+    EVENT_DISP $e, $b, $11 ; MT_MOON_3
+    EVENT_DISP $e, $9, $19 ; MT_MOON_1
+    EVENT_DISP $e, $f, $19 ; MT_MOON_1
+    EVENT_DISP $e, $11, $15 ; MT_MOON_3
+    EVENT_DISP $e, $1b, $d ; MT_MOON_3
+    EVENT_DISP $e, $3, $17 ; MT_MOON_3
+    EVENT_DISP $e, $3, $1b
+
+MtMoon2Blocks: ; 196
+    INCBIN "maps/mtmoon2.blk"
+
+SilphCo7_h: ; 0x51b55 to 0x51b61 (12 bytes) (id=212)
+    db $16 ; tileset
+    db $09, $0d ; dimensions (y, x)
+    dw SilphCo7Blocks, SilphCo7Texts, SilphCo7Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo7Object ; objects
+
+SilphCo7Script: ; 0x51b61
+    call $5b77
+    call $3c3c
+    ld hl, $5d5d
+    ld de, $5c17
+    ld a, [$d648]
+    call $3160
+    ld [$d648], a
+    ret
+; 0x51b77
+
+INCBIN "baserom.gbc",$51b77,$1c8
+
+SilphCo7Texts: ; 0x51d3f
+    dw SilphCo7Text1, SilphCo7Text2, SilphCo7Text3, SilphCo7Text4, SilphCo7Text5, SilphCo7Text6, SilphCo7Text7, SilphCo7Text8, SilphCo7Text9, SilphCo7Text10, SilphCo7Text11, SilphCo7Text12, SilphCo7Text13, SilphCo7Text14, SilphCo7Text15
+
+INCBIN "baserom.gbc",$51d55 + 8,$39 - 8
+
+SilphCo7Text1: ; 0x51d8e
+    db $08 ; asm
+    ld a, [$d72e]
+    bit 0, a
+    jr z, .asm_d7e17 ; 0x51d94
+    ld a, [$d838]
+    bit 7, a
+    jr nz, .asm_688b4 ; 0x51d9b
+    ld hl, $5ddd
+    call PrintText
+    jr .asm_b3069 ; 0x51da3
+.asm_d7e17 ; 0x51da5
+    ld hl, $5dd3
+    call PrintText
+	ld bc,(LAPRAS << 8) | 15
+    call GivePokemon
+    jr nc, .asm_b3069 ; 0x51db1
+    ld a, [$ccd3]
+    and a
+    call z, $3865
+    call $3c3c
+    ld hl, $5dd8
+    call PrintText
+    ld hl, $d72e
+    set 0, [hl]
+    jr .asm_b3069 ; 0x51dc8
+.asm_688b4 ; 0x51dca
+    ld hl, $5de2
+    call PrintText
+.asm_b3069 ; 0x51dd0
+    jp $24d7
+
+INCBIN "baserom.gbc",$51dd3,$51de7 - $51dd3
+
+SilphCo7Text2: ; 0x51de7
+    db $8
+    ld a, [$d838]
+    bit 7, a
+    jr nz, .asm_892ce ; 0x51ded $8
+    ld hl, $5e00
+    call PrintText
+    jr .asm_e4d89 ; 0x51df5 $6
+.asm_892ce ; 0x51df7
+    ld hl, $5e05
+    call PrintText
+.asm_e4d89 ; 0x51dfd
+    jp $24d7
+; 0x51e00
+INCBIN "baserom.gbc",$51e00,$a
+
+SilphCo7Text3: ; 0x51e0a
+    db $08 ; asm
+    ld a, [$d838]
+    bit 7, a
+    jr nz, .asm_254aa ; 0x51e10
+    ld hl, $5e23
+    call PrintText
+    jr .asm_6472b ; 0x51e18
+.asm_254aa ; 0x51e1a
+    ld hl, $5e28
+    call PrintText
+.asm_6472b ; 0x51e20
+    jp $24d7
+
+INCBIN "baserom.gbc",$51e23,$51e2d - $51e23
+
+SilphCo7Text4: ; 0x51e2d
+    db $08 ; asm
+    ld a, [$d838]
+    bit 7, a
+    jr nz, .asm_0f7ee ; 0x51e33
+    ld hl, $5e46
+    call PrintText
+    jr .asm_27a32 ; 0x51e3b
+.asm_0f7ee ; 0x51e3d
+    ld hl, $5e4b
+    call PrintText
+.asm_27a32 ; 0x51e43
+    jp $24d7
+
+INCBIN "baserom.gbc",$51e46,$51e50 - $51e46
+
+SilphCo7Text5: ; 0x51e50
+    db $08 ; asm
+    ld hl, $5d5d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$51e5a,$51e69 - $51e5a
+
+SilphCo7Text6: ; 0x51e69
+    db $08 ; asm
+    ld hl, $5d69
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$51e73,$51e82 - $51e73
+
+SilphCo7Text7: ; 0x51e82
+    db $08 ; asm
+    ld hl, $5d75
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$51e8c,$51e9b - $51e8c
+
+SilphCo7Text8: ; 0x51e9b
+    db $08 ; asm
+    ld hl, $5d81
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$51ea5,$51eb4 - $51ea5
+
+SilphCo7Text9: ; 0x51eb4
+    db $08 ; asm
+    ld hl, $5ebe
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$51ebe,$51ec3 - $51ebe
+
+SilphCo7Text13: ; 0x51ec3
+INCBIN "baserom.gbc",$51ec3,5
+
+SilphCo7Text14: ; 0x51ec8
+INCBIN "baserom.gbc",$51ec8,5
+
+INCBIN "baserom.gbc",$51ecd,$51ed2 - $51ecd
+
+SilphCo7Text15: ; 0x51ed2
+INCBIN "baserom.gbc",$51ed2,5
+
+SilphCo7Object: ; 0x51ed7 (size=128)
+    db $2e ; border tile
+
+    db $6 ; warps
+    db $0, $10, $1, SILPH_CO_8F
+    db $0, $16, $0, SILPH_CO_6F
+    db $0, $12, $0, SILPH_CO_ELEVATOR
+    db $7, $5, $3, SILPH_CO_11F
+    db $3, $5, $8, SILPH_CO_3F
+    db $f, $15, $3, SILPH_CO_5F
+
+    db $0 ; signs
+
+    db $b ; people
+    db SPRITE_LAPRAS_GIVER, $5 + 4, $1 + 4, $ff, $ff, $1 ; person
+    db SPRITE_LAPRAS_GIVER, $d + 4, $d + 4, $ff, $d1, $2 ; person
+    db SPRITE_LAPRAS_GIVER, $a + 4, $7 + 4, $ff, $ff, $3 ; person
+    db SPRITE_ERIKA, $8 + 4, $a + 4, $ff, $ff, $4 ; person
+    db SPRITE_ROCKET, $1 + 4, $d + 4, $ff, $d0, $45, ROCKET + $C8, $20 ; trainer
+    db SPRITE_OAK_AIDE, $d + 4, $2 + 4, $ff, $d0, $46, SCIENTIST + $C8, $8 ; trainer
+    db SPRITE_ROCKET, $2 + 4, $14 + 4, $ff, $d2, $47, ROCKET + $C8, $21 ; trainer
+    db SPRITE_ROCKET, $e + 4, $13 + 4, $ff, $d3, $48, ROCKET + $C8, $22 ; trainer
+    db SPRITE_BLUE, $7 + 4, $3 + 4, $ff, $d1, $9 ; person
+	db SPRITE_BALL, $9 + 4, $1 + 4, $ff, $ff, $8a, CALCIUM ; item
+	db SPRITE_BALL, $b + 4, $18 + 4, $ff, $ff, $8b, TM_03 ; item
+
+    ; warp-to
+    EVENT_DISP $d, $0, $10 ; SILPH_CO_8F
+    EVENT_DISP $d, $0, $16 ; SILPH_CO_6F
+    EVENT_DISP $d, $0, $12 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $d, $7, $5 ; SILPH_CO_11F
+    EVENT_DISP $d, $3, $5 ; SILPH_CO_3F
+    EVENT_DISP $d, $f, $15 ; SILPH_CO_5F
+
+SilphCo7Blocks: ; 117
+    INCBIN "maps/silphco7.blk"
+
+Mansion2_h: ; 0x51fcc to 0x51fd8 (12 bytes) (id=214)
+    db $16 ; tileset
+    db $0e, $0f ; dimensions (y, x)
+    dw $6110, $604d, $5fd8 ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Mansion2Object ; objects
+
+INCBIN "baserom.gbc",$51fd8,$52064 - $51fd8
+
+Mansion2Text1: ; 0x52064
+    db $08 ; asm
+    ld hl, $6057
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5206e,$f
+
+Mansion2Text3: ; 0x5207d
+    TX_FAR _Mansion2Text3
+    db $50
+
+Mansion2Text4: ; 0x52082
+    TX_FAR _Mansion2Text4
+    db $50
+
+INCBIN "baserom.gbc",$52087,$4a
+
+Mansion2Object: ; 0x520d1 (size=63)
+    db $1 ; border tile
+
+    db $4 ; warps
+    db $a, $5, $4, MANSION_1
+    db $a, $7, $0, MANSION_3
+    db $e, $19, $2, MANSION_3
+    db $1, $6, $1, MANSION_3
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $11 + 4, $3 + 4, $fe, $2, $41, BURGLAR + $C8, $7 ; trainer
+	db SPRITE_BALL, $7 + 4, $1c + 4, $ff, $ff, $82, CALCIUM ; item
+    db SPRITE_BOOK_MAP_DEX, $2 + 4, $12 + 4, $ff, $ff, $3 ; person
+    db SPRITE_BOOK_MAP_DEX, $16 + 4, $3 + 4, $ff, $ff, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $f, $a, $5 ; MANSION_1
+    EVENT_DISP $f, $a, $7 ; MANSION_3
+    EVENT_DISP $f, $e, $19 ; MANSION_3
+    EVENT_DISP $f, $1, $6 ; MANSION_3
+
+INCBIN "baserom.gbc",$52110,$d2
+
+Mansion3_h: ; 0x521e2 to 0x521ee (12 bytes) (id=215)
+    db $16 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw $6326, $628a, $61ee ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Mansion3Object ; objects
+
+INCBIN "baserom.gbc",$521ee,$522af - $521ee
+
+Mansion3Text1: ; 0x522af
+    db $08 ; asm
+    ld hl, $6296
+    call LoadTrainerHeader
+    jp $24d7
+
+Mansion3Text2: ; 0x522b9
+    db $08 ; asm
+    ld hl, $62a2
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$522c3,$522e1 - $522c3
+
+Mansion3Text5: ; 0x522e1
+    TX_FAR _Mansion3Text5
+    db $50
+
+Mansion3Object: ; 0x522e6 (size=64)
+    db $1 ; border tile
+
+    db $3 ; warps
+    db $a, $7, $1, MANSION_2
+    db $1, $6, $3, MANSION_2
+    db $e, $19, $2, MANSION_2
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $b + 4, $5 + 4, $fe, $2, $41, BURGLAR + $C8, $8 ; trainer
+    db SPRITE_OAK_AIDE, $b + 4, $14 + 4, $ff, $d2, $42, SCIENTIST + $C8, $c ; trainer
+	db SPRITE_BALL, $10 + 4, $1 + 4, $ff, $ff, $83, MAX_POTION ; item
+	db SPRITE_BALL, $5 + 4, $19 + 4, $ff, $ff, $84, IRON ; item
+    db SPRITE_BOOK_MAP_DEX, $c + 4, $6 + 4, $ff, $ff, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $f, $a, $7 ; MANSION_2
+    EVENT_DISP $f, $1, $6 ; MANSION_2
+    EVENT_DISP $f, $e, $19 ; MANSION_2
+
+INCBIN "baserom.gbc",$52326,$87
+
+Mansion4_h: ; 0x523ad to 0x523b9 (12 bytes) (id=216)
+    db $16 ; tileset
+    db $0e, $0f ; dimensions (y, x)
+    dw $64dd, $6436, $63b9 ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Mansion4Object ; objects
+
+INCBIN "baserom.gbc",$523b9,$52461 - $523b9
+
+Mansion4Text1: ; 0x52461
+    db $08 ; asm
+    ld hl, $6448
+    call LoadTrainerHeader
+    jp $24d7
+
+Mansion4Text2: ; 0x5246b
+    db $08 ; asm
+    ld hl, $6454
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$52475,$1e
+
+Mansion4Text7: ; 0x52493
+    TX_FAR _Mansion4Text7
+    db $50
+
+Mansion4Object: ; 0x52498 (size=69)
+    db $1 ; border tile
+
+    db $1 ; warps
+    db $16, $17, $5, MANSION_1
+
+    db $0 ; signs
+
+    db $8 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $17 + 4, $10 + 4, $ff, $ff, $41, BURGLAR + $C8, $9 ; trainer
+    db SPRITE_OAK_AIDE, $b + 4, $1b + 4, $ff, $d0, $42, SCIENTIST + $C8, $d ; trainer
+	db SPRITE_BALL, $2 + 4, $a + 4, $ff, $ff, $83, RARE_CANDY ; item
+	db SPRITE_BALL, $16 + 4, $1 + 4, $ff, $ff, $84, FULL_RESTORE ; item
+	db SPRITE_BALL, $19 + 4, $13 + 4, $ff, $ff, $85, TM_14 ; item
+	db SPRITE_BALL, $4 + 4, $5 + 4, $ff, $ff, $86, TM_22 ; item
+    db SPRITE_BOOK_MAP_DEX, $14 + 4, $10 + 4, $ff, $ff, $7 ; person
+	db SPRITE_BALL, $d + 4, $5 + 4, $ff, $ff, $88, SECRET_KEY ; item
+
+    ; warp-to
+    EVENT_DISP $f, $16, $17 ; MANSION_1
+
+INCBIN "baserom.gbc",$524DD,$5271B - $524DD
+
+CeladonPrizeMenu: ; 14:671B
+        ld b,COIN_CASE
+        call IsItemInBag
+        jr nz,.havingCoinCase\@
+        ld hl,RequireCoinCaseTextPtr
+        jp PrintText
+.havingCoinCase\@
+        ld hl,$D730
+        set 6,[hl]
+        ld hl,ExchangeCoinsForPrizesTextPtr
+        call PrintText
+; the following are the menu settings
+        xor a
+        ld [$CC26],a
+        ld [$CC2A],a
+        ld a,$03
+        ld [$CC29],a
+        ld a,$03
+        ld [$CC28],a
+        ld a,$04
+        ld [$CC24],a
+        ld a,$01
+        ld [$CC25],a
+        call PrintPrizePrice ; 687A
+        FuncCoord 0,2
+        ld hl,Coord
+        ld b,$08
+        ld c,$10
+        call TextBoxBorder
+        call GetPrizeMenuId ;678E
+        call $2429
+        ld hl,WhichPrizeTextPtr
+        call PrintText
+        call $3ABE ; menu choice handler
+        bit 1,a ; keypress = B (Cancel)
+        jr nz,.NoChoice\@
+        ld a,[$CC26]
+        cp a,$03 ; "NO,THANKS" choice
+        jr z,.NoChoice\@
+        call HandlePrizeChoice ; 14:68C6
+.NoChoice\@
+        ld hl,$D730
+        res 6,[hl]
+        ret
+
+RequireCoinCaseTextPtr: ; 14:677E
+        TX_FAR _RequireCoinCaseText ; 22:628E
+        db $0D
+        db "@"
+
+ExchangeCoinsForPrizesTextPtr: ; 14:6784
+        TX_FAR _ExchangeCoinsForPrizesText ; 22:62A9
+        db "@"
+
+WhichPrizeTextPtr: ; 14:6789
+        TX_FAR _WhichPrizeText ; 22:62CD
+        db "@"
+
+GetPrizeMenuId: ; 14:678E
+; determine which one among the three
+; prize-texts has been selected
+; using the text ID (stored in [$FF8C])
+; load the three prizes at $D13D-$D13F
+; load the three prices ar $D141-$D146
+; display the three prizes' names
+; (distinguishing between Pokemon names
+; and Items (specifically TMs) names)
+        ld a,[$FF8C]
+        sub a,$03       ; prize-texts' id are 3, 4 and 5
+        ld [$D12F],a    ; prize-texts' id (relative, i.e. 0, 1 or 2)
+        add a
+        add a
+        ld d,$00
+        ld e,a
+        ld hl,PrizeDifferentMenuPtrs
+        add hl,de
+        ld a,[hli]
+        ld d,[hl]
+        ld e,a
+        inc hl
+        push hl
+        ld hl,W_PRIZE1
+        call $3829      ; XXX what does this do
+        pop hl
+        ld a,[hli]
+        ld h,[hl]
+        ld l,a
+        ld de,$D141
+        ld bc,$0006
+        call CopyData
+        ld a,[$D12F]
+        cp a,$02        ;is TM_menu?
+        jr nz,.putMonName\@
+        ld a,[W_PRIZE1]
+        ld [$D11E],a
+        call GetItemName
+        FuncCoord 2,4
+        ld hl,Coord
+        call PlaceString
+        ld a,[W_PRIZE2]
+        ld [$D11E],a
+        call GetItemName
+        FuncCoord 2,6
+        ld hl,Coord
+        call PlaceString
+        ld a,[W_PRIZE3]
+        ld [$D11E],a
+        call GetItemName
+        FuncCoord 2,8
+        ld hl,Coord
+        call PlaceString
+        jr .putNoThanksText\@
+.putMonName\@ ; 14:67EC
+        ld a,[W_PRIZE1]
+        ld [$D11E],a
+        call GetMonName
+        FuncCoord 2,4
+        ld hl,Coord
+        call PlaceString
+        ld a,[W_PRIZE2]
+        ld [$D11E],a
+        call GetMonName
+        FuncCoord 2,6
+        ld hl,Coord
+        call PlaceString
+        ld a,[W_PRIZE3]
+        ld [$D11E],a
+        call GetMonName
+        FuncCoord 2,8
+        ld hl,Coord
+        call PlaceString
+.putNoThanksText\@ ; 14:6819
+        FuncCoord 2,10
+        ld hl,Coord
+        ld de,NoThanksText
+        call PlaceString
+; put prices on the right side of the textbox
+        ld de,$D141
+        FuncCoord 13,5
+        ld hl,Coord
+; reg. c:
+; [low nybble] number of bytes
+; [bit 765 = %100] space-padding (not zero-padding)
+        ld c,(1 << 7 | 2)
+; Function $15CD displays BCD value (same routine
+; used by text-command $02)
+        call $15CD ; Print_BCD
+        ld de,$D143
+        FuncCoord 13,7
+        ld hl,Coord
+        ld c,(%1 << 7 | 2)
+        call $15CD
+        ld de,$D145
+        FuncCoord 13,9
+        ld hl,Coord
+        ld c,(1 << 7 | 2)
+        jp $15CD
+
+PrizeDifferentMenuPtrs: ; 14:6843
+        dw PrizeMenuMon1Entries
+        dw PrizeMenuMon1Cost
+
+        dw PrizeMenuMon2Entries
+        dw PrizeMenuMon2Cost
+        
+        dw PrizeMenuTMsEntries
+        dw PrizeMenuTMsCost
+
+NoThanksText: ; 14:684F
+        db "NO THANKS@"
+
+PrizeMenuMon1Entries: ; 14:6859
+        db ABRA
+        db CLEFAIRY
+        db NIDORINA
+        db "@"
+PrizeMenuMon1Cost: ; 14:685D
+        db $01,$80
+        db $05,$00
+        db $12,$00
+        db "@"
+
+PrizeMenuMon2Entries: ; 14:6864
+        db DRATINI
+        db SCYTHER
+        db PORYGON
+        db "@"
+PrizeMenuMon2Cost: ; 14:6868
+        db $28,$00 ; 2800 Coins
+        db $55,$00 ; 5500 Coins
+        db $99,$99 ; 9999 Coins
+        db "@"
+
+PrizeMenuTMsEntries: ; 14:686F
+        db TM_23
+        db TM_15
+        db TM_50
+        db "@"
+PrizeMenuTMsCost: ; 14:6873
+        db $33,$00 ; 3300 Coins
+        db $55,$00 ; 5500 Coins
+        db $77,$00 ; 7700 Coins
+        db "@"
+
+PrintPrizePrice: ; 14:687A
+        FuncCoord 11,0
+        ld hl,Coord
+        ld b,$01
+        ld c,$07
+        call TextBoxBorder
+        call $2429      ; XXX save OAM?
+        FuncCoord 12,0
+        ld hl,Coord
+        ld de,.CoinText\@
+        call PlaceString
+        FuncCoord 13,1
+        ld hl,Coord
+        ld de,.SixSpacesText\@
+        call PlaceString
+        FuncCoord 13,1
+        ld hl,Coord
+        ld de,W_PLAYERCOINS1
+        ld c,%10000010
+        call $15CD
+        ret
+
+.CoinText\@ ; 14:68A5
+        db "COIN@"
+
+.SixSpacesText\@ ; 14:68AA
+        db "      @"
+
+LoadCoinsToSubtract: ; 14:68B1
+        ld a,[$D139] ; backup of selected menu_entry
+        add a
+        ld d,$00
+        ld e,a
+        ld hl,$D141 ; first prize's price
+        add hl,de ; get selected prize's price
+        xor a
+        ld [$FF9F],a
+        ld a,[hli]
+        ld [$FFA0],a
+        ld a,[hl]
+        ld [$FFA1],a
+        ret
+
+HandlePrizeChoice: ; 14:68C6
+        ld a,[$CC26] ; selected menu_entry
+        ld [$D139],a
+        ld d,$00
+        ld e,a
+        ld hl,W_PRIZE1
+        add hl,de
+        ld a,[hl]
+        ld [$D11E],a
+        ld a,[$D12F]
+        cp a,$02 ; is prize a TM?
+        jr nz,.GetMonName\@
+        call GetItemName
+        jr .GivePrize\@
+.GetMonName\@ ; 14:68E3
+        call GetMonName
+.GivePrize\@ ; 14:68E6
+        ld hl,SoYouWantPrizeTextPtr
+        call PrintText
+        call $35EC ; yes/no textbox
+        ld a,[$CC26] ; yes/no answer (Y=0, N=1)
+        and a
+        jr nz,.PrintOhFineThen\@
+        call LoadCoinsToSubtract
+        call $35B1 ; subtract COINs from COIN_CASE
+        jr c,.NotEnoughCoins\@
+        ld a,[$D12F]
+        cp a,$02
+        jr nz,.GiveMon\@
+        ld a,[$D11E]
+        ld b,a
+        ld a,$01
+        ld c,a
+        call $3E2E ; GiveItem
+        jr nc,.BagIsFull\@
+        jr .SubtractCoins\@
+.GiveMon\@ ; 14:6912
+        ld a,[$D11E]
+        ld [$CF91],a
+        push af
+        call GetPrizeMonLevel ; 14:6977
+        ld c,a
+        pop af
+        ld b,a
+        call $3E48 ; GivePokemon
+        push af
+        ld a,[$CCD3] ; XXX is there room?
+        and a
+        call z,$3865
+        pop af
+        ret nc
+.SubtractCoins\@ ; 14:692C
+        call LoadCoinsToSubtract
+        ld hl,$FFA1
+        ld de,W_PLAYERCOINS2
+        ld c,$02 ; how many bytes
+        ld a,$0C
+        call Predef ; subtract coins (BCD daa operations)
+        jp PrintPrizePrice
+.BagIsFull\@ ; 14:693F
+        ld hl,PrizeRoomBagIsFullTextPtr
+        jp PrintText
+.NotEnoughCoins\@ ; 14:6945
+        ld hl,SorryNeedMoreCoinsTextPtr
+        jp PrintText
+.PrintOhFineThen\@ ; 14:694B
+        ld hl,OhFineThenTextPtr
+        jp PrintText
+
+UnknownData52951: ; 14:6951
+; XXX what's this?
+        db $00,$01,$00,$01,$00,$01,$00,$00,$01
+
+HereYouGoTextPtr:
+        TX_FAR _HereYouGoText ; 22:62E7
+        db $0D
+        db "@"
+
+SoYouWantPrizeTextPtr: ; 14:6960
+        TX_FAR _SoYouWantPrizeText ; 22:62F6
+        db "@"
+
+SorryNeedMoreCoinsTextPtr: ; 14:6965
+        TX_FAR _SorryNeedMoreCoins ; 22:630B
+        db $0D
+        db "@"
+
+PrizeRoomBagIsFullTextPtr: ; 14:696B
+        TX_FAR _OopsYouDontHaveEnoughRoomText ; 22:6329
+        db $0D
+        db "@"
+
+OhFineThenTextPtr: ; 14:6971
+        TX_FAR _OhFineThenText; 22:634C
+        db $0D ; wait keypress (A/B) without blink
+        db "@"
+
+GetPrizeMonLevel: ; 14:6977
+        ld a,[$CF91]
+        ld b,a
+        ld hl,PrizeMonLevelDictionary
+.loop\@ ; 14:697E
+        ld a,[hli]
+        cp b
+        jr z,.matchFound\@
+        inc hl
+        jr .loop\@
+.matchFound\@ ; 14:6985
+        ld a,[hl]
+        ld [$D127],a
+        ret
+
+PrizeMonLevelDictionary: ; 14:698A
+        db ABRA,9
+        db CLEFAIRY,8
+        db NIDORINA,17
+
+        db DRATINI,18
+        db SCYTHER,25
+        db PORYGON,26
+
+INCBIN "baserom.gbc",$52996,$54000 - $52996
+
+SECTION "bank15",DATA,BANK[$15]
+
+INCBIN "baserom.gbc",$54000,$54022 - $54000
+
+Route2Object: ; 0x54022 (size=72)
+    db $f ; border tile
+
+    db $6 ; warps
+    db $9, $c, $0, DIGLETTS_CAVE_EXIT
+    db $b, $3, $1, VIRIDIAN_FOREST_EXIT
+    db $13, $f, $0, ROUTE_2_HOUSE
+    db $23, $10, $1, ROUTE_2_GATE
+    db $27, $f, $2, ROUTE_2_GATE
+    db $2b, $3, $2, VIRIDIAN_FOREST_ENTRANCE
+
+    db $2 ; signs
+    db $41, $5, $3 ; Route2Text3
+    db $b, $b, $4 ; Route2Text4
+
+    db $2 ; people
+	db SPRITE_BALL, $36 + 4, $d + 4, $ff, $ff, $81, MOON_STONE ; item
+	db SPRITE_BALL, $2d + 4, $d + 4, $ff, $ff, $82, HP_UP ; item
+
+    ; warp-to
+    EVENT_DISP $a, $9, $c ; DIGLETTS_CAVE_EXIT
+    EVENT_DISP $a, $b, $3 ; VIRIDIAN_FOREST_EXIT
+    EVENT_DISP $a, $13, $f ; ROUTE_2_HOUSE
+    EVENT_DISP $a, $23, $10 ; ROUTE_2_GATE
+    EVENT_DISP $a, $27, $f ; ROUTE_2_GATE
+    EVENT_DISP $a, $2b, $3 ; VIRIDIAN_FOREST_ENTRANCE
+
+INCBIN "baserom.gbc",$5406a,$14
+
+Route2Blocks: ; 360
+    INCBIN "maps/route2.blk"
+
+Route3_h: ; 0x541e6 to 0x54208 (34 bytes) (id=14)
+    db $00 ; tileset
+    db $09, $23 ; dimensions (y, x)
+    dw Route3Blocks, Route3Texts, Route3Script ; blocks, texts, scripts
+    db NORTH | WEST ; connections
+
+    ; connections data
+
+	db ROUTE_4
+    dw $44fa, $c704 ; pointers (connected, current) (strip)
+    db $0d, $2d ; bigness, width
+    db $11, $ce ; alignments (y, x)
+    dw $c8b4 ; window
+
+	db PEWTER_CITY
+    dw $460b, $c6e8 ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $27 ; alignments (y, x)
+    dw $c716 ; window
+
+    ; end connection data
+
+    dw Route3Object ; objects
+
+Route3Object: ; 0x54208 (size=77)
+    db $2c ; border tile
+
+    db $0 ; warps
+
+    db $1 ; signs
+    db $9, $3b, $a ; Route3Text10
+
+    db $9 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $b + 4, $39 + 4, $ff, $ff, $1 ; person
+    db SPRITE_BUG_CATCHER, $6 + 4, $a + 4, $ff, $d3, $42, BUG_CATCHER + $C8, $4 ; trainer
+    db SPRITE_BUG_CATCHER, $4 + 4, $e + 4, $ff, $d0, $43, YOUNGSTER + $C8, $1 ; trainer
+    db SPRITE_LASS, $9 + 4, $10 + 4, $ff, $d2, $44, LASS + $C8, $1 ; trainer
+    db SPRITE_BUG_CATCHER, $5 + 4, $13 + 4, $ff, $d0, $45, BUG_CATCHER + $C8, $5 ; trainer
+    db SPRITE_LASS, $4 + 4, $17 + 4, $ff, $d2, $46, LASS + $C8, $2 ; trainer
+    db SPRITE_BUG_CATCHER, $9 + 4, $16 + 4, $ff, $d2, $47, YOUNGSTER + $C8, $2 ; trainer
+    db SPRITE_BUG_CATCHER, $6 + 4, $18 + 4, $ff, $d3, $48, BUG_CATCHER + $C8, $6 ; trainer
+    db SPRITE_LASS, $a + 4, $21 + 4, $ff, $d1, $49, LASS + $C8, $3 ; trainer
+
+Route3Blocks: ; 315
+    INCBIN "maps/route3.blk"
+
+Route4_h: ; 0x54390 to 0x543b2 (34 bytes) (id=15)
+    db $00 ; tileset
+    db $09, $2d ; dimensions (y, x)
+    dw Route4Blocks, Route4Texts, Route4Script; blocks, texts, scripts
+    db SOUTH | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_3
+    dw $426b, $c94c ; pointers (connected, current) (strip)
+    db $0d, $23 ; bigness, width
+    db $00, $32 ; alignments (y, x)
+    dw $c712 ; window
+
+	db CERULEAN_CITY
+    dw $4844, $c718 ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $00 ; alignments (y, x)
+    dw $c703 ; window
+
+    ; end connection data
+
+    dw Route4Object ; objects
+
+Route4Object: ; 0x543b2 (size=58)
+    db $2c ; border tile
+
+    db $3 ; warps
+    db $5, $b, $0, MT_MOON_POKECENTER
+    db $5, $12, $0, MT_MOON_1
+    db $5, $18, $7, MT_MOON_2
+
+    db $3 ; signs
+    db $5, $c, $4 ; Route4Text4
+    db $7, $11, $5 ; Route4Text5
+    db $7, $1b, $6 ; Route4Text6
+
+    db $3 ; people
+    db SPRITE_LASS, $8 + 4, $9 + 4, $fe, $0, $1 ; person
+    db SPRITE_LASS, $3 + 4, $3f + 4, $ff, $d3, $42, LASS + $C8, $4 ; trainer
+	db SPRITE_BALL, $3 + 4, $39 + 4, $ff, $ff, $83, TM_04 ; item
+
+    ; warp-to
+    EVENT_DISP $2d, $5, $b ; MT_MOON_POKECENTER
+    EVENT_DISP $2d, $5, $12 ; MT_MOON_1
+    EVENT_DISP $2d, $5, $18 ; MT_MOON_2
+
+Route4Blocks: ; 405
+    INCBIN "maps/route4.blk"
+
+Route5_h: ; 0x54581 to 0x545a3 (34 bytes) (id=16)
+    db $00 ; tileset
+    db $12, $0a ; dimensions (y, x)
+    dw Route5Blocks, Route5Texts, Route5Script ; blocks, texts, scripts
+    db NORTH | SOUTH ; connections
+
+    ; connections data
+
+	db CERULEAN_CITY
+    dw $495e, $c6e8 ; pointers (connected, current) (strip)
+    db $10, $14 ; bigness, width
+    db $23, $0a ; alignments (y, x)
+    dw $c8bd ; window
+
+	db SAFFRON_CITY
+    dw $4a9a, $c838 ; pointers (connected, current) (strip)
+    db $10, $14 ; bigness, width
+    db $00, $0a ; alignments (y, x)
+    dw $c703 ; window
+
+    ; end connection data
+
+    dw Route5Object ; objects
+
+Route5Object: ; 0x545a3 (size=47)
+    db $a ; border tile
+
+    db $5 ; warps
+    db $1d, $a, $3, ROUTE_5_GATE
+    db $1d, $9, $2, ROUTE_5_GATE
+    db $21, $a, $0, ROUTE_5_GATE
+    db $1b, $11, $0, PATH_ENTRANCE_ROUTE_5
+    db $15, $a, $0, DAYCAREM
+
+    db $1 ; signs
+    db $1d, $11, $1 ; Route5Text1
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $a, $1d, $a ; ROUTE_5_GATE
+    EVENT_DISP $a, $1d, $9 ; ROUTE_5_GATE
+    EVENT_DISP $a, $21, $a ; ROUTE_5_GATE
+    EVENT_DISP $a, $1b, $11 ; PATH_ENTRANCE_ROUTE_5
+    EVENT_DISP $a, $15, $a ; DAYCAREM
+
+Route5Blocks: ; 180
+    INCBIN "maps/route5.blk"
+
+Route9_h: ; 0x54686 to 0x546a8 (34 bytes) (id=20)
+    db $00 ; tileset
+    db $09, $1e ; dimensions (y, x)
+    dw Route9Blocks, Route9Texts, Route9Script ; blocks, texts, scripts
+    db WEST | EAST ; connections
+
+    ; connections data
+
+	db CERULEAN_CITY
+    dw $4855, $c6e8 ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $27 ; alignments (y, x)
+    dw $c716 ; window
+
+	db ROUTE_10
+    dw $4356, $c775 ; pointers (connected, current) (strip)
+    db $0c, $0a ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+    ; end connection data
+
+    dw Route9Object ; objects
+
+Route9Object: ; 0x546a8 (size=86)
+    db $2c ; border tile
+
+    db $0 ; warps
+
+    db $1 ; signs
+    db $7, $19, $b ; Route9Text11
+
+    db $a ; people
+    db SPRITE_LASS, $a + 4, $d + 4, $ff, $d2, $41, JR__TRAINER_F + $C8, $5 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $7 + 4, $18 + 4, $ff, $d2, $42, JR__TRAINER_M + $C8, $7 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $7 + 4, $1f + 4, $ff, $d3, $43, JR__TRAINER_M + $C8, $8 ; trainer
+    db SPRITE_LASS, $8 + 4, $30 + 4, $ff, $d3, $44, JR__TRAINER_F + $C8, $6 ; trainer
+    db SPRITE_HIKER, $f + 4, $10 + 4, $ff, $d2, $45, HIKER + $C8, $b ; trainer
+    db SPRITE_HIKER, $3 + 4, $2b + 4, $ff, $d2, $46, HIKER + $C8, $6 ; trainer
+    db SPRITE_BUG_CATCHER, $2 + 4, $16 + 4, $ff, $d0, $47, BUG_CATCHER + $C8, $d ; trainer
+    db SPRITE_HIKER, $f + 4, $2d + 4, $ff, $d3, $48, HIKER + $C8, $5 ; trainer
+    db SPRITE_BUG_CATCHER, $8 + 4, $28 + 4, $ff, $d3, $49, BUG_CATCHER + $C8, $e ; trainer
+	db SPRITE_BALL, $f + 4, $a + 4, $ff, $ff, $8a, TM_30 ; item
+
+Route9Blocks: ; 270
+    INCBIN "maps/route9.blk"
+
+Route13_h: ; 0x5480c to 0x5482e (34 bytes) (id=24)
+    db $00 ; tileset
+    db $09, $1e ; dimensions (y, x)
+    dw Route13Blocks, Route13Texts, Route13Script ; blocks, texts, scripts
+    db NORTH | WEST ; connections
+
+    ; connections data
+
+	db ROUTE_12
+    dw $490e, $c6ff ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $6b, $d8 ; alignments (y, x)
+    dw $ca49 ; window
+
+	db ROUTE_14
+    dw $4a19, $c754 ; pointers (connected, current) (strip)
+    db $0c, $0a ; bigness, width
+    db $00, $13 ; alignments (y, x)
+    dw $c702 ; window
+
+    ; end connection data
+
+    dw Route13Object ; objects
+
+Route13Object: ; 0x5482e (size=93)
+    db $43 ; border tile
+
+    db $0 ; warps
+
+    db $3 ; signs
+    db $d, $f, $b ; Route13Text11
+    db $5, $21, $c ; Route13Text12
+    db $b, $1f, $d ; Route13Text13
+
+    db $a ; people
+    db SPRITE_BLACK_HAIR_BOY_1, $a + 4, $31 + 4, $ff, $d3, $41, BIRD_KEEPER + $C8, $1 ; trainer
+    db SPRITE_LASS, $a + 4, $30 + 4, $ff, $d0, $42, JR__TRAINER_F + $C8, $c ; trainer
+    db SPRITE_LASS, $9 + 4, $1b + 4, $ff, $d0, $43, JR__TRAINER_F + $C8, $d ; trainer
+    db SPRITE_LASS, $a + 4, $17 + 4, $ff, $d2, $44, JR__TRAINER_F + $C8, $e ; trainer
+    db SPRITE_LASS, $5 + 4, $32 + 4, $ff, $d0, $45, JR__TRAINER_F + $C8, $f ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $4 + 4, $c + 4, $ff, $d3, $46, BIRD_KEEPER + $C8, $2 ; trainer
+    db SPRITE_FOULARD_WOMAN, $6 + 4, $21 + 4, $ff, $d0, $47, BEAUTY + $C8, $4 ; trainer
+    db SPRITE_FOULARD_WOMAN, $6 + 4, $20 + 4, $ff, $d0, $48, BEAUTY + $C8, $5 ; trainer
+    db SPRITE_BIKER, $7 + 4, $a + 4, $ff, $d1, $49, BIKER + $C8, $1 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $d + 4, $7 + 4, $ff, $d1, $4a, BIRD_KEEPER + $C8, $3 ; trainer
+
+Route13Blocks: ; 270
+    INCBIN "maps/route13.blk"
+
+Route14_h: ; 0x54999 to 0x549bb (34 bytes) (id=25)
+    db $00 ; tileset
+    db $1b, $0a ; dimensions (y, x)
+    dw Route14Blocks, Route14Texts, Route14Script ; blocks, texts, scripts
+    db WEST | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_15
+    dw $49e7, $c838 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $dc, $3b ; alignments (y, x)
+    dw $c72a ; window
+
+	db ROUTE_13
+    dw $488b, $c725 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c70d ; window
+
+    ; end connection data
+
+    dw Route14Object ; objects
+
+Route14Object: ; 0x549bb (size=87)
+    db $43 ; border tile
+
+    db $0 ; warps
+
+    db $1 ; signs
+    db $d, $11, $b ; Route14Text11
+
+    db $a ; people
+    db SPRITE_BLACK_HAIR_BOY_1, $4 + 4, $4 + 4, $ff, $d0, $41, BIRD_KEEPER + $C8, $e ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $6 + 4, $f + 4, $ff, $d0, $42, BIRD_KEEPER + $C8, $f ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $b + 4, $c + 4, $ff, $d0, $43, BIRD_KEEPER + $C8, $10 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $f + 4, $e + 4, $ff, $d1, $44, BIRD_KEEPER + $C8, $11 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $1f + 4, $f + 4, $ff, $d2, $45, BIRD_KEEPER + $C8, $4 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $31 + 4, $6 + 4, $ff, $d1, $46, BIRD_KEEPER + $C8, $5 ; trainer
+    db SPRITE_BIKER, $27 + 4, $5 + 4, $ff, $d0, $47, BIKER + $C8, $d ; trainer
+    db SPRITE_BIKER, $1e + 4, $4 + 4, $ff, $d3, $48, BIKER + $C8, $e ; trainer
+    db SPRITE_BIKER, $1e + 4, $f + 4, $ff, $d2, $49, BIKER + $C8, $f ; trainer
+    db SPRITE_BIKER, $1f + 4, $4 + 4, $ff, $d3, $4a, BIKER + $C8, $2 ; trainer
+
+Route14Blocks: ; 270
+    INCBIN "maps/route14.blk"
+
+Route17_h: ; 0x54b20 to 0x54b42 (34 bytes) (id=28)
+    db $00 ; tileset
+    db $48, $0a ; dimensions (y, x)
+    dw Route17Blocks, Route17Texts, Route17Script ; blocks, texts, scripts
+    db NORTH | SOUTH ; connections
+
+    ; connections data
+
+	db ROUTE_16
+    dw $4bfc, $c6eb ; pointers (connected, current) (strip)
+    db $0d, $14 ; bigness, width
+    db $11, $00 ; alignments (y, x)
+    dw $c7d3 ; window
+
+	db ROUTE_18
+    dw $4c9c, $cb9b ; pointers (connected, current) (strip)
+    db $0d, $19 ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c708 ; window
+
+    ; end connection data
+
+    dw Route17Object ; objects
+
+Route17Object: ; 0x54b42 (size=102)
+    db $43 ; border tile
+
+    db $0 ; warps
+
+    db $6 ; signs
+    db $33, $9, $b ; Route17Text11
+    db $3f, $9, $c ; Route17Text12
+    db $4b, $9, $d ; Route17Text13
+    db $57, $9, $e ; Route17Text14
+    db $6f, $9, $f ; Route17Text15
+    db $8d, $9, $10 ; Route17Text16
+
+    db $a ; people
+    db SPRITE_BIKER, $13 + 4, $c + 4, $ff, $d2, $41, CUE_BALL + $C8, $4 ; trainer
+    db SPRITE_BIKER, $10 + 4, $b + 4, $ff, $d3, $42, CUE_BALL + $C8, $5 ; trainer
+    db SPRITE_BIKER, $12 + 4, $4 + 4, $ff, $d1, $43, BIKER + $C8, $8 ; trainer
+    db SPRITE_BIKER, $20 + 4, $7 + 4, $ff, $d2, $44, BIKER + $C8, $9 ; trainer
+    db SPRITE_BIKER, $22 + 4, $e + 4, $ff, $d3, $45, BIKER + $C8, $a ; trainer
+    db SPRITE_BIKER, $3a + 4, $11 + 4, $ff, $d2, $46, CUE_BALL + $C8, $6 ; trainer
+    db SPRITE_BIKER, $44 + 4, $2 + 4, $ff, $d3, $47, CUE_BALL + $C8, $7 ; trainer
+    db SPRITE_BIKER, $62 + 4, $e + 4, $ff, $d3, $48, CUE_BALL + $C8, $8 ; trainer
+    db SPRITE_BIKER, $62 + 4, $5 + 4, $ff, $d2, $49, BIKER + $C8, $b ; trainer
+    db SPRITE_BIKER, $76 + 4, $a + 4, $ff, $d0, $4a, BIKER + $C8, $c ; trainer
+
+Route17Blocks: ; 720
+    INCBIN "maps/route17.blk"
+
+Route19_h: ; 0x54e78 to 0x54e9a (34 bytes) (id=30)
+    db $00 ; tileset
+    db $1b, $0a ; dimensions (y, x)
+    dw Route19Blocks, Route19Texts, Route19Script ; blocks, texts, scripts
+    db NORTH | WEST ; connections
+
+    ; connections data
+
+	db FUCHSIA_CITY
+    dw $4db4, $c6e8 ; pointers (connected, current) (strip)
+    db $10, $14 ; bigness, width
+    db $23, $0a ; alignments (y, x)
+    dw $c8bd ; window
+
+	db ROUTE_20
+    dw $41ac, $c838 ; pointers (connected, current) (strip)
+    db $09, $32 ; bigness, width
+    db $dc, $63 ; alignments (y, x)
+    dw $c752 ; window
+
+    ; end connection data
+
+    dw Route19Object ; objects
+
+Route19Object: ; 0x54e9a (size=87)
+    db $43 ; border tile
+
+    db $0 ; warps
+
+    db $1 ; signs
+    db $9, $b, $b ; Route19Text11
+
+    db $a ; people
+    db SPRITE_BLACK_HAIR_BOY_1, $7 + 4, $8 + 4, $ff, $d2, $41, SWIMMER + $C8, $2 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $7 + 4, $d + 4, $ff, $d2, $42, SWIMMER + $C8, $3 ; trainer
+    db SPRITE_SWIMMER, $19 + 4, $d + 4, $ff, $d2, $43, SWIMMER + $C8, $4 ; trainer
+    db SPRITE_SWIMMER, $1b + 4, $4 + 4, $ff, $d3, $44, SWIMMER + $C8, $5 ; trainer
+    db SPRITE_SWIMMER, $1f + 4, $10 + 4, $ff, $d1, $45, SWIMMER + $C8, $6 ; trainer
+    db SPRITE_SWIMMER, $b + 4, $9 + 4, $ff, $d0, $46, SWIMMER + $C8, $7 ; trainer
+    db SPRITE_SWIMMER, $2b + 4, $8 + 4, $ff, $d2, $47, BEAUTY + $C8, $c ; trainer
+    db SPRITE_SWIMMER, $2b + 4, $b + 4, $ff, $d3, $48, BEAUTY + $C8, $d ; trainer
+    db SPRITE_SWIMMER, $2a + 4, $9 + 4, $ff, $d1, $49, SWIMMER + $C8, $8 ; trainer
+    db SPRITE_SWIMMER, $2c + 4, $a + 4, $ff, $d0, $4a, BEAUTY + $C8, $e ; trainer
+
+Route19Blocks: ; 270
+    INCBIN "maps/route19.blk"
+
+Route21_h: ; 0x54fff to 0x55021 (34 bytes) (id=32)
+    db $00 ; tileset
+    db $2d, $0a ; dimensions (y, x)
+    dw Route21Blocks, Route21Texts, Route21Script ; blocks, texts, scripts
+    db NORTH | SOUTH ; connections
+
+    ; connections data
+
+	db PALLET_TOWN
+    dw $4339, $c6eb ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $11, $00 ; alignments (y, x)
+    dw $c779 ; window
+
+	db CINNABAR_ISLAND
+    dw $4069, $c9eb ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+    ; end connection data
+
+    dw Route21Object ; objects
+
+Route21Object: ; 0x55021 (size=76)
+    db $43 ; border tile
+
+    db $0 ; warps
+
+    db $0 ; signs
+
+    db $9 ; people
+    db SPRITE_FISHER2, $18 + 4, $4 + 4, $ff, $d2, $41, FISHER + $C8, $7 ; trainer
+    db SPRITE_FISHER2, $19 + 4, $6 + 4, $ff, $d0, $42, FISHER + $C8, $9 ; trainer
+    db SPRITE_SWIMMER, $1f + 4, $a + 4, $ff, $d1, $43, SWIMMER + $C8, $c ; trainer
+    db SPRITE_SWIMMER, $1e + 4, $c + 4, $ff, $d3, $44, CUE_BALL + $C8, $9 ; trainer
+    db SPRITE_SWIMMER, $3f + 4, $10 + 4, $ff, $d0, $45, SWIMMER + $C8, $d ; trainer
+    db SPRITE_SWIMMER, $47 + 4, $5 + 4, $ff, $d3, $46, SWIMMER + $C8, $e ; trainer
+    db SPRITE_SWIMMER, $47 + 4, $f + 4, $ff, $d2, $47, SWIMMER + $C8, $f ; trainer
+    db SPRITE_FISHER2, $38 + 4, $e + 4, $ff, $d2, $48, FISHER + $C8, $8 ; trainer
+    db SPRITE_FISHER2, $39 + 4, $11 + 4, $ff, $d3, $49, FISHER + $C8, $a ; trainer
+
+Route21Blocks: ; 450
+    INCBIN "maps/route21.blk"
+
+DayCareMBlocks: ; 16
+    INCBIN "maps/daycarem.blk"
+
+FuchsiaHouse3Blocks: ; 16
+    INCBIN "maps/fuchsiahouse3.blk"
+
+INCBIN "baserom.gbc",$5524f,$554e3 - $5524f
+
+Route2Script: ; 0x554e3
+    jp $3c3c
+; 0x554e6
+
+INCBIN "baserom.gbc",$554e6,$8
+
+Route2Text3: ; 0x554ee
+    TX_FAR _Route2Text3
+    db $50
+
+Route2Text4: ; 0x554f3
+    TX_FAR _Route2Text4
+    db $50
+
+Route3Script: ; 0x554f8
+    call $3c3c
+    ld hl, $5525
+    ld de, $550b
+    ld a, [$d5f8]
+    call $3160
+    ld [$d5f8], a
+    ret
+; 0x5550b
+
+INCBIN "baserom.gbc",$5550b,$6
+
+Route3Texts: ; 0x55511
+    dw Route3Text1, Route3Text2, Route3Text3, Route3Text4, Route3Text5, Route3Text6, Route3Text7, Route3Text8, Route3Text9, Route3Text10
+
+INCBIN "baserom.gbc",$55525,$61
+
+Route3Text1: ; 0x55586
+    TX_FAR _Route3Text1
+    db $50
+
+Route3Text2: ; 0x5558b
+    db $08 ; asm
+    ld hl, $5525
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55595,$555a4 - $55595
+
+Route3Text3: ; 0x555a4
+    db $08 ; asm
+    ld hl, $5531
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$555ae,$555bd - $555ae
+
+Route3Text4: ; 0x555bd
+    db $08 ; asm
+    ld hl, $553d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$555c7,$555d6 - $555c7
+
+Route3Text5: ; 0x555d6
+    db $08 ; asm
+    ld hl, $5549
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$555e0,$555ef - $555e0
+
+Route3Text6: ; 0x555ef
+    db $08 ; asm
+    ld hl, $5555
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$555f9,$55608 - $555f9
+
+Route3Text7: ; 0x55608
+    db $08 ; asm
+    ld hl, $5561
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55612,$55621 - $55612
+
+Route3Text8: ; 0x55621
+    db $08 ; asm
+    ld hl, $556d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5562b,$5563a - $5562b
+
+Route3Text9: ; 0x5563a
+    db $08 ; asm
+    ld hl, $5579
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55644,$f
+
+Route3Text10: ; 0x55653
+    TX_FAR _Route3Text10
+    db $50
+
+Route4Script: ; 0x55658
+    call $3c3c
+    ld hl, $567d
+    ld de, $566b
+    ld a, [$d5f9]
+    call $3160
+    ld [$d5f9], a
+    ret
+; 0x5566b
+
+INCBIN "baserom.gbc",$5566b,$6
+
+Route4Texts: ; 0x55671
+    dw Route4Text1, Route4Text2, Route4Text3, Route4Text4, Route4Text5, Route4Text6
+
+INCBIN "baserom.gbc",$5567d,$d
+
+Route4Text1: ; 0x5568a
+    TX_FAR _Route4Text1
+    db $50
+
+Route4Text2: ; 0x5568f
+    db $08 ; asm
+    ld hl, $567d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55699,$f
+
+Route4Text5: ; 0x556a8
+    TX_FAR _Route4Text5
+    db $50
+
+Route4Text6: ; 0x556ad
+    TX_FAR _Route4Text6
+    db $50
+
+Route5Script: ; 0x556b2
+    jp $3c3c
+; 0x556b5
+
+Route5Texts: ; 0x556b5
+    dw Route5Text1
+
+Route5Text1: ; 0x556b7
+    TX_FAR _Route5Text1
+    db $50
+
+Route9Script: ; 0x556bc
+    call $3c3c
+    ld hl, $56eb
+    ld de, $56cf
+    ld a, [$d604]
+    call $3160
+    ld [$d604], a
+    ret
+; 0x556cf
+
+INCBIN "baserom.gbc",$556cf,$6
+
+Route9Texts: ; 0x556d5
+    dw Route9Text1, Route9Text2, Route9Text3, Route9Text4, Route9Text5, Route9Text6, Route9Text7, Route9Text8, Route9Text9, Route9Text10, Route9Text11
+
+Route12Text13: ; 0x556eb
+INCBIN "baserom.gbc",$556eb,$556f0 - $556eb
+
+Route12Text14: ; 0x556f0
+INCBIN "baserom.gbc",$556f0,$55758 - $556f0
+
+Route9Text1: ; 0x55758
+    db $8 ; asm
+    ld hl, $56eb
+    jr asm_8be3d ; 0x5575c $2e
+
+Route9Text2:
+    db $8 ; asm
+    ld hl, $56f7
+    jr asm_8be3d ; 0x55762 $28
+
+Route9Text3:
+    db $8 ; asm
+    ld hl, $5703
+    jr asm_8be3d ; 0x55768 $22
+
+Route9Text4:
+    db $8 ; asm
+    ld hl, $570f
+    jr asm_8be3d ; 0x5576e $1c
+
+Route9Text5:
+    db $8 ; asm
+    ld hl, $571b
+    jr asm_8be3d ; 0x55774 $16
+
+Route9Text6:
+    db $8 ; asm
+    ld hl, $5727
+    jr asm_8be3d ; 0x5577a $10
+
+Route9Text7:
+    db $8 ; asm
+    ld hl, $5733
+    jr asm_8be3d ; 0x55780 $a
+
+Route9Text8:
+    db $8 ; asm
+    ld hl, $573f
+    jr asm_8be3d ; 0x55786 $4
+
+Route9Text9:
+    db $8 ; asm
+    ld hl, $574b
+asm_8be3d: ; 0x5578c
+    call $31cc
+    jp $24d7
+; 0x55792
+
+INCBIN "baserom.gbc",$55792,$87
+
+Route9Text11: ; 0x55819
+    TX_FAR _Route9Text11
+    db $50
+
+Route13Script: ; 0x5581e
+    call $3c3c
+    ld hl, $5851
+    ld de, $5831
+    ld a, [$d61a]
+    call $3160
+    ld [$d61a], a
+    ret
+; 0x55831
+
+INCBIN "baserom.gbc",$55831,$6
+
+Route13Texts: ; 0x55837
+    dw Route13Text1, Route13Text2, Route13Text3, Route13Text4, Route13Text5, Route13Text6, Route13Text7, Route13Text8, Route13Text9, Route13Text10, Route13Text11, Route13Text12, Route13Text13
+
+INCBIN "baserom.gbc",$55851,$79
+
+Route13Text1: ; 0x558ca
+    db $08 ; asm
+    ld hl, $5851
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$558d4,$558e3 - $558d4
+
+Route13Text2: ; 0x558e3
+    db $08 ; asm
+    ld hl, $585d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$558ed,$558fc - $558ed
+
+Route13Text3: ; 0x558fc
+    db $08 ; asm
+    ld hl, $5869
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55906,$55915 - $55906
+
+Route13Text4: ; 0x55915
+    db $08 ; asm
+    ld hl, $5875
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5591f,$5592e - $5591f
+
+Route13Text5: ; 0x5592e
+    db $08 ; asm
+    ld hl, $5881
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55938,$55947 - $55938
+
+Route13Text6: ; 0x55947
+    db $08 ; asm
+    ld hl, $588d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55951,$55960 - $55951
+
+Route13Text7: ; 0x55960
+    db $08 ; asm
+    ld hl, $5899
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5596a,$55979 - $5596a
+
+Route13Text8: ; 0x55979
+    db $08 ; asm
+    ld hl, $58a5
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55983,$55992 - $55983
+
+Route13Text9: ; 0x55992
+    db $08 ; asm
+    ld hl, $58b1
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5599c,$559ab - $5599c
+
+Route13Text10: ; 0x559ab
+    db $08 ; asm
+    ld hl, $58bd
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$559b5,$f
+
+Route13Text11: ; 0x559c4
+    TX_FAR _Route13Text11
+    db $50
+
+Route13Text12: ; 0x559c9
+    TX_FAR _Route13Text12
+    db $50
+
+Route13Text13: ; 0x559ce
+    TX_FAR _Route13Text13
+    db $50
+
+Route14Script: ; 0x559d3
+    call $3c3c
+    ld hl, $5a02
+    ld de, $59e6
+    ld a, [$d61b]
+    call $3160
+    ld [$d61b], a
+    ret
+; 0x559e6
+
+INCBIN "baserom.gbc",$559e6,$6
+
+Route14Texts: ; 0x559ec
+    dw Route14Text1, Route14Text2, Route14Text3, Route14Text4, Route14Text5, Route14Text6, Route14Text7, Route14Text8, Route14Text9, Route14Text10, Route14Text11
+
+INCBIN "baserom.gbc",$55a02,$79
+
+Route14Text1: ; 0x55a7b
+    db $08 ; asm
+    ld hl, $5a02
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55a85,$55a94 - $55a85
+
+Route14Text2: ; 0x55a94
+    db $08 ; asm
+    ld hl, $5a0e
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55a9e,$55aad - $55a9e
+
+Route14Text3: ; 0x55aad
+    db $08 ; asm
+    ld hl, $5a1a
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55ab7,$55ac6 - $55ab7
+
+Route14Text4: ; 0x55ac6
+    db $08 ; asm
+    ld hl, $5a26
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55ad0,$55adf - $55ad0
+
+Route14Text5: ; 0x55adf
+    db $08 ; asm
+    ld hl, $5a32
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55ae9,$55af8 - $55ae9
+
+Route14Text6: ; 0x55af8
+    db $08 ; asm
+    ld hl, $5a3e
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55b02,$55b11 - $55b02
+
+Route14Text7: ; 0x55b11
+    db $08 ; asm
+    ld hl, $5a4a
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55b1b,$55b2a - $55b1b
+
+Route14Text8: ; 0x55b2a
+    db $08 ; asm
+    ld hl, $5a56
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55b34,$55b43 - $55b34
+
+Route14Text9: ; 0x55b43
+    db $08 ; asm
+    ld hl, $5a62
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55b4d,$55b5c - $55b4d
+
+Route14Text10: ; 0x55b5c
+    db $08 ; asm
+    ld hl, $5a6e
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55b66,$f
+
+Route14Text11: ; 0x55b75
+    TX_FAR _Route14Text11
+    db $50
+
+Route17Script: ; 0x55b7a
+    call $3c3c
+    ld hl, $5bb3
+    ld de, $5b8d
+    ld a, [$d61c]
+    call $3160
+    ld [$d61c], a
+    ret
+; 0x55b8d
+
+INCBIN "baserom.gbc",$55b8d,$6
+
+Route17Texts: ; 0x55b93
+    dw Route17Text1, Route17Text2, Route17Text3, Route17Text4, Route17Text5, Route17Text6, Route17Text7, Route17Text8, Route17Text9, Route17Text10, Route17Text11, Route17Text12, Route17Text13, Route17Text14, Route17Text15, Route17Text16
+
+INCBIN "baserom.gbc",$55bb3,$79
+
+Route17Text1: ; 0x55c2c
+    db $08 ; asm
+    ld hl, $5bb3
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55c36,$55c45 - $55c36
+
+Route17Text2: ; 0x55c45
+    db $08 ; asm
+    ld hl, $5bbf
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55c4f,$55c5e - $55c4f
+
+Route17Text3: ; 0x55c5e
+    db $08 ; asm
+    ld hl, $5bcb
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55c68,$55c77 - $55c68
+
+Route17Text4: ; 0x55c77
+    db $08 ; asm
+    ld hl, $5bd7
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55c81,$55c90 - $55c81
+
+Route17Text5: ; 0x55c90
+    db $08 ; asm
+    ld hl, $5be3
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55c9a,$55ca9 - $55c9a
+
+Route17Text6: ; 0x55ca9
+    db $08 ; asm
+    ld hl, $5bef
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55cb3,$55cc2 - $55cb3
+
+Route17Text7: ; 0x55cc2
+    db $08 ; asm
+    ld hl, $5bfb
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55ccc,$55cdb - $55ccc
+
+Route17Text8: ; 0x55cdb
+    db $08 ; asm
+    ld hl, $5c07
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55ce5,$55cf4 - $55ce5
+
+Route17Text9: ; 0x55cf4
+    db $08 ; asm
+    ld hl, $5c13
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55cfe,$55d0d - $55cfe
+
+Route17Text10: ; 0x55d0d
+    db $08 ; asm
+    ld hl, $5c1f
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55d17,$f
+
+Route17Text11: ; 0x55d26
+    TX_FAR _Route17Text11
+    db $50
+
+Route17Text12: ; 0x55d2b
+    TX_FAR _Route17Text12
+    db $50
+
+Route17Text13: ; 0x55d30
+    TX_FAR _Route17Text13
+    db $50
+
+Route17Text14: ; 0x55d35
+    TX_FAR _Route17Text14
+    db $50
+
+Route17Text15: ; 0x55d3a
+    TX_FAR _Route17Text15
+    db $50
+
+Route17Text16: ; 0x55d3f
+    TX_FAR _Route17Text16
+    db $50
+
+Route19Script: ; 0x55d44
+    call $3c3c
+    ld hl, $5d73
+    ld de, $5d57
+    ld a, [$d61d]
+    call $3160
+    ld [$d61d], a
+    ret
+; 0x55d57
+
+INCBIN "baserom.gbc",$55d57,$6
+
+Route19Texts: ; 0x55d5d
+    dw Route19Text1, Route19Text2, Route19Text3, Route19Text4, Route19Text5, Route19Text6, Route19Text7, Route19Text8, Route19Text9, Route19Text10, Route19Text11
+
+INCBIN "baserom.gbc",$55d73,$79
+
+Route19Text1: ; 0x55dec
+    db $08 ; asm
+    ld hl, $5d73
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text2: ; 0x55df6
+    db $08 ; asm
+    ld hl, $5d7f
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text3: ; 0x55e00
+    db $08 ; asm
+    ld hl, $5d8b
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text4: ; 0x55e0a
+    db $08 ; asm
+    ld hl, $5d97
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text5: ; 0x55e14
+    db $08 ; asm
+    ld hl, $5da3
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text6: ; 0x55e1e
+    db $08 ; asm
+    ld hl, $5daf
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text7: ; 0x55e28
+    db $08 ; asm
+    ld hl, $5dbb
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text8: ; 0x55e32
+    db $08 ; asm
+    ld hl, $5dc7
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text9: ; 0x55e3c
+    db $08 ; asm
+    ld hl, $5dd3
+    call LoadTrainerHeader
+    jp $24d7
+
+Route19Text10: ; 0x55e46
+    db $08 ; asm
+    ld hl, $5ddf
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55e50,$96
+
+Route19Text11: ; 0x55ee6
+    TX_FAR _Route19Text11
+    db $50
+
+Route21Script: ; 0x55eeb
+    call $3c3c
+    ld hl, $5f16
+    ld de, $5efe
+    ld a, [$d61e]
+    call $3160
+    ld [$d61e], a
+    ret
+; 0x55efe
+
+INCBIN "baserom.gbc",$55efe,$6
+
+Route21Texts: ; 0x55f04
+    dw Route21Text1, Route21Text2, Route21Text3, Route21Text4, Route21Text5, Route21Text6, Route21Text7, Route21Text8, Route21Text9
+
+INCBIN "baserom.gbc",$55f16,$6d
+
+Route21Text1: ; 0x55f83
+    db $08 ; asm
+    ld hl, $5f16
+    call LoadTrainerHeader
+    jp $24d7
+
+Route21Text2: ; 0x55f8d
+    db $08 ; asm
+    ld hl, $5f22
+    call LoadTrainerHeader
+    jp $24d7
+
+Route21Text3: ; 0x55f97
+    db $08 ; asm
+    ld hl, $5f2e
+    call LoadTrainerHeader
+    jp $24d7
+
+Route21Text4: ; 0x55fa1
+    db $08 ; asm
+    ld hl, $5f3a
+    call LoadTrainerHeader
+    jp $24d7
+
+Route21Text5: ; 0x55fab
+    db $08 ; asm
+    ld hl, $5f46
+    call LoadTrainerHeader
+    jp $24d7
+
+Route21Text6: ; 0x55fb5
+    db $08 ; asm
+    ld hl, $5f52
+    call LoadTrainerHeader
+    jp $24d7
+
+Route21Text7: ; 0x55fbf
+    db $08 ; asm
+    ld hl, $5f5e
+    call LoadTrainerHeader
+    jp $24d7
+
+Route21Text8: ; 0x55fc9
+    db $08 ; asm
+    ld hl, $5f6a
+    call LoadTrainerHeader
+    jp $24d7
+
+Route21Text9: ; 0x55fd3
+    db $08 ; asm
+    ld hl, $5f76
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$55fdd,$87
+
+VermilionHouse2_h: ; 0x56064 to 0x56070 (12 bytes) (id=163)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $522f, VermilionHouse2Texts, VermilionHouse2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VermilionHouse2Object ; objects
+
+VermilionHouse2Script: ; 0x56070
+    jp $3c3c
+; 0x56073
+
+VermilionHouse2Texts: ; 0x56073
+    dw VermilionHouse2Text1
+
+VermilionHouse2Text1: ; 0x56075
+    db $08 ; asm
+    ld a, [$d728]
+    bit 3, a
+    jr nz, asm_03ef5 ; 0x5607b
+    ld hl, $60b1
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, asm_eb1b7 ; 0x5608a
+    ld bc,(OLD_ROD << 8) | 1
+    call $3e2e
+    jr nc, asm_fd67b ; 0x56092
+    ld hl, $d728
+    set 3, [hl]
+    ld hl, $60b6
+    jr asm_5dd95 ; 0x5609c
+asm_fd67b ; 0x5609e
+    ld hl, $60ca
+    jr asm_5dd95 ; 0x560a1
+asm_eb1b7 ; 0x560a3
+    ld hl, $60c0
+    jr asm_5dd95 ; 0x560a6
+asm_03ef5 ; 0x560a8
+    ld hl, $60c5
+asm_5dd95 ; 0x560ab
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$560b1,$1e
+
+VermilionHouse2Object: ; 0x560cf (size=26)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $8, $ff
+    db $7, $3, $8, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_FISHER, $4 + 4, $2 + 4, $ff, $d3, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+CeladonMart2_h: ; 0x560e9 to 0x560f5 (12 bytes) (id=123)
+    db $12 ; tileset
+    db $04, $0a ; dimensions (y, x)
+    dw CeladonMart2Blocks, CeladonMart2Texts, CeladonMart2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMart2Object ; objects
+
+CeladonMart2Script: ; 0x560f5
+    jp $3c3c
+; 0x560f8
+
+CeladonMart2Texts: ; 0x560f8
+    dw CeladonMart2Text1, CeladonMart2Text2, CeladonMart2Text3, CeladonMart2Text4, CeladonMart2Text5
+
+CeladonMart2Text3: ; 0x56102
+    TX_FAR _CeladonMart2Text3
+    db $50
+
+CeladonMart2Text4: ; 0x56107
+    TX_FAR _CeladonMart2Text4
+    db $50
+
+CeladonMart2Text5: ; 0x5610c
+    TX_FAR _CeladonMart2Text5
+    db $50
+
+CeladonMart2Object: ; 0x56111 (size=55)
+    db $f ; border tile
+
+    db $3 ; warps
+    db $1, $c, $4, CELADON_MART_1
+    db $1, $10, $1, CELADON_MART_3
+    db $1, $1, $0, CELADON_MART_ELEVATOR
+
+    db $1 ; signs
+    db $1, $e, $5 ; CeladonMart2Text5
+
+    db $4 ; people
+    db SPRITE_MART_GUY, $3 + 4, $5 + 4, $ff, $d0, $1 ; person
+    db SPRITE_MART_GUY, $3 + 4, $6 + 4, $ff, $d0, $2 ; person
+    db SPRITE_FAT_BALD_GUY, $5 + 4, $13 + 4, $ff, $ff, $3 ; person
+    db SPRITE_GIRL, $4 + 4, $e + 4, $fe, $1, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $1, $c ; CELADON_MART_1
+    EVENT_DISP $a, $1, $10 ; CELADON_MART_3
+    EVENT_DISP $a, $1, $1 ; CELADON_MART_ELEVATOR
+
+CeladonMart2Blocks: ; 40
+    INCBIN "maps/celadonmart2.blk"
+
+FuchsiaHouse3_h: ; 0x56170 to 0x5617c (12 bytes) (id=164)
+    db $0d ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw FuchsiaHouse3Blocks, FuchsiaHouse3Texts, FuchsiaHouse3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FuchsiaHouse3Object ; objects
+
+FuchsiaHouse3Script: ; 0x5617c
+    jp $3c3c
+; 0x5617f
+
+FuchsiaHouse3Texts: ; 0x5617f
+    dw FuchsiaHouse3Text1
+
+FuchsiaHouse3Text1: ; 0x56181
+    db $08 ; asm
+    ld a, [$d728]
+    bit 4, a
+    jr nz, asm_6084e ; 0x56187
+    ld hl, $61bd
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, asm_3ace4 ; 0x56196
+    ld bc,(GOOD_ROD << 8) | 1
+    call $3e2e
+    jr nc, asm_628ee ; 0x5619e
+    ld hl, $d728
+    set 4, [hl]
+    ld hl, $61c2
+    jr asm_1b09c ; 0x561a8
+asm_628ee ; 0x561aa
+    ld hl, $621c
+    jr asm_1b09c ; 0x561ad
+asm_3ace4 ; 0x561af
+    ld hl, $6212
+    jr asm_1b09c ; 0x561b2
+asm_6084e ; 0x561b4
+    ld hl, $6217
+asm_1b09c ; 0x561b7
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$561bd,$64
+
+FuchsiaHouse3Object: ; 0x56221 (size=34)
+    db $c ; border tile
+
+    db $3 ; warps
+    db $0, $2, $8, $ff
+    db $7, $2, $7, $ff
+    db $7, $3, $7, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_FISHER, $3 + 4, $5 + 4, $ff, $d3, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $0, $2
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+DayCareM_h: ; 0x56243 to 0x5624f (12 bytes) (id=72)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw DayCareMBlocks, DayCareMTexts, DayCareMScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw DayCareMObject ; objects
+
+DayCareMScript: ; 0x5624f
+    jp $3c3c
+; 0x56252
+
+DayCareMTexts: ; 0x56252
+    dw DayCareMText1
+
+DayCareMText1: ; 0x56254
+    db $8
+    call $36f4
+    ld a, [$da48]
+    and a
+    jp nz, $62e1
+    ld hl, $640f
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    ld hl, $643b
+    jp nz, $6409
+    ld a, [$d163]
+    dec a
+    ld hl, $6445
+    jp z, $6409
+    ld hl, $6414
+    call PrintText
+    xor a
+    ld [$cfcb], a
+    ld [$d07d], a
+    ld [$cc35], a
+    call $13fc
+    push af
+    call $3dd4
+    call $3dbe
+    call $20ba
+    pop af
+    ld hl, $6437
+    jp c, $6409
+    ld hl, $571b
+    ld b, $8
+    call Bankswitch
+    ld hl, $644a
+    jp c, $6409
+    xor a
+    ld [$cc2b], a
+    ld a, [$cf92]
+    ld hl, $d2b5
+    call $15ba
+    ld hl, $6419
+    call PrintText
+    ld a, $1
+    ld [$da48], a
+    ld a, $3
+    ld [$cf95], a
+    call $3a68
+    xor a
+    ld [$cf95], a
+    call $391f
+    ld a, [$cf91]
+    call $13d0
+    ld hl, $641e
+    jp $6409
+; 0x562e1
+INCBIN "baserom.gbc",$562e1,$178
+
+DayCareMObject: ; 0x56459 (size=26)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $4, $ff
+    db $7, $3, $4, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GENTLEMAN, $3 + 4, $2 + 4, $ff, $d3, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+Route12House_h: ; 0x56473 to 0x5647f (12 bytes) (id=189)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $522f, Route12HouseTexts, Route12HouseScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route12HouseObject ; objects
+
+Route12HouseScript: ; 0x5647f
+    jp $3c3c
+; 0x56482
+
+Route12HouseTexts: ; 0x56482
+    dw Route12HouseText1
+
+Route12HouseText1: ; 0x56484
+    db $08 ; asm
+    ld a, [$d728]
+    bit 5, a
+    jr nz, asm_b4cad ; 0x5648a
+    ld hl, $64c0
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, asm_a2d76 ; 0x56499
+    ld bc,(SUPER_ROD << 8) | 1
+    call $3e2e
+    jr nc, asm_e3b89 ; 0x564a1
+    ld hl, $d728
+    set 5, [hl]
+    ld hl, $64c5
+    jr asm_df984 ; 0x564ab
+asm_e3b89 ; 0x564ad
+    ld hl, $64d9
+    jr asm_df984 ; 0x564b0
+asm_a2d76 ; 0x564b2
+    ld hl, $64cf
+    jr asm_df984 ; 0x564b5
+asm_b4cad ; 0x564b7
+    ld hl, $64d4
+asm_df984 ; 0x564ba
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$564c0,$1e
+
+Route12HouseObject: ; 0x564de (size=26)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $3, $ff
+    db $7, $3, $3, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_FISHER, $4 + 4, $2 + 4, $ff, $d3, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+SilphCo8_h: ; 0x564f8 to 0x56504 (12 bytes) (id=213)
+    db $16 ; tileset
+    db $09, $0d ; dimensions (y, x)
+    dw SilphCo8Blocks, SilphCo8Texts, SilphCo8Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo8Object ; objects
+
+SilphCo8Script: ; 0x56504
+    call $651a
+    call $3c3c
+    ld hl, $6585
+    ld de, $6577
+    ld a, [$d649]
+    call $3160
+    ld [$d649], a
+    ret
+; 0x5651a
+
+INCBIN "baserom.gbc",$5651a,$63
+
+SilphCo8Texts: ; 0x5657d
+    dw SilphCo8Text1, SilphCo8Text2, SilphCo8Text3, SilphCo8Text4
+
+INCBIN "baserom.gbc",$56585,$25
+
+SilphCo8Text1: ; 0x565aa
+    db $08 ; asm
+    ld a, [$d838]
+    bit 7, a
+    ld hl, $65c3
+    jr nz, asm_a468f ; 0x565b3
+    ld hl, $65be
+asm_a468f ; 0x565b8
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$565be,$565c8 - $565be
+
+SilphCo8Text2: ; 0x565c8
+    db $08 ; asm
+    ld hl, $6585
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo8Text3: ; 0x565d2
+    db $08 ; asm
+    ld hl, $6591
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo8Text4: ; 0x565dc
+    db $08 ; asm
+    ld hl, $659d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$565e6,$2d
+
+SilphCo8Object: ; 0x56613 (size=90)
+    db $2e ; border tile
+
+    db $7 ; warps
+    db $0, $10, $1, SILPH_CO_9F
+    db $0, $e, $0, SILPH_CO_7F
+    db $0, $12, $0, SILPH_CO_ELEVATOR
+    db $b, $3, $6, SILPH_CO_8F
+    db $f, $3, $4, SILPH_CO_2F
+    db $5, $b, $5, SILPH_CO_2F
+    db $9, $b, $3, SILPH_CO_8F
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_LAPRAS_GIVER, $2 + 4, $4 + 4, $ff, $ff, $1 ; person
+    db SPRITE_ROCKET, $2 + 4, $13 + 4, $ff, $d2, $42, ROCKET + $C8, $23 ; trainer
+    db SPRITE_OAK_AIDE, $2 + 4, $a + 4, $ff, $d0, $43, SCIENTIST + $C8, $9 ; trainer
+    db SPRITE_ROCKET, $f + 4, $c + 4, $ff, $d3, $44, ROCKET + $C8, $24 ; trainer
+
+    ; warp-to
+    EVENT_DISP $d, $0, $10 ; SILPH_CO_9F
+    EVENT_DISP $d, $0, $e ; SILPH_CO_7F
+    EVENT_DISP $d, $0, $12 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $d, $b, $3 ; SILPH_CO_8F
+    EVENT_DISP $d, $f, $3 ; SILPH_CO_2F
+    EVENT_DISP $d, $5, $b ; SILPH_CO_2F
+    EVENT_DISP $d, $9, $b ; SILPH_CO_8F
+
+SilphCo8Blocks: ; 117
+    INCBIN "maps/silphco8.blk"
+
+INCBIN "baserom.gbc",$566e2,$191e
+
+SECTION "bank16",DATA,BANK[$16]
+
+Route6_h: ; 0x58000 to 0x58022 (34 bytes) (id=17)
+    db $00 ; tileset
+    db $12, $0a ; dimensions (y, x)
+    dw Route6Blocks, $50c9, Route6Script ; blocks, texts, scripts
+    db NORTH | SOUTH ; connections
+
+    ; connections data
+
+	db SAFFRON_CITY
+    dw $4bc6, $c6e8 ; pointers (connected, current) (strip)
+    db $10, $14 ; bigness, width
+    db $23, $0a ; alignments (y, x)
+    dw $c8bd ; window
+
+	db VERMILION_CITY
+    dw $4a41, $c838 ; pointers (connected, current) (strip)
+    db $10, $14 ; bigness, width
+    db $00, $0a ; alignments (y, x)
+    dw $c703 ; window
+
+    ; end connection data
+
+    dw Route6Object ; objects
+
+Route6Object: ; 0x58022 (size=87)
+    db $f ; border tile
+
+    db $4 ; warps
+    db $1, $9, $2, ROUTE_6_GATE
+    db $1, $a, $2, ROUTE_6_GATE
+    db $7, $a, $0, ROUTE_6_GATE
+    db $d, $11, $0, PATH_ENTRANCE_ROUTE_6
+
+    db $1 ; signs
+    db $f, $13, $7 ; Route6Text7
+
+    db $6 ; people
+    db SPRITE_BLACK_HAIR_BOY_1, $15 + 4, $a + 4, $ff, $d3, $41, JR__TRAINER_M + $C8, $4 ; trainer
+    db SPRITE_LASS, $15 + 4, $b + 4, $ff, $d2, $42, JR__TRAINER_F + $C8, $2 ; trainer
+    db SPRITE_BUG_CATCHER, $f + 4, $0 + 4, $ff, $d3, $43, BUG_CATCHER + $C8, $a ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $1f + 4, $b + 4, $ff, $d2, $44, JR__TRAINER_M + $C8, $5 ; trainer
+    db SPRITE_LASS, $1e + 4, $b + 4, $ff, $d2, $45, JR__TRAINER_F + $C8, $3 ; trainer
+    db SPRITE_BUG_CATCHER, $1a + 4, $13 + 4, $ff, $d2, $46, BUG_CATCHER + $C8, $b ; trainer
+
+    ; warp-to
+    EVENT_DISP $a, $1, $9 ; ROUTE_6_GATE
+    EVENT_DISP $a, $1, $a ; ROUTE_6_GATE
+    EVENT_DISP $a, $7, $a ; ROUTE_6_GATE
+    EVENT_DISP $a, $d, $11 ; PATH_ENTRANCE_ROUTE_6
+
+Route6Blocks: ; 180
+    INCBIN "maps/route6.blk"
+
+Route8_h: ; 0x5812d to 0x5814f (34 bytes) (id=19)
+    db $00 ; tileset
+    db $09, $1e ; dimensions (y, x)
+    dw Route8Blocks, $51cf, Route8Script ; blocks, texts, scripts
+    db WEST | EAST ; connections
+
+    ; connections data
+
+	db SAFFRON_CITY
+    dw $4abd, $c6e8 ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $27 ; alignments (y, x)
+    dw $c716 ; window
+
+	db LAVENDER_TOWN
+    dw $4085, $c775 ; pointers (connected, current) (strip)
+    db $09, $0a ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+    ; end connection data
+
+    dw Route8Object ; objects
+
+Route8Object: ; 0x5814f (size=119)
+    db $2c ; border tile
+
+    db $5 ; warps
+    db $9, $1, $0, ROUTE_8_GATE
+    db $a, $1, $1, ROUTE_8_GATE
+    db $9, $8, $2, ROUTE_8_GATE
+    db $a, $8, $3, ROUTE_8_GATE
+    db $3, $d, $0, PATH_ENTRANCE_ROUTE_8
+
+    db $1 ; signs
+    db $3, $11, $a ; Route8Text10
+
+    db $9 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $5 + 4, $8 + 4, $ff, $d3, $41, SUPER_NERD + $C8, $3 ; trainer
+    db SPRITE_GAMBLER, $9 + 4, $d + 4, $ff, $d1, $42, GAMBLER + $C8, $5 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $6 + 4, $2a + 4, $ff, $d1, $43, SUPER_NERD + $C8, $4 ; trainer
+    db SPRITE_LASS, $3 + 4, $1a + 4, $ff, $d2, $44, LASS + $C8, $d ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $4 + 4, $1a + 4, $ff, $d3, $45, SUPER_NERD + $C8, $5 ; trainer
+    db SPRITE_LASS, $5 + 4, $1a + 4, $ff, $d2, $46, LASS + $C8, $e ; trainer
+    db SPRITE_LASS, $6 + 4, $1a + 4, $ff, $d3, $47, LASS + $C8, $f ; trainer
+    db SPRITE_GAMBLER, $d + 4, $2e + 4, $ff, $d0, $48, GAMBLER + $C8, $7 ; trainer
+    db SPRITE_LASS, $c + 4, $33 + 4, $ff, $d2, $49, LASS + $C8, $10 ; trainer
+
+    ; warp-to
+    EVENT_DISP $1e, $9, $1 ; ROUTE_8_GATE
+    EVENT_DISP $1e, $a, $1 ; ROUTE_8_GATE
+    EVENT_DISP $1e, $9, $8 ; ROUTE_8_GATE
+    EVENT_DISP $1e, $a, $8 ; ROUTE_8_GATE
+    EVENT_DISP $1e, $3, $d ; PATH_ENTRANCE_ROUTE_8
+
+Route8Blocks: ; 270
+    INCBIN "maps/route8.blk"
+
+Route10_h: ; 0x582d4 to 0x582f6 (34 bytes) (id=21)
+    db $00 ; tileset
+    db $24, $0a ; dimensions (y, x)
+    dw Route10Blocks, Route10Texts, Route10Script ; blocks, texts, scripts
+    db SOUTH | WEST ; connections
+
+    ; connections data
+
+	db LAVENDER_TOWN
+    dw $4085, $c95b ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+	db ROUTE_9
+    dw $4719, $c718 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $00, $3b ; alignments (y, x)
+    dw $c72a ; window
+
+    ; end connection data
+
+    dw Route10Object ; objects
+
+Route10Object: ; 0x582f6 (size=96)
+    db $2c ; border tile
+
+    db $4 ; warps
+    db $13, $b, $0, ROCK_TUNNEL_POKECENTER
+    db $11, $8, $0, ROCK_TUNNEL_1
+    db $35, $8, $2, ROCK_TUNNEL_1
+    db $27, $6, $0, POWER_PLANT
+
+    db $4 ; signs
+    db $13, $7, $7 ; Route10Text7
+    db $13, $c, $8 ; Route10Text8
+    db $37, $9, $9 ; Route10Text9
+    db $29, $5, $a ; Route10Text10
+
+    db $6 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $2c + 4, $a + 4, $ff, $d2, $41, POKEMANIAC + $C8, $1 ; trainer
+    db SPRITE_HIKER, $39 + 4, $3 + 4, $ff, $d1, $42, HIKER + $C8, $7 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $40 + 4, $e + 4, $ff, $d2, $43, POKEMANIAC + $C8, $2 ; trainer
+    db SPRITE_LASS, $19 + 4, $7 + 4, $ff, $d2, $44, JR__TRAINER_F + $C8, $7 ; trainer
+    db SPRITE_HIKER, $3d + 4, $3 + 4, $ff, $d0, $45, HIKER + $C8, $8 ; trainer
+    db SPRITE_LASS, $36 + 4, $7 + 4, $ff, $d0, $46, JR__TRAINER_F + $C8, $8 ; trainer
+
+    ; warp-to
+    EVENT_DISP $a, $13, $b ; ROCK_TUNNEL_POKECENTER
+    EVENT_DISP $a, $11, $8 ; ROCK_TUNNEL_1
+    EVENT_DISP $a, $35, $8 ; ROCK_TUNNEL_1
+    EVENT_DISP $a, $27, $6 ; POWER_PLANT
+
+Route10Blocks: ; 360
+    INCBIN "maps/route10.blk"
+
+Route11_h: ; 0x584be to 0x584e0 (34 bytes) (id=22)
+    db $00 ; tileset
+    db $09, $1e ; dimensions (y, x)
+    dw Route11Blocks, $5465, Route11Script ; blocks, texts, scripts
+    db WEST | EAST ; connections
+
+    ; connections data
+
+	db VERMILION_CITY
+    dw $4a64, $c6e8 ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $27 ; alignments (y, x)
+    dw $c716 ; window
+
+	db ROUTE_12
+    dw $4800, $c709 ; pointers (connected, current) (strip)
+    db $0f, $0a ; bigness, width
+    db $36, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+    ; end connection data
+
+    dw Route11Object ; objects
+
+Route11Object: ; 0x584e0 (size=127)
+    db $f ; border tile
+
+    db $5 ; warps
+    db $8, $31, $0, ROUTE_11_GATE_1F
+    db $9, $31, $1, ROUTE_11_GATE_1F
+    db $8, $3a, $2, ROUTE_11_GATE_1F
+    db $9, $3a, $3, ROUTE_11_GATE_1F
+    db $5, $4, $0, DIGLETTS_CAVE_ENTRANCE
+
+    db $1 ; signs
+    db $5, $1, $b ; Route11Text11
+
+    db $a ; people
+    db SPRITE_GAMBLER, $e + 4, $a + 4, $ff, $d0, $41, GAMBLER + $C8, $1 ; trainer
+    db SPRITE_GAMBLER, $9 + 4, $1a + 4, $ff, $d0, $42, GAMBLER + $C8, $2 ; trainer
+    db SPRITE_BUG_CATCHER, $5 + 4, $d + 4, $ff, $d2, $43, YOUNGSTER + $C8, $9 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $b + 4, $24 + 4, $ff, $d0, $44, ENGINEER + $C8, $2 ; trainer
+    db SPRITE_BUG_CATCHER, $4 + 4, $16 + 4, $ff, $d1, $45, YOUNGSTER + $C8, $a ; trainer
+    db SPRITE_GAMBLER, $7 + 4, $2d + 4, $ff, $d0, $46, GAMBLER + $C8, $3 ; trainer
+    db SPRITE_GAMBLER, $3 + 4, $21 + 4, $ff, $d1, $47, GAMBLER + $C8, $4 ; trainer
+    db SPRITE_BUG_CATCHER, $5 + 4, $2b + 4, $ff, $d3, $48, YOUNGSTER + $C8, $b ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $10 + 4, $2d + 4, $ff, $d2, $49, ENGINEER + $C8, $3 ; trainer
+    db SPRITE_BUG_CATCHER, $c + 4, $16 + 4, $ff, $d1, $4a, YOUNGSTER + $C8, $c ; trainer
+
+    ; warp-to
+    EVENT_DISP $1e, $8, $31 ; ROUTE_11_GATE_1F
+    EVENT_DISP $1e, $9, $31 ; ROUTE_11_GATE_1F
+    EVENT_DISP $1e, $8, $3a ; ROUTE_11_GATE_1F
+    EVENT_DISP $1e, $9, $3a ; ROUTE_11_GATE_1F
+    EVENT_DISP $1e, $5, $4 ; DIGLETTS_CAVE_ENTRANCE
+
+Route11Blocks: ; 270
+    INCBIN "maps/route11.blk"
+
+Route12_h: ; 0x5866d to 0x5869a (45 bytes) (id=23)
+    db $00 ; tileset
+    db $36, $0a ; dimensions (y, x)
+    dw Route12Blocks, Route12Texts, Route12Script ; blocks, texts, scripts
+    db NORTH | SOUTH | WEST ; connections
+
+    ; connections data
+
+	db LAVENDER_TOWN
+    dw $40c1, $c6eb ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $11, $00 ; alignments (y, x)
+    dw $c779 ; window
+
+	db ROUTE_13
+    dw $489c, $ca78 ; pointers (connected, current) (strip)
+    db $0d, $1e ; bigness, width
+    db $00, $28 ; alignments (y, x)
+    dw $c70d ; window
+
+	db ROUTE_11
+    dw $457a, $c8c8 ; pointers (connected, current) (strip)
+    db $09, $1e ; bigness, width
+    db $ca, $3b ; alignments (y, x)
+    dw $c72a ; window
+
+    ; end connection data
+
+    dw Route12Object ; objects
+
+Route12Object: ; 0x5869a (size=118)
+    db $43 ; border tile
+
+    db $4 ; warps
+    db $f, $a, $0, ROUTE_12_GATE
+    db $f, $b, $1, ROUTE_12_GATE
+    db $15, $a, $2, ROUTE_12_GATE
+    db $4d, $b, $0, ROUTE_12_HOUSE
+
+    db $2 ; signs
+    db $d, $d, $b ; Route12Text11
+    db $3f, $b, $c ; Route12Text12
+
+    db $a ; people
+    db SPRITE_SNORLAX, $3e + 4, $a + 4, $ff, $d0, $1 ; person
+    db SPRITE_FISHER2, $1f + 4, $e + 4, $ff, $d2, $42, FISHER + $C8, $3 ; trainer
+    db SPRITE_FISHER2, $27 + 4, $5 + 4, $ff, $d1, $43, FISHER + $C8, $4 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $5c + 4, $b + 4, $ff, $d2, $44, JR__TRAINER_M + $C8, $9 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $4c + 4, $e + 4, $ff, $d1, $45, ROCKER + $C8, $2 ; trainer
+    db SPRITE_FISHER2, $28 + 4, $c + 4, $ff, $d2, $46, FISHER + $C8, $5 ; trainer
+    db SPRITE_FISHER2, $34 + 4, $9 + 4, $ff, $d3, $47, FISHER + $C8, $6 ; trainer
+    db SPRITE_FISHER2, $57 + 4, $6 + 4, $ff, $d0, $48, FISHER + $C8, $b ; trainer
+	db SPRITE_BALL, $23 + 4, $e + 4, $ff, $ff, $89, TM_16 ; item
+	db SPRITE_BALL, $59 + 4, $5 + 4, $ff, $ff, $8a, IRON ; item
+
+    ; warp-to
+    EVENT_DISP $a, $f, $a ; ROUTE_12_GATE
+    EVENT_DISP $a, $f, $b ; ROUTE_12_GATE
+    EVENT_DISP $a, $15, $a ; ROUTE_12_GATE
+    EVENT_DISP $a, $4d, $b ; ROUTE_12_HOUSE
+
+Route12Blocks: ; 540
+    INCBIN "maps/route12.blk"
+
+Route15_h: ; 0x5892c to 0x5894e (34 bytes) (id=26)
+    db $00 ; tileset
+    db $09, $1e ; dimensions (y, x)
+    dw Route15Blocks, Route15Texts, Route15Script ; blocks, texts, scripts
+    db WEST | EAST ; connections
+
+    ; connections data
+
+	db FUCHSIA_CITY
+    dw $4cab, $c6e8 ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $27 ; alignments (y, x)
+    dw $c716 ; window
+
+	db ROUTE_14
+    dw $4aa8, $c709 ; pointers (connected, current) (strip)
+    db $0c, $0a ; bigness, width
+    db $24, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+    ; end connection data
+
+    dw Route15Object ; objects
+
+Route15Object: ; 0x5894e (size=126)
+    db $43 ; border tile
+
+    db $4 ; warps
+    db $8, $7, $0, ROUTE_15_GATE
+    db $9, $7, $1, ROUTE_15_GATE
+    db $8, $e, $2, ROUTE_15_GATE
+    db $9, $e, $3, ROUTE_15_GATE
+
+    db $1 ; signs
+    db $9, $27, $c ; Route15Text12
+
+    db $b ; people
+    db SPRITE_LASS, $b + 4, $29 + 4, $ff, $d0, $41, JR__TRAINER_F + $C8, $14 ; trainer
+    db SPRITE_LASS, $a + 4, $35 + 4, $ff, $d2, $42, JR__TRAINER_F + $C8, $15 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $d + 4, $1f + 4, $ff, $d1, $43, BIRD_KEEPER + $C8, $6 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $d + 4, $23 + 4, $ff, $d1, $44, BIRD_KEEPER + $C8, $7 ; trainer
+    db SPRITE_FOULARD_WOMAN, $b + 4, $35 + 4, $ff, $d0, $45, BEAUTY + $C8, $9 ; trainer
+    db SPRITE_FOULARD_WOMAN, $a + 4, $29 + 4, $ff, $d3, $46, BEAUTY + $C8, $a ; trainer
+    db SPRITE_BIKER, $a + 4, $30 + 4, $ff, $d0, $47, BIKER + $C8, $3 ; trainer
+    db SPRITE_BIKER, $a + 4, $2e + 4, $ff, $d0, $48, BIKER + $C8, $4 ; trainer
+    db SPRITE_LASS, $5 + 4, $25 + 4, $ff, $d3, $49, JR__TRAINER_F + $C8, $16 ; trainer
+    db SPRITE_LASS, $d + 4, $12 + 4, $ff, $d1, $4a, JR__TRAINER_F + $C8, $17 ; trainer
+	db SPRITE_BALL, $5 + 4, $12 + 4, $ff, $ff, $8b, TM_20 ; item
+
+    ; warp-to
+    EVENT_DISP $1e, $8, $7 ; ROUTE_15_GATE
+    EVENT_DISP $1e, $9, $7 ; ROUTE_15_GATE
+    EVENT_DISP $1e, $8, $e ; ROUTE_15_GATE
+    EVENT_DISP $1e, $9, $e ; ROUTE_15_GATE
+
+Route15Blocks: ; 270
+    INCBIN "maps/route15.blk"
+
+Route16_h: ; 0x58ada to 0x58afc (34 bytes) (id=27)
+    db $00 ; tileset
+    db $09, $14 ; dimensions (y, x)
+    dw Route16Blocks, Route16Texts, Route16Script ; blocks, texts, scripts
+    db SOUTH | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_17
+    dw $4ba8, $c823 ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $00, $00 ; alignments (y, x)
+    dw $c6f9 ; window
+
+	db CELADON_CITY
+    dw $40f8, $c6ff ; pointers (connected, current) (strip)
+    db $0f, $19 ; bigness, width
+    db $08, $00 ; alignments (y, x)
+    dw $c708 ; window
+
+    ; end connection data
+
+    dw Route16Object ; objects
+
+Route16Object: ; 0x58afc (size=136)
+    db $f ; border tile
+
+    db $9 ; warps
+    db $a, $11, $0, ROUTE_16_GATE_1F
+    db $b, $11, $1, ROUTE_16_GATE_1F
+    db $a, $18, $2, ROUTE_16_GATE_1F
+    db $b, $18, $3, ROUTE_16_GATE_1F
+    db $4, $11, $4, ROUTE_16_GATE_1F
+    db $5, $11, $5, ROUTE_16_GATE_1F
+    db $4, $18, $6, ROUTE_16_GATE_1F
+    db $5, $18, $7, ROUTE_16_GATE_1F
+    db $5, $7, $0, ROUTE_16_HOUSE
+
+    db $2 ; signs
+    db $b, $1b, $8 ; Route16Text8
+    db $11, $5, $9 ; Route16Text9
+
+    db $7 ; people
+    db SPRITE_BIKER, $c + 4, $11 + 4, $ff, $d2, $41, BIKER + $C8, $5 ; trainer
+    db SPRITE_BIKER, $d + 4, $e + 4, $ff, $d3, $42, CUE_BALL + $C8, $1 ; trainer
+    db SPRITE_BIKER, $c + 4, $b + 4, $ff, $d1, $43, CUE_BALL + $C8, $2 ; trainer
+    db SPRITE_BIKER, $b + 4, $9 + 4, $ff, $d2, $44, BIKER + $C8, $6 ; trainer
+    db SPRITE_BIKER, $a + 4, $6 + 4, $ff, $d3, $45, CUE_BALL + $C8, $3 ; trainer
+    db SPRITE_BIKER, $c + 4, $3 + 4, $ff, $d3, $46, BIKER + $C8, $7 ; trainer
+    db SPRITE_SNORLAX, $a + 4, $1a + 4, $ff, $d0, $7 ; person
+
+    ; warp-to
+    EVENT_DISP $14, $a, $11 ; ROUTE_16_GATE_1F
+    EVENT_DISP $14, $b, $11 ; ROUTE_16_GATE_1F
+    EVENT_DISP $14, $a, $18 ; ROUTE_16_GATE_1F
+    EVENT_DISP $14, $b, $18 ; ROUTE_16_GATE_1F
+    EVENT_DISP $14, $4, $11 ; ROUTE_16_GATE_1F
+    EVENT_DISP $14, $5, $11 ; ROUTE_16_GATE_1F
+    EVENT_DISP $14, $4, $18 ; ROUTE_16_GATE_1F
+    EVENT_DISP $14, $5, $18 ; ROUTE_16_GATE_1F
+    EVENT_DISP $14, $5, $7 ; ROUTE_16_HOUSE
+
+Route16Blocks: ; 180
+    INCBIN "maps/route16.blk"
+
+Route18_h: ; 0x58c38 to 0x58c5a (34 bytes) (id=29)
+    db $00 ; tileset
+    db $09, $19 ; dimensions (y, x)
+    dw Route18Blocks, Route18Texts, Route18Script ; blocks, texts, scripts
+    db NORTH | EAST ; connections
+
+    ; connections data
+
+	db ROUTE_17
+    dw $4e5a, $c6eb ; pointers (connected, current) (strip)
+    db $0a, $0a ; bigness, width
+    db $8f, $00 ; alignments (y, x)
+    dw $cb69 ; window
+
+	db FUCHSIA_CITY
+    dw $4c9a, $c704 ; pointers (connected, current) (strip)
+    db $0f, $14 ; bigness, width
+    db $08, $00 ; alignments (y, x)
+    dw $c703 ; window
+
+    ; end connection data
+
+    dw Route18Object ; objects
+
+Route18Object: ; 0x58c5a (size=66)
+    db $43 ; border tile
+
+    db $4 ; warps
+    db $8, $21, $0, ROUTE_18_GATE_1F
+    db $9, $21, $1, ROUTE_18_GATE_1F
+    db $8, $28, $2, ROUTE_18_GATE_1F
+    db $9, $28, $3, ROUTE_18_GATE_1F
+
+    db $2 ; signs
+    db $7, $2b, $4 ; Route18Text4
+    db $5, $21, $5 ; Route18Text5
+
+    db $3 ; people
+    db SPRITE_BLACK_HAIR_BOY_1, $b + 4, $24 + 4, $ff, $d3, $41, BIRD_KEEPER + $C8, $8 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $f + 4, $28 + 4, $ff, $d2, $42, BIRD_KEEPER + $C8, $9 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $d + 4, $2a + 4, $ff, $d2, $43, BIRD_KEEPER + $C8, $a ; trainer
+
+    ; warp-to
+    EVENT_DISP $19, $8, $21 ; ROUTE_18_GATE_1F
+    EVENT_DISP $19, $9, $21 ; ROUTE_18_GATE_1F
+    EVENT_DISP $19, $8, $28 ; ROUTE_18_GATE_1F
+    EVENT_DISP $19, $9, $28 ; ROUTE_18_GATE_1F
+
+Route18Blocks: ; 225
+    INCBIN "maps/route18.blk"
+
+INCBIN "baserom.gbc",$58d7d,$590b0 - $58d7d
+
+Route6Script: ; 0x590b0
+    call $3c3c
+    ld hl, $50d7
+    ld de, $50c3
+    ld a, [$d600]
+    call $3160
+    ld [$d600], a
+    ret
+; 0x590c3
+
+INCBIN "baserom.gbc",$590c3,$5d
+
+Route6Text1: ; 0x59120
+    db $8
+    ld hl, $50d7
+    call $31cc
+    jp $24d7
+; 0x5912a
+
+INCBIN "baserom.gbc",$5912a,$f
+
+Route6Text2: ; 0x59139
+    db $08 ; asm
+    ld hl, $50e3
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59143,$5914d - $59143
+
+Route6Text3: ; 0x5914d
+    db $08 ; asm
+    ld hl, $50ef
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59157,$59166 - $59157
+
+Route6Text4: ; 0x59166
+    db $08 ; asm
+    ld hl, $50fb
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59170,$5917f - $59170
+
+Route6Text5: ; 0x5917f
+    db $08 ; asm
+    ld hl, $5107
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59189,$59198 - $59189
+
+Route6Text6: ; 0x59198
+    db $08 ; asm
+    ld hl, $5113
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$591a2,$f
+
+Route6Text7: ; 0x591b1
+    TX_FAR _Route6Text7
+    db $50
+
+Route8Script: ; 0x591b6
+    call $3c3c
+    ld hl, $51e3
+    ld de, $51c9
+    ld a, [$d601]
+    call $3160
+    ld [$d601], a
+    ret
+; 0x591c9
+
+INCBIN "baserom.gbc",$591c9,$a0
+
+Route8Text2: ; 0x59269
+    db $08 ; asm
+    ld hl, $51ef
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59273,$59282 - $59273
+
+Route8Text3: ; 0x59282
+    db $08 ; asm
+    ld hl, $51fb
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5928c,$5929b - $5928c
+
+Route8Text4: ; 0x5929b
+    db $08 ; asm
+    ld hl, $5207
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$592a5,$592b4 - $592a5
+
+Route8Text5: ; 0x592b4
+    db $08 ; asm
+    ld hl, $5213
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$592be,$592cd - $592be
+
+Route8Text6: ; 0x592cd
+    db $08 ; asm
+    ld hl, $521f
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$592d7,$592e6 - $592d7
+
+Route8Text7: ; 0x592e6
+    db $08 ; asm
+    ld hl, $522b
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$592f0,$592ff - $592f0
+
+Route8Text8: ; 0x592ff
+    db $08 ; asm
+    ld hl, $5237
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59309,$59318 - $59309
+
+Route8Text9: ; 0x59318
+    db $08 ; asm
+    ld hl, $5243
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59322,$f
+
+Route8Text10: ; 0x59331
+    TX_FAR _Route8Text10
+    db $50
+
+Route10Script: ; 0x59336
+    call $3c3c
+    ld hl, $5363
+    ld de, $5349
+    ld a, [$d605]
+    call $3160
+    ld [$d605], a
+    ret
+; 0x59349
+
+INCBIN "baserom.gbc",$59349,$6
+
+Route10Texts: ; 0x5934f
+    dw Route10Text1, Route10Text2, Route10Text3, Route10Text4, Route10Text5, Route10Text6, Route10Text7, Route10Text8, Route10Text9, Route10Text10
+
+INCBIN "baserom.gbc",$59363,$49
+
+Route10Text1: ; 0x593ac
+    db $08 ; asm
+    ld hl, $5363
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$593b6,$593c5 - $593b6
+
+Route10Text2: ; 0x593c5
+    db $08 ; asm
+    ld hl, $536f
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$593cf,$593de - $593cf
+
+Route10Text3: ; 0x593de
+    db $08 ; asm
+    ld hl, $537b
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$593e8,$593f7 - $593e8
+
+Route10Text4: ; 0x593f7
+    db $08 ; asm
+    ld hl, $5387
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59401,$59410 - $59401
+
+Route10Text5: ; 0x59410
+    db $08 ; asm
+    ld hl, $5393
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5941a,$59429 - $5941a
+
+Route10Text6: ; 0x59429
+    db $08 ; asm
+    ld hl, $539f
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59433,$f
+
+Route10Text9: ; 0x59442
+Route10Text7: ; 0x59442
+    TX_FAR _Route10Text7 ; _Route10Text9
+    db $50
+
+Route10Text10: ; 0x59447
+    TX_FAR _Route10Text10
+    db $50
+
+Route11Script: ; 0x5944c
+    call $3c3c
+    ld hl, $547b
+    ld de, $545f
+    ld a, [$d623]
+    call $3160
+    ld [$d623], a
+    ret
+; 0x5945f
+
+INCBIN "baserom.gbc",$5945f,$ae
+
+Route11Text2: ; 0x5950d
+    db $08 ; asm
+    ld hl, $5487
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59517,$59526 - $59517
+
+Route11Text3: ; 0x59526
+    db $08 ; asm
+    ld hl, $5493
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59530,$5953f - $59530
+
+Route11Text4: ; 0x5953f
+    db $08 ; asm
+    ld hl, $549f
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59549,$59558 - $59549
+
+Route11Text5: ; 0x59558
+    db $08 ; asm
+    ld hl, $54ab
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59562,$59571 - $59562
+
+Route11Text6: ; 0x59571
+    db $08 ; asm
+    ld hl, $54b7
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5957b,$5958a - $5957b
+
+Route11Text7: ; 0x5958a
+    db $08 ; asm
+    ld hl, $54c3
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59594,$595a3 - $59594
+
+Route11Text8: ; 0x595a3
+    db $08 ; asm
+    ld hl, $54cf
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$595ad,$595bc - $595ad
+
+Route11Text9: ; 0x595bc
+    db $08 ; asm
+    ld hl, $54db
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$595c6,$595d5 - $595c6
+
+Route11Text10: ; 0x595d5
+    db $08 ; asm
+    ld hl, $54e7
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$595df,$f
+
+Route11Text11: ; 0x595ee
+    TX_FAR _Route11Text11
+    db $50
+
+Route12Script: ; 0x595f3
+    call $3c3c
+    ld hl, $5691
+    ld de, $5611
+    ld a, [$d624]
+    call $3160
+    ld [$d624], a
+    ret
+; 0x59606
+
+INCBIN "baserom.gbc",$59606,$6f
+
+Route12Texts: ; 0x59675
+    dw Route12Text1, Route12Text2, Route12Text3, Route12Text4, Route12Text5, Route12Text6, Route12Text7, Route12Text8, Route12Text9, Route12Text10, Route12Text11, Route12Text12, Route12Text13, Route12Text14
+
+INCBIN "baserom.gbc",$59691,$55
+
+Route12Text1: ; 0x596e6
+    TX_FAR _Route12Text1
+    db $50
+
+INCBIN "baserom.gbc",$596eb,$596f5 - $596eb
+
+Route12Text2: ; 0x596f5
+    db $08 ; asm
+    ld hl, $5691
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$596ff,$5970e - $596ff
+
+Route12Text3: ; 0x5970e
+    db $08 ; asm
+    ld hl, $569d
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59718,$59727 - $59718
+
+Route12Text4: ; 0x59727
+    db $08 ; asm
+    ld hl, $56a9
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59731,$59740 - $59731
+
+Route12Text5: ; 0x59740
+    db $08 ; asm
+    ld hl, $56b5
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5974a,$59759 - $5974a
+
+Route12Text6: ; 0x59759
+    db $08 ; asm
+    ld hl, $56c1
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59763,$59772 - $59763
+
+Route12Text7: ; 0x59772
+    db $08 ; asm
+    ld hl, $56cd
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5977c,$5978b - $5977c
+
+Route12Text8: ; 0x5978b
+    db $08 ; asm
+    ld hl, $56d9
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59795,$f
+
+Route12Text11: ; 0x597a4
+    TX_FAR _Route12Text11
+    db $50
+
+Route12Text12: ; 0x597a9
+    TX_FAR _Route12Text12
+    db $50
+
+Route15Script: ; 0x597ae
+    call $3c3c
+    ld hl, $57df
+    ld de, $57c1
+    ld a, [$d625]
+    call $3160
+    ld [$d625], a
+    ret
+; 0x597c1
+
+INCBIN "baserom.gbc",$597c1,$6
+
+Route15Texts: ; 0x597c7
+    dw Route15Text1, Route15Text2, Route15Text3, Route15Text4, Route15Text5, Route15Text6, Route15Text7, Route15Text8, Route15Text9, Route15Text10, Route15Text11, Route15Text12
+
+INCBIN "baserom.gbc",$597df,$79
+
+Route15Text1: ; 0x59858
+    db $8 ; asm
+    ld hl, $57df
+    jr asm_33cb7 ; 0x5985c $34
+
+Route15Text2:
+    db $8 ; asm
+    ld hl, $57eb
+    jr asm_33cb7 ; 0x59862 $2e
+
+Route15Text3:
+    db $8 ; asm
+    ld hl, $57f7
+    jr asm_33cb7 ; 0x59868 $28
+
+Route15Text4:
+    db $8 ; asm
+    ld hl, $5803
+    jr asm_33cb7 ; 0x5986e $22
+
+Route15Text5:
+    db $8 ; asm
+    ld hl, $580f
+    jr asm_33cb7 ; 0x59874 $1c
+
+Route15Text6:
+    db $8 ; asm
+    ld hl, $581b
+    jr asm_33cb7 ; 0x5987a $16
+
+Route15Text7:
+    db $8 ; asm
+    ld hl, $5827
+    jr asm_33cb7 ; 0x59880 $10
+
+Route15Text8:
+    db $8 ; asm
+    ld hl, $5833
+    jr asm_33cb7 ; 0x59886 $a
+
+Route15Text9:
+    db $8 ; asm
+    ld hl, $583f
+    jr asm_33cb7 ; 0x5988c $4
+
+Route15Text10:
+    db $8 ; asm
+    ld hl, $584b
+asm_33cb7: ; 0x59892
+    call $31cc
+    jp $24d7
+; 0x59898
+
+INCBIN "baserom.gbc",$59898,$96
+
+Route15Text12: ; 0x5992e
+    TX_FAR _Route15Text12
+    db $50
+
+Route16Script: ; 0x59933
+    call $3c3c
+    ld hl, $59cf
+    ld de, $5951
+    ld a, [$d626]
+    call $3160
+    ld [$d626], a
+    ret
+; 0x59946
+
+INCBIN "baserom.gbc",$59946,$73
+
+Route16Texts: ; 0x599b9
+    dw Route16Text1, Route16Text2, Route16Text3, Route16Text4, Route16Text5, Route16Text6, Route16Text7, Route16Text8, Route16Text9, Route16Text10, Route16Text11
+
+INCBIN "baserom.gbc",$599cb + 4,$4d - 4
+
+Route16Text1: ; 0x59a18
+    db $08 ; asm
+    ld hl, $59cf
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59a22,$59a31 - $59a22
+
+Route16Text2: ; 0x59a31
+    db $08 ; asm
+    ld hl, $59db
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59a3b,$59a4a - $59a3b
+
+Route16Text3: ; 0x59a4a
+    db $08 ; asm
+    ld hl, $59e7
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59a54,$59a63 - $59a54
+
+Route16Text4: ; 0x59a63
+    db $08 ; asm
+    ld hl, $59f3
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59a6d,$59a7c - $59a6d
+
+Route16Text5: ; 0x59a7c
+    db $08 ; asm
+    ld hl, $59ff
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59a86,$59a95 - $59a86
+
+Route16Text6: ; 0x59a95
+    db $08 ; asm
+    ld hl, $5a0b
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59a9f,$f
+
+Route16Text7: ; 0x59aae
+    TX_FAR _Route16Text7
+    db $50
+
+Route16Text10: ; 0x59ab3
+INCBIN "baserom.gbc",$59ab3,5
+
+Route16Text11: ; 0x59ab8
+INCBIN "baserom.gbc",$59ab8,5
+
+Route16Text8: ; 0x59abd
+    TX_FAR _Route16Text8
+    db $50
+
+Route16Text9: ; 0x59ac2
+    TX_FAR _Route16Text9
+    db $50
+
+Route18Script: ; 0x59ac7
+    call $3c3c
+    ld hl, $5aea
+    ld de, $5ada
+    ld a, [$d627]
+    call $3160
+    ld [$d627], a
+    ret
+; 0x59ada
+
+INCBIN "baserom.gbc",$59ada,$6
+
+Route18Texts: ; 0x59ae0
+    dw Route18Text1, Route18Text2, Route18Text3, Route18Text4, Route18Text5
+
+INCBIN "baserom.gbc",$59aea,$25
+
+Route18Text1: ; 0x59b0f
+    db $08 ; asm
+    ld hl, $5aea
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59b19,$59b28 - $59b19
+
+Route18Text2: ; 0x59b28
+    db $08 ; asm
+    ld hl, $5af6
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59b32,$59b41 - $59b32
+
+Route18Text3: ; 0x59b41
+    db $08 ; asm
+    ld hl, $5b02
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59b4b,$f
+
+Route18Text4: ; 0x59b5a
+    TX_FAR _Route18Text4
+    db $50
+
+Route18Text5: ; 0x59b5f
+    TX_FAR _Route18Text5
+    db $50
+
+FanClub_h: ; 0x59b64 to 0x59b70 (12 bytes) (id=90)
+    db $10 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw FanClubBlocks, FanClubTexts, FanClubScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FanClubObject ; objects
+
+FanClubScript: ; 0x59b70
+    jp $3c3c
+; 0x59b73
+
+INCBIN "baserom.gbc",$59b73,$11
+
+FanClubTexts: ; 0x59b84
+    dw FanClubText1, FanClubText2, FanClubText3, FanClubText4, FanClubText5, FanClubText6, FanClubText7, FanClubText8
+
+FanClubText1: ; 0x59b94
+    db $08 ; asm
+    ld a, [$d771]
+    bit 7, a
+    jr nz, asm_67b22 ; 0x59b9a
+    ld hl, $5bb7
+    call PrintText
+    ld hl, $d771
+    set 6, [hl]
+    jr asm_64f01 ; 0x59ba7
+asm_67b22 ; 0x59ba9
+    ld hl, $5bbc
+    call PrintText
+    ld hl, $d771
+    res 7, [hl]
+asm_64f01 ; 0x59bb4
+    jp $24d7
+
+INCBIN "baserom.gbc",$59bb7,$59bc1 - $59bb7
+
+FanClubText2: ; 0x59bc1
+    db $08 ; asm
+    ld a, [$d771]
+    bit 6, a
+    jr nz, asm_5cd59 ; 0x59bc7
+    ld hl, $5be4
+    call PrintText
+    ld hl, $d771
+    set 7, [hl]
+    jr asm_59625 ; 0x59bd4
+asm_5cd59 ; 0x59bd6
+    ld hl, $5be9
+    call PrintText
+    ld hl, $d771
+    res 6, [hl]
+asm_59625 ; 0x59be1
+    jp $24d7
+
+INCBIN "baserom.gbc",$59be4,$59bee - $59be4
+
+FanClubText3: ; 0x59bee
+    db $8
+    ld hl, $5c00
+    call PrintText
+    ld a, $54
+    call $13d0
+    call $3748
+    jp $24d7
+; 0x59c00
+
+INCBIN "baserom.gbc",$59c00,$5
+
+FanClubText4: ; 0x59c05
+    db $08 ; asm
+    ld hl, $5c17
+    call PrintText
+	ld a,SEEL
+    call $13d0
+    call $3748
+    jp $24d7
+
+INCBIN "baserom.gbc",$59c17,$59c1c - $59c17
+
+FanClubText5: ; 0x59c1c
+    db $08 ; asm
+    call $5b73
+    jr nz, asm_38bb3 ; 0x59c20
+    ld hl, $5c65
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, asm_2c8d7 ; 0x59c2f
+    ld hl, $5c6a
+    call PrintText
+    ld bc,(BIKE_VOUCHER << 8) | 1
+    call $3e2e
+    jr nc, asm_867d4 ; 0x59c3d
+    ld hl, $5c6f
+    call PrintText
+    ld hl, $d771
+    set 1, [hl]
+    jr asm_d3c26 ; 0x59c4a
+asm_867d4 ; 0x59c4c
+    ld hl, $5c83
+    call PrintText
+    jr asm_d3c26 ; 0x59c52
+asm_2c8d7 ; 0x59c54
+    ld hl, $5c79
+    call PrintText
+    jr asm_d3c26 ; 0x59c5a
+asm_38bb3 ; 0x59c5c
+    ld hl, $5c7e
+    call PrintText
+asm_d3c26 ; 0x59c62
+    jp $24d7
+
+INCBIN "baserom.gbc",$59c65,$59c88 - $59c65
+
+FanClubText6:
+    TX_FAR _FanClubText6
+    db $50
+
+FanClubText7:
+    TX_FAR _FanClubText7
+    db $50
+
+FanClubText8: ; 0x59c92
+    TX_FAR _FanClubText8
+    db $50
+
+FanClubObject: ; 0x59c97 (size=62)
+    db $d ; border tile
+
+    db $2 ; warps
+    db $7, $2, $1, $ff
+    db $7, $3, $1, $ff
+
+    db $2 ; signs
+    db $0, $1, $7 ; FanClubText7
+    db $0, $6, $8 ; FanClubText8
+
+    db $6 ; people
+    db SPRITE_FISHER2, $3 + 4, $6 + 4, $ff, $d2, $1 ; person
+    db SPRITE_GIRL, $3 + 4, $1 + 4, $ff, $d3, $2 ; person
+    db SPRITE_CLEFAIRY, $4 + 4, $6 + 4, $ff, $d2, $3 ; person
+    db SPRITE_SEEL, $4 + 4, $1 + 4, $ff, $d3, $4 ; person
+    db SPRITE_GENTLEMAN, $1 + 4, $3 + 4, $ff, $d0, $5 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $1 + 4, $5 + 4, $ff, $d0, $6 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+FanClubBlocks: ; 16
+    INCBIN "maps/fanclub.blk"
+
+SilphCo2_h: ; 0x59ce5 to 0x59cf1 (12 bytes) (id=207)
+    db $16 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SilphCo2Blocks, SilphCo2Texts, SilphCo2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo2Object ; objects
+
+SilphCo2Script: ; 0x59cf1
+    call $5d07
+    call $3c3c
+    ld hl, $5d90
+    ld de, $5d80
+    ld a, [$d643]
+    call $3160
+    ld [$d643], a
+    ret
+; 0x59d07
+
+INCBIN "baserom.gbc",$59d07,$7f
+
+SilphCo2Texts: ; 0x59d86
+    dw SilphCo2Text1, SilphCo2Text2, SilphCo2Text3, SilphCo2Text4, SilphCo2Text5
+
+INCBIN "baserom.gbc",$59d90,$31
+
+SilphCo2Text1: ; 0x59dc1
+    db $08 ; asm
+    ld a, [$d826]
+    bit 7, a
+    jr nz, asm_b8a0d ; 0x59dc7
+    ld hl, $5ded
+    call PrintText
+    ld bc,(TM_36 << 8) | 1
+    call $3e2e
+    ld hl, $5dfd
+    jr nc, asm_2c1e0 ; 0x59dd8
+    ld hl, $d826
+    set 7, [hl]
+    ld hl, $5df2
+    jr asm_2c1e0 ; 0x59de2
+asm_b8a0d ; 0x59de4
+    ld hl, $5df8
+asm_2c1e0 ; 0x59de7
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$59ded,$59e02 - $59ded
+
+SilphCo2Text2: ; 0x59e02
+    db $08 ; asm
+    ld hl, $5d90
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo2Text3: ; 0x59e0c
+    db $08 ; asm
+    ld hl, $5d9c
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo2Text4: ; 0x59e16
+    db $08 ; asm
+    ld hl, $5da8
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo2Text5: ; 0x59e20
+    db $08 ; asm
+    ld hl, $5db4
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$59e2a,$3c
+
+SilphCo2Object: ; 0x59e66 (size=98)
+    db $2e ; border tile
+
+    db $7 ; warps
+    db $0, $18, $2, SILPH_CO_1F
+    db $0, $1a, $0, SILPH_CO_3F
+    db $0, $14, $0, SILPH_CO_ELEVATOR
+    db $3, $3, $6, SILPH_CO_3F
+    db $3, $d, $4, SILPH_CO_8F
+    db $f, $1b, $5, SILPH_CO_8F
+    db $f, $9, $4, SILPH_CO_6F
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_ERIKA, $1 + 4, $a + 4, $ff, $d1, $1 ; person
+    db SPRITE_OAK_AIDE, $c + 4, $5 + 4, $ff, $d0, $42, SCIENTIST + $C8, $2 ; trainer
+    db SPRITE_OAK_AIDE, $d + 4, $18 + 4, $ff, $d2, $43, SCIENTIST + $C8, $3 ; trainer
+    db SPRITE_ROCKET, $b + 4, $10 + 4, $ff, $d1, $44, ROCKET + $C8, $17 ; trainer
+    db SPRITE_ROCKET, $7 + 4, $18 + 4, $ff, $d1, $45, ROCKET + $C8, $18 ; trainer
+
+    ; warp-to
+    EVENT_DISP $f, $0, $18 ; SILPH_CO_1F
+    EVENT_DISP $f, $0, $1a ; SILPH_CO_3F
+    EVENT_DISP $f, $0, $14 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $f, $3, $3 ; SILPH_CO_3F
+    EVENT_DISP $f, $3, $d ; SILPH_CO_8F
+    EVENT_DISP $f, $f, $1b ; SILPH_CO_8F
+    EVENT_DISP $f, $f, $9 ; SILPH_CO_6F
+
+SilphCo2Blocks: ; 135
+    INCBIN "maps/silphco2.blk"
+
+SilphCo3_h: ; 0x59f4f to 0x59f5b (12 bytes) (id=208)
+    db $16 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SilphCo3Blocks, SilphCo3Texts, SilphCo3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo3Object ; objects
+
+SilphCo3Script: ; 0x59f5b
+    call $5f71
+    call $3c3c
+    ld hl, $5fcc
+    ld de, $5fbe
+    ld a, [$d644]
+    call $3160
+    ld [$d644], a
+    ret
+; 0x59f71
+
+INCBIN "baserom.gbc",$59f71,$53
+
+SilphCo3Texts: ; 0x59fc4
+    dw SilphCo3Text1, SilphCo3Text2, SilphCo3Text3, SilphCo3Text4
+
+INCBIN "baserom.gbc",$59fcc,$19
+
+SilphCo3Text1: ; 0x59fe5
+    db $08 ; asm
+    ld a, [$d838]
+    bit 7, a
+    ld hl, $5ffe
+    jr nz, asm_8c56f ; 0x59fee
+    ld hl, $5ff9
+asm_8c56f ; 0x59ff3
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$59ff9,$5a003 - $59ff9
+
+SilphCo3Text2: ; 0x5a003
+    db $08 ; asm
+    ld hl, $5fcc
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5a00d,$5a01c - $5a00d
+
+SilphCo3Text3: ; 0x5a01c
+    db $08 ; asm
+    ld hl, $5fd8
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5a026,$f
+
+SilphCo3Object: ; 0x5a035 (size=113)
+    db $2e ; border tile
+
+    db $a ; warps
+    db $0, $1a, $1, SILPH_CO_2F
+    db $0, $18, $0, SILPH_CO_4F
+    db $0, $14, $0, SILPH_CO_ELEVATOR
+    db $b, $17, $9, SILPH_CO_3F
+    db $3, $3, $5, SILPH_CO_5F
+    db $f, $3, $6, SILPH_CO_5F
+    db $3, $1b, $3, SILPH_CO_2F
+    db $b, $3, $3, SILPH_CO_9F
+    db $b, $b, $4, SILPH_CO_7F
+    db $f, $1b, $3, SILPH_CO_3F
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_LAPRAS_GIVER, $8 + 4, $18 + 4, $ff, $ff, $1 ; person
+    db SPRITE_ROCKET, $7 + 4, $14 + 4, $ff, $d2, $42, ROCKET + $C8, $19 ; trainer
+    db SPRITE_OAK_AIDE, $9 + 4, $7 + 4, $ff, $d0, $43, SCIENTIST + $C8, $4 ; trainer
+	db SPRITE_BALL, $5 + 4, $8 + 4, $ff, $ff, $84, HYPER_POTION ; item
+
+    ; warp-to
+    EVENT_DISP $f, $0, $1a ; SILPH_CO_2F
+    EVENT_DISP $f, $0, $18 ; SILPH_CO_4F
+    EVENT_DISP $f, $0, $14 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $f, $b, $17 ; SILPH_CO_3F
+    EVENT_DISP $f, $3, $3 ; SILPH_CO_5F
+    EVENT_DISP $f, $f, $3 ; SILPH_CO_5F
+    EVENT_DISP $f, $3, $1b ; SILPH_CO_2F
+    EVENT_DISP $f, $b, $3 ; SILPH_CO_9F
+    EVENT_DISP $f, $b, $b ; SILPH_CO_7F
+    EVENT_DISP $f, $f, $1b ; SILPH_CO_3F
+
+SilphCo3Blocks: ; 135
+    INCBIN "maps/silphco3.blk"
+
+SilphCo10_h: ; 0x5a12d to 0x5a139 (12 bytes) (id=234)
+    db $16 ; tileset
+    db $09, $08 ; dimensions (y, x)
+    dw SilphCo10Blocks, SilphCo10Texts, SilphCo10Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo10Object ; objects
+
+SilphCo10Script: ; 0x5a139
+    call $614f
+    call $3c3c
+    ld hl, $6192
+    ld de, $6180
+    ld a, [$d658]
+    call $3160
+    ld [$d658], a
+    ret
+; 0x5a14f
+
+INCBIN "baserom.gbc",$5a14f,$37
+
+SilphCo10Texts: ; 0x5a186
+    dw SilphCo10Text1, SilphCo10Text2, SilphCo10Text3, SilphCo10Text4, SilphCo10Text5, SilphCo10Text6
+
+INCBIN "baserom.gbc",$5a192,$19
+
+SilphCo10Text1: ; 0x5a1ab
+    db $08 ; asm
+    ld hl, $6192
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo10Text2: ; 0x5a1b5
+    db $08 ; asm
+    ld hl, $619e
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo10Text3: ; 0x5a1bf
+    db $08 ; asm
+    ld a, [$d838]
+    bit 7, a
+    ld hl, $61d8
+    jr nz, asm_cf85f ; 0x5a1c8
+    ld hl, $61d3
+asm_cf85f ; 0x5a1cd
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$5a1d3,$28
+
+SilphCo10Object: ; 0x5a1fb (size=95)
+    db $2e ; border tile
+
+    db $6 ; warps
+    db $0, $8, $0, SILPH_CO_9F
+    db $0, $a, $0, SILPH_CO_11F
+    db $0, $c, $0, SILPH_CO_ELEVATOR
+    db $b, $9, $3, SILPH_CO_4F
+    db $f, $d, $5, SILPH_CO_4F
+    db $7, $d, $6, SILPH_CO_4F
+
+    db $0 ; signs
+
+    db $6 ; people
+    db SPRITE_ROCKET, $9 + 4, $1 + 4, $ff, $d3, $41, ROCKET + $C8, $27 ; trainer
+    db SPRITE_OAK_AIDE, $2 + 4, $a + 4, $ff, $d2, $42, SCIENTIST + $C8, $b ; trainer
+    db SPRITE_ERIKA, $f + 4, $9 + 4, $fe, $0, $3 ; person
+	db SPRITE_BALL, $c + 4, $2 + 4, $ff, $ff, $84, TM_26 ; item
+	db SPRITE_BALL, $e + 4, $4 + 4, $ff, $ff, $85, RARE_CANDY ; item
+	db SPRITE_BALL, $b + 4, $5 + 4, $ff, $ff, $86, CARBOS ; item
+
+    ; warp-to
+    EVENT_DISP $8, $0, $8 ; SILPH_CO_9F
+    EVENT_DISP $8, $0, $a ; SILPH_CO_11F
+    EVENT_DISP $8, $0, $c ; SILPH_CO_ELEVATOR
+    EVENT_DISP $8, $b, $9 ; SILPH_CO_4F
+    EVENT_DISP $8, $f, $d ; SILPH_CO_4F
+    EVENT_DISP $8, $7, $d ; SILPH_CO_4F
+
+SilphCo10Blocks: ; 72
+    INCBIN "maps/silphco10.blk"
+
+Lance_h: ; 0x5a2a2 to 0x5a2ae (12 bytes) (id=113)
+    db $05 ; tileset
+    db $0d, $0d ; dimensions (y, x)
+    dw LanceBlocks, LanceTexts, LanceScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw LanceObject ; objects
+
+LanceScript: ; 0x5a2ae
+    call $62c4
+    call $3c3c
+    ld hl, $6397
+    ld de, $62fa
+    ld a, [$d653]
+    call $3160
+    ld [$d653], a
+    ret
+; 0x5a2c4
+
+INCBIN "baserom.gbc",$5a2c4,$d1
+
+LanceTexts: ; 0x5a395
+    dw LanceText1
+
+INCBIN "baserom.gbc",$5a397,$d
+
+LanceText1: ; 0x5a3a4
+    db $08 ; asm
+    ld hl, $6397
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5a3ae,$17
+
+LanceObject: ; 0x5a3c5 (size=36)
+    db $3 ; border tile
+
+    db $3 ; warps
+    db $10, $18, $2, AGATHAS_ROOM
+    db $0, $5, $0, CHAMPIONS_ROOM
+    db $0, $6, $0, CHAMPIONS_ROOM
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_LANCE, $1 + 4, $6 + 4, $ff, $d0, $41, LANCE + $C8, $1 ; trainer
+
+    ; warp-to
+    EVENT_DISP $d, $10, $18 ; AGATHAS_ROOM
+    EVENT_DISP $d, $0, $5 ; CHAMPIONS_ROOM
+    EVENT_DISP $d, $0, $6 ; CHAMPIONS_ROOM
+
+LanceBlocks: ; 169
+    INCBIN "maps/lance.blk"
+
+HallofFameRoom_h: ; 0x5a492 to 0x5a49e (12 bytes) (id=118)
+    db $07 ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw HallofFameRoomBlocks, HallofFameRoomTexts, HallofFameRoomScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw HallofFameRoomObject ; objects
+
+HallofFameRoomScript: ; 0x5a49e
+    call $3c3c
+    ld hl, $64b2
+    ld a, [$d64b]
+    jp $3d97
+; 0x5a4aa
+
+INCBIN "baserom.gbc",$5a4aa,$5a4b2 - $5a4aa
+
+HallofFameRoomScripts: ; 0x5a4b2
+    dw HallofFameRoomScript0, HallofFameRoomScript1, HallofFameRoomScript2
+
+INCBIN "baserom.gbc",$5a4b8,$3
+
+HallofFameRoomScript2: ; 0x5a4bb
+    call Delay3
+    ld a, [$d358]
+    push af
+    xor a
+    ld [$cd6b], a
+    ld a, $55
+    call Predef
+    pop af
+    ld [$d358], a
+    ld hl, $d733
+    res 1, [hl]
+    inc hl
+    set 0, [hl]
+    xor a
+    ld hl, $d64d
+    ld [hli], a
+    ld [hli], a
+    ld [hl], a
+    ld [$d653], a
+    ld [$d64b], a
+    ld hl, $d863
+    ld [hli], a
+    ld [hli], a
+    ld [hli], a
+    ld [hli], a
+    ld [hl], a
+    xor a
+    ld [$d64b], a
+    ld a, $0
+    ld [$d719], a
+    ld b, $1c
+    ld hl, $7848
+    call Bankswitch
+    ld b, $5
+.asm_5a4ff
+    ld c, $78
+    call $3739
+    dec b
+    jr nz, .asm_5a4ff ; 0x5a505 $f8
+    call $3865
+    jp $1f54
+; 0x5a50d
+
+HallofFameRoomScript0: ; 0x5a50d
+    ld a, $ff
+    ld [$cd6b], a
+    ld hl, $ccd3
+    ld de, $6528
+    call $350c
+    dec a
+    ld [$cd38], a
+    call $3486
+    ld a, $1
+    ld [$d64b], a
+    ret
+; 0x5a528
+
+INCBIN "baserom.gbc",$5a528,$5a52b - $5a528
+
+HallofFameRoomScript1: ; 0x5a52b
+    ld a, [$cd38]
+    and a
+    ret nz
+    ld a, $1
+    ld [$d528], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $3541
+    ld a, $8
+    ld [$ff00+$8d], a
+    call $34a6
+    call Delay3
+    xor a
+    ld [$cd6b], a
+    inc a
+    ld [$d528], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $2920
+    ld a, $ff
+    ld [$cd6b], a
+    ld a, $8
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld a, $2
+    ld [$d64b], a
+    ret
+; 0x5a56a
+
+HallofFameRoomTexts: ; 0x5a56a
+    dw HallofFameRoomText1
+
+HallofFameRoomText1: ; 0x5a56c
+    TX_FAR _HallofFameRoomText1
+    db $50
+
+HallofFameRoomObject: ; 0x5a571 (size=26)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $7, $4, $2, CHAMPIONS_ROOM
+    db $7, $5, $3, CHAMPIONS_ROOM
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_OAK, $2 + 4, $5 + 4, $ff, $d0, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $7, $4 ; CHAMPIONS_ROOM
+    EVENT_DISP $5, $7, $5 ; CHAMPIONS_ROOM
+
+HallofFameRoomBlocks: ; 20
+    INCBIN "maps/halloffameroom.blk"
+
+INCBIN "baserom.gbc",$5a59f,$1a61
+
+SECTION "bank17",DATA,BANK[$17]
+
+VermilionMartBlocks: ; 16
+    INCBIN "maps/vermilionmart.blk"
+
+RedsHouse2FBlocks:
+	INCBIN "maps/redshouse2f.blk"
+
+MuseumF1Blocks: ; 40
+    INCBIN "maps/museumf1.blk"
+
+MuseumF2Blocks: ; 28
+    INCBIN "maps/museumf2.blk"
+
+PewterPokecenterBlocks: ; 28
+    INCBIN "maps/pewterpokecenter.blk"
+
+UndergroundTunnelEntranceRoute5Blocks: ; 16
+    INCBIN "maps/undergroundtunnelentranceroute5.blk"
+
+ViridianForestexitBlocks: ; 20
+    INCBIN "maps/viridianforestexit.blk"
+
+RedsHouse2F_h:
+	db $04 ; tileset
+	db $04,$04 ; dimensions
+	dw RedsHouse2FBlocks, RedsHouse2FTexts, RedsHouse2FScript
+	db 0 ; no connections
+	dw RedsHouse2FObject
+
+RedsHouse2FScript:
+	call $3C3C
+	ld hl,RedsHouse2FScriptPointers
+	ld a,[$D60C]
+	jp $3D97
+
+RedsHouse2FScriptPointers:
+	dw RedsHouse2FScript1,RedsHouse2FScript2
+
+RedsHouse2FScript1:
+	xor a
+	ld [$FFB4],a
+	ld a,8
+	ld [$D528],a
+	ld a,1
+	ld [$D60C],a
+	ret
+
+RedsHouse2FScript2:
+	ret
+
+RedsHouse2FTexts:
+	db "@"
+
+RedsHouse2FObject:
+	db $0A ; border tile
+
+	db 1 ; warps
+	db 1,7,2,$25
+
+	db 0 ; signs
+
+	db 0 ; people
+
+	dw $C6EF + 4 + (4 + 6) * 0 + 3
+	db 1,7
+
+INCBIN "baserom.gbc",$5c0dc,$5c0eb - $5c0dc
+
+MuseumF1_h: ; 0x5c0eb to 0x5c0f7 (12 bytes) (id=52)
+    db $0a ; tileset
+    db $04, $0a ; dimensions (y, x)
+    dw MuseumF1Blocks, MuseumF1Texts, MuseumF1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw MuseumF1Object ; objects
+
+MuseumF1Script: ; 0x5c0f7
+    ld a, $1
+    ld [$cf0c], a
+    xor a
+    ld [$cc3c], a
+    ld hl, $4109
+    ld a, [$d619]
+    jp $3d97
+; 0x5c109
+
+MuseumF1Scripts: ; 0x5c109
+    dw MuseumF1Script0, MuseumF1Script1
+
+MuseumF1Script0: ; 0x5c10d
+    ld a, [$d361]
+    cp $4
+    ret nz
+    ld a, [$d362]
+    cp $9
+    jr z, .asm_5c120 ; 0x5c118 $6
+    ld a, [$d362]
+    cp $a
+    ret nz
+.asm_5c120
+    xor a
+    ld [$ff00+$b4], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    jp $2920
+; 0x5c12a
+
+MuseumF1Script1: ; 0x5c12a
+    ret
+; 0x5c12b
+
+MuseumF1Texts: ; 0x5c12b
+    dw MuseumF1Text1, MuseumF1Text2, MuseumF1Text3, MuseumF1Text4, MuseumF1Text5
+
+MuseumF1Text1: ; 0x5c135
+    db $8
+    ld a, [$d361]
+    cp $4
+    jr nz, asm_8774b ; 0x5c13b $a
+    ld a, [$d362]
+    cp $d
+    jp z, $41f9
+    jr asm_b8709 ; 0x5c145 $1c
+asm_8774b: ; 0x5c147
+    cp $3
+    jr nz, asm_d49e7 ; 0x5c149 $8
+    ld a, [$d362]
+    cp $c
+    jp z, $41f9
+asm_d49e7: ; 0x5c153
+    ld a, [$d754]
+    bit 0, a
+    jr nz, asm_31a16 ; 0x5c158 $10
+    ld hl, $423d
+    call PrintText
+    jp $4217
+asm_b8709: ; 0x5c163
+    ld a, [$d754]
+    bit 0, a
+    jr z, asm_3ded4 ; 0x5c168 $9
+asm_31a16: ; 0x5c16a
+    ld hl, $4242
+    call PrintText
+    jp $4217
+asm_3ded4: ; 0x5c173
+    ld a, $13
+    ld [$d125], a
+    call $30e8
+    xor a
+    ld [$ff00+$b4], a
+    ld hl, $421f
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, asm_de133 ; 0x5c18b $4d
+    xor a
+    ld [$ff00+$9f], a
+    ld [$ff00+$a0], a
+    ld a, $50
+    ld [$ff00+$a1], a
+    call $35a6
+    jr nc, asm_0f3e3 ; 0x5c199 $9
+    ld hl, $4229
+    call PrintText
+    jp $41da
+asm_0f3e3: ; 0x5c1a4
+    ld hl, $4224
+    call PrintText
+    ld hl, $d754
+    set 0, [hl]
+    xor a
+    ld [$cd3d], a
+    ld [$cd3e], a
+    ld a, $50
+    ld [$cd3f], a
+    ld hl, $cd3f
+    ld de, $d349
+    ld c, $3
+    ld a, $c
+    call Predef
+    ld a, $13
+    ld [$d125], a
+    call $30e8
+    ld a, $b2
+    call $3740
+    call $3748
+    jr asm_0b094 ; 0x5c1d8 $18
+asm_de133: ; 0x5c1da
+    ld hl, $421a
+    call PrintText
+    ld a, $1
+    ld [$cd38], a
+    ld a, $80
+    ld [$ccd3], a
+    call $3486
+    call $2429
+    jr asm_d1145 ; 0x5c1f0 $25
+asm_0b094: ; 0x5c1f2
+    ld a, $1
+    ld [$d619], a
+    jr asm_d1145 ; 0x5c1f7 $1e
+;XXX what calls this?
+    ld hl, $422e
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    cp $0
+    jr nz, asm_d1144
+    ld hl, $4233
+    call PrintText
+    jr asm_d1145 ; 0x5c20f $6
+asm_d1144:
+    ld hl, $4238
+    call PrintText
+asm_d1145: ; 0x5c217
+    jp $24d7
+; 0x5c21a
+
+INCBIN "baserom.gbc",$5c21a,$2d
+
+MuseumF1Text2: ; 0x5c247
+    db $08 ; asm
+    ld hl, $4251
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c251,$5c256 - $5c251
+
+MuseumF1Text3: ; 0x5c256
+    db $08 ; asm
+    ld a, [$d754]
+    bit 1, a
+    jr nz, .asm_16599 ; 0x5c25c
+    ld hl, $428e
+    call PrintText
+    ld bc,(OLD_AMBER << 8) | 1
+    call $3e2e
+    jr nc, .asm_91ebf ; 0x5c26a
+    ld hl, $d754
+    set 1, [hl]
+    ld a, $34
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld hl, $4293
+    jr .asm_52e0f ; 0x5c27e
+.asm_91ebf ; 0x5c280
+    ld hl, $429e
+    jr .asm_52e0f ; 0x5c283
+.asm_16599 ; 0x5c285
+    ld hl, $4299
+.asm_52e0f ; 0x5c288
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c28e,$5c2a3 - $5c28e
+
+MuseumF1Text4: ; 0x5c2a3
+    db $08 ; asm
+    ld hl, $42ad
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c2ad,$5c2b2 - $5c2ad
+
+MuseumF1Text5: ; 0x5c2b2
+    db $08 ; asm
+    ld hl, $42bc
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c2bc,$5
+
+MuseumF1Object: ; 0x5c2c1 (size=74)
+    db $a ; border tile
+
+    db $5 ; warps
+    db $7, $a, $0, $ff
+    db $7, $b, $0, $ff
+    db $7, $10, $1, $ff
+    db $7, $11, $1, $ff
+    db $7, $7, $0, MUSEUM_2F
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_OAK_AIDE, $4 + 4, $c + 4, $ff, $d2, $1 ; person
+    db SPRITE_GAMBLER, $4 + 4, $1 + 4, $ff, $ff, $2 ; person
+    db SPRITE_OAK_AIDE, $2 + 4, $f + 4, $ff, $d0, $3 ; person
+    db SPRITE_OAK_AIDE, $4 + 4, $11 + 4, $ff, $ff, $4 ; person
+    db SPRITE_OLD_AMBER, $2 + 4, $10 + 4, $ff, $ff, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $7, $a
+    EVENT_DISP $a, $7, $b
+    EVENT_DISP $a, $7, $10
+    EVENT_DISP $a, $7, $11
+    EVENT_DISP $a, $7, $7 ; MUSEUM_2F
+
+MuseumF2_h: ; 0x5c30b to 0x5c317 (12 bytes) (id=53)
+    db $0a ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw MuseumF2Blocks, MuseumF2Texts, MuseumF2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw MuseumF2Object ; objects
+
+MuseumF2Script: ; 0x5c317
+    jp $3c3c
+; 0x5c31a
+
+MuseumF2Texts: ; 0x5c31a
+    dw MuseumF2Text1, MuseumF2Text2, MuseumF2Text3, MuseumF2Text4, MuseumF2Text5, MuseumF2Text6, MuseumF2Text7
+
+MuseumF2Text1: ; 0x5c328
+    TX_FAR _MuseumF2Text1
+    db $50
+
+MuseumF2Text2: ; 0x5c32d
+    TX_FAR _MuseumF2Text2
+    db $50
+
+MuseumF2Text3: ; 0x5c332
+    TX_FAR _MuseumF2Text3
+    db $50
+
+MuseumF2Text4: ; 0x5c337
+    TX_FAR _MuseumF2Text4
+    db $50
+
+MuseumF2Text5: ; 0x5c33c
+    TX_FAR _MuseumF2Text5
+    db $50
+
+MuseumF2Text6: ; 0x5c341
+    TX_FAR _MuseumF2Text6
+    db $50
+
+MuseumF2Text7: ; 0x5c346
+    TX_FAR _MuseumF2Text7
+    db $50
+
+MuseumF2Object: ; 0x5c34b (size=48)
+    db $a ; border tile
+
+    db $1 ; warps
+    db $7, $7, $4, MUSEUM_1F
+
+    db $2 ; signs
+    db $2, $b, $6 ; MuseumF2Text6
+    db $5, $2, $7 ; MuseumF2Text7
+
+    db $5 ; people
+    db SPRITE_BUG_CATCHER, $7 + 4, $1 + 4, $fe, $2, $1 ; person
+    db SPRITE_OLD_PERSON, $5 + 4, $0 + 4, $ff, $d0, $2 ; person
+    db SPRITE_OAK_AIDE, $5 + 4, $7 + 4, $ff, $d0, $3 ; person
+    db SPRITE_BRUNETTE_GIRL, $5 + 4, $b + 4, $ff, $ff, $4 ; person
+    db SPRITE_HIKER, $5 + 4, $c + 4, $ff, $d0, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $7 ; MUSEUM_1F
+
+PewterGym_h: ; 0x5c37b to 0x5c387 (12 bytes) (id=54)
+    db $07 ; tileset
+    db $07, $05 ; dimensions (y, x)
+    dw PewterGymBlocks, PewterGymTexts, PewterGymScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PewterGymObject ; objects
+
+PewterGymScript: ; 0x5c387
+    ld hl, $d126
+    bit 6, [hl]
+    res 6, [hl]
+    call nz, $43a4
+    call $3c3c
+    ld hl, $4441
+    ld de, $43ca
+    ld a, [$d5fc]
+    call $3160
+    ld [$d5fc], a
+    ret
+; 0x5c3a4
+
+INCBIN "baserom.gbc",$5c3a4,$91
+
+PewterGymTexts: ; 0x5c435
+    dw PewterGymText1, PewterGymText2, PewterGymText3, PewterGymText4, PewterGymText5, PewterGymText6
+
+INCBIN "baserom.gbc",$5c43b + 6,$13 - 6
+
+PewterGymText1: ; 0x5c44e
+    db $08 ; asm
+    ld a, [$d755]
+    bit 7, a
+    jr z, .asm_4a735 ; 0x5c454
+    bit 6, a
+    jr nz, .asm_ff7d0 ; 0x5c458
+    call z, $43df
+    call $30b6
+    jr .asm_e0ffb ; 0x5c460
+.asm_ff7d0 ; 0x5c462
+    ld hl, $44a3
+    call PrintText
+    jr .asm_e0ffb ; 0x5c468
+.asm_4a735 ; 0x5c46a
+    ld hl, $449e
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $44bc
+    ld de, $44bc
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $1
+    ld [$d05c], a
+    xor a
+    ldh [$b4], a
+    ld a, $3
+    ld [$d5fc], a
+    ld [$da39], a
+.asm_e0ffb ; 0x5c49b
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c49e,$5c4a8 - $5c49e
+
+PewterGymText4: ; 0x5c4a8
+INCBIN "baserom.gbc",$5c4a8,5
+
+PewterGymText5: ; 0x5c4ad
+INCBIN "baserom.gbc",$5c4ad,6
+
+INCBIN "baserom.gbc",$5c4b3,$5c4b7 - $5c4b3
+
+PewterGymText6: ; 0x5c4b7
+INCBIN "baserom.gbc",$5c4b7,5
+
+INCBIN "baserom.gbc",$5c4bc,$5c4c6 - $5c4bc
+
+PewterGymText2: ; 0x5c4c6
+    db $08 ; asm
+    ld hl, $4441
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c4d0,$5c4df - $5c4d0
+
+PewterGymText3: ; 0x5c4df
+    db $08 ; asm
+    ld a, [$d72a]
+    bit 0, a
+    jr nz, .asm_71369 ; 0x5c4e5
+    ld hl, $4515
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_6123a ; 0x5c4f4
+    ld hl, $451a
+    call PrintText
+    jr .asm_d1578 ; 0x5c4fc
+.asm_6123a ; 0x5c4fe
+    ld hl, $4524
+    call PrintText
+.asm_d1578 ; 0x5c504
+    ld hl, $451f
+    call PrintText
+    jr .asm_07013 ; 0x5c50a
+.asm_71369 ; 0x5c50c
+    ld hl, $4529
+    call PrintText
+.asm_07013 ; 0x5c512
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c515,$19
+
+PewterGymObject: ; 0x5c52e (size=42)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $d, $4, $2, $ff
+    db $d, $5, $2, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $1 + 4, $4 + 4, $ff, $d0, $41, BROCK + $C8, $1 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $6 + 4, $3 + 4, $ff, $d3, $42, JR__TRAINER_M + $C8, $1 ; trainer
+    db SPRITE_GYM_HELPER, $a + 4, $7 + 4, $ff, $d0, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $d, $4
+    EVENT_DISP $5, $d, $5
+
+PewterGymBlocks: ; 35
+    INCBIN "maps/pewtergym.blk"
+
+PewterPokecenter_h: ; 0x5c57b to 0x5c587 (12 bytes) (id=58)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw PewterPokecenterBlocks, $458d, PewterPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PewterPokecenterObject ; objects
+
+PewterPokecenterScript: ; 0x5c587
+    call $22fa
+    jp $3c3c
+; 0x5c58d
+
+INCBIN "baserom.gbc",$5c58d,$9
+
+PewterPokecenterText2:
+PewterPokecenterText1: ; 0x5c596
+    TX_FAR _PewterPokecenterText1
+    db $50
+
+PewterPokecenterText3: ; 0x5c59b
+    db $8
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $4603
+    call PrintText
+    ld a, $ff
+    call $23b1
+    ld c, $20
+    call $3739
+    ld hl, $4608
+    ld de, $cd3f
+    ld bc, $0004
+    call CopyData
+    ld a, [$c132]
+    ld hl, $cd3f
+.asm_5c5c3
+    cp [hl]
+    inc hl
+    jr nz, .asm_5c5c3 ; 0x5c5c5 $fc
+    dec hl
+    push hl
+    ld c, $1f
+    ld a, $d0
+    call $23a1
+    pop hl
+.asm_5c5d1
+    ld a, [hl]
+    ld [$c132], a
+    push hl
+    ld hl, $cd3f
+    ld de, $cd3e
+    ld bc, $0004
+    call CopyData
+    ld a, [$cd3e]
+    ld [$cd42], a
+    pop hl
+    ld c, $18
+    call $3739
+    ld a, [$c026]
+    ld b, a
+    ld a, [$c027]
+    or b
+    jr nz, .asm_5c5d1 ; 0x5c5f6 $d9
+    ld c, $30
+    call $3739
+    call $2307
+    jp $24d7
+; 0x5c603
+
+PewterPokecenterText4: ; broken TX_FAR to _PewterPokecenterText4
+    db $17, $44, $47, $26
+    db $50
+
+;XXX wtf?
+db $30, $38, $34, $3c
+
+PewterPokecenterText5: ; XXX confirm text_id number
+    db $f6
+
+PewterPokecenterObject: ; 0x5c60d (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $6, $ff
+    db $7, $4, $6, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GENTLEMAN, $7 + 4, $b + 4, $ff, $d2, $2 ; person
+    db SPRITE_CLEFAIRY, $3 + 4, $1 + 4, $ff, $d0, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+CeruleanPokecenter_h: ; 0x5c639 to 0x5c645 (12 bytes) (id=64)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw CeruleanPokecenterBlocks, $464b, CeruleanPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeruleanPokecenterObject ; objects
+
+CeruleanPokecenterScript: ; 0x5c645
+    call $22fa
+    jp $3c3c
+; 0x5c64b
+
+INCBIN "baserom.gbc",$5c64b,$8
+
+CeruleanPokecenterText4:
+    db $f6, $ff
+
+CeruleanPokecenterText2:
+CeruleanPokecenterText1: ; 0x5c655
+    TX_FAR _CeruleanPokecenterText1
+    db $50
+
+CeruleanPokecenterText3:
+    TX_FAR _CeruleanPokecenterText3
+    db $50
+
+CeruleanPokecenterObject: ; 0x5c65f (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $2, $ff
+    db $7, $4, $2, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $5 + 4, $a + 4, $fe, $0, $2 ; person
+    db SPRITE_GENTLEMAN, $3 + 4, $4 + 4, $ff, $d0, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+CeruleanPokecenterBlocks: ; 28
+    INCBIN "maps/ceruleanpokecenter.blk"
+
+CeruleanGym_h: ; 0x5c6a7 to 0x5c6b3 (12 bytes) (id=65)
+    db $07 ; tileset
+    db $07, $05 ; dimensions (y, x)
+    dw CeruleanGymBlocks, CeruleanGymTexts, CeruleanGymScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeruleanGymObject ; objects
+
+CeruleanGymScript: ; 0x5c6b3
+    ld hl, $d126
+    bit 6, [hl]
+    res 6, [hl]
+    call nz, $46d0
+    call $3c3c
+    ld hl, $4758
+    ld de, $46f8
+    ld a, [$d5fd]
+    call $3160
+    ld [$d5fd], a
+    ret
+; 0x5c6d0
+
+INCBIN "baserom.gbc",$5c6d0,$7a
+
+CeruleanGymTexts: ; 0x5c74a
+    dw CeruleanGymText1, CeruleanGymText2, CeruleanGymText3, CeruleanGymText4, CeruleanGymText5, CeruleanGymText6, CeruleanGymText7
+
+INCBIN "baserom.gbc",$5c752 + 6,$1f - 6
+
+CeruleanGymText1: ; 0x5c771
+    db $08 ; asm
+    ld a, [$d75e]
+    bit 7, a
+    jr z, .asm_10854 ; 0x5c777
+    bit 6, a
+    jr nz, .asm_37a1b ; 0x5c77b
+    call z, $470d
+    call $30b6
+    jr .asm_95b04 ; 0x5c783
+.asm_37a1b ; 0x5c785
+    ld hl, $47c3
+    call PrintText
+    jr .asm_95b04 ; 0x5c78b
+.asm_10854 ; 0x5c78d
+    ld hl, $47be
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $47d8
+    ld de, $47d8
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $2
+    ld [$d05c], a
+    xor a
+    ldh [$b4], a
+    ld a, $3
+    ld [$d5fd], a
+.asm_95b04 ; 0x5c7bb
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c7be,$5c7c8 - $5c7be
+
+CeruleanGymText5: ; 0x5c7c8
+INCBIN "baserom.gbc",$5c7c8,5
+
+CeruleanGymText6: ; 0x5c7cd
+INCBIN "baserom.gbc",$5c7cd,4
+db $0b
+db $50
+
+CeruleanGymText7: ; 0x5c7d3
+INCBIN "baserom.gbc",$5c7d3,5
+
+INCBIN "baserom.gbc",$5c7d8,$5c7df - $5c7d8
+
+CeruleanGymText2: ; 0x5c7df
+    db $08 ; asm
+    ld hl, $4758
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c7e9,$5c7f8 - $5c7e9
+
+CeruleanGymText3: ; 0x5c7f8
+    db $08 ; asm
+    ld hl, $4764
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c802,$5c811 - $5c802
+
+CeruleanGymText4: ; 0x5c811
+    db $08 ; asm
+    ld a, [$d75e]
+    bit 7, a
+    jr nz, .asm_f80ce ; 0x5c817
+    ld hl, $482a
+    call PrintText
+    jr .asm_18a31 ; 0x5c81f
+.asm_f80ce ; 0x5c821
+    ld hl, $482f
+    call PrintText
+.asm_18a31 ; 0x5c827
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c82a,$a
+
+CeruleanGymObject: ; 0x5c834 (size=50)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $d, $4, $3, $ff
+    db $d, $5, $3, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_BRUNETTE_GIRL, $2 + 4, $4 + 4, $ff, $d0, $41, MISTY + $C8, $1 ; trainer
+    db SPRITE_LASS, $3 + 4, $2 + 4, $ff, $d3, $42, JR__TRAINER_F + $C8, $1 ; trainer
+    db SPRITE_SWIMMER, $7 + 4, $8 + 4, $ff, $d2, $43, SWIMMER + $C8, $1 ; trainer
+    db SPRITE_GYM_HELPER, $a + 4, $7 + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $d, $4
+    EVENT_DISP $5, $d, $5
+
+CeruleanGymBlocks: ; 35
+    INCBIN "maps/ceruleangym.blk"
+
+CeruleanMart_h: ; 0x5c889 to 0x5c895 (12 bytes) (id=67)
+    db $02 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $4000, CeruleanMartTexts, CeruleanMartScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeruleanMartObject ; objects
+
+CeruleanMartScript: ; 0x5c895
+    jp $3c3c
+; 0x5c898
+
+CeruleanMartTexts: ; 0x5c898
+    dw CeruleanMartText1, CeruleanMartText2, CeruleanMartText3
+
+CeruleanMartText2: ; 0x5c89e
+    TX_FAR _CeruleanMartText2
+    db $50
+
+CeruleanMartText3: ; 0x5c8a3
+    TX_FAR _CeruleanMartText3
+    db $50
+
+CeruleanMartObject: ; 0x5c8a8 (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $5, $ff
+    db $7, $4, $5, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $4 + 4, $3 + 4, $fe, $1, $2 ; person
+    db SPRITE_LASS, $2 + 4, $6 + 4, $fe, $2, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+
+LavenderPokecenter_h: ; 0x5c8ce to 0x5c8da (12 bytes) (id=141)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw $4064, $48e0, LavenderPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw LavenderPokecenterObject ; objects
+
+LavenderPokecenterScript: ; 0x5c8da
+    call $22fa
+    jp $3c3c
+; 0x5c8e0
+
+INCBIN "baserom.gbc",$5c8e0,$8
+
+LavenderPokecenterText4:
+    db $f6, $ff
+
+LavenderPokecenterText2:
+LavenderPokecenterText1: ; 0x5c8ea
+    TX_FAR _LavenderPokecenterText1
+
+INCBIN "baserom.gbc",$5c8ee,$5c8ef - $5c8ee
+
+LavenderPokecenterText3: ; 0x5c8ef
+    TX_FAR _LavenderPokecenterText3
+    db $50
+
+LavenderPokecenterObject: ; 0x5c8f4 (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $0, $ff
+    db $7, $4, $0, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_GENTLEMAN, $3 + 4, $5 + 4, $ff, $ff, $2 ; person
+    db SPRITE_LITTLE_GIRL, $6 + 4, $2 + 4, $fe, $1, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+LavenderMart_h: ; 0x5c920 to 0x5c92c (12 bytes) (id=150)
+    db $02 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $4000, $492f, LavenderMartScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw LavenderMartObject ; objects
+
+LavenderMartScript: ; 0x5c92c
+    jp $3c3c
+; 0x5c92f
+
+LavenderMartTexts: ; 0x5c92f
+    dw LavenderMartText1, LavenderMartText2, LavenderMartText3
+
+LavenderMartText2: ; 0x5c935
+    TX_FAR _LavenderMartText2
+    db $50
+
+LavenderMartText3: ; 0x5c93a
+    db $08 ; asm
+    ld a, [$d7e0]
+    bit 7, a
+    jr nz, .asm_c88d4 ; 0x5c940
+    ld hl, $4953
+    call PrintText
+    jr .asm_6d225 ; 0x5c948
+.asm_c88d4 ; 0x5c94a
+    ld hl, $4958
+    call PrintText
+.asm_6d225 ; 0x5c950
+    jp $24d7
+
+INCBIN "baserom.gbc",$5c953,$a
+
+LavenderMartObject: ; 0x5c95d (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $3, $ff
+    db $7, $4, $3, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BALDING_GUY, $4 + 4, $3 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $2 + 4, $7 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+
+VermilionPokecenter_h: ; 0x5c983 to 0x5c98f (12 bytes) (id=89)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw $4064, $4995, VermilionPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VermilionPokecenterObject ; objects
+
+VermilionPokecenterScript: ; 0x5c98f
+    call $22fa
+    jp $3c3c
+; 0x5c995
+
+INCBIN "baserom.gbc",$5c995,$9
+
+VermilionPokecenterText2:
+VermilionPokecenterText1: ; 0x5c99e
+    TX_FAR _VermilionPokecenterText1
+    db $50
+
+VermilionPokecenterText3: ; 0x5c9a3
+    TX_FAR _VermilionPokecenterText3
+    db $50
+
+VermilionPokecenterText4: ; 0x5c9a8
+    db $f6
+
+VermilionPokecenterObject: ; 0x5c9a9 (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $0, $ff
+    db $7, $4, $0, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_FISHER, $5 + 4, $a + 4, $ff, $ff, $2 ; person
+    db SPRITE_SAILOR, $4 + 4, $5 + 4, $ff, $ff, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+VermilionMart_h: ; 0x5c9d5 to 0x5c9e1 (12 bytes) (id=91)
+    db $02 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw VermilionMartBlocks, VermilionMartTexts, VermilionMartScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VermilionMartObject ; objects
+
+VermilionMartScript: ; 0x5c9e1
+    jp $3c3c
+; 0x5c9e4
+
+VermilionMartTexts: ; 0x5c9e4
+    dw VermilionMartText1, VermilionMartText2, VermilionMartText3
+
+VermilionMartText2: ; 0x5c9ea
+    TX_FAR _VermilionMartText2
+    db $50
+
+VermilionMartText3: ; 0x5c9ef
+    TX_FAR _VermilionMartText3
+    db $50
+
+VermilionMartObject: ; 0x5c9f4 (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $2, $ff
+    db $7, $4, $2, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $6 + 4, $5 + 4, $ff, $ff, $2 ; person
+    db SPRITE_LASS, $3 + 4, $3 + 4, $fe, $2, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+
+VermilionGym_h: ; 0x5ca1a to 0x5ca26 (12 bytes) (id=92)
+    db $07 ; tileset
+    db $09, $05 ; dimensions (y, x)
+    dw VermilionGymBlocks, VermilionGymTexts, VermilionGymScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VermilionGymObject ; objects
+
+VermilionGymScript: ; 0x5ca26
+    ld hl, $d126
+    bit 5, [hl]
+    res 5, [hl]
+    push hl
+    call nz, $4a4c
+    pop hl
+    bit 6, [hl]
+    res 6, [hl]
+    call nz, $4a6d
+    call $3c3c
+    ld hl, $4af8
+    ld de, $4a95
+    ld a, [$d5fe]
+    call $3160
+    ld [$d5fe], a
+    ret
+; 0x5ca4c
+
+INCBIN "baserom.gbc",$5ca4c,$9c
+
+VermilionGymTexts: ; 0x5cae8
+    dw VermilionGymText1, VermilionGymText2, VermilionGymText3, VermilionGymText4, VermilionGymText5, VermilionGymText6, VermilionGymText7, VermilionGymText8
+
+INCBIN "baserom.gbc",$5caf8,37
+
+VermilionGymText1: ; 0x5cb1d
+    db $08 ; asm
+    ld a, [$d773]
+    bit 7, a
+    jr z, .asm_7cc29 ; 0x5cb23
+    bit 6, a
+    jr nz, .asm_41203 ; 0x5cb27
+    call z, $4aaa
+    call $30b6
+    jr .asm_23621 ; 0x5cb2f
+.asm_41203 ; 0x5cb31
+    ld hl, $4b72
+    call PrintText
+    jr .asm_23621 ; 0x5cb37
+.asm_7cc29 ; 0x5cb39
+    ld hl, $4b6d
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $4b8b
+    ld de, $4b8b
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $3
+    ld [$d05c], a
+    xor a
+    ldh [$b4], a
+    ld a, $3
+    ld [$d5fe], a
+    ld [$da39], a
+.asm_23621 ; 0x5cb6a
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cb6d,$5cb77 - $5cb6d
+
+VermilionGymText6: ; 0x5cb77
+INCBIN "baserom.gbc",$5cb77,5
+
+VermilionGymText7: ; 0x5cb7c
+INCBIN "baserom.gbc",$5cb7c,5
+
+INCBIN "baserom.gbc",$5cb81,5
+
+VermilionGymText8: ; 0x5cb86
+INCBIN "baserom.gbc",$5cb86,5
+
+INCBIN "baserom.gbc",$5cb8b,5
+
+VermilionGymText2: ; 0x5cb90
+    db $08 ; asm
+    ld hl, $4af8
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cb9a,$5cba9 - $5cb9a
+
+VermilionGymText3: ; 0x5cba9
+    db $08 ; asm
+    ld hl, $4b04
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cbb3,$5cbc2 - $5cbb3
+
+VermilionGymText4: ; 0x5cbc2
+    db $08 ; asm
+    ld hl, $4b10
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cbcc,$5cbdb - $5cbcc
+
+VermilionGymText5: ; 0x5cbdb
+    db $08 ; asm
+    ld a, [$d72a]
+    bit 2, a
+    jr nz, .asm_13b67 ; 0x5cbe1
+    ld hl, $4bf4
+    call PrintText
+    jr .asm_c2b38 ; 0x5cbe9
+.asm_13b67 ; 0x5cbeb
+    ld hl, $4bf9
+    call PrintText
+.asm_c2b38 ; 0x5cbf1
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cbf4,$a
+
+VermilionGymObject: ; 0x5cbfe (size=58)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $11, $4, $3, $ff
+    db $11, $5, $3, $ff
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_ROCKER, $1 + 4, $5 + 4, $ff, $d0, $41, LT__SURGE + $C8, $1 ; trainer
+    db SPRITE_GENTLEMAN, $6 + 4, $9 + 4, $ff, $d2, $42, GENTLEMAN + $C8, $3 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $8 + 4, $3 + 4, $ff, $d2, $43, ROCKER + $C8, $1 ; trainer
+    db SPRITE_SAILOR, $a + 4, $0 + 4, $ff, $d3, $44, SAILOR + $C8, $8 ; trainer
+    db SPRITE_GYM_HELPER, $e + 4, $4 + 4, $ff, $d0, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $11, $4
+    EVENT_DISP $5, $11, $5
+
+VermilionGymBlocks: ; 45
+    INCBIN "maps/vermiliongym.blk"
+
+CopycatsHouseF2_h: ; 0x5cc65 to 0x5cc71 (12 bytes) (id=176)
+    db $04 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $4010, CopycatsHouseF2Texts, CopycatsHouseF2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CopycatsHouseF2Object ; objects
+
+CopycatsHouseF2Script: ; 0x5cc71
+    jp $3c3c
+; 0x5cc74
+
+CopycatsHouseF2Texts: ; 0x5cc74
+    dw CopycatsHouseF2Text1, CopycatsHouseF2Text2, CopycatsHouseF2Text3, CopycatsHouseF2Text4, CopycatsHouseF2Text5, CopycatsHouseF2Text6, CopycatsHouseF2Text7
+
+CopycatsHouseF2Text1: ; 0x5cc82
+    db $08 ; asm
+    ld a, [$d7af]
+    bit 0, a
+    jr nz, .asm_7ccf3 ; 0x5cc88
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $4cd4
+    call PrintText
+    ld b,POKE_DOLL
+    call $3493
+    jr z, .asm_62ecd ; 0x5cc9a
+    ld hl, $4cd9
+    call PrintText
+    ld bc,(TM_31 << 8) | 1
+    call $3e2e
+    jr nc, .asm_16690 ; 0x5cca8
+    ld hl, $4cde
+    call PrintText
+    ld a, $33
+    ldh [$db], a
+    ld b, $5 ; BANK(MyFunction)
+    ld hl, $7f37 ; MyFunction
+    call Bankswitch
+    ld hl, $d7af
+    set 0, [hl]
+    jr .asm_62ecd ; 0x5ccc1
+.asm_16690 ; 0x5ccc3
+    ld hl, $4cee
+    call PrintText
+    jr .asm_62ecd ; 0x5ccc9
+.asm_7ccf3 ; 0x5cccb
+    ld hl, $4ce9
+    call PrintText
+.asm_62ecd ; 0x5ccd1
+    jp $24d7
+
+INCBIN "baserom.gbc",$5ccd4,$20
+
+CopycatsHouseF2Text2: ; 0x5ccf4
+    TX_FAR _CopycatsHouseF2Text2
+    db $50
+
+CopycatsHouseF2Text5:
+CopycatsHouseF2Text4:
+CopycatsHouseF2Text3: ; 0x5ccf9
+    TX_FAR _CopycatsHouseF2Text3
+    db $50
+
+CopycatsHouseF2Text6: ; 0x5ccfe
+    TX_FAR _CopycatsHouseF2Text6
+    db $50
+
+CopycatsHouseF2Text7: ; 0x5cd03
+    db $08 ; asm
+    ld a, [$c109]
+    cp $4
+    ld hl, $4d1c
+    jr nz, .asm_399a4 ; 0x5cd0c
+    ld hl, $4d17
+.asm_399a4 ; 0x5cd11
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cd17,$a
+
+CopycatsHouseF2Object: ; 0x5cd21 (size=48)
+    db $a ; border tile
+
+    db $1 ; warps
+    db $1, $7, $2, COPYCATS_HOUSE_1F
+
+    db $2 ; signs
+    db $5, $3, $6 ; CopycatsHouseF2Text6
+    db $1, $0, $7 ; CopycatsHouseF2Text7
+
+    db $5 ; people
+    db SPRITE_BRUNETTE_GIRL, $3 + 4, $4 + 4, $fe, $0, $1 ; person
+    db SPRITE_BIRD, $6 + 4, $4 + 4, $fe, $2, $2 ; person
+    db SPRITE_SLOWBRO, $1 + 4, $5 + 4, $ff, $d0, $3 ; person
+    db SPRITE_BIRD, $0 + 4, $2 + 4, $ff, $d0, $4 ; person
+    db SPRITE_CLEFAIRY, $6 + 4, $1 + 4, $ff, $d3, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $1, $7 ; COPYCATS_HOUSE_1F
+
+FightingDojo_h: ; 0x5cd51 to 0x5cd5d (12 bytes) (id=177)
+    db $05 ; tileset
+    db $06, $05 ; dimensions (y, x)
+    dw FightingDojoBlocks, FightingDojoTexts, FightingDojoScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FightingDojoObject ; objects
+
+FightingDojoScript: ; 0x5cd5d
+    call $3c3c
+    ld hl, $4e13
+    ld de, $4d7b
+    ld a, [$d642]
+    call $3160
+    ld [$d642], a
+    ret
+; 0x5cd70
+
+INCBIN "baserom.gbc",$5cd70,$93
+
+FightingDojoTexts: ; 0x5ce03
+    dw FightingDojoText1, FightingDojoText2, FightingDojoText3, FightingDojoText4, FightingDojoText5, FightingDojoText6, FightingDojoText7, FightingDojoText8
+
+INCBIN "baserom.gbc",$5ce13,$31
+
+FightingDojoText1: ; 0x5ce44
+    db $08 ; asm
+    ld a, [$d7b1]
+    bit 0, a
+    jp nz, $4e7d
+    bit 1, a
+    jp nz, $4e85
+    ld hl, $4e8e
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $4e93
+    ld de, $4e93
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $3
+    ld [$d642], a
+    ld [$da39], a
+    jr .asm_9dba4 ; 0x5ce7b
+    ld hl, $4e9d
+    call PrintText
+    jr .asm_9dba4 ; 0x5ce83
+    ld hl, $4e98
+    call PrintText
+.asm_9dba4 ; 0x5ce8b
+    jp $24d7
+
+INCBIN "baserom.gbc",$5ce8e,$5ce98 - $5ce8e
+
+FightingDojoText8: ; 0x5ce98
+INCBIN "baserom.gbc",$5ce98,5
+
+INCBIN "baserom.gbc",$5ce9d,5
+
+FightingDojoText2: ; 0x5cea2
+    db $08 ; asm
+    ld hl, $4e13
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5ceac,$5cebb - $5ceac
+
+FightingDojoText3: ; 0x5cebb
+    db $08 ; asm
+    ld hl, $4e1f
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cec5,$5ced4 - $5cec5
+
+FightingDojoText4: ; 0x5ced4
+    db $08 ; asm
+    ld hl, $4e2b
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cede,$5ceed - $5cede
+
+FightingDojoText5: ; 0x5ceed
+    db $08 ; asm
+    ld hl, $4e37
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cef7,$5cf06 - $5cef7
+
+FightingDojoText6: ; 0x5cf06
+    db $08 ; asm
+    ld a, [$d7b1]
+    and $c0
+    jr z, .asm_f8e28 ; 0x5cf0c
+    ld hl, $4f96
+    call PrintText
+    jr .asm_3a2c8 ; 0x5cf14
+.asm_f8e28 ; 0x5cf16
+    ld a, $2b
+    call $349b
+    ld hl, $4f49
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_3a2c8 ; 0x5cf28
+    ld a, [$cf91]
+    ld b, a
+	ld c,30
+    call GivePokemon
+    jr nc, .asm_3a2c8 ; 0x5cf33
+    ld a, $4a
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld hl, $d7b1
+    set 6, [hl]
+    set 0, [hl]
+.asm_3a2c8 ; 0x5cf46
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cf49,$5cf4e - $5cf49
+
+FightingDojoText7: ; 0x5cf4e
+    db $08 ; asm
+    ld a, [$d7b1]
+    and $c0
+    jr z, .asm_170a9 ; 0x5cf54
+    ld hl, $4f96
+    call PrintText
+    jr .asm_f1f47 ; 0x5cf5c
+.asm_170a9 ; 0x5cf5e
+    ld a, $2c
+    call $349b
+    ld hl, $4f91
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    jr nz, .asm_f1f47 ; 0x5cf70
+    ld a, [$cf91]
+    ld b, a
+	ld c,30
+    call GivePokemon
+    jr nc, .asm_f1f47 ; 0x5cf7b
+    ld hl, $d7b1
+    set 7, [hl]
+    set 0, [hl]
+    ld a, $4b
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+.asm_f1f47 ; 0x5cf8e
+    jp $24d7
+
+INCBIN "baserom.gbc",$5cf91,$a
+
+FightingDojoObject: ; 0x5cf9b (size=72)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $b, $4, $1, $ff
+    db $b, $5, $1, $ff
+
+    db $0 ; signs
+
+    db $7 ; people
+    db SPRITE_HIKER, $3 + 4, $5 + 4, $ff, $d0, $41, BLACKBELT + $C8, $1 ; trainer
+    db SPRITE_HIKER, $4 + 4, $3 + 4, $ff, $d3, $42, BLACKBELT + $C8, $2 ; trainer
+    db SPRITE_HIKER, $6 + 4, $3 + 4, $ff, $d3, $43, BLACKBELT + $C8, $3 ; trainer
+    db SPRITE_HIKER, $5 + 4, $5 + 4, $ff, $d2, $44, BLACKBELT + $C8, $4 ; trainer
+    db SPRITE_HIKER, $7 + 4, $5 + 4, $ff, $d2, $45, BLACKBELT + $C8, $5 ; trainer
+    db SPRITE_BALL, $1 + 4, $4 + 4, $ff, $ff, $6 ; person
+    db SPRITE_BALL, $1 + 4, $5 + 4, $ff, $ff, $7 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $b, $4
+    EVENT_DISP $5, $b, $5
+
+FightingDojoBlocks: ; 30
+    INCBIN "maps/fightingdojo.blk"
+
+SaffronGym_h: ; 0x5d001 to 0x5d00d (12 bytes) (id=178)
+    db $16 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw SaffronGymBlocks, SaffronGymTexts, SaffronGymScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SaffronGymObject ; objects
+
+SaffronGymScript: ; 0x5d00d
+    ld hl, $d126
+    bit 6, [hl]
+    res 6, [hl]
+    call nz, $502a
+    call $3c3c
+    ld hl, $50c3
+    ld de, $5053
+    ld a, [$d65c]
+    call $3160
+    ld [$d65c], a
+    ret
+; 0x5d02a
+
+INCBIN "baserom.gbc",$5d02a,$81
+
+SaffronGymTexts: ; 0x5d0ab
+    dw SaffronGymText1, SaffronGymText2, SaffronGymText3, SaffronGymText4, SaffronGymText5, SaffronGymText6, SaffronGymText7, SaffronGymText8, SaffronGymText9, SaffronGymText10, SaffronGymText11, SaffronGymText12
+
+INCBIN "baserom.gbc",$5d0bd + 6,$5b - 6
+
+SaffronGymText1: ; 0x5d118
+    db $08 ; asm
+    ld a, [$d7b3]
+    bit 1, a
+    jr z, .asm_e3544 ; 0x5d11e
+    bit 0, a
+    jr nz, .asm_8d2f6 ; 0x5d122
+    call z, $5068
+    call $30b6
+    jr .asm_34c2c ; 0x5d12a
+.asm_8d2f6 ; 0x5d12c
+    ld hl, $516e
+    call PrintText
+    jr .asm_34c2c ; 0x5d132
+.asm_e3544 ; 0x5d134
+    ld hl, $5162
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $5167
+    ld de, $5167
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $6
+    ld [$d05c], a
+    ld a, $3
+    ld [$d65c], a
+.asm_34c2c ; 0x5d15f
+    jp $24d7
+
+INCBIN "baserom.gbc",$5d162,$5d173 - $5d162
+
+SaffronGymText10: ; 0x5d173
+INCBIN "baserom.gbc",$5d173,5
+
+SaffronGymText11: ; 0x5d178
+INCBIN "baserom.gbc",$5d178,5
+
+INCBIN "baserom.gbc",$5d17d,$5d182 - $5d17d
+
+SaffronGymText12: ; 0x5d182
+INCBIN "baserom.gbc",$5d182,5
+
+SaffronGymText2: ; 0x5d187
+    db $08 ; asm
+    ld hl, $50c3
+    call LoadTrainerHeader
+    jp $24d7
+
+SaffronGymText3: ; 0x5d191
+    db $08 ; asm
+    ld hl, $50cf
+    call LoadTrainerHeader
+    jp $24d7
+
+SaffronGymText4: ; 0x5d19b
+    db $08 ; asm
+    ld hl, $50db
+    call LoadTrainerHeader
+    jp $24d7
+
+SaffronGymText5: ; 0x5d1a5
+    db $08 ; asm
+    ld hl, $50e7
+    call LoadTrainerHeader
+    jp $24d7
+
+SaffronGymText6: ; 0x5d1af
+    db $08 ; asm
+    ld hl, $50f3
+    call LoadTrainerHeader
+    jp $24d7
+
+SaffronGymText7: ; 0x5d1b9
+    db $08 ; asm
+    ld hl, $50ff
+    call LoadTrainerHeader
+    jp $24d7
+
+SaffronGymText8: ; 0x5d1c3
+    db $08 ; asm
+    ld hl, $510b
+    call LoadTrainerHeader
+    jp $24d7
+
+SaffronGymText9: ; 0x5d1cd
+    db $08 ; asm
+    ld a, [$d7b3]
+    bit 1, a
+    jr nz, .asm_13f3c ; 0x5d1d3
+    ld hl, $51e6
+    call PrintText
+    jr .asm_e9907 ; 0x5d1db
+.asm_13f3c ; 0x5d1dd
+    ld hl, $51eb
+    call PrintText
+.asm_e9907 ; 0x5d1e3
+    jp $24d7
+
+INCBIN "baserom.gbc",$5d1e6,$73
+
+SaffronGymObject: ; 0x5d259 (size=330)
+    db $2e ; border tile
+
+    db $20 ; warps
+    db $11, $8, $2, $ff
+    db $11, $9, $2, $ff
+    db $3, $1, $16, SAFFRON_GYM
+    db $3, $5, $f, SAFFRON_GYM
+    db $5, $1, $12, SAFFRON_GYM
+    db $5, $5, $8, SAFFRON_GYM
+    db $9, $1, $1b, SAFFRON_GYM
+    db $9, $5, $10, SAFFRON_GYM
+    db $b, $1, $5, SAFFRON_GYM
+    db $b, $5, $d, SAFFRON_GYM
+    db $f, $1, $17, SAFFRON_GYM
+    db $f, $5, $1e, SAFFRON_GYM
+    db $11, $1, $11, SAFFRON_GYM
+    db $11, $5, $9, SAFFRON_GYM
+    db $3, $9, $1a, SAFFRON_GYM
+    db $3, $b, $3, SAFFRON_GYM
+    db $5, $9, $7, SAFFRON_GYM
+    db $5, $b, $c, SAFFRON_GYM
+    db $b, $b, $4, SAFFRON_GYM
+    db $f, $b, $1f, SAFFRON_GYM
+    db $3, $f, $18, SAFFRON_GYM
+    db $3, $13, $1c, SAFFRON_GYM
+    db $5, $f, $2, SAFFRON_GYM
+    db $5, $13, $a, SAFFRON_GYM
+    db $9, $f, $14, SAFFRON_GYM
+    db $9, $13, $1d, SAFFRON_GYM
+    db $b, $f, $e, SAFFRON_GYM
+    db $b, $13, $6, SAFFRON_GYM
+    db $f, $f, $15, SAFFRON_GYM
+    db $f, $13, $19, SAFFRON_GYM
+    db $11, $f, $b, SAFFRON_GYM
+    db $11, $13, $13, SAFFRON_GYM
+
+    db $0 ; signs
+
+    db $9 ; people
+    db SPRITE_GIRL, $8 + 4, $9 + 4, $ff, $d0, $41, SABRINA + $C8, $1 ; trainer
+    db SPRITE_MEDIUM, $1 + 4, $a + 4, $ff, $d0, $42, CHANNELER + $C8, $16 ; trainer
+    db SPRITE_BUG_CATCHER, $1 + 4, $11 + 4, $ff, $d0, $43, PSYCHIC_TR + $C8, $1 ; trainer
+    db SPRITE_MEDIUM, $7 + 4, $3 + 4, $ff, $d0, $44, CHANNELER + $C8, $17 ; trainer
+    db SPRITE_BUG_CATCHER, $7 + 4, $11 + 4, $ff, $d0, $45, PSYCHIC_TR + $C8, $2 ; trainer
+    db SPRITE_MEDIUM, $d + 4, $3 + 4, $ff, $d0, $46, CHANNELER + $C8, $18 ; trainer
+    db SPRITE_BUG_CATCHER, $d + 4, $11 + 4, $ff, $d0, $47, PSYCHIC_TR + $C8, $3 ; trainer
+    db SPRITE_BUG_CATCHER, $1 + 4, $3 + 4, $ff, $d0, $48, PSYCHIC_TR + $C8, $4 ; trainer
+    db SPRITE_GYM_HELPER, $f + 4, $a + 4, $ff, $d0, $9 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $11, $8
+    EVENT_DISP $a, $11, $9
+    EVENT_DISP $a, $3, $1 ; SAFFRON_GYM
+    EVENT_DISP $a, $3, $5 ; SAFFRON_GYM
+    EVENT_DISP $a, $5, $1 ; SAFFRON_GYM
+    EVENT_DISP $a, $5, $5 ; SAFFRON_GYM
+    EVENT_DISP $a, $9, $1 ; SAFFRON_GYM
+    EVENT_DISP $a, $9, $5 ; SAFFRON_GYM
+    EVENT_DISP $a, $b, $1 ; SAFFRON_GYM
+    EVENT_DISP $a, $b, $5 ; SAFFRON_GYM
+    EVENT_DISP $a, $f, $1 ; SAFFRON_GYM
+    EVENT_DISP $a, $f, $5 ; SAFFRON_GYM
+    EVENT_DISP $a, $11, $1 ; SAFFRON_GYM
+    EVENT_DISP $a, $11, $5 ; SAFFRON_GYM
+    EVENT_DISP $a, $3, $9 ; SAFFRON_GYM
+    EVENT_DISP $a, $3, $b ; SAFFRON_GYM
+    EVENT_DISP $a, $5, $9 ; SAFFRON_GYM
+    EVENT_DISP $a, $5, $b ; SAFFRON_GYM
+    EVENT_DISP $a, $b, $b ; SAFFRON_GYM
+    EVENT_DISP $a, $f, $b ; SAFFRON_GYM
+    EVENT_DISP $a, $3, $f ; SAFFRON_GYM
+    EVENT_DISP $a, $3, $13 ; SAFFRON_GYM
+    EVENT_DISP $a, $5, $f ; SAFFRON_GYM
+    EVENT_DISP $a, $5, $13 ; SAFFRON_GYM
+    EVENT_DISP $a, $9, $f ; SAFFRON_GYM
+    EVENT_DISP $a, $9, $13 ; SAFFRON_GYM
+    EVENT_DISP $a, $b, $f ; SAFFRON_GYM
+    EVENT_DISP $a, $b, $13 ; SAFFRON_GYM
+    EVENT_DISP $a, $f, $f ; SAFFRON_GYM
+    EVENT_DISP $a, $f, $13 ; SAFFRON_GYM
+    EVENT_DISP $a, $11, $f ; SAFFRON_GYM
+    EVENT_DISP $a, $11, $13 ; SAFFRON_GYM
+
+SaffronGymBlocks: ; 90
+    INCBIN "maps/saffrongym.blk"
+
+SaffronMart_h: ; 0x5d3fd to 0x5d409 (12 bytes) (id=180)
+    db $02 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $4000, SaffronMartTexts, SaffronMartScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SaffronMartObject ; objects
+
+SaffronMartScript: ; 0x5d409
+    jp $3c3c
+; 0x5d40c
+
+SaffronMartTexts: ; 0x5d40c
+    dw SaffronMartText1, SaffronMartText2, SaffronMartText3
+
+SaffronMartText2: ; 0x5d412
+    TX_FAR _SaffronMartText2
+    db $50
+
+SaffronMartText3: ; 0x5d417
+    TX_FAR _SaffronMartText3
+    db $50
+
+SaffronMartObject: ; 0x5d41c (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $4, $ff
+    db $7, $4, $4, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $2 + 4, $4 + 4, $ff, $ff, $2 ; person
+    db SPRITE_LASS, $5 + 4, $6 + 4, $fe, $0, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+
+SilphCo1_h: ; 0x5d442 to 0x5d44e (12 bytes) (id=181)
+    db $16 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw SilphCo1Blocks, SilphCo1Texts, SilphCo1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo1Object ; objects
+
+SilphCo1Script: ; 0x5d44e
+    call $3c3c
+    ld a, [$d838]
+    bit 7, a
+    ret z
+    ld hl, $d7b9
+    bit 7, [hl]
+    set 7, [hl]
+    ret nz
+    ld a, $4c
+    ld [$cc4d], a
+    ld a, $15
+    jp $3e6d
+; 0x5d469
+
+SilphCo1Texts: ; 0x5d469
+    dw SilphCo1Text1
+
+SilphCo1Text1: ; 0x5d46b
+    TX_FAR _SilphCo1Text1
+    db $50
+
+SilphCo1Object: ; 0x5d470 (size=50)
+    db $2e ; border tile
+
+    db $5 ; warps
+    db $11, $a, $5, $ff
+    db $11, $b, $5, $ff
+    db $0, $1a, $0, SILPH_CO_2F
+    db $0, $14, $0, SILPH_CO_ELEVATOR
+    db $a, $10, $6, SILPH_CO_3F
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $4 + 4, $ff, $d0, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $f, $11, $a
+    EVENT_DISP $f, $11, $b
+    EVENT_DISP $f, $0, $1a ; SILPH_CO_2F
+    EVENT_DISP $f, $0, $14 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $f, $a, $10 ; SILPH_CO_3F
+
+SilphCo1Blocks: ; 135
+    INCBIN "maps/silphco1.blk"
+
+SaffronPokecenter_h: ; 0x5d529 to 0x5d535 (12 bytes) (id=182)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw $4064, $553b, SaffronPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SaffronPokecenterObject ; objects
+
+SaffronPokecenterScript: ; 0x5d535
+    call $22fa
+    jp $3c3c
+; 0x5d53b
+
+INCBIN "baserom.gbc",$5d53b,$9
+
+SaffronPokecenterText2: ; maybe
+SaffronPokecenterText1: ; 0x5d543
+    TX_FAR _SaffronPokecenterText1
+
+INCBIN "baserom.gbc",$5d548,$5d549 - $5d548
+
+SaffronPokecenterText3: ; 0x5d549
+    TX_FAR _SaffronPokecenterText3
+    db $50
+
+SaffronPokecenterText4:
+    db $f6
+
+SaffronPokecenterObject: ; 0x5d54f (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $6, $ff
+    db $7, $4, $6, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_FOULARD_WOMAN, $5 + 4, $5 + 4, $ff, $ff, $2 ; person
+    db SPRITE_GENTLEMAN, $3 + 4, $8 + 4, $ff, $d0, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+ViridianForestexit_h: ; 0x5d57b to 0x5d587 (12 bytes) (id=47)
+    db $09 ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw ViridianForestexitBlocks, ViridianForestexitTexts, ViridianForestexitScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw ViridianForestexitObject ; objects
+
+ViridianForestexitScript: ; 0x5d587
+    jp $3c3c
+; 0x5d58a
+
+ViridianForestexitTexts: ; 0x5d58a
+    dw ViridianForestexitText1, ViridianForestexitText2
+
+ViridianForestexitText1: ; 0x5d58e
+    TX_FAR _ViridianForestexitText1
+    db $50
+
+ViridianForestexitText2: ; 0x5d593
+    TX_FAR _ViridianForestexitText2
+    db $50
+
+ViridianForestexitObject: ; 0x5d598 (size=48)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $0, $4, $1, $ff
+    db $0, $5, $1, $ff
+    db $7, $4, $0, VIRIDIAN_FOREST
+    db $7, $5, $0, VIRIDIAN_FOREST
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $2 + 4, $3 + 4, $ff, $ff, $1 ; person
+    db SPRITE_OLD_PERSON, $5 + 4, $2 + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $0, $4
+    EVENT_DISP $5, $0, $5
+    EVENT_DISP $5, $7, $4 ; VIRIDIAN_FOREST
+    EVENT_DISP $5, $7, $5 ; VIRIDIAN_FOREST
+
+Route2Gate_h: ; 0x5d5c8 to 0x5d5d4 (12 bytes) (id=49)
+    db $0c ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw $4090, Route2GateTexts, Route2GateScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Route2GateObject ; objects
+
+Route2GateScript: ; 0x5d5d4
+    jp $3c3c
+; 0x5d5d7
+
+Route2GateTexts: ; 0x5d5d7
+    dw Route2GateText1, Route2GateText2
+
+Route2GateText1: ; 0x5d5db
+    db $08 ; asm
+    ld a, [$d7c2]
+    bit 0, a
+    jr nz, .asm_6592c ; 0x5d5e1
+    ld a, $a
+    ldh [$db], a
+    ld a, $c8
+    ldh [$dc], a
+    ld [$d11e], a
+    call GetItemName ; $2fcf
+    ld hl, $cd6d
+    ld de, $cc5b
+    ld bc, $000d
+    call CopyData
+    ld a, $62
+    call Predef
+    ldh a, [$db]
+    cp $1
+    jr nz, .asm_ad646 ; 0x5d606
+    ld hl, $d7c2
+    set 0, [hl]
+.asm_6592c ; 0x5d60d
+    ld hl, $5616
+    call PrintText
+.asm_ad646 ; 0x5d613
+    jp $24d7
+
+INCBIN "baserom.gbc",$5d616,$5
+
+Route2GateText2: ; 0x5d61b
+    TX_FAR _Route2GateText2
+    db $50
+
+Route2GateObject: ; 0x5d620 (size=48)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $0, $4, $3, $ff
+    db $0, $5, $3, $ff
+    db $7, $4, $4, $ff
+    db $7, $5, $4, $ff
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_OAK_AIDE, $4 + 4, $1 + 4, $ff, $d2, $1 ; person
+    db SPRITE_BUG_CATCHER, $4 + 4, $5 + 4, $fe, $2, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $0, $4
+    EVENT_DISP $5, $0, $5
+    EVENT_DISP $5, $7, $4
+    EVENT_DISP $5, $7, $5
+
+ViridianForestEntrance_h: ; 0x5d650 to 0x5d65c (12 bytes) (id=50)
+    db $09 ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw $4090, ViridianForestEntranceTexts, ViridianForestEntranceScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw ViridianForestEntranceObject ; objects
+
+ViridianForestEntranceScript: ; 0x5d65c
+    jp $3c3c
+; 0x5d65f
+
+ViridianForestEntranceTexts: ; 0x5d65f
+    dw ViridianForestEntranceText1, ViridianForestEntranceText2
+
+ViridianForestEntranceText1: ; 0x5d663
+    TX_FAR _ViridianForestEntranceText1
+    db $50
+
+ViridianForestEntranceText2: ; 0x5d668
+    TX_FAR _ViridianForestEntranceText2
+    db $50
+
+ViridianForestEntranceObject: ; 0x5d66d (size=48)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $0, $4, $3, VIRIDIAN_FOREST
+    db $0, $5, $4, VIRIDIAN_FOREST
+    db $7, $4, $5, $ff
+    db $7, $5, $5, $ff
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_GIRL, $4 + 4, $8 + 4, $ff, $d2, $1 ; person
+    db SPRITE_LITTLE_GIRL, $4 + 4, $2 + 4, $fe, $1, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $0, $4 ; VIRIDIAN_FOREST
+    EVENT_DISP $5, $0, $5 ; VIRIDIAN_FOREST
+    EVENT_DISP $5, $7, $4
+    EVENT_DISP $5, $7, $5
+
+UndergroundTunnelEntranceRoute5_h: ; 0x5d69d to 0x5d6a9 (12 bytes) (id=71)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw UndergroundTunnelEntranceRoute5Blocks, UndergroundTunnelEntranceRoute5Texts, UndergroundTunnelEntranceRoute5Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UndergroundTunnelEntranceRoute5Object ; objects
+
+UndergroundTunnelEntranceRoute5Script: ; 0x5d6a9
+    ld a, $10
+    ld [$d365], a
+    ret
+; 0x5d6af
+
+INCBIN "baserom.gbc",$5d6af,$1
+
+UndergroundTunnelEntranceRoute5Texts: ; 0x5d6b0
+    dw UndergroundTunnelEntranceRoute5Text1
+
+UndergroundTunnelEntranceRoute5Text1: ; 0x5d6b2
+    db $08 ; asm
+    ld a, $9
+    ld [W_WHICHTRADE], a
+    ld a, $54
+    call Predef
+    ld hl, $56af
+    ret
+
+UndergroundTunnelEntranceRoute5Object: ; 0x5d6c1 (size=34)
+    db $a ; border tile
+
+    db $3 ; warps
+    db $7, $3, $3, $ff
+    db $7, $4, $3, $ff
+    db $4, $4, $0, UNDERGROUND_PATH_NS
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_LITTLE_GIRL, $3 + 4, $2 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+    EVENT_DISP $4, $4, $4 ; UNDERGROUND_PATH_NS
+
+UndergroundTunnelEntranceRoute6_h: ; 0x5d6e3 to 0x5d6ef (12 bytes) (id=74)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $4080, UndergroundTunnelEntranceRoute6Texts, UndergroundTunnelEntranceRoute6Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UndergroundTunnelEntranceRoute6Object ; objects
+
+UndergroundTunnelEntranceRoute6Script: ; 0x5d6ef
+    ld a, $11
+    ld [$d365], a
+    jp $3c3c
+; 0x5d6f7
+
+UndergroundTunnelEntranceRoute6Texts: ; 0x5d6f7
+    dw UndergroundTunnelEntranceRoute6Text1
+
+;XXX wtf? syntax error on TX_FAR?
+UndergroundTunnelEntranceRoute6Text1: ; 0x5d6f9
+    db $17, $cb, $40, $23
+    ;TX_FAR _UndergroundTunnelEntranceRoute6Text1 ; $cb, $40, $23
+    db $50
+
+UndergroundTunnelEntranceRoute6Object: ; 0x5d6fe (size=34)
+    db $a ; border tile
+
+    db $3 ; warps
+    db $7, $3, $3, $ff
+    db $7, $4, $3, $ff
+    db $4, $4, $1, UNDERGROUND_PATH_NS
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_GIRL, $3 + 4, $2 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+    EVENT_DISP $4, $4, $4 ; UNDERGROUND_PATH_NS
+
+UndergroundPathEntranceRoute7_h: ; 0x5d720 to 0x5d72c (12 bytes) (id=77)
+    db $0c ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $4080, UndergroundPathEntranceRoute7Texts, UndergroundPathEntranceRoute7Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UndergroundPathEntranceRoute7Object ; objects
+
+UndergroundPathEntranceRoute7Script: ; 0x5d72c
+    ld a, $12
+    ld [$d365], a
+    jp $3c3c
+; 0x5d734
+
+UndergroundPathEntranceRoute7Texts: ; 0x5d734
+    dw UndergroundPathEntranceRoute7Text1
+
+UndergroundPathEntranceRoute7Text1: ; 0x5d736
+    db $17, $ff, $40, $23
+    ;TX_FAR _UndergroundPathEntranceRoute7Text1
+    db $50
+
+UndergroundPathEntranceRoute7Object: ; 0x5d73b (size=34)
+    db $a ; border tile
+
+    db $3 ; warps
+    db $7, $3, $4, $ff
+    db $7, $4, $4, $ff
+    db $4, $4, $0, UNDERGROUND_PATH_WE
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_FAT_BALD_GUY, $4 + 4, $2 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+    EVENT_DISP $4, $4, $4 ; UNDERGROUND_PATH_WE
+
+INCBIN "baserom.gbc",$5d75d,$52
+
+SilphCo9_h: ; 0x5d7af to 0x5d7bb (12 bytes) (id=233)
+    db $16 ; tileset
+    db $09, $0d ; dimensions (y, x)
+    dw SilphCo9Blocks, SilphCo9Texts, SilphCo9Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo9Object ; objects
+
+SilphCo9Script: ; 0x5d7bb
+    call $57d1
+    call $3c3c
+    ld hl, $5893
+    ld de, $5885
+    ld a, [$d64a]
+    call $3160
+    ld [$d64a], a
+    ret
+; 0x5d7d1
+
+INCBIN "baserom.gbc",$5d7d1,$ba
+
+SilphCo9Texts: ; 0x5d88b
+    dw SilphCo9Text1, SilphCo9Text2, SilphCo9Text3, SilphCo9Text4
+
+INCBIN "baserom.gbc",$5d893,$25
+
+SilphCo9Text1: ; 0x5d8b8
+    db $08 ; asm
+    ld a, [$d838]
+    bit 7, a
+    jr nz, .asm_a14c3 ; 0x5d8be
+    ld hl, $58e5
+    call PrintText
+    ld a, $7
+    call Predef
+    call $20d8
+    call Delay3
+    call $20f6
+    ld hl, $58ea
+    call PrintText
+    jr .asm_b6e28 ; 0x5d8da
+.asm_a14c3 ; 0x5d8dc
+    ld hl, $58ef
+    call PrintText
+.asm_b6e28 ; 0x5d8e2
+    jp $24d7
+
+INCBIN "baserom.gbc",$5d8e5,$5d8f4 - $5d8e5
+
+SilphCo9Text2: ; 0x5d8f4
+    db $08 ; asm
+    ld hl, $5893
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo9Text3: ; 0x5d8fe
+    db $08 ; asm
+    ld hl, $589f
+    call LoadTrainerHeader
+    jp $24d7
+
+SilphCo9Text4: ; 0x5d908
+    db $08 ; asm
+    ld hl, $58ab
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5d912,$2d
+
+SilphCo9Object: ; 0x5d93f (size=74)
+    db $2e ; border tile
+
+    db $5 ; warps
+    db $0, $e, $0, SILPH_CO_10F
+    db $0, $10, $0, SILPH_CO_8F
+    db $0, $12, $0, SILPH_CO_ELEVATOR
+    db $3, $9, $7, SILPH_CO_3F
+    db $f, $11, $4, SILPH_CO_5F
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $e + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_ROCKET, $4 + 4, $2 + 4, $ff, $d1, $42, ROCKET + $C8, $25 ; trainer
+    db SPRITE_OAK_AIDE, $d + 4, $15 + 4, $ff, $d0, $43, SCIENTIST + $C8, $a ; trainer
+    db SPRITE_ROCKET, $10 + 4, $d + 4, $ff, $d1, $44, ROCKET + $C8, $26 ; trainer
+
+    ; warp-to
+    EVENT_DISP $d, $0, $e ; SILPH_CO_10F
+    EVENT_DISP $d, $0, $10 ; SILPH_CO_8F
+    EVENT_DISP $d, $0, $12 ; SILPH_CO_ELEVATOR
+    EVENT_DISP $d, $3, $9 ; SILPH_CO_3F
+    EVENT_DISP $d, $f, $11 ; SILPH_CO_5F
+
+SilphCo9Blocks: ; 117
+    INCBIN "maps/silphco9.blk"
+
+VictoryRoad1_h: ; 0x5d9fe to 0x5da0a (12 bytes) (id=108)
+    db $11 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw VictoryRoad1Blocks, VictoryRoad1Texts, VictoryRoad1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw VictoryRoad1Object ; objects
+
+VictoryRoad1Script: ; 0x5da0a
+    ld hl, $d126
+    bit 5, [hl]
+    res 5, [hl]
+    call nz, $5a27
+    call $3c3c
+    ld hl, $5a6d
+    ld de, $5a3a
+    ld a, [$d651]
+    call $3160
+    ld [$d651], a
+    ret
+; 0x5da27
+
+INCBIN "baserom.gbc",$5da27,$38
+
+VictoryRoad1Texts: ; 0x5da5f
+    dw VictoryRoad1Text1, VictoryRoad1Text2, VictoryRoad1Text3, VictoryRoad1Text4, VictoryRoad1Text5, VictoryRoad1Text6, VictoryRoad1Text7
+
+INCBIN "baserom.gbc",$5da6d,$19
+
+VictoryRoad1Text1: ; 0x5da86
+    db $08 ; asm
+    ld hl, $5a6d
+    call LoadTrainerHeader
+    jp $24d7
+
+VictoryRoad1Text2: ; 0x5da90
+    db $08 ; asm
+    ld hl, $5a79
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$5da9a,$1e
+
+VictoryRoad1Object: ; 0x5dab8 (size=76)
+    db $7d ; border tile
+
+    db $3 ; warps
+    db $11, $8, $2, $ff
+    db $11, $9, $2, $ff
+    db $1, $1, $0, VICTORY_ROAD_2
+
+    db $0 ; signs
+
+    db $7 ; people
+    db SPRITE_LASS, $5 + 4, $7 + 4, $ff, $d3, $41, COOLTRAINER_F + $C8, $5 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $2 + 4, $3 + 4, $ff, $d0, $42, COOLTRAINER_M + $C8, $5 ; trainer
+	db SPRITE_BALL, $0 + 4, $b + 4, $ff, $ff, $83, TM_43 ; item
+	db SPRITE_BALL, $2 + 4, $9 + 4, $ff, $ff, $84, RARE_CANDY ; item
+    db SPRITE_BOULDER, $f + 4, $5 + 4, $ff, $10, $5 ; person
+    db SPRITE_BOULDER, $2 + 4, $e + 4, $ff, $10, $6 ; person
+    db SPRITE_BOULDER, $a + 4, $2 + 4, $ff, $10, $7 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $11, $8
+    EVENT_DISP $a, $11, $9
+    EVENT_DISP $a, $1, $1 ; VICTORY_ROAD_2
+
+VictoryRoad1Blocks: ; 90
+    INCBIN "maps/victoryroad1.blk"
+
+INCBIN "baserom.gbc",$5db5e,$24a2
+
+SECTION "bank18",DATA,BANK[$18]
+
+INCBIN "baserom.gbc",$60000,$60198 - $60000
+
+UndergroundPathNSBlocks: ; 96
+    INCBIN "maps/undergroundpathns.blk"
+
+INCBIN "baserom.gbc",$601f8,$1c8
+
+SSAnne9Blocks: ; 96
+    INCBIN "maps/ssanne9.blk"
+
+PokemonTower1_h: ; 0x60420 to 0x6042c (12 bytes) (id=142)
+    db $0f ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw PokemonTower1Blocks, PokemonTower1Texts, PokemonTower1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PokemonTower1Object ; objects
+
+PokemonTower1Script: ; 0x6042c
+    jp $3c3c
+; 0x6042f
+
+PokemonTower1Texts: ; 0x6042f
+    dw PokemonTower1Text1, PokemonTower1Text2, PokemonTower1Text3, PokemonTower1Text4, PokemonTower1Text5
+
+PokemonTower1Text1: ; 0x60439
+    TX_FAR _PokemonTower1Text1
+    db $50
+
+PokemonTower1Text2: ; 0x6043e
+    TX_FAR _PokemonTower1Text2
+    db $50
+
+PokemonTower1Text3: ; 0x60443
+    TX_FAR _PokemonTower1Text3
+    db $50
+
+PokemonTower1Text4: ; 0x60448
+    TX_FAR _PokemonTower1Text4
+    db $50
+
+PokemonTower1Text5: ; 0x6044d
+    TX_FAR _PokemonTower1Text5
+    db $50
+
+PokemonTower1Object: ; 0x60452 (size=58)
+    db $1 ; border tile
+
+    db $3 ; warps
+    db $11, $a, $1, $ff
+    db $11, $b, $1, $ff
+    db $9, $12, $1, POKEMONTOWER_2
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_CABLE_CLUB_WOMAN, $d + 4, $f + 4, $ff, $d1, $1 ; person
+    db SPRITE_MOM_GEISHA, $8 + 4, $6 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BALDING_GUY, $c + 4, $8 + 4, $ff, $ff, $3 ; person
+    db SPRITE_GIRL, $7 + 4, $d + 4, $ff, $ff, $4 ; person
+    db SPRITE_MEDIUM, $7 + 4, $11 + 4, $ff, $d2, $5 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $11, $a
+    EVENT_DISP $a, $11, $b
+    EVENT_DISP $a, $9, $12 ; POKEMONTOWER_2
+
+PokemonTower1Blocks: ; 90
+    INCBIN "maps/pokemontower1.blk"
+
+PokemonTower2_h: ; 0x604e6 to 0x604f2 (12 bytes) (id=143)
+    db $0f ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw PokemonTower2Blocks, PokemonTower2Texts, PokemonTower2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PokemonTower2Object ; objects
+
+PokemonTower2Script: ; 0x604f2
+    call $3c3c
+    ld hl, $4509
+    ld a, [$d62b]
+    jp $3d97
+; 0x604fe
+
+INCBIN "baserom.gbc",$604fe,$60509 - $604fe
+
+PokemonTower2Scripts: ; 0x60509
+    dw PokemonTower2Script0, PokemonTower2Script1, PokemonTower2Script2
+
+PokemonTower2Script0: ; 0x6050f
+    ld a, [$d764]
+    bit 7, a
+    ret nz
+    ld hl, $455e
+    call $34bf
+    ret nc
+    ld a, $ff
+    ld [$c0ee], a
+    call $23b1
+    ld c, $2
+    ld a, $de
+    call $23a1
+    ld hl, $d764
+    res 6, [hl]
+    ld a, [$cd3d]
+    cp $1
+    ld a, $8
+    ld b, $0
+    jr nz, .asm_60544 ; 0x60539 $9
+    ld hl, $d764
+    set 6, [hl]
+    ld a, $2
+    ld b, $c
+.asm_60544
+    ld [$d528], a
+    ld a, $1
+    ld [$ff00+$8c], a
+    ld a, b
+    ld [$ff00+$8d], a
+    call $34a6
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $2920
+    xor a
+    ld [$ff00+$b4], a
+    ld [$ff00+$b3], a
+    ret
+; 0x6055e
+
+INCBIN "baserom.gbc",$6055e,$60563 - $6055e
+
+PokemonTower2Script1: ; 0x60563
+    ld a, [$d057]
+    cp $ff
+    jp z, $44fe
+    ld a, $f0
+    ld [$cd6b], a
+    ld hl, $d764
+    set 7, [hl]
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $2920
+    ld de, $45b2
+    ld a, [$d764]
+    bit 6, a
+    jr nz, .asm_60589 ; 0x60584 $3
+    ld de, $45a9
+.asm_60589
+    ld a, $1
+    ld [$ff00+$8c], a
+    call $363a
+    ld a, $ff
+    ld [$c0ee], a
+    call $23b1
+    ld b, $2
+    ld hl, $5b47
+    call Bankswitch
+    ld a, $2
+    ld [$d62b], a
+    ld [$da39], a
+    ret
+; 0x605a9
+
+INCBIN "baserom.gbc",$605a9,$605bb - $605a9
+
+PokemonTower2Script2: ; 0x605bb
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    ld a, $38
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    xor a
+    ld [$cd6b], a
+    call $2307
+    ld a, $0
+    ld [$d62b], a
+    ld [$da39], a
+    ret
+; 0x605db
+
+PokemonTower2Texts: ; 0x605db
+    dw PokemonTower2Text1, PokemonTower2Text2
+
+PokemonTower2Text1: ; 0x605df
+    db $08 ; asm
+    ld a, [$d764]
+    bit 7, a
+    jr z, .asm_16f24 ; 0x605e5
+    ld hl, $463c
+    call PrintText
+    jr .asm_41852 ; 0x605ed
+.asm_16f24 ; 0x605ef
+    ld hl, $462d
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $4632
+    ld de, $4637
+    call $3354
+    ld a, $f2
+    ld [$d059], a
+    ld a, [$d715]
+    cp $b1
+    jr nz, .asm_0860c ; 0x6060f
+    ld a, $4
+    jr .asm_99cea ; 0x60613
+.asm_0860c ; 0x60615
+    cp $99
+    jr nz, .asm_b3e6e ; 0x60617
+    ld a, $5
+    jr .asm_99cea ; 0x6061b
+.asm_b3e6e ; 0x6061d
+    ld a, $6
+.asm_99cea ; 0x6061f
+    ld [$d05d], a
+    ld a, $1
+    ld [$d62b], a
+    ld [$da39], a
+.asm_41852 ; 0x6062a
+    jp $24d7
+
+INCBIN "baserom.gbc",$6062d,$14
+
+PokemonTower2Text2: ; 0x60641
+    TX_FAR _PokemonTower2Text2
+    db $50
+
+PokemonTower2Object: ; 0x60646 (size=32)
+    db $1 ; border tile
+
+    db $2 ; warps
+    db $9, $3, $0, POKEMONTOWER_3
+    db $9, $12, $2, POKEMONTOWER_1
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_BLUE, $5 + 4, $e + 4, $ff, $ff, $1 ; person
+    db SPRITE_MEDIUM, $7 + 4, $3 + 4, $ff, $d3, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $9, $3 ; POKEMONTOWER_3
+    EVENT_DISP $a, $9, $12 ; POKEMONTOWER_1
+
+PokemonTower2Blocks: ; 90
+    INCBIN "maps/pokemontower2.blk"
+
+PokemonTower3_h: ; 0x606c0 to 0x606cc (12 bytes) (id=144)
+    db $0f ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw PokemonTower3Blocks, PokemonTower3Texts, PokemonTower3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PokemonTower3Object ; objects
+
+PokemonTower3Script: ; 0x606cc
+    call $3c3c
+    ld hl, $46ed
+    ld de, $46df
+    ld a, [$d62c]
+    call $3160
+    ld [$d62c], a
+    ret
+; 0x606df
+
+INCBIN "baserom.gbc",$606df,$6
+
+PokemonTower3Texts: ; 0x606e5
+    dw PokemonTower3Text1, PokemonTower3Text2, PokemonTower3Text3, PokemonTower3Text4
+
+INCBIN "baserom.gbc",$606ed,$25
+
+PokemonTower3Text1: ; 0x60712
+    db $08 ; asm
+    ld hl, $46ed
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower3Text2: ; 0x6071c
+    db $08 ; asm
+    ld hl, $46f9
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower3Text3: ; 0x60726
+    db $08 ; asm
+    ld hl, $4705
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$60730,$2d
+
+PokemonTower3Object: ; 0x6075d (size=51)
+    db $1 ; border tile
+
+    db $2 ; warps
+    db $9, $3, $0, POKEMONTOWER_2
+    db $9, $12, $1, POKEMONTOWER_4
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_MEDIUM, $3 + 4, $c + 4, $ff, $d2, $41, CHANNELER + $C8, $5 ; trainer
+    db SPRITE_MEDIUM, $8 + 4, $9 + 4, $ff, $d0, $42, CHANNELER + $C8, $6 ; trainer
+    db SPRITE_MEDIUM, $d + 4, $a + 4, $ff, $d0, $43, CHANNELER + $C8, $8 ; trainer
+	db SPRITE_BALL, $1 + 4, $c + 4, $ff, $ff, $84, ESCAPE_ROPE ; item
+
+    ; warp-to
+    EVENT_DISP $a, $9, $3 ; POKEMONTOWER_2
+    EVENT_DISP $a, $9, $12 ; POKEMONTOWER_4
+
+PokemonTower3Blocks: ; 90
+    INCBIN "maps/pokemontower3.blk"
+
+PokemonTower4_h: ; 0x607ea to 0x607f6 (12 bytes) (id=145)
+    db $0f ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw PokemonTower4Blocks, PokemonTower4Texts, PokemonTower4Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PokemonTower4Object ; objects
+
+PokemonTower4Script: ; 0x607f6
+    call $3c3c
+    ld hl, $481b
+    ld de, $4809
+    ld a, [$d62d]
+    call $3160
+    ld [$d62d], a
+    ret
+; 0x60809
+
+INCBIN "baserom.gbc",$60809,$6
+
+PokemonTower4Texts: ; 0x6080f
+    dw PokemonTower4Text1, PokemonTower4Text2, PokemonTower4Text3, PokemonTower4Text4, PokemonTower4Text5, PokemonTower4Text6
+
+INCBIN "baserom.gbc",$6081b,$25
+
+PokemonTower4Text1: ; 0x60840
+    db $08 ; asm
+    ld hl, $481b
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower4Text2: ; 0x6084a
+    db $08 ; asm
+    ld hl, $4827
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower4Text3: ; 0x60854
+    db $08 ; asm
+    ld hl, $4833
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$6085e,$2d
+
+PokemonTower4Object: ; 0x6088b (size=65)
+    db $1 ; border tile
+
+    db $2 ; warps
+    db $9, $3, $0, POKEMONTOWER_5
+    db $9, $12, $1, POKEMONTOWER_3
+
+    db $0 ; signs
+
+    db $6 ; people
+    db SPRITE_MEDIUM, $a + 4, $5 + 4, $ff, $d3, $41, CHANNELER + $C8, $9 ; trainer
+    db SPRITE_MEDIUM, $7 + 4, $f + 4, $ff, $d0, $42, CHANNELER + $C8, $a ; trainer
+    db SPRITE_MEDIUM, $c + 4, $e + 4, $ff, $d2, $43, CHANNELER + $C8, $c ; trainer
+	db SPRITE_BALL, $a + 4, $c + 4, $ff, $ff, $84, ELIXER ; item
+	db SPRITE_BALL, $a + 4, $9 + 4, $ff, $ff, $85, AWAKENING ; item
+	db SPRITE_BALL, $10 + 4, $c + 4, $ff, $ff, $86, HP_UP ; item
+
+    ; warp-to
+    EVENT_DISP $a, $9, $3 ; POKEMONTOWER_5
+    EVENT_DISP $a, $9, $12 ; POKEMONTOWER_3
+
+PokemonTower4Blocks: ; 90
+    INCBIN "maps/pokemontower4.blk"
+
+PokemonTower5_h: ; 0x60926 to 0x60932 (12 bytes) (id=146)
+    db $0f ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw PokemonTower5Blocks, PokemonTower5Texts, PokemonTower5Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PokemonTower5Object ; objects
+
+PokemonTower5Script: ; 0x60932
+    call $3c3c
+    ld hl, $49a9
+    ld de, $4945
+    ld a, [$d62e]
+    call $3160
+    ld [$d62e], a
+    ret
+; 0x60945
+
+INCBIN "baserom.gbc",$60945,$56
+
+PokemonTower5Texts: ; 0x6099b
+    dw PokemonTower5Text1, PokemonTower5Text2, PokemonTower5Text3, PokemonTower5Text4, PokemonTower5Text5, PokemonTower5Text6, PokemonTower5Text7
+
+INCBIN "baserom.gbc",$609a9,$31
+
+PokemonTower5Text1: ; 0x609da
+    TX_FAR _PokemonTower5Text1
+    db $50
+
+PokemonTower5Text2: ; 0x609df
+    db $08 ; asm
+    ld hl, $49a9
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$609e9,$609f8 - $609e9
+
+PokemonTower5Text3: ; 0x609f8
+    db $08 ; asm
+    ld hl, $49b5
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$60a02,$60a11 - $60a02
+
+PokemonTower5Text4: ; 0x60a11
+    db $08 ; asm
+    ld hl, $49c1
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$60a1b,$60a2a - $60a1b
+
+PokemonTower5Text5: ; 0x60a2a
+    db $08 ; asm
+    ld hl, $49cd
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$60a34,$f
+
+PokemonTower5Text7: ; 0x60a43
+INCBIN "baserom.gbc",$60a43,5
+
+PokemonTower5Object: ; 0x60a48 (size=65)
+    db $1 ; border tile
+
+    db $2 ; warps
+    db $9, $3, $0, POKEMONTOWER_4
+    db $9, $12, $0, POKEMONTOWER_6
+
+    db $0 ; signs
+
+    db $6 ; people
+    db SPRITE_MEDIUM, $8 + 4, $c + 4, $ff, $ff, $1 ; person
+    db SPRITE_MEDIUM, $7 + 4, $11 + 4, $ff, $d2, $42, CHANNELER + $C8, $e ; trainer
+    db SPRITE_MEDIUM, $3 + 4, $e + 4, $ff, $d2, $43, CHANNELER + $C8, $10 ; trainer
+    db SPRITE_MEDIUM, $a + 4, $6 + 4, $ff, $d3, $44, CHANNELER + $C8, $11 ; trainer
+    db SPRITE_MEDIUM, $10 + 4, $9 + 4, $ff, $d3, $45, CHANNELER + $C8, $12 ; trainer
+	db SPRITE_BALL, $e + 4, $6 + 4, $ff, $ff, $86, NUGGET ; item
+
+    ; warp-to
+    EVENT_DISP $a, $9, $3 ; POKEMONTOWER_4
+    EVENT_DISP $a, $9, $12 ; POKEMONTOWER_6
+
+PokemonTower5Blocks: ; 90
+    INCBIN "maps/pokemontower5.blk"
+
+PokemonTower6_h: ; 0x60ae3 to 0x60aef (12 bytes) (id=147)
+    db $0f ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw PokemonTower6Blocks, PokemonTower6Texts, PokemonTower6Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PokemonTower6Object ; objects
+
+PokemonTower6Script: ; 0x60aef
+    call $3c3c
+    ld hl, $4bbf
+    ld de, $4b0d
+    ld a, [$d62f]
+    call $3160
+    ld [$d62f], a
+    ret
+; 0x60b02
+
+INCBIN "baserom.gbc",$60b02,$af
+
+PokemonTower6Texts: ; 0x60bb1
+    dw PokemonTower6Text1, PokemonTower6Text2, PokemonTower6Text3, PokemonTower6Text4, PokemonTower6Text5, PokemonTower6Text6, PokemonTower6Text7
+
+INCBIN "baserom.gbc",$60bbb + 4,$29 - 4
+
+PokemonTower6Text1: ; 0x60be4
+    db $08 ; asm
+    ld hl, $4bbf
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower6Text2: ; 0x60bee
+    db $08 ; asm
+    ld hl, $4bcb
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower6Text3: ; 0x60bf8
+    db $08 ; asm
+    ld hl, $4bd7
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower6Text7: ; 0x60c02
+INCBIN "baserom.gbc",$60c02,$60c56 - $60c02
+
+PokemonTower6Text6: ; 0x60c56
+INCBIN "baserom.gbc",$60c56,$60c5b - $60c56
+
+PokemonTower6Object: ; 0x60c5b (size=58)
+    db $1 ; border tile
+
+    db $2 ; warps
+    db $9, $12, $1, POKEMONTOWER_5
+    db $10, $9, $0, POKEMONTOWER_7
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_MEDIUM, $a + 4, $c + 4, $ff, $d3, $41, CHANNELER + $C8, $13 ; trainer
+    db SPRITE_MEDIUM, $5 + 4, $9 + 4, $ff, $d0, $42, CHANNELER + $C8, $14 ; trainer
+    db SPRITE_MEDIUM, $5 + 4, $10 + 4, $ff, $d2, $43, CHANNELER + $C8, $15 ; trainer
+	db SPRITE_BALL, $8 + 4, $6 + 4, $ff, $ff, $84, RARE_CANDY ; item
+	db SPRITE_BALL, $e + 4, $e + 4, $ff, $ff, $85, X_ACCURACY ; item
+
+    ; warp-to
+    EVENT_DISP $a, $9, $12 ; POKEMONTOWER_5
+    EVENT_DISP $a, $10, $9 ; POKEMONTOWER_7
+
+PokemonTower6Blocks: ; 90
+    INCBIN "maps/pokemontower6.blk"
+
+INCBIN "baserom.gbc",$60cef,$a
+
+PokemonTower7_h: ; 0x60cf9 to 0x60d05 (12 bytes) (id=148)
+    db $0f ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw PokemonTower7Blocks, PokemonTower7Texts, PokemonTower7Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PokemonTower7Object ; objects
+
+PokemonTower7Script: ; 0x60d05
+    call $3c3c
+    ld hl, $4e47
+    ld de, $4d23
+    ld a, [$d630]
+    call $3160
+    ld [$d630], a
+    ret
+; 0x60d18
+
+INCBIN "baserom.gbc",$60d18,$127
+
+PokemonTower7Texts: ; 0x60e3f
+    dw PokemonTower7Text1, PokemonTower7Text2, PokemonTower7Text3, PokemonTower7Text4
+
+INCBIN "baserom.gbc",$60e47,$25
+
+PokemonTower7Text1: ; 0x60e6c
+    db $08 ; asm
+    ld hl, $4e47
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower7Text2: ; 0x60e76
+    db $08 ; asm
+    ld hl, $4e53
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower7Text3: ; 0x60e80
+    db $08 ; asm
+    ld hl, $4e5f
+    call LoadTrainerHeader
+    jp $24d7
+
+PokemonTower7Text4: ; 0x60e8a
+    db $08 ; asm
+    ld hl, $4ec4
+    call PrintText
+    ld hl, $d7e0
+    set 7, [hl]
+    ld hl, $d769
+    set 7, [hl]
+    ld a, $44
+    ld [$cc4d], a
+    ld a, $15
+    call Predef
+    ld a, $17
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    ld a, $18
+    ld [$cc4d], a
+    ld a, $15
+    call Predef
+    ld a, $4
+    ld [$d630], a
+    ld [$da39], a
+    jp $24d7
+
+INCBIN "baserom.gbc",$60ec4,$32
+
+PokemonTower7Object: ; 0x60ef6 (size=42)
+    db $1 ; border tile
+
+    db $1 ; warps
+    db $10, $9, $1, POKEMONTOWER_6
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_ROCKET, $b + 4, $9 + 4, $ff, $d3, $41, ROCKET + $C8, $13 ; trainer
+    db SPRITE_ROCKET, $9 + 4, $c + 4, $ff, $d2, $42, ROCKET + $C8, $14 ; trainer
+    db SPRITE_ROCKET, $7 + 4, $9 + 4, $ff, $d3, $43, ROCKET + $C8, $15 ; trainer
+    db SPRITE_MR_FUJI, $3 + 4, $a + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $10, $9 ; POKEMONTOWER_6
+
+PokemonTower7Blocks: ; 90
+    INCBIN "maps/pokemontower7.blk"
+
+CeladonMart1_h: ; 0x60f7a to 0x60f86 (12 bytes) (id=122)
+    db $12 ; tileset
+    db $04, $0a ; dimensions (y, x)
+    dw CeladonMart1Blocks, CeladonMart1Texts, CeladonMart1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeladonMart1Object ; objects
+
+CeladonMart1Script: ; 0x60f86
+    jp $3c3c
+; 0x60f89
+
+CeladonMart1Texts: ; 0x60f89
+    dw CeladonMart1Text1, CeladonMart1Text2, CeladonMart1Text3
+
+CeladonMart1Text1: ; 0x60f8f
+    TX_FAR _CeladonMart1Text1
+    db $50
+
+CeladonMart1Text2: ; 0x60f94
+    TX_FAR _CeladonMart1Text2
+    db $50
+
+CeladonMart1Text3: ; 0x60f99
+    TX_FAR _CeladonMart1Text3
+    db $50
+
+CeladonMart1Object: ; 0x60f9e (size=64)
+    db $f ; border tile
+
+    db $6 ; warps
+    db $7, $2, $0, $ff
+    db $7, $3, $0, $ff
+    db $7, $10, $1, $ff
+    db $7, $11, $1, $ff
+    db $1, $c, $0, CELADON_MART_2
+    db $1, $1, $0, CELADON_MART_ELEVATOR
+
+    db $2 ; signs
+    db $4, $b, $2 ; CeladonMart1Text2
+    db $1, $e, $3 ; CeladonMart1Text3
+
+    db $1 ; people
+    db SPRITE_CABLE_CLUB_WOMAN, $3 + 4, $8 + 4, $ff, $d0, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $7, $2
+    EVENT_DISP $a, $7, $3
+    EVENT_DISP $a, $7, $10
+    EVENT_DISP $a, $7, $11
+    EVENT_DISP $a, $1, $c ; CELADON_MART_2
+    EVENT_DISP $a, $1, $1 ; CELADON_MART_ELEVATOR
+
+CeladonMart1Blocks: ; 40
+    INCBIN "maps/celadonmart1.blk"
+
+INCBIN "baserom.gbc",$61006,$fb
+
+ViridianForest_h: ; 0x61101 to 0x6110d (12 bytes) (id=51)
+    db $03 ; tileset
+    db $18, $11 ; dimensions (y, x)
+    dw $4000, ViridianForestTexts, ViridianForestScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw ViridianForestObject ; objects
+
+ViridianForestScript: ; 0x6110d
+    call $3c3c
+    ld hl, $5142
+    ld de, $5120
+    ld a, [$d618]
+    call $3160
+    ld [$d618], a
+    ret
+; 0x61120
+
+INCBIN "baserom.gbc",$61120,$6
+
+ViridianForestTexts: ; 0x61126
+    dw ViridianForestText1, ViridianForestText2, ViridianForestText3, ViridianForestText4, ViridianForestText5, ViridianForestText6, ViridianForestText7, ViridianForestText8, ViridianForestText9, ViridianForestText10, ViridianForestText11, ViridianForestText12, ViridianForestText13, ViridianForestText14
+
+INCBIN "baserom.gbc",$61142,$25
+
+ViridianForestText1: ; 0x61167
+    TX_FAR _ViridianForestText1
+    db $50
+
+ViridianForestText2: ; 0x6116c
+    db $08 ; asm
+    ld hl, $5142
+    call LoadTrainerHeader
+    jp $24d7
+
+ViridianForestText3: ; 0x61176
+    db $08 ; asm
+    ld hl, $514e
+    call LoadTrainerHeader
+    jp $24d7
+
+ViridianForestText4: ; 0x61180
+    db $08 ; asm
+    ld hl, $515a
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$6118a,$2d
+
+ViridianForestText8: ; 0x611b7
+    TX_FAR _ViridianForestText8
+    db $50
+
+ViridianForestText9: ; 0x611bc
+    TX_FAR _ViridianForestText9
+    db $50
+
+ViridianForestText10: ; 0x611c1
+    TX_FAR _ViridianForestText10
+    db $50
+
+ViridianForestText11: ; 0x611c6
+    TX_FAR _ViridianForestText11
+    db $50
+
+ViridianForestText12: ; 0x611cb
+    TX_FAR _ViridianForestText12
+    db $50
+
+ViridianForestText13: ; 0x611d0
+    TX_FAR _ViridianForestText13
+    db $50
+
+ViridianForestText14: ; 0x611d5
+    TX_FAR _ViridianForestText14
+    db $50
+
+ViridianForestObject: ; 0x611da (size=127)
+    db $3 ; border tile
+
+    db $6 ; warps
+    db $0, $1, $2, VIRIDIAN_FOREST_EXIT
+    db $0, $2, $3, VIRIDIAN_FOREST_EXIT
+    db $2f, $f, $1, VIRIDIAN_FOREST_ENTRANCE
+    db $2f, $10, $1, VIRIDIAN_FOREST_ENTRANCE
+    db $2f, $11, $1, VIRIDIAN_FOREST_ENTRANCE
+    db $2f, $12, $1, VIRIDIAN_FOREST_ENTRANCE
+
+    db $6 ; signs
+    db $28, $18, $9 ; ViridianForestText9
+    db $20, $10, $a ; ViridianForestText10
+    db $11, $1a, $b ; ViridianForestText11
+    db $18, $4, $c ; ViridianForestText12
+    db $2d, $12, $d ; ViridianForestText13
+    db $1, $2, $e ; ViridianForestText14
+
+    db $8 ; people
+    db SPRITE_BUG_CATCHER, $2b + 4, $10 + 4, $ff, $ff, $1 ; person
+    db SPRITE_BUG_CATCHER, $21 + 4, $1e + 4, $ff, $d2, $42, BUG_CATCHER + $C8, $1 ; trainer
+    db SPRITE_BUG_CATCHER, $13 + 4, $1e + 4, $ff, $d2, $43, BUG_CATCHER + $C8, $2 ; trainer
+    db SPRITE_BUG_CATCHER, $12 + 4, $2 + 4, $ff, $d2, $44, BUG_CATCHER + $C8, $3 ; trainer
+	db SPRITE_BALL, $b + 4, $19 + 4, $ff, $ff, $85, ANTIDOTE ; item
+	db SPRITE_BALL, $1d + 4, $c + 4, $ff, $ff, $86, POTION ; item
+	db SPRITE_BALL, $1f + 4, $1 + 4, $ff, $ff, $87, POKE_BALL ; item
+    db SPRITE_BUG_CATCHER, $28 + 4, $1b + 4, $ff, $ff, $8 ; person
+
+    ; warp-to
+    EVENT_DISP $11, $0, $1 ; VIRIDIAN_FOREST_EXIT
+    EVENT_DISP $11, $0, $2 ; VIRIDIAN_FOREST_EXIT
+    EVENT_DISP $11, $2f, $f ; VIRIDIAN_FOREST_ENTRANCE
+    EVENT_DISP $11, $2f, $10 ; VIRIDIAN_FOREST_ENTRANCE
+    EVENT_DISP $11, $2f, $11 ; VIRIDIAN_FOREST_ENTRANCE
+    EVENT_DISP $11, $2f, $12 ; VIRIDIAN_FOREST_ENTRANCE
+
+SSAnne1_h: ; 0x61259 to 0x61265 (12 bytes) (id=95)
+    db $0d ; tileset
+    db $09, $14 ; dimensions (y, x)
+    dw SSAnne1Blocks, SSAnne1Texts, SSAnne1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne1Object ; objects
+
+SSAnne1Script: ; 0x61265
+    call $3c3c
+    ret
+; 0x61269
+
+SSAnne1Texts: ; 0x61269
+    dw SSAnne1Text1, SSAnne1Text2
+
+SSAnne1Text1: ; 0x6126d
+    TX_FAR _SSAnne1Text1
+    db $50
+
+SSAnne1Text2: ; 0x61272
+    TX_FAR _SSAnne1Text2
+    db $50
+
+SSAnne1Object: ; 0x61277 (size=104)
+    db $c ; border tile
+
+    db $b ; warps
+    db $0, $1a, $1, VERMILION_DOCK
+    db $0, $1b, $1, VERMILION_DOCK
+    db $8, $1f, $0, SS_ANNE_8
+    db $8, $17, $1, SS_ANNE_8
+    db $8, $13, $2, SS_ANNE_8
+    db $8, $f, $3, SS_ANNE_8
+    db $8, $b, $4, SS_ANNE_8
+    db $8, $7, $5, SS_ANNE_8
+    db $6, $2, $6, SS_ANNE_2
+    db $f, $25, $5, SS_ANNE_4
+    db $10, $3, $0, SS_ANNE_6
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_WAITER, $6 + 4, $c + 4, $fe, $2, $1 ; person
+    db SPRITE_SAILOR, $5 + 4, $1b + 4, $ff, $ff, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $14, $0, $1a ; VERMILION_DOCK
+    EVENT_DISP $14, $0, $1b ; VERMILION_DOCK
+    EVENT_DISP $14, $8, $1f ; SS_ANNE_8
+    EVENT_DISP $14, $8, $17 ; SS_ANNE_8
+    EVENT_DISP $14, $8, $13 ; SS_ANNE_8
+    EVENT_DISP $14, $8, $f ; SS_ANNE_8
+    EVENT_DISP $14, $8, $b ; SS_ANNE_8
+    EVENT_DISP $14, $8, $7 ; SS_ANNE_8
+    EVENT_DISP $14, $6, $2 ; SS_ANNE_2
+    EVENT_DISP $14, $f, $25 ; SS_ANNE_4
+    EVENT_DISP $14, $10, $3 ; SS_ANNE_6
+
+SSAnne1Blocks: ; 180
+    INCBIN "maps/ssanne1.blk"
+
+SSAnne2_h: ; 0x61393 to 0x6139f (12 bytes) (id=96)
+    db $0d ; tileset
+    db $09, $14 ; dimensions (y, x)
+    dw SSAnne2Blocks, SSAnne2Texts, SSAnne2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne2Object ; objects
+
+SSAnne2Script: ; 0x6139f
+    call $3c3c
+    ld hl, $53b3
+    ld a, [$d665]
+    jp $3d97
+; 0x613ab
+
+INCBIN "baserom.gbc",$613ab,$613b3 - $613ab
+
+SSAnne2Scripts: ; 0x613b3
+    dw SSAnne2Script0, SSAnne2Script1, SSAnne2Script2, SSAnne2Script3, SSAnne2Script4
+
+SSAnne2Script4: ; 0x613bd
+    ret
+; 0x613be
+
+SSAnne2Script0: ; 0x613be
+    ld hl, $5411
+    call $34bf
+    ret nc
+    ld a, $ff
+    ld [$c0ee], a
+    call $23b1
+    ld c, $2
+    ld a, $de
+    call $23a1
+    ld a, [$cd3d]
+    ld [$ff00+$db], a
+    ld a, $71
+    ld [$cc4d], a
+    ld a, $15
+    call Predef
+    call Delay3
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $3541
+    xor a
+    ld [$ff00+$b4], a
+    ld a, $f0
+    ld [$cd6b], a
+    ld a, [$ff00+$db]
+    cp $2
+    jr nz, .asm_61400 ; 0x613f9 $5
+    ld de, $540c
+    jr .asm_61403 ; 0x613fe $3
+.asm_61400
+    ld de, $540d
+.asm_61403
+    call $363a
+    ld a, $1
+    ld [$d665], a
+    ret
+; 0x6140c
+
+INCBIN "baserom.gbc",$6140c,$61430 - $6140c
+
+SSAnne2Script1: ; 0x61430
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    call $5416
+    xor a
+    ld [$cd6b], a
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $2920
+    call Delay3
+    ld a, $f2
+    ld [$d059], a
+    ld a, [$d715]
+    cp $b1
+    jr nz, .asm_61457 ; 0x61451 $4
+    ld a, $1
+    jr .asm_61461 ; 0x61455 $a
+.asm_61457
+    cp $99
+    jr nz, .asm_6145f ; 0x61459 $4
+    ld a, $2
+    jr .asm_61461 ; 0x6145d $2
+.asm_6145f
+    ld a, $3
+.asm_61461
+    ld [$d05d], a
+    call $5416
+    ld a, $2
+    ld [$d665], a
+    ret
+; 0x6146d
+
+SSAnne2Script2: ; 0x6146d
+    ld a, [$d057]
+    cp $ff
+    jp z, $53ab
+    call $5416
+    ld a, $f0
+    ld [$cd6b], a
+    ld a, $3
+    ld [$ff00+$8c], a
+    call $2920
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $3541
+    ld a, [$d362]
+    cp $25
+    jr nz, .asm_61497 ; 0x61490 $5
+    ld de, $54b9
+    jr .asm_6149a ; 0x61495 $3
+.asm_61497
+    ld de, $54b7
+.asm_6149a
+    ld a, $2
+    ld [$ff00+$8c], a
+    call $363a
+    ld a, $ff
+    ld [$c0ee], a
+    call $23b1
+    ld b, $2
+    ld hl, $5b47
+    call Bankswitch
+    ld a, $3
+    ld [$d665], a
+    ret
+; 0x614b7
+
+INCBIN "baserom.gbc",$614b7,$614be - $614b7
+
+SSAnne2Script3: ; 0x614be
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    xor a
+    ld [$cd6b], a
+    ld a, $71
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    call $2307
+    ld a, $4
+    ld [$d665], a
+    ret
+; 0x614db
+
+SSAnne2Texts: ; 0x614db
+    dw SSAnne2Text1, SSAnne2Text2, SSAnne2Text3
+
+SSAnne2Text1: ; 0x614e1
+    TX_FAR _SSAnne2Text1
+    db $50
+
+SSAnne2Text2: ; 0x614e6
+    db $8
+    ld hl, $5500
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $5505
+    ld de, $550a
+    call $3354
+    jp $24d7
+; 0x61500
+
+INCBIN "baserom.gbc",$61500,$f
+
+SSAnne2Text3: ; 0x6150f
+INCBIN "baserom.gbc",$6150f,5
+
+SSAnne2Object: ; 0x61514 (size=90)
+    db $c ; border tile
+
+    db $9 ; warps
+    db $b, $9, $0, SS_ANNE_9
+    db $b, $d, $2, SS_ANNE_9
+    db $b, $11, $4, SS_ANNE_9
+    db $b, $15, $6, SS_ANNE_9
+    db $b, $19, $8, SS_ANNE_9
+    db $b, $1d, $a, SS_ANNE_9
+    db $4, $2, $8, SS_ANNE_1
+    db $c, $2, $1, SS_ANNE_3
+    db $4, $24, $0, SS_ANNE_7
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_WAITER, $7 + 4, $3 + 4, $fe, $1, $1 ; person
+    db SPRITE_BLUE, $4 + 4, $24 + 4, $ff, $d0, $42, SONY1 + $C8, $1 ; trainer
+
+    ; warp-to
+    EVENT_DISP $14, $b, $9 ; SS_ANNE_9
+    EVENT_DISP $14, $b, $d ; SS_ANNE_9
+    EVENT_DISP $14, $b, $11 ; SS_ANNE_9
+    EVENT_DISP $14, $b, $15 ; SS_ANNE_9
+    EVENT_DISP $14, $b, $19 ; SS_ANNE_9
+    EVENT_DISP $14, $b, $1d ; SS_ANNE_9
+    EVENT_DISP $14, $4, $2 ; SS_ANNE_1
+    EVENT_DISP $14, $c, $2 ; SS_ANNE_3
+    EVENT_DISP $14, $4, $24 ; SS_ANNE_7
+
+SSAnne2Blocks: ; 180
+    INCBIN "maps/ssanne2.blk"
+
+SSAnne4_h: ; 0x61622 to 0x6162e (12 bytes) (id=98)
+    db $0d ; tileset
+    db $04, $0f ; dimensions (y, x)
+    dw SSAnne4Blocks, SSAnne4Texts, SSAnne4Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne4Object ; objects
+
+SSAnne4Script: ; 0x6162e
+    jp $3c3c
+; 0x61631
+
+SSAnne4Texts:
+INCBIN "baserom.gbc",$61631,$1
+
+SSAnne4Object: ; 0x61632 (size=52)
+    db $c ; border tile
+
+    db $6 ; warps
+    db $3, $17, $8, SS_ANNE_10
+    db $3, $13, $6, SS_ANNE_10
+    db $3, $f, $4, SS_ANNE_10
+    db $3, $b, $2, SS_ANNE_10
+    db $3, $7, $0, SS_ANNE_10
+    db $5, $1b, $9, SS_ANNE_1
+
+    db $0 ; signs
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $f, $3, $17 ; SS_ANNE_10
+    EVENT_DISP $f, $3, $13 ; SS_ANNE_10
+    EVENT_DISP $f, $3, $f ; SS_ANNE_10
+    EVENT_DISP $f, $3, $b ; SS_ANNE_10
+    EVENT_DISP $f, $3, $7 ; SS_ANNE_10
+    EVENT_DISP $f, $5, $1b ; SS_ANNE_1
+
+SSAnne4Blocks: ; 60
+    INCBIN "maps/ssanne4.blk"
+
+SSAnne5_h: ; 0x616a2 to 0x616ae (12 bytes) (id=99)
+    db $0d ; tileset
+    db $07, $0a ; dimensions (y, x)
+    dw SSAnne5Blocks, SSAnne5Texts, SSAnne5Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne5Object ; objects
+
+SSAnne5Script: ; 0x616ae
+    call $3c3c
+    ld hl, $56d1
+    ld de, $56c1
+    ld a, [$d617]
+    call $3160
+    ld [$d617], a
+    ret
+; 0x616c1
+
+INCBIN "baserom.gbc",$616c1,$6
+
+SSAnne5Texts: ; 0x616c7
+    dw SSAnne5Text1, SSAnne5Text2, SSAnne5Text3, SSAnne5Text4, SSAnne5Text5
+
+INCBIN "baserom.gbc",$616d1,$19
+
+SSAnne5Text1: ; 0x616ea
+    TX_FAR _SSAnne5Text1
+    db $50
+
+SSAnne5Text2: ; 0x616ef
+    TX_FAR _SSAnne5Text2
+    db $50
+
+SSAnne5Text3: ; 0x616f4
+    TX_FAR _SSAnne5Text3
+    db $50
+
+SSAnne5Text4: ; 0x616f9
+    db $08 ; asm
+    ld hl, $56d1
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$61703,$61712 - $61703
+
+SSAnne5Text5: ; 0x61712
+    db $08 ; asm
+    ld hl, $56dd
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$6171c,$f
+
+SSAnne5Object: ; 0x6172b (size=54)
+    db $23 ; border tile
+
+    db $2 ; warps
+    db $6, $d, $0, SS_ANNE_3
+    db $7, $d, $0, SS_ANNE_3
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $2 + 4, $5 + 4, $ff, $d1, $1 ; person
+    db SPRITE_SAILOR, $9 + 4, $4 + 4, $ff, $ff, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_1, $b + 4, $7 + 4, $ff, $ff, $3 ; person
+    db SPRITE_SAILOR, $4 + 4, $4 + 4, $ff, $d0, $44, SAILOR + $C8, $1 ; trainer
+    db SPRITE_SAILOR, $8 + 4, $a + 4, $ff, $d1, $45, SAILOR + $C8, $2 ; trainer
+
+    ; warp-to
+    EVENT_DISP $a, $6, $d ; SS_ANNE_3
+    EVENT_DISP $a, $7, $d ; SS_ANNE_3
+
+SSAnne5Blocks: ; 70
+    INCBIN "maps/ssanne5.blk"
+
+SSAnne6_h: ; 0x617a7 to 0x617b3 (12 bytes) (id=100)
+    db $0d ; tileset
+    db $08, $07 ; dimensions (y, x)
+    dw SSAnne6Blocks, SSAnne6Texts, SSAnne6Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne6Object ; objects
+
+SSAnne6Script: ; 0x617b3
+    call $3c3c
+    ret
+; 0x617b7
+
+SSAnne6Texts: ; 0x617b7
+    dw SSAnne6Text1, SSAnne6Text2, SSAnne6Text3, SSAnne6Text4, SSAnne6Text5, SSAnne6Text6, SSAnne6Text7
+
+SSAnne6Text1: ; 0x617c5
+    TX_FAR _SSAnne6Text1
+    db $50
+
+SSAnne6Text2: ; 0x617ca
+    TX_FAR _SSAnne6Text2
+    db $50
+
+SSAnne6Text3: ; 0x617cf
+    TX_FAR _SSAnne6Text3
+    db $50
+
+SSAnne6Text4: ; 0x617d4
+    TX_FAR _SSAnne6Text4
+    db $50
+
+SSAnne6Text5: ; 0x617d9
+    TX_FAR _SSAnne6Text5
+    db $50
+
+SSAnne6Text6: ; 0x617de
+    TX_FAR _SSAnne6Text6
+    db $50
+
+SSAnne6Text7: ; 0x617e3
+    db $08 ; asm
+    ld hl, $5807
+    call PrintText
+    ldh a, [$d3]
+    bit 7, a
+    jr z, .asm_93eb1 ; 0x617ee
+    ld hl, $580c
+    jr .asm_63292 ; 0x617f3
+.asm_93eb1 ; 0x617f5
+    bit 4, a
+    jr z, .asm_7436c ; 0x617f7
+    ld hl, $5811
+    jr .asm_63292 ; 0x617fc
+.asm_7436c ; 0x617fe
+    ld hl, $5816
+.asm_63292 ; 0x61801
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$61807,$14
+
+SSAnne6Object: ; 0x6181b (size=54)
+    db $c ; border tile
+
+    db $1 ; warps
+    db $0, $6, $a, SS_ANNE_1
+
+    db $0 ; signs
+
+    db $7 ; people
+    db SPRITE_COOK, $8 + 4, $1 + 4, $fe, $1, $1 ; person
+    db SPRITE_COOK, $8 + 4, $5 + 4, $fe, $1, $2 ; person
+    db SPRITE_COOK, $7 + 4, $9 + 4, $fe, $1, $3 ; person
+    db SPRITE_COOK, $6 + 4, $d + 4, $ff, $ff, $4 ; person
+    db SPRITE_COOK, $8 + 4, $d + 4, $ff, $ff, $5 ; person
+    db SPRITE_COOK, $a + 4, $d + 4, $ff, $ff, $6 ; person
+    db SPRITE_COOK, $d + 4, $b + 4, $ff, $d1, $7 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $0, $6 ; SS_ANNE_1
+
+SSAnne6Blocks: ; 56
+    INCBIN "maps/ssanne6.blk"
+
+SSAnne7_h: ; 0x61889 to 0x61895 (12 bytes) (id=101)
+    db $0d ; tileset
+    db $04, $03 ; dimensions (y, x)
+    dw SSAnne7Blocks, SSAnne7Texts, SSAnne7Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne7Object ; objects
+
+SSAnne7Script: ; 0x61895
+    call $589b
+    jp $3c3c
+; 0x6189b
+
+INCBIN "baserom.gbc",$6189b,$c
+
+SSAnne7Texts: ; 0x618a7
+    dw SSAnne7Text1, SSAnne7Text2, SSAnne7Text3
+
+SSAnne7Text1: ; 0x618ad
+    db $08 ; asm
+    ld a, [$d803]
+    bit 0, a
+    jr nz, .asm_797c4 ; 0x618b3
+    ld hl, $58ec
+    call PrintText
+    ld hl, $5927
+    call PrintText
+    ld bc,(HM_01 << 8) | 1
+    call $3e2e
+    jr nc, .asm_ccdcd ; 0x618c7
+    ld hl, $592c
+    call PrintText
+    ld hl, $d803
+    set 0, [hl]
+    jr .asm_0faf5 ; 0x618d4
+.asm_ccdcd ; 0x618d6
+    ld hl, $5937
+    call PrintText
+    ld hl, $d72d
+    set 5, [hl]
+    jr .asm_0faf5 ; 0x618e1
+.asm_797c4 ; 0x618e3
+    ld hl, $5932
+    call PrintText
+.asm_0faf5 ; 0x618e9
+    jp $24d7
+
+INCBIN "baserom.gbc",$618ec,$50
+
+SSAnne7Text2: ; 0x6193c
+    TX_FAR _SSAnne7Text2
+    db $50
+
+SSAnne7Text3: ; 0x61941
+    TX_FAR _SSAnne7Text3
+    db $50
+
+SSAnne7Object: ; 0x61946 (size=24)
+    db $c ; border tile
+
+    db $1 ; warps
+    db $7, $0, $8, SS_ANNE_2
+
+    db $2 ; signs
+    db $1, $4, $2 ; SSAnne7Text2
+    db $2, $1, $3 ; SSAnne7Text3
+
+    db $1 ; people
+    db SPRITE_SS_CAPTAIN, $2 + 4, $4 + 4, $ff, $d1, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $3, $7, $0 ; SS_ANNE_2
+
+SSAnne7Blocks: ; 12
+    INCBIN "maps/ssanne7.blk"
+
+SSAnne8_h: ; 0x6196a to 0x61976 (12 bytes) (id=102)
+    db $0d ; tileset
+    db $08, $0c ; dimensions (y, x)
+    dw SSAnne8Blocks, SSAnne8Texts, SSAnne8Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne8Object ; objects
+
+SSAnne8Script: ; 0x61976
+    call $3c3c
+    ld hl, $59a5
+    ld de, $5989
+    ld a, [$d608]
+    call $3160
+    ld [$d608], a
+    ret
+; 0x61989
+
+INCBIN "baserom.gbc",$61989,$6
+
+SSAnne8Texts: ; 0x6198f
+    dw SSAnne8Text1, SSAnne8Text2, SSAnne8Text3, SSAnne8Text4, SSAnne8Text5, SSAnne8Text6, SSAnne8Text7, SSAnne8Text8, SSAnne8Text9, SSAnne8Text10, SSAnne8Text11
+
+INCBIN "baserom.gbc",$619a5,$31
+
+SSAnne8Text1: ; 0x619d6
+    db $08 ; asm
+    ld hl, $59a5
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne8Text2: ; 0x619e0
+    db $08 ; asm
+    ld hl, $59b1
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne8Text3: ; 0x619ea
+    db $08 ; asm
+    ld hl, $59bd
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne8Text4: ; 0x619f4
+    db $08 ; asm
+    ld hl, $59c9
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne8Text8: ; 0x619fe
+    TX_FAR _SSAnne8Text8
+    db $08 ; asm
+    ld a, $65
+    call $13d0
+    jp $24d7
+
+INCBIN "baserom.gbc",$61a0b,60
+
+SSAnne8Text5: ; 0x61a47
+    TX_FAR _SSAnne8Text5
+    db $50
+
+SSAnne8Text6: ; 0x61a4c
+    TX_FAR _SSAnne8Text6
+    db $50
+
+SSAnne8Text7: ; 0x61a51
+    TX_FAR _SSAnne8Text7
+    db $50
+
+SSAnne8Text9: ; 0x61a56
+    TX_FAR _SSAnne8Text9
+    db $50
+
+SSAnne8Text11: ; 0x61a5b
+    TX_FAR _SSAnne8Text11
+    db $50
+
+SSAnne8Object: ; 0x61a60 (size=127)
+    db $c ; border tile
+
+    db $6 ; warps
+    db $0, $0, $2, SS_ANNE_1
+    db $0, $a, $3, SS_ANNE_1
+    db $0, $14, $4, SS_ANNE_1
+    db $a, $0, $5, SS_ANNE_1
+    db $a, $a, $6, SS_ANNE_1
+    db $a, $14, $7, SS_ANNE_1
+
+    db $0 ; signs
+
+    db $b ; people
+    db SPRITE_GENTLEMAN, $3 + 4, $2 + 4, $ff, $d2, $41, GENTLEMAN + $C8, $1 ; trainer
+    db SPRITE_GENTLEMAN, $4 + 4, $b + 4, $ff, $d1, $42, GENTLEMAN + $C8, $2 ; trainer
+    db SPRITE_BUG_CATCHER, $e + 4, $b + 4, $ff, $d1, $43, YOUNGSTER + $C8, $8 ; trainer
+    db SPRITE_LASS, $b + 4, $d + 4, $ff, $d2, $44, LASS + $C8, $b ; trainer
+    db SPRITE_GIRL, $3 + 4, $16 + 4, $fe, $1, $5 ; person
+    db SPRITE_FAT_BALD_GUY, $e + 4, $0 + 4, $ff, $ff, $6 ; person
+    db SPRITE_LITTLE_GIRL, $b + 4, $2 + 4, $ff, $d0, $7 ; person
+    db SPRITE_CLEFAIRY, $b + 4, $3 + 4, $ff, $d0, $8 ; person
+    db SPRITE_GIRL, $d + 4, $a + 4, $ff, $d3, $9 ; person
+	db SPRITE_BALL, $f + 4, $c + 4, $ff, $ff, $8a, TM_08 ; item
+    db SPRITE_GENTLEMAN, $d + 4, $15 + 4, $fe, $2, $b ; person
+
+    ; warp-to
+    EVENT_DISP $c, $0, $0 ; SS_ANNE_1
+    EVENT_DISP $c, $0, $a ; SS_ANNE_1
+    EVENT_DISP $c, $0, $14 ; SS_ANNE_1
+    EVENT_DISP $c, $a, $0 ; SS_ANNE_1
+    EVENT_DISP $c, $a, $a ; SS_ANNE_1
+    EVENT_DISP $c, $a, $14 ; SS_ANNE_1
+
+SSAnne8Blocks: ; 96
+    INCBIN "maps/ssanne8.blk"
+
+SSAnne9_h: ; 0x61b3f to 0x61b4b (12 bytes) (id=103)
+    db $0d ; tileset
+    db $08, $0c ; dimensions (y, x)
+    dw SSAnne9Blocks, SSAnne9Texts, SSAnne9Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne9Object ; objects
+
+SSAnne9Script: ; 0x61b4b
+    ld a, $1
+    ld [$cf0c], a
+    xor a
+    ld [$cc3c], a
+    ld hl, $5b84
+    ld de, $5b64
+    ld a, [$d609]
+    call $3160
+    ld [$d609], a
+    ret
+; 0x61b64
+
+INCBIN "baserom.gbc",$61b64,$6
+
+SSAnne9Texts: ; 0x61b6a
+    dw SSAnne9Text1, SSAnne9Text2, SSAnne9Text3, SSAnne9Text4, SSAnne9Text5, SSAnne9Text6, SSAnne9Text7, SSAnne9Text8, SSAnne9Text9, SSAnne9Text10, SSAnne9Text11, SSAnne9Text12, SSAnne9Text13
+
+INCBIN "baserom.gbc",$61b84,$31
+
+SSAnne9Text1: ; 0x61bb5
+    db $08 ; asm
+    ld hl, $5b84
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne9Text2: ; 0x61bbf
+    db $08 ; asm
+    ld hl, $5b90
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne9Text3: ; 0x61bc9
+    db $08 ; asm
+    ld hl, $5b9c
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne9Text4: ; 0x61bd3
+    db $08 ; asm
+    ld hl, $5ba8
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne9Text5: ; 0x61bdd
+    db $08 ; asm
+    call $3719
+    ld hl, $5bf2
+    call PrintText
+    call $3725
+    ld a, $84
+    call $349b
+    jp $24d7
+
+INCBIN "baserom.gbc",$61bf2,$61bf7 - $61bf2
+
+SSAnne9Text7: ; 0x61bf7
+    db $08 ; asm
+    ld hl, $5c01
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$61c01,$61c06 - $61c01
+
+SSAnne9Text8: ; 0x61c06
+    db $08 ; asm
+    ld hl, $5c10
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$61c10,$61c15 - $61c10
+
+SSAnne9Text10: ; 0x61c15
+    db $08 ; asm
+    ld hl, $5c1f
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$61c1f,$61c24 - $61c1f
+
+SSAnne9Text11: ; 0x61c24
+    db $08 ; asm
+    ld hl, $5c2e
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$61c2e,$61c33 - $61c2e
+
+SSAnne9Text12: ; 0x61c33
+    db $08 ; asm
+    ld hl, $5c3d
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$61c3d,$61c42 - $61c3d
+
+SSAnne9Text13: ; 0x61c42
+    db $08 ; asm
+    ld hl, $5c4c
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$61c4c,$41
+
+SSAnne9Object: ; 0x61c8d (size=188)
+    db $c ; border tile
+
+    db $c ; warps
+    db $5, $2, $0, SS_ANNE_2
+    db $5, $3, $0, SS_ANNE_2
+    db $5, $c, $1, SS_ANNE_2
+    db $5, $d, $1, SS_ANNE_2
+    db $5, $16, $2, SS_ANNE_2
+    db $5, $17, $2, SS_ANNE_2
+    db $f, $2, $3, SS_ANNE_2
+    db $f, $3, $3, SS_ANNE_2
+    db $f, $c, $4, SS_ANNE_2
+    db $f, $d, $4, SS_ANNE_2
+    db $f, $16, $5, SS_ANNE_2
+    db $f, $17, $5, SS_ANNE_2
+
+    db $0 ; signs
+
+    db $d ; people
+    db SPRITE_GENTLEMAN, $2 + 4, $a + 4, $ff, $d3, $41, GENTLEMAN + $C8, $3 ; trainer
+    db SPRITE_FISHER2, $4 + 4, $d + 4, $ff, $d2, $42, FISHER + $C8, $1 ; trainer
+    db SPRITE_GENTLEMAN, $e + 4, $0 + 4, $ff, $d3, $43, GENTLEMAN + $C8, $5 ; trainer
+    db SPRITE_LASS, $b + 4, $2 + 4, $ff, $d0, $44, LASS + $C8, $c ; trainer
+    db SPRITE_GENTLEMAN, $2 + 4, $1 + 4, $ff, $d0, $5 ; person
+	db SPRITE_BALL, $1 + 4, $c + 4, $ff, $ff, $86, MAX_ETHER ; item
+    db SPRITE_GENTLEMAN, $2 + 4, $15 + 4, $ff, $d0, $7 ; person
+    db SPRITE_OLD_PERSON, $1 + 4, $16 + 4, $ff, $d0, $8 ; person
+	db SPRITE_BALL, $c + 4, $0 + 4, $ff, $ff, $89, RARE_CANDY ; item
+    db SPRITE_GENTLEMAN, $c + 4, $c + 4, $ff, $d0, $a ; person
+    db SPRITE_YOUNG_BOY, $e + 4, $b + 4, $ff, $ff, $b ; person
+    db SPRITE_BRUNETTE_GIRL, $c + 4, $16 + 4, $ff, $d2, $c ; person
+    db SPRITE_FOULARD_WOMAN, $c + 4, $14 + 4, $ff, $d3, $d ; person
+
+    ; warp-to
+    EVENT_DISP $c, $5, $2 ; SS_ANNE_2
+    EVENT_DISP $c, $5, $3 ; SS_ANNE_2
+    EVENT_DISP $c, $5, $c ; SS_ANNE_2
+    EVENT_DISP $c, $5, $d ; SS_ANNE_2
+    EVENT_DISP $c, $5, $16 ; SS_ANNE_2
+    EVENT_DISP $c, $5, $17 ; SS_ANNE_2
+    EVENT_DISP $c, $f, $2 ; SS_ANNE_2
+    EVENT_DISP $c, $f, $3 ; SS_ANNE_2
+    EVENT_DISP $c, $f, $c ; SS_ANNE_2
+    EVENT_DISP $c, $f, $d ; SS_ANNE_2
+    EVENT_DISP $c, $f, $16 ; SS_ANNE_2
+    EVENT_DISP $c, $f, $17 ; SS_ANNE_2
+
+SSAnne10_h: ; 0x61d49 to 0x61d55 (12 bytes) (id=104)
+    db $0d ; tileset
+    db $08, $0c ; dimensions (y, x)
+    dw $43c0, SSAnne10Texts, SSAnne10Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SSAnne10Object ; objects
+
+SSAnne10Script: ; 0x61d55
+    call $3c3c
+    ld hl, $5d84
+    ld de, $5d68
+    ld a, [$d629]
+    call $3160
+    ld [$d629], a
+    ret
+; 0x61d68
+
+INCBIN "baserom.gbc",$61d68,$6
+
+SSAnne10Texts: ; 0x61d6e
+    dw SSAnne10Text1, SSAnne10Text2, SSAnne10Text3, SSAnne10Text4, SSAnne10Text5, SSAnne10Text6, SSAnne10Text7, SSAnne10Text8, SSAnne10Text9, SSAnne10Text10, SSAnne10Text11
+
+INCBIN "baserom.gbc",$61d84,$49
+
+SSAnne10Text1: ; 0x61dcd
+    db $08 ; asm
+    ld hl, $5d84
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne10Text2: ; 0x61dd7
+    db $08 ; asm
+    ld hl, $5d90
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne10Text3: ; 0x61de1
+    db $08 ; asm
+    ld hl, $5d9c
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne10Text4: ; 0x61deb
+    db $08 ; asm
+    ld hl, $5da8
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne10Text5: ; 0x61df5
+    db $08 ; asm
+    ld hl, $5db4
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne10Text6: ; 0x61dff
+    db $08 ; asm
+    ld hl, $5dc0
+    call LoadTrainerHeader
+    jp $24d7
+
+SSAnne10Text8: ; 0x61e09
+    TX_FAR _SSAnne10Text8
+    db $8 ; 0x61e0d
+    ld a, $29
+    call $13d0
+    jp $24d7
+
+INCBIN "baserom.gbc",$61e16,$61e70 - $61e16
+
+SSAnne10Text7: ; 0x61e70
+    TX_FAR _SSAnne10Text7
+    db $50
+
+SSAnne10Object: ; 0x61e75 (size=165)
+    db $c ; border tile
+
+    db $a ; warps
+    db $5, $2, $4, SS_ANNE_4
+    db $5, $3, $4, SS_ANNE_4
+    db $5, $c, $3, SS_ANNE_4
+    db $5, $d, $3, SS_ANNE_4
+    db $5, $16, $2, SS_ANNE_4
+    db $5, $17, $2, SS_ANNE_4
+    db $f, $2, $1, SS_ANNE_4
+    db $f, $3, $1, SS_ANNE_4
+    db $f, $c, $0, SS_ANNE_4
+    db $f, $d, $0, SS_ANNE_4
+
+    db $0 ; signs
+
+    db $b ; people
+    db SPRITE_SAILOR, $d + 4, $0 + 4, $ff, $d0, $41, SAILOR + $C8, $3 ; trainer
+    db SPRITE_SAILOR, $b + 4, $2 + 4, $ff, $d0, $42, SAILOR + $C8, $4 ; trainer
+    db SPRITE_SAILOR, $3 + 4, $c + 4, $ff, $d2, $43, SAILOR + $C8, $5 ; trainer
+    db SPRITE_SAILOR, $2 + 4, $16 + 4, $ff, $d0, $44, SAILOR + $C8, $6 ; trainer
+    db SPRITE_SAILOR, $2 + 4, $0 + 4, $ff, $d3, $45, SAILOR + $C8, $7 ; trainer
+    db SPRITE_FISHER2, $4 + 4, $0 + 4, $ff, $d3, $46, FISHER + $C8, $2 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $d + 4, $a + 4, $ff, $d3, $7 ; person
+    db SPRITE_SLOWBRO, $c + 4, $b + 4, $ff, $ff, $8 ; person
+	db SPRITE_BALL, $2 + 4, $14 + 4, $ff, $ff, $89, ETHER ; item
+	db SPRITE_BALL, $2 + 4, $a + 4, $ff, $ff, $8a, TM_44 ; item
+	db SPRITE_BALL, $b + 4, $c + 4, $ff, $ff, $8b, MAX_POTION ; item
+
+    ; warp-to
+    EVENT_DISP $c, $5, $2 ; SS_ANNE_4
+    EVENT_DISP $c, $5, $3 ; SS_ANNE_4
+    EVENT_DISP $c, $5, $c ; SS_ANNE_4
+    EVENT_DISP $c, $5, $d ; SS_ANNE_4
+    EVENT_DISP $c, $5, $16 ; SS_ANNE_4
+    EVENT_DISP $c, $5, $17 ; SS_ANNE_4
+    EVENT_DISP $c, $f, $2 ; SS_ANNE_4
+    EVENT_DISP $c, $f, $3 ; SS_ANNE_4
+    EVENT_DISP $c, $f, $c ; SS_ANNE_4
+    EVENT_DISP $c, $f, $d ; SS_ANNE_4
+
+UndergroundPathNS_h: ; 0x61f1a to 0x61f26 (12 bytes) (id=119)
+    db $0b ; tileset
+    db $18, $04 ; dimensions (y, x)
+    dw UndergroundPathNSBlocks, UndergroundPathNSTexts, UndergroundPathNSScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UndergroundPathNSObject ; objects
+
+UndergroundPathNSScript: ; 0x61f26
+    jp $3c3c
+; 0x61f29
+
+UndergroundPathNSTexts:
+INCBIN "baserom.gbc",$61f29,$1
+
+UndergroundPathNSObject: ; 0x61f2a (size=20)
+    db $1 ; border tile
+
+    db $2 ; warps
+    db $4, $5, $2, PATH_ENTRANCE_ROUTE_5
+    db $29, $2, $2, PATH_ENTRANCE_ROUTE_6
+
+    db $0 ; signs
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $4, $4, $5 ; PATH_ENTRANCE_ROUTE_5
+    EVENT_DISP $4, $29, $2 ; PATH_ENTRANCE_ROUTE_6
+
+UndergroundPathWE_h: ; 0x61f3e to 0x61f4a (12 bytes) (id=121)
+    db $0b ; tileset
+    db $04, $19 ; dimensions (y, x)
+    dw $41f4, $5f4d, UndergroundPathWEScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UndergroundPathWEObject ; objects
+
+UndergroundPathWEScript: ; 0x61f4a
+    jp $3c3c
+; 0x61f4d
+
+INCBIN "baserom.gbc",$61f4d,$1
+
+UndergroundPathWEObject: ; 0x61f4e (size=20)
+    db $1 ; border tile
+
+    db $2 ; warps
+    db $5, $2, $2, PATH_ENTRANCE_ROUTE_7
+    db $2, $2f, $2, PATH_ENTRANCE_ROUTE_8
+
+    db $0 ; signs
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $19, $5, $2 ; PATH_ENTRANCE_ROUTE_7
+    EVENT_DISP $19, $2, $2f ; PATH_ENTRANCE_ROUTE_8
+
+DiglettsCave_h: ; 0x61f62 to 0x61f6e (12 bytes) (id=197)
+    db $11 ; tileset
+    db $12, $14 ; dimensions (y, x)
+    dw DiglettsCaveBlocks, $5f71, DiglettsCaveScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw DiglettsCaveObject ; objects
+
+DiglettsCaveScript: ; 0x61f6e
+    jp $3c3c
+; 0x61f71
+
+INCBIN "baserom.gbc",$61f71,$1
+
+DiglettsCaveObject: ; 0x61f72 (size=20)
+    db $19 ; border tile
+
+    db $2 ; warps
+    db $5, $5, $2, DIGLETTS_CAVE_EXIT
+    db $1f, $25, $2, DIGLETTS_CAVE_ENTRANCE
+
+    db $0 ; signs
+
+    db $0 ; people
+
+    ; warp-to
+    EVENT_DISP $14, $5, $5 ; DIGLETTS_CAVE_EXIT
+    EVENT_DISP $14, $1f, $25 ; DIGLETTS_CAVE_ENTRANCE
+
+DiglettsCaveBlocks: ; 360
+    INCBIN "maps/diglettscave.blk"
+
+SilphCo11_h: ; 0x620ee to 0x620fa (12 bytes) (id=235)
+    db $10 ; tileset
+    db $09, $09 ; dimensions (y, x)
+    dw SilphCo11Blocks, SilphCo11Texts, SilphCo11Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SilphCo11Object ; objects
+
+SilphCo11Script: ; 0x620fa
+    call $6110
+    call $3c3c
+    ld hl, $62c3
+    ld de, $61cf
+    ld a, [$d659]
+    call $3160
+    ld [$d659], a
+    ret
+; 0x62110
+
+INCBIN "baserom.gbc",$62110,$1a7
+
+SilphCo11Texts: ; 0x622b7
+    dw SilphCo11Text1, SilphCo11Text2, SilphCo11Text3, SilphCo11Text4, SilphCo11Text5, SilphCo11Text6
+
+INCBIN "baserom.gbc",$622c3,$19
+
+SilphCo11Text1: ; 0x622dc
+    db $08 ; asm
+    ld a, [$d838]
+    bit 5, a
+    jp nz, $6308
+    ld hl, $6311
+    call PrintText
+    ld bc,(MASTER_BALL << 8) | 1
+    call $3e2e
+    jr nc, .asm_36088 ; 0x622f1
+    ld hl, $6316
+    call PrintText
+    ld hl, $d838
+    set 5, [hl]
+    jr .asm_fd405 ; 0x622fe
+.asm_36088 ; 0x62300
+    ld hl, $6321
+    call PrintText
+    jr .asm_fd405 ; 0x62306
+    ld hl, $631c
+    call PrintText
+.asm_fd405 ; 0x6230e
+    jp $24d7
+
+INCBIN "baserom.gbc",$62311,$15
+
+SilphCo11Text2: ; 0x62326
+    TX_FAR _SilphCo11Text2
+    db $50
+
+SilphCo11Text3: ; 0x6232b
+    TX_FAR _SilphCo11Text3
+    db $50
+
+INCBIN "baserom.gbc",$62330,5
+
+SilphCo11Text6: ; 0x62335
+INCBIN "baserom.gbc",$62335,5
+
+SilphCo11Text4: ; 0x6233a
+    db $08 ; asm
+    ld hl, $62c3
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$62344,$62353 - $62344
+
+SilphCo11Text5: ; 0x62353
+    db $08 ; asm
+    ld hl, $62cf
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$6235d,$23
+
+SilphCo11Object: ; 0x62380 (size=72)
+    db $d ; border tile
+
+    db $4 ; warps
+    db $0, $9, $1, SILPH_CO_10F
+    db $0, $d, $0, SILPH_CO_ELEVATOR
+    db $5, $5, $9, $ff
+    db $2, $3, $3, SILPH_CO_7F
+
+    db $0 ; signs
+
+    db $5 ; people
+    db SPRITE_MR_MASTERBALL, $5 + 4, $7 + 4, $ff, $d0, $1 ; person
+    db SPRITE_FOULARD_WOMAN, $5 + 4, $a + 4, $ff, $d0, $2 ; person
+    db SPRITE_GIOVANNI, $9 + 4, $6 + 4, $ff, $d0, $43, GIOVANNI + $C8, $2 ; trainer
+    db SPRITE_ROCKET, $10 + 4, $3 + 4, $ff, $d1, $44, ROCKET + $C8, $29 ; trainer
+    db SPRITE_ROCKET, $9 + 4, $f + 4, $ff, $d1, $45, ROCKET + $C8, $28 ; trainer
+
+    ; warp-to
+    EVENT_DISP $9, $0, $9 ; SILPH_CO_10F
+    EVENT_DISP $9, $0, $d ; SILPH_CO_ELEVATOR
+    EVENT_DISP $9, $5, $5
+    EVENT_DISP $9, $2, $3 ; SILPH_CO_7F
+
+SilphCo11Blocks: ; 81
+    INCBIN "maps/silphco11.blk"
+
+INCBIN "baserom.gbc",$62419,$1be7
+
+SECTION "bank19",DATA,BANK[$19]
+
+Tset00_GFX:
+    INCBIN "gfx/tilesets/00.2bpp"
+Tset00_Block:
+	INCBIN "baserom.gbc",$645E0,$64DE0-$645E0
+Tset01_GFX:
+    INCBIN "gfx/tilesets/01.2bpp"
+Tset01_Block:
+	INCBIN "baserom.gbc",$65270,$653A0-$65270
+Tset08_GFX:
+    INCBIN "gfx/tilesets/08.2bpp"
+Tset08_Block:
+	INCBIN "baserom.gbc",$65980,$65BB0-$65980
+Tset13_GFX:
+    INCBIN "gfx/tilesets/13.2bpp"
+Tset13_Block:
+	INCBIN "baserom.gbc",$66190,$66610-$66190
+Tset0E_GFX:
+    INCBIN "gfx/tilesets/0e.2bpp"
+Tset0E_Block:
+	INCBIN "baserom.gbc",$66BF0,$66D60-$66BF0
+Tset10_GFX:
+    INCBIN "gfx/tilesets/10.2bpp"
+Tset10_Block:
+	INCBIN "baserom.gbc",$67350,$676F0-$67350
+Tset17_GFX:
+    INCBIN "gfx/tilesets/17.2bpp"
+Tset17_Block:
+	INCBIN "baserom.gbc",$67B50,$68000-$67B50
+
+SECTION "bank1A",DATA,BANK[$1A]
+
+DecrementPP:
+; after using a move, decrement pp in battle and (if not transformed?) in party
+	ld a,[de]
+	cp a,STRUGGLE
+	ret z
+	ld hl,$D062
+	ld a,[hli]
+	and a,7
+	ret nz
+	bit 6,[hl]
+	ret nz
+	ld hl,$D02D ; PP of first move (in battle)
+	call .DecrementPP\@
+
+	ld a,[$D064]
+	bit 3,a ; XXX transform status?
+	ret nz
+
+	ld hl,$D188 ; PP of first move (in party)
+	ld a,[$CC2F] ; which mon in party is active
+	ld bc,$2C
+	call AddNTimes
+.DecrementPP\@
+	ld a,[$CC2E] ; which move (0, 1, 2, 3) did we use?
+	ld c,a
+	ld b,0
+	add hl,bc
+	dec [hl] ; Decrement PP
+	ret
+
+IF _RED
+	INCBIN "gfx/red/redgreenversion.1bpp"
+ENDC
+IF _BLUE
+	INCBIN "gfx/blue/blueversion.1bpp"
+ENDC
+
+Tset05_GFX:
+    INCBIN "gfx/tilesets/05.2bpp"
+Tset05_Block:
+	INCBIN "baserom.gbc",$6867F,$68DBF-$6867F
+Tset02_GFX:
+    INCBIN "gfx/tilesets/02.2bpp"
+Tset02_Block:
+	INCBIN "baserom.gbc",$693BF,$6960F-$693BF
+Tset09_GFX:
+    INCBIN "gfx/tilesets/09.2bpp"
+Tset09_Block:
+	INCBIN "baserom.gbc",$69BFF,$6A3FF-$69BFF
+Tset03_GFX:
+    INCBIN "gfx/tilesets/03.2bpp"
+Tset03_Block:
+	INCBIN "baserom.gbc",$6A9FF,$6B1FF-$6A9FF
+Tset16_GFX:
+    INCBIN "gfx/tilesets/16.2bpp"
+Tset16_Block:
+	INCBIN "baserom.gbc",$6B7FF,$6C000-$6B7FF
+
+SECTION "bank1B",DATA,BANK[$1B]
+
+Tset0F_GFX:
+    INCBIN "gfx/tilesets/0f.2bpp"
+Tset0F_Block:
+	INCBIN "baserom.gbc",$6C5C0,$6CCA0-$6C5C0
+Tset11_GFX:
+    INCBIN "gfx/tilesets/11.2bpp"
+Tset11_Block:
+	INCBIN "baserom.gbc",$6D0C0,$6D8C0-$6D0C0
+Tset12_GFX:
+    INCBIN "gfx/tilesets/12.2bpp"
+Tset12_Block:
+	INCBIN "baserom.gbc",$6DEA0,$6E390-$6DEA0
+Tset0D_GFX:
+    INCBIN "gfx/tilesets/0d.2bpp"
+Tset0D_Block:
+	INCBIN "baserom.gbc",$6E930,$6ED10-$6E930
+Tset14_GFX:
+    INCBIN "gfx/tilesets/14.2bpp"
+Tset14_Block:
+	INCBIN "baserom.gbc",$6F2D0,$6F670-$6F2D0
+Tset15_GFX:
+    INCBIN "gfx/tilesets/15.2bpp"
+Tset15_Block:
+	INCBIN "baserom.gbc",$6FB20,$6FD60-$6FB20
+Tset0B_GFX:
+    INCBIN "gfx/tilesets/0b.2bpp"
+Tset0B_Block:
+	INCBIN "baserom.gbc",$6FEF0,$70000-$6FEF0
+
+SECTION "bank1C",DATA,BANK[$1C]
+
+INCBIN "baserom.gbc",$70000,$1100
+
+CompressedMap: ; 5100
+; you can decompress this file with the redrle program in the extras/ dir
+	INCBIN "baserom.gbc",$71100,$711AB-$71100
+
+INCBIN "baserom.gbc",$711AB,$71313-$711AB
+
+ExternalMapEntries: ; 5313
+	EMAP $2,$B,PalletTownName
+	EMAP $2,$8,ViridianCityName
+	EMAP $2,$3,PewterCityName
+	EMAP $A,$2,CeruleanCityName
+	EMAP $E,$5,LavenderTownName
+	EMAP $A,$9,VermilionCityName
+	EMAP $7,$5,CeladonCityName
+	EMAP $8,$D,FuchsiaCityName
+	EMAP $2,$F,CinnabarIslandName
+	EMAP $0,$2,IndigoPlateauName
+	EMAP $A,$5,SaffronCityName
+	EMAP $0,$0,PalletTownName ; unused
+	EMAP $2,$A,Route1Name
+	EMAP $2,$6,Route2Name
+	EMAP $4,$3,Route3Name
+	EMAP $8,$2,Route4Name
+	EMAP $A,$3,Route5Name
+	EMAP $A,$8,Route6Name
+	EMAP $8,$5,Route7Name
+	EMAP $D,$5,Route8Name
+	EMAP $D,$2,Route9Name
+	EMAP $E,$4,Route10Name
+	EMAP $C,$9,Route11Name
+	EMAP $E,$9,Route12Name
+	EMAP $D,$B,Route13Name
+	EMAP $B,$C,Route14Name
+	EMAP $A,$D,Route15Name
+	EMAP $5,$5,Route16Name
+	EMAP $4,$8,Route17Name
+	EMAP $6,$D,Route18Name
+	EMAP $6,$F,Route19Name
+	EMAP $4,$F,Route20Name
+	EMAP $2,$D,Route21Name
+	EMAP $0,$8,Route22Name
+	EMAP $0,$6,Route23Name
+	EMAP $A,$1,Route24Name
+	EMAP $B,$0,Route25Name
+
+InternalMapEntries: ; 5382
+	IMAP $29,$2,$B,PalletTownName
+	IMAP $2E,$2,$8,ViridianCityName
+	IMAP $33,$2,$6,Route2Name
+	IMAP $34,$2,$4,ViridianForestName
+	IMAP $3B,$2,$3,PewterCityName
+	IMAP $3E,$6,$2,MountMoonName
+	IMAP $44,$A,$2,CeruleanCityName
+	IMAP $45,$5,$2,Route4Name
+	IMAP $46,$A,$2,CeruleanCityName
+	IMAP $49,$A,$4,Route5Name
+	IMAP $4C,$A,$6,Route6Name
+	IMAP $4F,$9,$5,Route7Name
+	IMAP $51,$B,$5,Route8Name
+	IMAP $53,$E,$3,RockTunnelName
+	IMAP $54,$F,$4,PowerPlantName
+	IMAP $57,$D,$9,Route11Name
+	IMAP $58,$E,$7,Route12Name
+	IMAP $59,$C,$0,SeaCottageName
+	IMAP $5F,$A,$9,VermilionCityName
+	IMAP $69,$9,$A,SSAnneName
+	IMAP $6D,$0,$4,VictoryRoadName
+	IMAP $77,$0,$2,PokemonLeagueName
+	IMAP $78,$A,$5,UndergroundPathName
+	IMAP $79,$0,$2,PokemonLeagueName
+	IMAP $7A,$A,$5,UndergroundPathName
+	IMAP $8D,$7,$5,CeladonCityName
+	IMAP $8E,$E,$5,LavenderTownName
+	IMAP $95,$F,$5,PokemonTowerName
+	IMAP $98,$E,$5,LavenderTownName
+	IMAP $9C,$8,$D,FuchsiaCityName
+	IMAP $9D,$8,$C,SafariZoneName
+	IMAP $9F,$8,$D,FuchsiaCityName
+	IMAP $A3,$5,$F,SeafoamIslandsName
+	IMAP $A4,$A,$9,VermilionCityName
+	IMAP $A5,$8,$D,FuchsiaCityName
+	IMAP $A6,$2,$F,PokemonMansionName
+	IMAP $AE,$2,$F,CinnabarIslandName
+	IMAP $AF,$0,$2,IndigoPlateauName
+	IMAP $B8,$A,$5,SaffronCityName
+	IMAP $BA,$9,$D,Route15Name
+	IMAP $BD,$4,$5,Route16Name
+	IMAP $BE,$E,$A,Route12Name
+	IMAP $C0,$7,$D,Route18Name
+	IMAP $C1,$5,$F,SeafoamIslandsName
+	IMAP $C2,$0,$7,Route22Name
+	IMAP $C3,$0,$4,VictoryRoadName
+	IMAP $C4,$E,$7,Route12Name
+	IMAP $C5,$A,$9,VermilionCityName
+	IMAP $C6,$3,$4,DiglettsCaveName
+	IMAP $C7,$0,$4,VictoryRoadName
+	IMAP $CF,$7,$5,RocketHQName
+	IMAP $D6,$A,$5,SilphCoName
+	IMAP $D9,$2,$F,PokemonMansionName
+	IMAP $E2,$8,$C,SafariZoneName
+	IMAP $E5,$9,$1,CeruleanCaveName
+	IMAP $E6,$E,$5,LavenderTownName
+	IMAP $E7,$A,$2,CeruleanCityName
+	IMAP $E9,$E,$3,RockTunnelName
+	IMAP $ED,$A,$5,SilphCoName
+	IMAP $F8,$0,$2,PokemonLeagueName
+	db $FF
+
+MapNames: ; 5473
+PalletTownName:
+	db "PALLET TOWN@"
+ViridianCityName:
+	db "VIRIDIAN CITY@"
+PewterCityName:
+	db "PEWTER CITY@"
+CeruleanCityName:
+	db "CERULEAN CITY@"
+LavenderTownName:
+	db "LAVENDER TOWN@"
+VermilionCityName:
+	db "VERMILION CITY@"
+CeladonCityName:
+	db "CELADON CITY@"
+FuchsiaCityName:
+	db "FUCHSIA CITY@"
+CinnabarIslandName:
+	db "CINNABAR ISLAND@"
+IndigoPlateauName:
+	db "INDIGO PLATEAU@"
+SaffronCityName:
+	db "SAFFRON CITY@"
+Route1Name:
+	db "ROUTE 1@"
+Route2Name:
+	db "ROUTE 2@"
+Route3Name:
+	db "ROUTE 3@"
+Route4Name:
+	db "ROUTE 4@"
+Route5Name:
+	db "ROUTE 5@"
+Route6Name:
+	db "ROUTE 6@"
+Route7Name:
+	db "ROUTE 7@"
+Route8Name:
+	db "ROUTE 8@"
+Route9Name:
+	db "ROUTE 9@"
+Route10Name:
+	db "ROUTE 10@"
+Route11Name:
+	db "ROUTE 11@"
+Route12Name:
+	db "ROUTE 12@"
+Route13Name:
+	db "ROUTE 13@"
+Route14Name:
+	db "ROUTE 14@"
+Route15Name:
+	db "ROUTE 15@"
+Route16Name:
+	db "ROUTE 16@"
+Route17Name:
+	db "ROUTE 17@"
+Route18Name:
+	db "ROUTE 18@"
+Route19Name:
+	db "SEA ROUTE 19@"
+Route20Name:
+	db "SEA ROUTE 20@"
+Route21Name:
+	db "SEA ROUTE 21@"
+Route22Name:
+	db "ROUTE 22@"
+Route23Name:
+	db "ROUTE 23@"
+Route24Name:
+	db "ROUTE 24@"
+Route25Name:
+	db "ROUTE 25@"
+ViridianForestName:
+	db "VIRIDIAN FOREST@"
+MountMoonName:
+	db "MT.MOON@"
+RockTunnelName:
+	db "ROCK TUNNEL@"
+SeaCottageName:
+	db "SEA COTTAGE@"
+SSAnneName:
+	db "S.S.ANNE@"
+PokemonLeagueName:
+	db "#MON LEAGUE@"
+UndergroundPathName:
+	db "UNDERGROUND PATH@"
+PokemonTowerName:
+	db "#MON TOWER@"
+SeafoamIslandsName:
+	db "SEAFOAM ISLANDS@"
+VictoryRoadName:
+	db "VICTORY ROAD@"
+DiglettsCaveName:
+	db "DIGLETT's CAVE@"
+RocketHQName:
+	db "ROCKET HQ@"
+SilphCoName:
+	db "SILPH CO.@"
+PokemonMansionName:
+	db $4a," MANSION@"
+SafariZoneName:
+	db "SAFARI ZONE@"
+CeruleanCaveName:
+	db "CERULEAN CAVE@"
+PowerPlantName:
+	db "POWER PLANT@"
+
+INCBIN "baserom.gbc",$716BE,$71AD9-$716BE
+
+Predef54: ; 0x71ad9
+; trigger the trade offer/action specified by W_WHICHTRADE
+	call $36f4
+	ld hl,TradeMons
+	ld a,[W_WHICHTRADE]
+	ld b,a
+	swap a
+	sub b
+	sub b
+	ld c,a
+	ld b,$0
+	add hl,bc
+	ld a,[hli]
+	ld [$cd0f],a
+	ld a,[hli]
+	ld [$cd34],a
+	ld a,[hli]
+	push af
+	ld de,$cd29
+	ld bc,$000b
+	call CopyData
+	pop af
+	ld l,a
+	ld h,$0
+	ld de,$5d64
+	add hl,hl
+	add hl,de
+	ld a,[hli]
+	ld [$cd10],a
+	ld a,[hl]
+	ld [$cd11],a
+	ld a,[$cd0f]
+	ld de,$cd13
+	call Function71b6a
+	ld a,[$cd34]
+	ld de,$cd1e
+	call Function71b6a
+	ld hl,$d737
+	ld a,[W_WHICHTRADE]
+	ld c,a
+	ld b,$2
+	ld a,$10
+	call Predef
+	ld a,c
+	and a
+	ld a,$4
+	ld [$cd12],a
+	jr nz,.asm_99bca ; 0x71b36 $20
+	xor a
+	ld [$cd12],a
+	call .asm_99bca
+	ld a,$1
+	ld [$cd12],a
+	call $35ec
+	ld a,[$cc26]
+	and a
+	jr nz,.asm_99bca ; 0x71b4b $b
+	call Function71c07
+	jr c,.asm_99bca ; 0x71b50 $6
+	ld hl,$5d8d
+	call PrintText
+.asm_99bca ; 0x71b58
+	ld hl,$cd12
+	ld a,[hld]
+	ld e,a
+	ld d,$0
+	ld a,[hld]
+	ld l,[hl]
+	ld h,a
+	add hl,de
+	add hl,de
+	ld a,[hli]
+	ld h,[hl]
+	ld l,a
+	jp PrintText
+
+Function71b6a: ; 0x71b6a
+	push de
+	ld [$d11e],a
+	call GetMonName
+	ld hl,$cd6d
+	pop de
+	ld bc,$b
+	jp CopyData
+
+TradeMons: ; 5B7B
+; givemonster, getmonster, textstring, nickname (11 bytes), 14 bytes total
+	db NIDORINO,  NIDORINA,  0,"TERRY@@@@@@"
+	db ABRA,      MR_MIME,  0,"MARCEL@@@@@"
+	db BUTTERFREE,BEEDRILL,  2,"CHIKUCHIKU@"
+	db PONYTA,    SEEL,      0,"SAILOR@@@@@"
+	db SPEAROW,   FARFETCH_D,2,"DUX@@@@@@@@"
+	db SLOWBRO,   LICKITUNG, 0,"MARC@@@@@@@"
+	db POLIWHIRL, JYNX,      1,"LOLA@@@@@@@"
+	db RAICHU,    ELECTRODE, 1,"DORIS@@@@@@"
+	db VENONAT,   TANGELA,   2,"CRINKLES@@@"
+	db NIDORAN_M, NIDORAN_F, 2,"SPOT@@@@@@@"
+
+Function71c07: ; 0x71c07
+	xor a
+	ld [$d07d],a
+	dec a
+	ld [$cfcb],a
+	call $13fc
+	push af
+	call $5ca2
+	pop af
+	ld a,$1
+	jp c,.asm_c4bc2
+	ld a,[$cd0f]
+	ld b,a
+	ld a,[$cf91]
+	cp b
+	ld a,$2
+	jr nz,.asm_c4bc2 ; 0x71c26 $75
+	ld a,[$cf92]
+	ld hl,$d18c
+	ld bc,$002c
+	call AddNTimes
+	ld a,[hl]
+	ld [$d127],a
+	ld hl,$d737
+	ld a,[W_WHICHTRADE]
+	ld c,a
+	ld b,$1
+	ld a,$10
+	call Predef
+	ld hl,$5d88
+	call PrintText
+	ld a,[$cf92]
+	push af
+	ld a,[$d127]
+	push af
+	call $36c0
+	call $5cc1
+	ld a,$38
+	call Predef
+	pop af
+	ld [$d127],a
+	pop af
+	ld [$cf92],a
+	ld a,[$cd34]
+	ld [$cf91],a
+	xor a
+	ld [$cc49],a
+	ld [$cf95],a
+	call $391f
+	ld a,$80
+	ld [$cc49],a
+	call AddPokemonToParty
+	call $5d19
+	ld hl,$7d7d
+	ld b,$5
+	call Bankswitch
+	call ClearScreen
+	call $5ca2
+	ld b,$3
+	ld hl,$6edc
+	call Bankswitch
+	and a
+	ld a,$3
+	jr .asm_ee803 ; 0x71c9b $1
+.asm_c4bc2 ; 0x71c9d
+	scf
+.asm_ee803 ; 0x71c9e
+	ld [$cd12],a
+	ret
+
+INCBIN "baserom.gbc",$71CA2,$725C8-$71CA2
+
+MonsterPalettes: ; 65C8
+	db PAL_MEWMON    ; MISSINGNO
+	db PAL_GREENMON  ; BULBASAUR
+	db PAL_GREENMON  ; IVYSAUR
+	db PAL_GREENMON  ; VENUSAUR
+	db PAL_REDMON    ; CHARMANDER
+	db PAL_REDMON    ; CHARMELEON
+	db PAL_REDMON    ; CHARIZARD
+	db PAL_CYANMON   ; SQUIRTLE
+	db PAL_CYANMON   ; WARTORTLE
+	db PAL_CYANMON   ; BLASTOISE
+	db PAL_GREENMON  ; CATERPIE
+	db PAL_GREENMON  ; METAPOD
+	db PAL_CYANMON   ; BUTTERFREE
+	db PAL_YELLOWMON ; WEEDLE
+	db PAL_YELLOWMON ; KAKUNA
+	db PAL_YELLOWMON ; BEEDRILL
+	db PAL_BROWNMON  ; PIDGEY
+	db PAL_BROWNMON  ; PIDGEOTTO
+	db PAL_BROWNMON  ; PIDGEOT
+	db PAL_GREYMON   ; RATTATA
+	db PAL_GREYMON   ; RATICATE
+	db PAL_BROWNMON  ; SPEAROW
+	db PAL_BROWNMON  ; FEAROW
+	db PAL_PURPLEMON ; EKANS
+	db PAL_PURPLEMON ; ARBOK
+	db PAL_YELLOWMON ; PIKACHU
+	db PAL_YELLOWMON ; RAICHU
+	db PAL_BROWNMON  ; SANDSHREW
+	db PAL_BROWNMON  ; SANDSLASH
+	db PAL_BLUEMON   ; NIDORAN_F
+	db PAL_BLUEMON   ; NIDORINA
+	db PAL_BLUEMON   ; NIDOQUEEN
+	db PAL_PURPLEMON ; NIDORAN_M
+	db PAL_PURPLEMON ; NIDORINO
+	db PAL_PURPLEMON ; NIDOKING
+	db PAL_PINKMON   ; CLEFAIRY
+	db PAL_PINKMON   ; CLEFABLE
+	db PAL_REDMON    ; VULPIX
+	db PAL_YELLOWMON ; NINETALES
+	db PAL_PINKMON   ; JIGGLYPUFF
+	db PAL_PINKMON   ; WIGGLYTUFF
+	db PAL_BLUEMON   ; ZUBAT
+	db PAL_BLUEMON   ; GOLBAT
+	db PAL_GREENMON  ; ODDISH
+	db PAL_REDMON    ; GLOOM
+	db PAL_REDMON    ; VILEPLUME
+	db PAL_REDMON    ; PARAS
+	db PAL_REDMON    ; PARASECT
+	db PAL_PURPLEMON ; VENONAT
+	db PAL_PURPLEMON ; VENOMOTH
+	db PAL_BROWNMON  ; DIGLETT
+	db PAL_BROWNMON  ; DUGTRIO
+	db PAL_YELLOWMON ; MEOWTH
+	db PAL_YELLOWMON ; PERSIAN
+	db PAL_YELLOWMON ; PSYDUCK
+	db PAL_CYANMON   ; GOLDUCK
+	db PAL_BROWNMON  ; MANKEY
+	db PAL_BROWNMON  ; PRIMEAPE
+	db PAL_BROWNMON  ; GROWLITHE
+	db PAL_REDMON    ; ARCANINE
+	db PAL_BLUEMON   ; POLIWAG
+	db PAL_BLUEMON   ; POLIWHIRL
+	db PAL_BLUEMON   ; POLIWRATH
+	db PAL_YELLOWMON ; ABRA
+	db PAL_YELLOWMON ; KADABRA
+	db PAL_YELLOWMON ; ALAKAZAM
+	db PAL_GREYMON   ; MACHOP
+	db PAL_GREYMON   ; MACHOKE
+	db PAL_GREYMON   ; MACHAMP
+	db PAL_GREENMON  ; BELLSPROUT
+	db PAL_GREENMON  ; WEEPINBELL
+	db PAL_GREENMON  ; VICTREEBEL
+	db PAL_CYANMON   ; TENTACOOL
+	db PAL_CYANMON   ; TENTACRUEL
+	db PAL_GREYMON   ; GEODUDE
+	db PAL_GREYMON   ; GRAVELER
+	db PAL_GREYMON   ; GOLEM
+	db PAL_REDMON    ; PONYTA
+	db PAL_REDMON    ; RAPIDASH
+	db PAL_PINKMON   ; SLOWPOKE
+	db PAL_PINKMON   ; SLOWBRO
+	db PAL_GREYMON   ; MAGNEMITE
+	db PAL_GREYMON   ; MAGNETON
+	db PAL_BROWNMON  ; FARFETCH_D
+	db PAL_BROWNMON  ; DODUO
+	db PAL_BROWNMON  ; DODRIO
+	db PAL_BLUEMON   ; SEEL
+	db PAL_BLUEMON   ; DEWGONG
+	db PAL_PURPLEMON ; GRIMER
+	db PAL_PURPLEMON ; MUK
+	db PAL_GREYMON   ; SHELLDER
+	db PAL_GREYMON   ; CLOYSTER
+	db PAL_PURPLEMON ; GASTLY
+	db PAL_PURPLEMON ; HAUNTER
+	db PAL_PURPLEMON ; GENGAR
+	db PAL_GREYMON   ; ONIX
+	db PAL_YELLOWMON ; DROWZEE
+	db PAL_YELLOWMON ; HYPNO
+	db PAL_REDMON    ; KRABBY
+	db PAL_REDMON    ; KINGLER
+	db PAL_YELLOWMON ; VOLTORB
+	db PAL_YELLOWMON ; ELECTRODE
+	db PAL_PINKMON   ; EXEGGCUTE
+	db PAL_GREENMON  ; EXEGGUTOR
+	db PAL_GREYMON   ; CUBONE
+	db PAL_GREYMON   ; MAROWAK
+	db PAL_BROWNMON  ; HITMONLEE
+	db PAL_BROWNMON  ; HITMONCHAN
+	db PAL_PINKMON   ; LICKITUNG
+	db PAL_PURPLEMON ; KOFFING
+	db PAL_PURPLEMON ; WEEZING
+	db PAL_GREYMON   ; RHYHORN
+	db PAL_GREYMON   ; RHYDON
+	db PAL_PINKMON   ; CHANSEY
+	db PAL_BLUEMON   ; TANGELA
+	db PAL_BROWNMON  ; KANGASKHAN
+	db PAL_CYANMON   ; HORSEA
+	db PAL_CYANMON   ; SEADRA
+	db PAL_REDMON    ; GOLDEEN
+	db PAL_REDMON    ; SEAKING
+	db PAL_REDMON    ; STARYU
+	db PAL_GREYMON   ; STARMIE
+	db PAL_PINKMON   ; MR_MIME
+	db PAL_GREENMON  ; SCYTHER
+	db PAL_MEWMON    ; JYNX
+	db PAL_YELLOWMON ; ELECTABUZZ
+	db PAL_REDMON    ; MAGMAR
+	db PAL_BROWNMON  ; PINSIR
+	db PAL_GREYMON   ; TAUROS
+	db PAL_REDMON    ; MAGIKARP
+	db PAL_BLUEMON   ; GYARADOS
+	db PAL_CYANMON   ; LAPRAS
+	db PAL_GREYMON   ; DITTO
+	db PAL_GREYMON   ; EEVEE
+	db PAL_CYANMON   ; VAPOREON
+	db PAL_YELLOWMON ; JOLTEON
+	db PAL_REDMON    ; FLAREON
+	db PAL_GREYMON   ; PORYGON
+	db PAL_BLUEMON   ; OMANYTE
+	db PAL_BLUEMON   ; OMASTAR
+	db PAL_BROWNMON  ; KABUTO
+	db PAL_BROWNMON  ; KABUTOPS
+	db PAL_GREYMON   ; AERODACTYL
+	db PAL_PINKMON   ; SNORLAX
+	db PAL_BLUEMON   ; ARTICUNO
+	db PAL_YELLOWMON ; ZAPDOS
+	db PAL_REDMON    ; MOLTRES
+	db PAL_GREYMON   ; DRATINI
+	db PAL_BLUEMON   ; DRAGONAIR
+	db PAL_BROWNMON  ; DRAGONITE
+	db PAL_MEWMON    ; MEWTWO
+	db PAL_MEWMON    ; MEW
+
+; palettes for overworlds, title screen, monsters
+SuperPalettes: ; 6660
+	RGB 31,29,31 ; PAL_ROUTE
+	RGB 21,28,11
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_PALLET
+	RGB 25,28,27
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_VIRIDIAN
+	RGB 17,26,3
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_PEWTER
+	RGB 23,25,16
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_CERULEAN
+	RGB 17,20,30
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_LAVENDER
+	RGB 27,20,27
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_VERMILION
+	RGB 30,18,0
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_CELADON
+	RGB 16,30,22
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_FUCHSIA
+	RGB 31,15,22
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_CINNABAR
+	RGB 26,10,6
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_INDIGO
+	RGB 22,14,24
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_SAFFRON
+	RGB 27,27,3
+	RGB 20,26,31
+	RGB 3,2,2
+	RGB 31,29,31 ; XXX
+	RGB 20,26,31
+	RGB 17,23,10
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_LOGO1
+	RGB 30,30,17
+	RGB 17,23,10
+	RGB 21,0,4
+	RGB 31,29,31 ; XXX
+	RGB 30,30,17
+	RGB 18,18,24
+	RGB 7,7,16
+	RGB 31,29,31 ; PAL_LOGO2
+	RGB 24,20,30
+	RGB 11,20,30
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_MEWMON
+	RGB 30,22,17
+	RGB 16,14,19
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_BLUEMON
+	RGB 18,20,27
+	RGB 11,15,23
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_REDMON
+	RGB 31,20,10
+	RGB 26,10,6
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_CYANMON
+	RGB 21,25,29
+	RGB 14,19,25
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_PURPLEMON
+	RGB 27,22,24
+	RGB 21,15,23
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_BROWNMON
+	RGB 28,20,15
+	RGB 21,14,9
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_GREENMON
+	RGB 20,26,16
+	RGB 9,20,11
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_PINKMON
+	RGB 30,22,24
+	RGB 28,15,21
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_YELLOWMON
+	RGB 31,28,14
+	RGB 26,20,0
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_GREYMON
+	RGB 26,21,22
+	RGB 15,15,18
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_SLOTS1
+	RGB 26,21,22
+	RGB 27,20,6
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_SLOTS2
+	RGB 31,31,17
+	RGB 25,17,21
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_SLOTS3
+	RGB 22,31,16
+	RGB 25,17,21
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_SLOTS4
+	RGB 16,19,29
+	RGB 25,17,21
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_BLACK
+	RGB 7,7,7
+	RGB 2,3,3
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_GREENBAR
+	RGB 30,26,15
+	RGB 9,20,11
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_YELLOWBAR
+	RGB 30,26,15
+	RGB 26,20,0
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_REDBAR
+	RGB 30,26,15
+	RGB 26,10,6
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_BADGE
+	RGB 30,22,17
+	RGB 11,15,23
+	RGB 3,2,2
+	RGB 31,29,31 ; PAL_CAVE
+	RGB 21,14,9
+	RGB 18,24,22
+	RGB 3,2,2
+	RGB 31,29,31 ; XXX
+	RGB 31,28,14
+	RGB 24,20,10
+	RGB 3,2,2
+BorderPalettes: ; 6788
+
+INCBIN "baserom.gbc",$72788,$4000 - $2788
+
+SECTION "bank1D",DATA,BANK[$1D]
+
+INCBIN "baserom.gbc",$74000,$74010 - $74000
+
+PewterMartBlocks: ; 16
+    INCBIN "maps/pewtermart.blk"
+
+FuchsiaHouse1Blocks: ; 16
+    INCBIN "maps/fuchsiahouse1.blk"
+
+FuchsiaPokecenterBlocks: ; 28
+    INCBIN "maps/fuchsiapokecenter.blk"
+
+CeruleanHouse3Blocks: ; 16
+    INCBIN "maps/ceruleanhouse3.blk"
+
+INCBIN "baserom.gbc",$7405c,$6f
+
+Func40CB: ; 40CB
+	xor a
+	ld [$FFBA],a
+	call $3719
+	call $4183
+
+	; display the next monster from CreditsMons
+	ld hl,$CD3E
+	ld c,[hl] ; how many monsters have we displayed so far?
+	inc [hl]
+	ld b,0
+	ld hl,CreditsMons
+	add hl,bc ; go that far in the list of monsters and get the next one
+	ld a,[hl]
+	ld [$CF91],a
+	ld [$D0B5],a
+	ld hl,$C420
+	call $1537
+	call $1389
+	ld hl,$980C
+	call $4164
+	xor a
+	ld [$FFBA],a
+	call $3725
+	ld hl,$9800
+	call $4164
+	ld a,$A7
+	ld [$FF4B],a
+	ld hl,$9C00
+	call $4164
+	call $4183
+	ld a,$FC
+	ld [$FF47],a
+	ld bc,7
+.next\@
+	call $4140
+	dec c
+	jr nz,.next\@
+	ld c,$14
+.next2\@
+	call $4140
+	ld a,[$FF4B]
+	sub 8
+	ld [$FF4B],a
+	dec c
+	jr nz,.next2\@
+	xor a
+	ld [$FFB0],a
+	ld a,$C0
+	ld [$FF47],a
+	ret
+
+CreditsMons: ; 4131
+	db VENUSAUR
+	db ARBOK
+	db RHYHORN
+	db FEAROW
+	db ABRA
+	db GRAVELER
+	db HITMONLEE
+	db TANGELA
+	db STARMIE
+	db GYARADOS
+	db DITTO
+	db OMASTAR
+	db VILEPLUME
+	db NIDOKING
+	db PARASECT
+
+INCBIN "baserom.gbc",$74140,$2C3 - $140
+
+CreditsTextPointers: ; 42C3
+
+	dw CredVersion
+	dw CredTajiri
+	dw CredTaOota
+	dw CredMorimoto
+	dw CredWatanabe
+	dw CredMasuda
+	dw CredNisino
+	dw CredSugimori
+	dw CredNishida
+	dw CredMiyamoto
+	dw CredKawaguchi
+	dw CredIshihara
+	dw CredYamauchi
+	dw CredZinnai
+	dw CredHishida
+	dw CredSakai
+	dw CredYamaguchi
+	dw CredYamamoto
+	dw CredTaniguchi
+	dw CredNonomura
+	dw CredFuziwara
+	dw CredMatsusima
+	dw CredTomisawa
+	dw CredKawamoto
+	dw CredKakei
+	dw CredTsuchiya
+	dw CredTaNakamura
+	dw CredYuda
+	dw CredMon
+	dw CredDirector
+	dw CredProgrammers
+	dw CredCharDesign
+	dw CredMusic
+	dw CredSoundEffects
+	dw CredGameDesign
+	dw CredMonsterDesign
+	dw CredGameScene
+	dw CredParam
+	dw CredMap
+	dw CredTest
+	dw CredSpecial
+	dw CredProducers
+	dw CredProducer
+	dw CredExecutive
+	dw CredTamada
+	dw CredSaOota
+	dw CredYoshikawa
+	dw CredToOota
+	dw CredUSStaff
+	dw CredUSCoord
+	dw CredTilden
+	dw CredKawakami
+	dw CredHiNakamura
+	dw CredGiese
+	dw CredOsborne
+	dw CredTrans
+	dw CredOgasawara
+	dw CredIwata
+	dw CredIzushi
+	dw CredHarada
+	dw CredMurakawa
+	dw CredFukui
+	dw CredClub
+	dw CredPAAD
+
+CredVersion:
+IF _RED
+	db "2RED VERSION STAFF@"
+ENDC
+IF _BLUE
+	db "2BLUE VERSION STAFF@"
+ENDC
+CredTajiri:
+	db "4SATOSHI TAJIRI@"
+CredTaOota:
+	db "4TAKENORI OOTA@"
+CredMorimoto:
+	db "3SHIGEKI MORIMOTO@"
+CredWatanabe:
+	db "3TETSUYA WATANABE@"
+CredMasuda:
+	db "4JUNICHI MASUDA@"
+CredNisino:
+	db "5KOHJI NISINO@"
+CredSugimori:
+	db "5KEN SUGIMORI@"
+CredNishida:
+	db "4ATSUKO NISHIDA@"
+CredMiyamoto:
+	db "3SHIGERU MIYAMOTO@"
+CredKawaguchi:
+	db "2TAKASHI KAWAGUCHI@"
+CredIshihara:
+	db "2TSUNEKAZU ISHIHARA@"
+CredYamauchi:
+	db "3HIROSHI YAMAUCHI@"
+CredZinnai:
+	db "3HIROYUKI ZINNAI@"
+CredHishida:
+	db "3TATSUYA HISHIDA@"
+CredSakai:
+	db "4YASUHIRO SAKAI@"
+CredYamaguchi:
+	db "3WATARU YAMAGUCHI@"
+CredYamamoto:
+	db "2KAZUYUKI YAMAMOTO@"
+CredTaniguchi:
+	db "2RYOHSUKE TANIGUCHI@"
+CredNonomura:
+	db "2FUMIHIRO NONOMURA@"
+CredFuziwara:
+	db "3MOTOFUMI FUZIWARA@"
+CredMatsusima:
+	db "3KENJI MATSUSIMA@"
+CredTomisawa:
+	db "3AKIHITO TOMISAWA@"
+CredKawamoto:
+	db "3HIROSHI KAWAMOTO@"
+CredKakei:
+	db "4AKIYOSHI KAKEI@"
+CredTsuchiya:
+	db "3KAZUKI TSUCHIYA@"
+CredTaNakamura:
+	db "4TAKEO NAKAMURA@"
+CredYuda:
+	db "4MASAMITSU YUDA@"
+CredMon:
+	db "7#MON@"
+CredDirector:
+	db "7DIRECTOR@"
+CredProgrammers:
+	db "5PROGRAMMERS@"
+CredCharDesign:
+	db "3CHARACTER DESIGN@"
+CredMusic:
+	db "8MUSIC@"
+CredSoundEffects:
+	db "4SOUND EFFECTS@"
+CredGameDesign:
+	db "5GAME DESIGN@"
+CredMonsterDesign:
+	db "4MONSTER DESIGN@"
+CredGameScene:
+	db "4GAME SCENARIO@"
+CredParam:
+	db "2PARAMETRIC DESIGN@"
+CredMap:
+	db "6MAP DESIGN@"
+CredTest:
+	db "3PRODUCT TESTING@"
+CredSpecial:
+	db "4SPECIAL THANKS@"
+CredProducers:
+	db "6PRODUCERS@"
+CredProducer:
+	db "6PRODUCER@"
+CredExecutive:
+	db "2EXECUTIVE PRODUCER@"
+CredTamada:
+	db "4SOUSUKE TAMADA@"
+CredSaOota:
+	db "5SATOSHI OOTA@"
+CredYoshikawa:
+	db "4RENA YOSHIKAWA@"
+CredToOota:
+	db "4TOMOMICHI OOTA@"
+CredUSStaff:
+	db "3US VERSION STAFF@"
+CredUSCoord:
+	db "3US COORDINATION@"
+CredTilden:
+	db "5GAIL TILDEN@"
+CredKawakami:
+	db "4NAOKO KAWAKAMI@"
+CredHiNakamura:
+	db "4HIRO NAKAMURA@"
+CredGiese:
+	db "4WILLIAM GIESE@"
+CredOsborne:
+	db "5SARA OSBORNE@"
+CredTrans:
+	db "3TEXT TRANSLATION@"
+CredOgasawara:
+	db "4NOB OGASAWARA@"
+CredIwata:
+	db "5SATORU IWATA@"
+CredIzushi:
+	db "3TAKEHIRO IZUSHI@"
+CredHarada:
+	db "3TAKAHIRO HARADA@"
+CredMurakawa:
+	db "3TERUKI MURAKAWA@"
+CredFukui:
+	db "5KOHTA FUKUI@"
+CredClub:
+	db "1NCL SUPER MARIO CLUB@"
+CredPAAD:
+	db "5PAAD TESTING@"
+
+TheEndGfx: ; 473E
+	INCBIN "gfx/theend.2bpp"
+
+INCBIN "baserom.gbc",$747de,$74897 - $747de
+
+ViridianGym_h: ; 0x74897 to 0x748a3 (12 bytes) (id=45)
+    db $07 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw ViridianGymBlocks, ViridianGymTexts, ViridianGymScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw ViridianGymObject ; objects
+
+ViridianGymScript: ; 0x748a3
+    ld hl, $48bf
+    ld de, $48cd
+    call $317f
+    call $3c3c
+    ld hl, $4a08
+    ld de, $48e1
+    ld a, [$d5fb]
+    call $3160
+    ld [$d5fb], a
+    ret
+; 0x748bf
+
+INCBIN "baserom.gbc",$748bf,$12d
+
+ViridianGymTexts: ; 0x749ec
+    dw ViridianGymText1, ViridianGymText2, ViridianGymText3, ViridianGymText4, ViridianGymText5, ViridianGymText6, ViridianGymText7, ViridianGymText8, ViridianGymText9, ViridianGymText10, ViridianGymText11, ViridianGymText12, ViridianGymText13, ViridianGymText14
+
+INCBIN "baserom.gbc",$74a02 + 6,$67 - 6
+
+ViridianGymText1: ; 0x74a69
+    db $08 ; asm
+    ld a, [$d751]
+    bit 1, a
+    jr z, .asm_6de66 ; 0x74a6f
+    bit 0, a
+    jr nz, .asm_9fc95 ; 0x74a73
+    call z, $4995
+    call $30b6
+    jr .asm_6dff7 ; 0x74a7b
+.asm_9fc95 ; 0x74a7d
+    ld a, $1
+    ld [$cc3c], a
+    ld hl, $4ad9
+    call PrintText
+    call $20ef
+    ld a, $32
+    ld [$cc4d], a
+    ld a, $11
+    call Predef
+    call $2429
+    call Delay3
+    call $20d1
+    jr .asm_6dff7 ; 0x74a9e
+.asm_6de66 ; 0x74aa0
+    ld hl, $4ace
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $4ad3
+    ld de, $4ad3
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $8
+    ld [$d05c], a
+    ld a, $3
+    ld [$d5fb], a
+.asm_6dff7 ; 0x74acb
+    jp $24d7
+
+INCBIN "baserom.gbc",$74ace,$74adf - $74ace
+
+ViridianGymText12: ; 0x74adf
+INCBIN "baserom.gbc",$74adf,5
+
+ViridianGymText13: ; 0x74ae4
+INCBIN "baserom.gbc",$74ae4, 5
+
+INCBIN "baserom.gbc",$74ae9,$74aee - $74ae9
+
+ViridianGymText14: ; 0x74aee
+INCBIN "baserom.gbc",$74aee,5
+
+ViridianGymText2: ; 0x74af3
+    db $08 ; asm
+    ld hl, $4a08
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$74afd,$74b0c - $74afd
+
+ViridianGymText3: ; 0x74b0c
+    db $08 ; asm
+    ld hl, $4a14
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$74b16,$74b25 - $74b16
+
+ViridianGymText4: ; 0x74b25
+    db $08 ; asm
+    ld hl, $4a20
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$74b2f,$74b3e - $74b2f
+
+ViridianGymText5: ; 0x74b3e
+    db $08 ; asm
+    ld hl, $4a2c
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$74b48,$74b57 - $74b48
+
+ViridianGymText6: ; 0x74b57
+    db $08 ; asm
+    ld hl, $4a38
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$74b61,$74b70 - $74b61
+
+ViridianGymText7: ; 0x74b70
+    db $08 ; asm
+    ld hl, $4a44
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$74b7a,$74b89 - $74b7a
+
+ViridianGymText8: ; 0x74b89
+    db $08 ; asm
+    ld hl, $4a50
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$74b93,$74ba2 - $74b93
+
+ViridianGymText9: ; 0x74ba2
+    db $08 ; asm
+    ld hl, $4a5c
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$74bac,$74bbb - $74bac
+
+ViridianGymText10: ; 0x74bbb
+    db $08 ; asm
+    ld a, [$d751]
+    bit 1, a
+    jr nz, .asm_1abd1 ; 0x74bc1
+    ld hl, $4bd4
+    call PrintText
+    jr .asm_6064d ; 0x74bc9
+.asm_1abd1 ; 0x74bcb
+    ld hl, $4bd9
+    call PrintText
+.asm_6064d ; 0x74bd1
+    jp $24d7
+
+INCBIN "baserom.gbc",$74bd4,$a
+
+ViridianGymObject: ; 0x74bde (size=105)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $11, $10, $4, $ff
+    db $11, $11, $4, $ff
+
+    db $0 ; signs
+
+    db $b ; people
+    db SPRITE_GIOVANNI, $1 + 4, $2 + 4, $ff, $d0, $41, GIOVANNI + $C8, $3 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $7 + 4, $c + 4, $ff, $d0, $42, COOLTRAINER_M + $C8, $9 ; trainer
+    db SPRITE_HIKER, $b + 4, $b + 4, $ff, $d1, $43, BLACKBELT + $C8, $6 ; trainer
+    db SPRITE_ROCKER, $7 + 4, $a + 4, $ff, $d0, $44, TAMER + $C8, $3 ; trainer
+    db SPRITE_HIKER, $7 + 4, $3 + 4, $ff, $d2, $45, BLACKBELT + $C8, $7 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $5 + 4, $d + 4, $ff, $d3, $46, COOLTRAINER_M + $C8, $a ; trainer
+    db SPRITE_HIKER, $1 + 4, $a + 4, $ff, $d0, $47, BLACKBELT + $C8, $8 ; trainer
+    db SPRITE_ROCKER, $10 + 4, $2 + 4, $ff, $d3, $48, TAMER + $C8, $4 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_1, $5 + 4, $6 + 4, $ff, $d0, $49, COOLTRAINER_M + $C8, $1 ; trainer
+    db SPRITE_GYM_HELPER, $f + 4, $10 + 4, $ff, $d0, $a ; person
+	db SPRITE_BALL, $9 + 4, $10 + 4, $ff, $ff, $8b, REVIVE ; item
+
+    ; warp-to
+    EVENT_DISP $a, $11, $10
+    EVENT_DISP $a, $11, $11
+
+ViridianGymBlocks: ; 90
+    INCBIN "maps/viridiangym.blk"
+
+PewterMart_h: ; 0x74ca1 to 0x74cad (12 bytes) (id=56)
+    db $02 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw PewterMartBlocks, PewterMartTexts, PewterMartScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw PewterMartObject ; objects
+
+PewterMartScript: ; 0x74cad
+    call $3c3c
+    ld a, $1
+    ld [$cf0c], a
+    ret
+; 0x74cb6
+
+PewterMartTexts: ; 0x74cb6
+    dw PewterMartText1, PewterMartText2, PewterMartText3
+
+PewterMartText2: ; 0x74cbc
+    db $08 ; asm
+    ld hl, $4cc6
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$74cc6,$74ccb - $74cc6
+
+PewterMartText3: ; 0x74ccb
+    db $08 ; asm
+    ld hl, $4cd5
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$74cd5,$5
+
+PewterMartObject: ; 0x74cda (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $4, $ff
+    db $7, $4, $4, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_BUG_CATCHER, $3 + 4, $3 + 4, $fe, $1, $2 ; person
+    db SPRITE_BLACK_HAIR_BOY_2, $5 + 4, $5 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+
+UnknownDungeon1_h: ; 0x74d00 to 0x74d0c (12 bytes) (id=228)
+    db $11 ; tileset
+    db $09, $0f ; dimensions (y, x)
+    dw UnknownDungeon1Blocks, UnknownDungeon1Texts, UnknownDungeon1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw UnknownDungeon1Object ; objects
+
+UnknownDungeon1Script: ; 0x74d0c
+    jp $3c3c
+; 0x74d0f
+
+UnknownDungeon1Texts: ; 0x74d0f
+    dw UnknownDungeon1Text1, UnknownDungeon1Text2, UnknownDungeon1Text3
+
+UnknownDungeon1Object: ; 0x74d15 (size=97)
+    db $7d ; border tile
+
+    db $9 ; warps
+    db $11, $18, $6, $ff
+    db $11, $19, $6, $ff
+    db $1, $1b, $0, UNKNOWN_DUNGEON_2
+    db $7, $17, $1, UNKNOWN_DUNGEON_2
+    db $9, $12, $2, UNKNOWN_DUNGEON_2
+    db $1, $7, $3, UNKNOWN_DUNGEON_2
+    db $3, $1, $4, UNKNOWN_DUNGEON_2
+    db $b, $3, $5, UNKNOWN_DUNGEON_2
+    db $6, $0, $0, UNKNOWN_DUNGEON_3
+
+    db $0 ; signs
+
+    db $3 ; people
+	db SPRITE_BALL, $d + 4, $7 + 4, $ff, $ff, $81, FULL_RESTORE ; item
+	db SPRITE_BALL, $3 + 4, $13 + 4, $ff, $ff, $82, MAX_ELIXER ; item
+	db SPRITE_BALL, $0 + 4, $5 + 4, $ff, $ff, $83, NUGGET ; item
+
+    ; warp-to
+    EVENT_DISP $f, $11, $18
+    EVENT_DISP $f, $11, $19
+    EVENT_DISP $f, $1, $1b ; UNKNOWN_DUNGEON_2
+    EVENT_DISP $f, $7, $17 ; UNKNOWN_DUNGEON_2
+    EVENT_DISP $f, $9, $12 ; UNKNOWN_DUNGEON_2
+    EVENT_DISP $f, $1, $7 ; UNKNOWN_DUNGEON_2
+    EVENT_DISP $f, $3, $1 ; UNKNOWN_DUNGEON_2
+    EVENT_DISP $f, $b, $3 ; UNKNOWN_DUNGEON_2
+    EVENT_DISP $f, $6, $0 ; UNKNOWN_DUNGEON_3
+
+UnknownDungeon1Blocks: ; 135
+    INCBIN "maps/unknowndungeon1.blk"
+
+CeruleanHouse3_h: ; 0x74dfd to 0x74e09 (12 bytes) (id=230)
+    db $0d ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw CeruleanHouse3Blocks, $4e13, CeruleanHouse3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CeruleanHouse3Object ; objects
+
+CeruleanHouse3Script: ; 0x74e09
+    ld a, $1
+    ld [$cf0c], a
+    dec a
+    ld [$cc3c], a
+    ret
+; 0x74e13
+
+INCBIN "baserom.gbc",$74e13,$2
+
+CeruleanHouse3Text1: ; 0x74e15
+    db $8
+    ld hl, $4e77
+    call PrintText
+    xor a
+    ld [$cc26], a
+    ld [$cc36], a
+.asm_74e23
+    ld hl, $4e7c
+    call PrintText
+    ld hl, $4e6d
+    call $2a5a
+    ld hl, $cf7b
+    ld a, l
+    ld [$cf8b], a
+    ld a, h
+    ld [$cf8c], a
+    xor a
+    ld [$cf93], a
+    ld [$cc35], a
+    ld a, $4
+    ld [$cf94], a
+    call $2be6
+    jr c, .asm_74e60 ; 0x74e49 $15
+    ld hl, $4e86
+    ld a, [$cf91]
+    sub $15
+    add a
+    ld d, $0
+    ld e, a
+    add hl, de
+    ld a, [hli]
+    ld h, [hl]
+    ld l, a
+    call PrintText
+    jr .asm_74e23 ; 0x74e5e $c3
+.asm_74e60
+    xor a
+    ld [$cc36], a
+    ld hl, $4e81
+    call PrintText
+    jp $24d7
+; 0x74e6d
+
+INCBIN "baserom.gbc",$74e6d,$51
+
+CeruleanHouse3Object: ; 0x74ebe (size=34)
+    db $c ; border tile
+
+    db $3 ; warps
+    db $0, $2, $9, $ff
+    db $7, $2, $8, $ff
+    db $7, $3, $8, $ff
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_FAT_BALD_GUY, $3 + 4, $5 + 4, $ff, $d3, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $0, $2
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+INCBIN "baserom.gbc",$74ee0,$12c
+
+FuchsiaHouse1_h: ; 0x7500c to 0x75018 (12 bytes) (id=153)
+    db $08 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw FuchsiaHouse1Blocks, FuchsiaHouse1Texts, FuchsiaHouse1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FuchsiaHouse1Object ; objects
+
+FuchsiaHouse1Script: ; 0x75018
+    call $3c3c
+    ret
+; 0x7501c
+
+FuchsiaHouse1Texts: ; 0x7501c
+    dw FuchsiaHouse1Text1, FuchsiaHouse1Text2, FuchsiaHouse1Text3
+
+FuchsiaHouse1Text1: ; 0x75022
+    TX_FAR _FuchsiaHouse1Text1
+    db $50
+
+FuchsiaHouse1Text2: ; 0x75027
+    TX_FAR _FuchsiaHouse1Text2
+    db $50
+
+FuchsiaHouse1Text3: ; 0x7502c
+    TX_FAR _FuchsiaHouse1Text3
+    db $50
+
+FuchsiaHouse1Object: ; 0x75031 (size=38)
+    db $a ; border tile
+
+    db $2 ; warps
+    db $7, $2, $1, $ff
+    db $7, $3, $1, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MOM_GEISHA, $3 + 4, $2 + 4, $ff, $d3, $1 ; person
+    db SPRITE_GAMBLER, $2 + 4, $7 + 4, $ff, $d1, $2 ; person
+    db SPRITE_BUG_CATCHER, $5 + 4, $5 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+
+FuchsiaPokecenter_h: ; 0x75057 to 0x75063 (12 bytes) (id=154)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw FuchsiaPokecenterBlocks, $5069, FuchsiaPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FuchsiaPokecenterObject ; objects
+
+FuchsiaPokecenterScript: ; 0x75063
+    call $22fa
+    jp $3c3c
+; 0x75069
+
+INCBIN "baserom.gbc",$75069,$9
+
+FuchsiaPokecenterText2:
+FuchsiaPokecenterText1: ; 0x75071 or 0x75072
+    TX_FAR _FuchsiaPokecenterText1
+    db $50
+
+FuchsiaPokecenterText3: ; 0x75077
+    TX_FAR _FuchsiaPokecenterText3
+    db $50
+
+FuchsiaPokecenterText4: ; 0x7507c
+    db $f6
+
+FuchsiaPokecenterObject: ; 0x7507d (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $2, $ff
+    db $7, $4, $2, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_ROCKER, $3 + 4, $2 + 4, $ff, $ff, $2 ; person
+    db SPRITE_LASS, $5 + 4, $6 + 4, $fe, $2, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+FuchsiaHouse2_h: ; 0x750a9 to 0x750b5 (12 bytes) (id=155)
+    db $14 ; tileset
+    db $04, $05 ; dimensions (y, x)
+    dw FuchsiaHouse2Blocks, FuchsiaHouse2Texts, FuchsiaHouse2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FuchsiaHouse2Object ; objects
+
+FuchsiaHouse2Script: ; 0x750b5
+    jp $3c3c
+; 0x750b8
+
+FuchsiaHouse2Texts: ; 0x750b8
+    dw FuchsiaHouse2Text1, FuchsiaHouse2Text2, FuchsiaHouse2Text3, FuchsiaHouse2Text4, FuchsiaHouse2Text5
+
+FuchsiaHouse2Text1: ; 0x750c2
+    db $08 ; asm
+    ld a, [$d78e]
+    bit 0, a
+    jr nz, .asm_58feb ; 0x750c8
+    ld b,GOLD_TEETH
+    call $3493
+    jr nz, .asm_3f30f ; 0x750cf
+    ld a, [$d78e]
+    bit 1, a
+    jr nz, .asm_60cba ; 0x750d6
+    ld hl, $5135
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    ld hl, $513f
+    jr nz, .asm_61238 ; 0x750e8
+    ld hl, $513a
+.asm_61238 ; 0x750ed
+    call PrintText
+    jr .asm_52039 ; 0x750f0
+.asm_3f30f ; 0x750f2
+    ld hl, $5144
+    call PrintText
+    ld a, $40
+    ldh [$db], a
+    ld b, $5 ; BANK(MyFunction)
+    ld hl, $7f37 ; MyFunction
+    call Bankswitch
+    ld hl, $d78e
+    set 1, [hl]
+.asm_60cba ; 0x75109
+    ld hl, $514e
+    call PrintText
+    ld bc,(HM_04 << 8) | 1
+    call $3e2e
+    jr nc, .asm_53b90 ; 0x75115
+    ld hl, $5153
+    call PrintText
+    ld hl, $d78e
+    set 0, [hl]
+    jr .asm_52039 ; 0x75122
+.asm_58feb ; 0x75124
+    ld hl, $5159
+    call PrintText
+    jr .asm_52039 ; 0x7512a
+.asm_53b90 ; 0x7512c
+    ld hl, $515e
+    call PrintText
+.asm_52039 ; 0x75132
+    jp $24d7
+
+INCBIN "baserom.gbc",$75135,$75163 - $75135
+
+FuchsiaHouse2Text5:
+FuchsiaHouse2Text4: ; 0x75163
+    db $08 ; asm
+    ldh a, [$8c]
+    cp $4
+    ld hl, $517b
+    jr nz, .asm_4c9a2 ; 0x7516b
+    ld hl, $5176
+.asm_4c9a2 ; 0x75170
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$75176,$a
+
+FuchsiaHouse2Object: ; 0x75180 (size=45)
+    db $17 ; border tile
+
+    db $2 ; warps
+    db $7, $4, $3, $ff
+    db $7, $5, $3, $ff
+
+    db $2 ; signs
+    db $3, $4, $4 ; FuchsiaHouse2Text4
+    db $3, $5, $5 ; FuchsiaHouse2Text5
+
+    db $3 ; people
+    db SPRITE_WARDEN, $3 + 4, $2 + 4, $ff, $ff, $1 ; person
+	db SPRITE_BALL, $3 + 4, $8 + 4, $ff, $ff, $82, RARE_CANDY ; item
+    db SPRITE_BOULDER, $4 + 4, $8 + 4, $ff, $10, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $7, $4
+    EVENT_DISP $5, $7, $5
+
+FuchsiaHouse2Blocks: ; 20
+    INCBIN "maps/fuchsiahouse2.blk"
+
+SafariZoneEntrance_h: ; 0x751c1 to 0x751cd (12 bytes) (id=156)
+    db $0c ; tileset
+    db $03, $04 ; dimensions (y, x)
+    dw SafariZoneEntranceBlocks, SafariZoneEntranceTexts, SafariZoneEntranceScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw SafariZoneEntranceObject ; objects
+
+SafariZoneEntranceScript: ; 0x751cd
+    call $3c3c
+    ld hl, $51d9
+    ld a, [$d61f]
+    jp $3d97
+; 0x751d9
+
+SafariZoneEntranceScripts: ; 0x751d9
+    dw SafariZoneEntranceScript0, SafariZoneEntranceScript1
+
+INCBIN "baserom.gbc",$751dd,$a
+
+SafariZoneEntranceScript0: ; 0x751e7
+    ld hl, $5221
+    call $34bf
+    ret nc
+    ld a, $3
+    ld [$ff00+$8c], a
+    call $2920
+    ld a, $ff
+    ld [$cd6b], a
+    xor a
+    ld [$ff00+$b4], a
+    ld a, $c
+    ld [$c109], a
+    ld a, [$cd3d]
+    cp $1
+    jr z, .asm_7520f ; 0x75207 $6
+    ld a, $2
+    ld [$d61f], a
+    ret
+.asm_7520f
+    ld a, $10
+    ld c, $1
+    call $52a3
+    ld a, $f0
+    ld [$cd6b], a
+    ld a, $1
+    ld [$d61f], a
+    ret
+; 0x75221
+
+INCBIN "baserom.gbc",$75221,$75226 - $75221
+
+SafariZoneEntranceScript1: ; 0x75226
+    call $52b4
+    ret nz
+    xor a
+    ld [$ff00+$b4], a
+    ld [$cd6b], a
+    call $2429
+    ld a, $4
+    ld [$ff00+$8c], a
+    call $2920
+    ld a, $ff
+    ld [$cd6b], a
+    ret
+; 0x75240
+
+INCBIN "baserom.gbc",$75240,$79
+
+SafariZoneEntranceTexts: ; 0x752b9
+    dw SafariZoneEntranceText1, SafariZoneEntranceText2, SafariZoneEntranceText3, SafariZoneEntranceText4, SafariZoneEntranceText5, SafariZoneEntranceText6
+
+SafariZoneEntranceText3:
+SafariZoneEntranceText1: ; 0x752c5
+    TX_FAR _SafariZoneEntranceText1
+    db $50
+
+SafariZoneEntranceText4:
+INCBIN "baserom.gbc",$752ca,$7536f - $752ca
+
+SafariZoneEntranceText5: ; 0x7536f
+INCBIN "baserom.gbc",$7536f,6
+
+INCBIN "baserom.gbc",$75375,$753c5 - $75375
+
+SafariZoneEntranceText6: ; 0x753c5
+INCBIN "baserom.gbc",$753c5,5
+
+SafariZoneEntranceText2: ; 0x753ca
+    db $08 ; asm
+    ld hl, $53e6
+    call PrintText
+    call $35ec
+    ld a, [$cc26]
+    and a
+    ld hl, $53f0
+    jr nz, .asm_278a6 ; 0x753db
+    ld hl, $53eb
+.asm_278a6 ; 0x753e0
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$753e6,$f
+
+SafariZoneEntranceObject: ; 0x753f5 (size=48)
+    db $a ; border tile
+
+    db $4 ; warps
+    db $5, $3, $4, $ff
+    db $5, $4, $4, $ff
+    db $0, $3, $0, SAFARI_ZONE_CENTER
+    db $0, $4, $1, SAFARI_ZONE_CENTER
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_WHITE_PLAYER, $2 + 4, $6 + 4, $ff, $d2, $1 ; person
+    db SPRITE_WHITE_PLAYER, $4 + 4, $1 + 4, $ff, $d3, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $5, $3
+    EVENT_DISP $4, $5, $4
+    EVENT_DISP $4, $0, $3 ; SAFARI_ZONE_CENTER
+    EVENT_DISP $4, $0, $4 ; SAFARI_ZONE_CENTER
+
+SafariZoneEntranceBlocks: ; 12
+    INCBIN "maps/safarizoneentrance.blk"
+
+FuchsiaGym_h: ; 0x75431 to 0x7543d (12 bytes) (id=157)
+    db $07 ; tileset
+    db $09, $05 ; dimensions (y, x)
+    dw FuchsiaGymBlocks, FuchsiaGymTexts, FuchsiaGymScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FuchsiaGymObject ; objects
+
+FuchsiaGymScript: ; 0x7543d
+    call $5453
+    call $3c3c
+    ld hl, $54eb
+    ld de, $5482
+    ld a, [$d65b]
+    call $3160
+    ld [$d65b], a
+    ret
+; 0x75453
+
+INCBIN "baserom.gbc",$75453,$82
+
+FuchsiaGymTexts: ; 0x754d5
+    dw FuchsiaGymText1, FuchsiaGymText2, FuchsiaGymText3, FuchsiaGymText4, FuchsiaGymText5, FuchsiaGymText6, FuchsiaGymText7, FuchsiaGymText8, FuchsiaGymText9, FuchsiaGymText10, FuchsiaGymText11
+
+INCBIN "baserom.gbc",$754eb,$49
+
+FuchsiaGymText1: ; 0x75534
+    db $08 ; asm
+    ld a, [$d792]
+    bit 1, a
+    jr z, .asm_181b6 ; 0x7553a
+    bit 0, a
+    jr nz, .asm_adc3b ; 0x7553e
+    call z, $5497
+    call $30b6
+    jr .asm_e84c6 ; 0x75546
+.asm_adc3b ; 0x75548
+    ld hl, $558b
+    call PrintText
+    jr .asm_e84c6 ; 0x7554e
+.asm_181b6 ; 0x75550
+    ld hl, $5581
+    call PrintText
+    ld hl, $d72d
+    set 6, [hl]
+    set 7, [hl]
+    ld hl, $5586
+    ld de, $5586
+    call $3354
+    ldh a, [$8c]
+    ld [$cf13], a
+    call $336a
+    call $32d7
+    ld a, $5
+    ld [$d05c], a
+    xor a
+    ldh [$b4], a
+    ld a, $3
+    ld [$d65b], a
+.asm_e84c6 ; 0x7557e
+    jp $24d7
+
+INCBIN "baserom.gbc",$75581,$75590 - $75581
+
+FuchsiaGymText9: ; 0x75590
+INCBIN "baserom.gbc",$75590,5
+
+FuchsiaGymText10: ; 0x75595
+INCBIN "baserom.gbc",$75595,$7559f - $75595
+
+FuchsiaGymText11: ; 0x7559f
+INCBIN "baserom.gbc",$7559f,5
+
+FuchsiaGymText2: ; 0x755a4
+    db $08 ; asm
+    ld hl, $54eb
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$755ae,$755bd - $755ae
+
+FuchsiaGymText3: ; 0x755bd
+    db $08 ; asm
+    ld hl, $54f7
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$755c7,$755d6 - $755c7
+
+FuchsiaGymText4: ; 0x755d6
+    db $08 ; asm
+    ld hl, $5503
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$755e0,$755ef - $755e0
+
+FuchsiaGymText5: ; 0x755ef
+    db $08 ; asm
+    ld hl, $550f
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$755f9,$75608 - $755f9
+
+FuchsiaGymText6: ; 0x75608
+    db $08 ; asm
+    ld hl, $551b
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$75612,$75621 - $75612
+
+FuchsiaGymText7: ; 0x75621
+    db $08 ; asm
+    ld hl, $5527
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$7562b,$7563a - $7562b
+
+FuchsiaGymText8: ; 0x7563a
+    db $08 ; asm
+    ld a, [$d792]
+    bit 1, a
+    ld hl, $5653
+    jr nz, .asm_50671 ; 0x75643
+    ld hl, $564e
+.asm_50671 ; 0x75648
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$7564e,$a
+
+FuchsiaGymObject: ; 0x75658 (size=82)
+    db $3 ; border tile
+
+    db $2 ; warps
+    db $11, $4, $5, $ff
+    db $11, $5, $5, $ff
+
+    db $0 ; signs
+
+    db $8 ; people
+    db SPRITE_BLACKBELT, $a + 4, $4 + 4, $ff, $d0, $41, KOGA + $C8, $1 ; trainer
+    db SPRITE_ROCKER, $d + 4, $8 + 4, $ff, $d0, $42, JUGGLER + $C8, $7 ; trainer
+    db SPRITE_ROCKER, $8 + 4, $7 + 4, $ff, $d3, $43, JUGGLER + $C8, $3 ; trainer
+    db SPRITE_ROCKER, $c + 4, $1 + 4, $ff, $d0, $44, JUGGLER + $C8, $8 ; trainer
+    db SPRITE_ROCKER, $5 + 4, $3 + 4, $ff, $d1, $45, TAMER + $C8, $1 ; trainer
+    db SPRITE_ROCKER, $2 + 4, $8 + 4, $ff, $d0, $46, TAMER + $C8, $2 ; trainer
+    db SPRITE_ROCKER, $7 + 4, $2 + 4, $ff, $d2, $47, JUGGLER + $C8, $4 ; trainer
+    db SPRITE_GYM_HELPER, $f + 4, $7 + 4, $ff, $d0, $8 ; person
+
+    ; warp-to
+    EVENT_DISP $5, $11, $4
+    EVENT_DISP $5, $11, $5
+
+FuchsiaGymBlocks: ; 45
+    INCBIN "maps/fuchsiagym.blk"
+
+FuchsiaMeetingRoom_h: ; 0x756d7 to 0x756e3 (12 bytes) (id=158)
+    db $14 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw FuchsiaMeetingRoomBlocks, FuchsiaMeetingRoomTexts, FuchsiaMeetingRoomScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw FuchsiaMeetingRoomObject ; objects
+
+FuchsiaMeetingRoomScript: ; 0x756e3
+    call $3c3c
+    ret
+; 0x756e7
+
+FuchsiaMeetingRoomTexts: ; 0x756e7
+    dw FuchsiaMeetingRoomText1, FuchsiaMeetingRoomText2, FuchsiaMeetingRoomText3
+
+FuchsiaMeetingRoomText1: ; 0x756ed
+    TX_FAR _FuchsiaMeetingRoomText1
+    db $50
+
+FuchsiaMeetingRoomText2: ; 0x756f2
+    TX_FAR _FuchsiaMeetingRoomText2
+    db $50
+
+FuchsiaMeetingRoomText3: ; 0x756f7
+    TX_FAR _FuchsiaMeetingRoomText3
+    db $50
+
+FuchsiaMeetingRoomObject: ; 0x756fc (size=38)
+    db $17 ; border tile
+
+    db $2 ; warps
+    db $7, $4, $6, $ff
+    db $7, $5, $6, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_WHITE_PLAYER, $1 + 4, $4 + 4, $ff, $d0, $1 ; person
+    db SPRITE_WHITE_PLAYER, $2 + 4, $0 + 4, $ff, $d1, $2 ; person
+    db SPRITE_WHITE_PLAYER, $1 + 4, $a + 4, $ff, $d0, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $4
+    EVENT_DISP $7, $7, $5
+
+FuchsiaMeetingRoomBlocks: ; 28
+    INCBIN "maps/fuchsiameetingroom.blk"
+
+CinnabarGym_h: ; 0x7573e to 0x7574a (12 bytes) (id=166)
+    db $16 ; tileset
+    db $09, $0a ; dimensions (y, x)
+    dw $5b26, CinnabarGymTexts, CinnabarGymScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CinnabarGymObject ; objects
+
+CinnabarGymScript: ; 0x7574a
+    call $5759
+    call $3c3c
+    ld hl, $57a6
+    ld a, [$d65e]
+    jp $3d97
+; 0x75759
+
+INCBIN "baserom.gbc",$75759,$757a6 - $75759
+
+CinnabarGymScripts: ; 0x757a6
+    dw CinnabarGymScript0, CinnabarGymScript1
+
+INCBIN "baserom.gbc",$757aa,$4
+
+CinnabarGymScript0: ; 0x757ae
+    ld a, [$da38]
+    and a
+    ret z
+    ld [$ff00+$8c], a
+    cp $4
+    jr nz, .asm_757c3 ; 0x757b7 $a
+    ld a, $4
+    ld [$d528], a
+    ld de, $57d7
+    jr .asm_757cb ; 0x757c1 $8
+.asm_757c3
+    ld de, $57da
+    ld a, $1
+    ld [$d528], a
+.asm_757cb
+    call $363a
+    ld a, $1
+    ld [$d65e], a
+    ld [$da39], a
+    ret
+; 0x757d7
+
+INCBIN "baserom.gbc",$757d7,$757dc - $757d7
+
+CinnabarGymScript1: ; 0x757dc
+    ld a, [$d730]
+    bit 0, a
+    ret nz
+    xor a
+    ld [$cd6b], a
+    ld a, [$da38]
+    ld [$cc55], a
+    ld [$ff00+$8c], a
+    jp $2920
+; 0x757f1
+
+INCBIN "baserom.gbc",$757f1,$ae
+
+CinnabarGymTexts: ; 0x7589f
+    dw CinnabarGymText1, CinnabarGymText2, CinnabarGymText3, CinnabarGymText4, CinnabarGymText5, CinnabarGymText6, CinnabarGymText7, CinnabarGymText8, CinnabarGymText9
+;CinnabarGymText 10: ; 0x75925
+;CinnabarGymText 11: ; 0x7592a
+;CinnabarGymText 12: ; 0x75934
+
+INCBIN "baserom.gbc",$758b1,$2e
+
+CinnabarGymText1: ; 0x758df
+    db $8
+    ld a, [$d79a]
+    bit 1, a
+    jr z, .asm_d9332 ; 0x758e5 $16
+    bit 0, a
+    jr nz, .asm_3012f ; 0x758e9 $9
+    call z, $5857
+    call $30b6
+    jp $24d7
+.asm_3012f ; 0x758f4
+    ld hl, $5920
+    call PrintText
+    jp $24d7
+.asm_d9332 ; 0x758fd
+    ld hl, $5914
+    call PrintText
+    ld hl, $5919
+    ld de, $5919
+    call $3354
+    ld a, $7
+    ld [$d05c], a
+    jp $58b7
+; 0x75914
+
+INCBIN "baserom.gbc",$75914,$25
+
+CinnabarGymText2: ; 0x75939
+    db $08 ; asm
+    call $57a0
+    ld a, [$d79a]
+    bit 2, a
+    jr nz, .asm_46bb4 ; 0x75942
+    ld hl, $595f
+    call PrintText
+    ld hl, $5964
+    ld de, $5964
+    call $3354
+    jp $58b7
+.asm_46bb4 ; 0x75956
+    ld hl, $5969
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$7595f,$7596e - $7595f
+
+CinnabarGymText3: ; 0x7596e
+    db $08 ; asm
+    call $57a0
+    ld a, [$d79a]
+    bit 3, a
+    jr nz, .asm_4b406 ; 0x75977
+    ld hl, $5994
+    call PrintText
+    ld hl, $5999
+    ld de, $5999
+    call $3354
+    jp $58b7
+.asm_4b406 ; 0x7598b
+    ld hl, $599e
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$75994,$759a3 - $75994
+
+CinnabarGymText4: ; 0x759a3
+    db $08 ; asm
+    call $57a0
+    ld a, [$d79a]
+    bit 4, a
+    jr nz, .asm_c0673 ; 0x759ac
+    ld hl, $59c9
+    call PrintText
+    ld hl, $59ce
+    ld de, $59ce
+    call $3354
+    jp $58b7
+.asm_c0673 ; 0x759c0
+    ld hl, $59d3
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$759c9,$759d8 - $759c9
+
+CinnabarGymText5: ; 0x759d8
+    db $08 ; asm
+    call $57a0
+    ld a, [$d79a]
+    bit 5, a
+    jr nz, .asm_5cfd7 ; 0x759e1
+    ld hl, $59fe
+    call PrintText
+    ld hl, $5a03
+    ld de, $5a03
+    call $3354
+    jp $58b7
+.asm_5cfd7 ; 0x759f5
+    ld hl, $5a08
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$759fe,$75a0d - $759fe
+
+CinnabarGymText6: ; 0x75a0d
+    db $08 ; asm
+    call $57a0
+    ld a, [$d79a]
+    bit 6, a
+    jr nz, .asm_776b4 ; 0x75a16
+    ld hl, $5a33
+    call PrintText
+    ld hl, $5a38
+    ld de, $5a38
+    call $3354
+    jp $58b7
+.asm_776b4 ; 0x75a2a
+    ld hl, $5a3d
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$75a33,$75a42 - $75a33
+
+CinnabarGymText7: ; 0x75a42
+    db $08 ; asm
+    call $57a0
+    ld a, [$d79a]
+    bit 7, a
+    jr nz, .asm_2f755 ; 0x75a4b
+    ld hl, $5a68
+    call PrintText
+    ld hl, $5a6d
+    ld de, $5a6d
+    call $3354
+    jp $58b7
+.asm_2f755 ; 0x75a5f
+    ld hl, $5a72
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$75a68,$75a77 - $75a68
+
+CinnabarGymText8: ; 0x75a77
+    db $08 ; asm
+    call $57a0
+    ld a, [$d79b]
+    bit 0, a
+    jr nz, .asm_d87be ; 0x75a80
+    ld hl, $5a9d
+    call PrintText
+    ld hl, $5aa2
+    ld de, $5aa2
+    call $3354
+    jp $58b7
+.asm_d87be ; 0x75a94
+    ld hl, $5aa7
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$75a9d,$75aac - $75a9d
+
+CinnabarGymText9: ; 0x75aac
+    db $08 ; asm
+    ld a, [$d79a]
+    bit 1, a
+    jr nz, .asm_627d9 ; 0x75ab2
+    ld hl, $5ac2
+    jr .asm_0b11d ; 0x75ab7
+.asm_627d9 ; 0x75ab9
+    ld hl, $5ac7
+.asm_0b11d ; 0x75abc
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$75ac2,$a
+
+CinnabarGymObject: ; 0x75acc (size=90)
+    db $2e ; border tile
+
+    db $2 ; warps
+    db $11, $10, $1, $ff
+    db $11, $11, $1, $ff
+
+    db $0 ; signs
+
+    db $9 ; people
+    db SPRITE_FAT_BALD_GUY, $3 + 4, $3 + 4, $ff, $d0, $41, BLAINE + $C8, $1 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $2 + 4, $11 + 4, $ff, $d0, $42, SUPER_NERD + $C8, $9 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $8 + 4, $11 + 4, $ff, $d0, $43, BURGLAR + $C8, $4 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $4 + 4, $b + 4, $ff, $d0, $44, SUPER_NERD + $C8, $a ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $8 + 4, $b + 4, $ff, $d0, $45, BURGLAR + $C8, $5 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $e + 4, $b + 4, $ff, $d0, $46, SUPER_NERD + $C8, $b ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $e + 4, $3 + 4, $ff, $d0, $47, BURGLAR + $C8, $6 ; trainer
+    db SPRITE_BLACK_HAIR_BOY_2, $8 + 4, $3 + 4, $ff, $d0, $48, SUPER_NERD + $C8, $c ; trainer
+    db SPRITE_GYM_HELPER, $d + 4, $10 + 4, $ff, $d0, $9 ; person
+
+    ; warp-to
+    EVENT_DISP $a, $11, $10
+    EVENT_DISP $a, $11, $11
+
+CinnabarGymBlocks: ; 90
+    INCBIN "maps/cinnabargym.blk"
+
+Lab1_h: ; 0x75b80 to 0x75b8c (12 bytes) (id=167)
+    db $14 ; tileset
+    db $04, $09 ; dimensions (y, x)
+    dw Lab1Blocks, Lab1Texts, Lab1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Lab1Object ; objects
+
+Lab1Script: ; 0x75b8c
+    call $3c3c
+    ret
+; 0x75b90
+
+Lab1Texts: ; 0x75b90
+    dw Lab1Text1, Lab1Text2, Lab1Text3, Lab1Text4, Lab1Text5
+
+Lab1Text1: ; 0x75b9a
+    TX_FAR _Lab1Text1
+    db $50
+
+Lab1Text2: ; 0x75b9f
+    TX_FAR _Lab1Text2
+    db $50
+
+Lab1Text3: ; 0x75ba4
+    TX_FAR _Lab1Text3
+    db $50
+
+Lab1Text4: ; 0x75ba9
+    TX_FAR _Lab1Text4
+    db $50
+
+Lab1Text5: ; 0x75bae
+    TX_FAR _Lab1Text5
+    db $50
+
+Lab1Object: ; 0x75bb3 (size=62)
+    db $17 ; border tile
+
+    db $5 ; warps
+    db $7, $2, $2, $ff
+    db $7, $3, $2, $ff
+    db $4, $8, $0, CINNABAR_LAB_2
+    db $4, $c, $0, CINNABAR_LAB_3
+    db $4, $10, $0, CINNABAR_LAB_4
+
+    db $4 ; signs
+    db $2, $3, $2 ; Lab1Text2
+    db $4, $9, $3 ; Lab1Text3
+    db $4, $d, $4 ; Lab1Text4
+    db $4, $11, $5 ; Lab1Text5
+
+    db $1 ; people
+    db SPRITE_FISHER, $3 + 4, $1 + 4, $ff, $ff, $1 ; person
+
+    ; warp-to
+    EVENT_DISP $9, $7, $2
+    EVENT_DISP $9, $7, $3
+    EVENT_DISP $9, $4, $8 ; CINNABAR_LAB_2
+    EVENT_DISP $9, $4, $c ; CINNABAR_LAB_3
+    EVENT_DISP $9, $4, $10 ; CINNABAR_LAB_4
+
+Lab1Blocks: ; 36
+    INCBIN "maps/lab1.blk"
+
+Lab2_h: ; 0x75c15 to 0x75c21 (12 bytes) (id=168)
+    db $14 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw Lab2Blocks, Lab2Texts, Lab2Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Lab2Object ; objects
+
+Lab2Script: ; 0x75c21
+    jp $3c3c
+; 0x75c24
+
+Lab2Texts: ; 0x75c24
+    dw Lab2Text1, Lab2Text2, Lab2Text3
+
+Lab2Text1: ; 0x75c2a
+    TX_FAR _Lab2Text1
+    db $50
+
+Lab2Text2: ; 0x75c2f
+    db $8
+    ld a, $7
+    ld [W_WHICHTRADE], a
+    jr asm_78552 ; 0x75c35 $6
+
+Lab2Text3:
+    db $8
+    ld a, $8
+    ld [W_WHICHTRADE], a
+asm_78552: ; 0x75c3d
+    ld a, $54
+    call Predef
+    jp $24d7
+
+Lab2Object: ; 0x75c45 (size=38)
+    db $17 ; border tile
+
+    db $2 ; warps
+    db $7, $2, $2, CINNABAR_LAB_1
+    db $7, $3, $2, CINNABAR_LAB_1
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_BLACK_HAIR_BOY_2, $2 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_OLD_PERSON, $4 + 4, $1 + 4, $ff, $ff, $2 ; person
+    db SPRITE_FOULARD_WOMAN, $5 + 4, $5 + 4, $ff, $d1, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; CINNABAR_LAB_1
+    EVENT_DISP $4, $7, $3 ; CINNABAR_LAB_1
+
+Lab2Blocks: ; 16
+    INCBIN "maps/lab2.blk"
+
+Lab3_h: ; 0x75c7b to 0x75c87 (12 bytes) (id=169)
+    db $14 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw Lab3Blocks, Lab3Texts, Lab3Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Lab3Object ; objects
+
+Lab3Script: ; 0x75c87
+    jp $3c3c
+; 0x75c8a
+
+Lab3Texts: ; 0x75c8a
+    dw Lab3Text1, Lab3Text2, Lab3Text3, Lab3Text4, Lab3Text5
+
+Lab3Text1: ; 0x75c94
+    db $08 ; asm
+    ld a, [$d7a1]
+    bit 7, a
+    jr nz, .asm_e551a ; 0x75c9a
+    ld hl, $5cc8
+    call PrintText
+    ld bc,(TM_35 << 8) | 1
+    call $3e2e
+    jr nc, .asm_6c187 ; 0x75ca8
+    ld hl, $5ccd
+    call PrintText
+    ld hl, $d7a1
+    set 7, [hl]
+    jr .asm_eb896 ; 0x75cb5
+.asm_6c187 ; 0x75cb7
+    ld hl, $5cd8
+    call PrintText
+    jr .asm_eb896 ; 0x75cbd
+.asm_e551a ; 0x75cbf
+    ld hl, $5cd3
+    call PrintText
+.asm_eb896 ; 0x75cc5
+    jp $24d7
+
+INCBIN "baserom.gbc",$75cc8,$15
+
+Lab3Text2: ; 0x75cdd
+    TX_FAR _Lab3Text2
+    db $50
+
+Lab3Text4:
+Lab3Text3: ; 0x75ce2
+    TX_FAR _Lab3Text3
+    db $50
+
+Lab3Text5: ; 0x75ce7
+    TX_FAR _Lab3Text5
+    db $50
+
+Lab3Object: ; 0x75cec (size=41)
+    db $17 ; border tile
+
+    db $2 ; warps
+    db $7, $2, $3, CINNABAR_LAB_1
+    db $7, $3, $3, CINNABAR_LAB_1
+
+    db $3 ; signs
+    db $4, $0, $3 ; Lab3Text3
+    db $4, $1, $4 ; Lab3Text4
+    db $1, $2, $5 ; Lab3Text5
+
+    db $2 ; people
+    db SPRITE_OAK_AIDE, $2 + 4, $7 + 4, $ff, $d0, $1 ; person
+    db SPRITE_OAK_AIDE, $3 + 4, $2 + 4, $fe, $2, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; CINNABAR_LAB_1
+    EVENT_DISP $4, $7, $3 ; CINNABAR_LAB_1
+
+Lab3Blocks: ; 16
+    INCBIN "maps/lab3.blk"
+
+Lab4_h: ; 0x75d25 to 0x75d31 (12 bytes) (id=170)
+    db $14 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw Lab4Blocks, $5d34, $5d31 ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw Lab4Object ; objects
+
+Lab4Script: ; 0x75d31
+    jp $3c3c
+; 0x75d34
+
+INCBIN "baserom.gbc",$75d34,$38
+
+Lab4Text1: ; 0x75d6c
+    db $8
+    ld a, [$d7a3]
+    bit 0, a
+    jr nz, .asm_75d96 ; 0x75d72 $22
+    ld hl, $5dc6
+    call PrintText
+    call $5d38
+    ld a, [$cd37]
+    and a
+    jr z, .asm_75d8d ; 0x75d81 $a
+    ld b, $18
+    ld hl, $5006
+    call Bankswitch
+    jr .asm_75d93 ; 0x75d8b $6
+.asm_75d8d
+    ld hl, $5dcb
+    call PrintText
+.asm_75d93
+    jp $24d7
+.asm_75d96
+    bit 1, a
+    jr z, .asm_75da2 ; 0x75d98 $8
+    ld hl, $5dd0
+    call PrintText
+    jr .asm_75d93 ; 0x75da0 $f1
+.asm_75da2
+    call $5de8
+    ld hl, $5dd5
+    call PrintText
+    ld hl, $d7a3
+    set 2, [hl]
+    ld a, [$d710]
+    ld b, a
+    ld c, $1e
+    call GivePokemon
+    jr nc, .asm_75d93 ; 0x75db9 $d8
+    ld hl, $d7a3
+    res 0, [hl]
+    res 1, [hl]
+    res 2, [hl]
+    jr .asm_75d93 ; 0x75dc4 $cd
+; 0x75dc6
+
+INCBIN "baserom.gbc",$75dc6,$14
+
+Lab4Text2: ; 0x75dda
+    db $08 ; asm
+    ld a, $3
+    ld [W_WHICHTRADE], a
+    ld a, $54
+    call Predef
+    jp $24d7
+
+INCBIN "baserom.gbc",$75de8,$8
+
+Lab4Object: ; 0x75df0 (size=32)
+    db $17 ; border tile
+
+    db $2 ; warps
+    db $7, $2, $4, CINNABAR_LAB_1
+    db $7, $3, $4, CINNABAR_LAB_1
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_OAK_AIDE, $2 + 4, $5 + 4, $fe, $2, $1 ; person
+    db SPRITE_OAK_AIDE, $6 + 4, $7 + 4, $ff, $d1, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2 ; CINNABAR_LAB_1
+    EVENT_DISP $4, $7, $3 ; CINNABAR_LAB_1
+
+Lab4Blocks: ; 16
+    INCBIN "maps/lab4.blk"
+
+CinnabarPokecenter_h: ; 0x75e20 to 0x75e2c (12 bytes) (id=171)
+    db $06 ; tileset
+    db $04, $07 ; dimensions (y, x)
+    dw $4030, CinnabarPokecenterTexts, CinnabarPokecenterScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CinnabarPokecenterObject ; objects
+
+CinnabarPokecenterScript: ; 0x75e2c
+    call $22fa
+    jp $3c3c
+; 0x75e32
+
+CinnabarPokecenterTexts:
+INCBIN "baserom.gbc",$75e32,$9
+
+CinnabarPokecenterText2:
+CinnabarPokecenterText1: ; 0x75e3b
+    TX_FAR _CinnabarPokecenterText1
+    db $50
+
+CinnabarPokecenterText3: ; 0x75e40
+    TX_FAR _CinnabarPokecenterText3
+    db $50
+
+CinnabarPokecenterText4:
+    db $f6
+
+CinnabarPokecenterObject: ; 0x75e46 (size=44)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $3, $ff
+    db $7, $4, $3, $ff
+
+    db $0 ; signs
+
+    db $4 ; people
+    db SPRITE_NURSE, $1 + 4, $3 + 4, $ff, $d0, $1 ; person
+    db SPRITE_LASS, $4 + 4, $9 + 4, $fe, $0, $2 ; person
+    db SPRITE_GENTLEMAN, $6 + 4, $2 + 4, $ff, $ff, $3 ; person
+    db SPRITE_CABLE_CLUB_WOMAN, $2 + 4, $b + 4, $ff, $d0, $4 ; person
+
+    ; warp-to
+    EVENT_DISP $7, $7, $3
+    EVENT_DISP $7, $7, $4
+
+CinnabarMart_h: ; 0x75e72 to 0x75e7e (12 bytes) (id=172)
+    db $02 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $4010, CinnabarMartTexts, CinnabarMartScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CinnabarMartObject ; objects
+
+CinnabarMartScript: ; 0x75e7e
+    jp $3c3c
+; 0x75e81
+
+CinnabarMartTexts: ; 0x75e81
+    dw CinnabarMartText1, CinnabarMartText2, CinnabarMartText3
+
+CinnabarMartText2: ; 0x75e87
+    TX_FAR _CinnabarMartText2
+    db $50
+
+CinnabarMartText3: ; 0x75e8c
+    TX_FAR _CinnabarMartText3
+    db $50
+
+CinnabarMartObject: ; 0x75e91 (size=38)
+    db $0 ; border tile
+
+    db $2 ; warps
+    db $7, $3, $4, $ff
+    db $7, $4, $4, $ff
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MART_GUY, $5 + 4, $0 + 4, $ff, $d3, $1 ; person
+    db SPRITE_ERIKA, $2 + 4, $6 + 4, $ff, $ff, $2 ; person
+    db SPRITE_OAK_AIDE, $4 + 4, $3 + 4, $ff, $ff, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $7, $4
+
+CopycatsHouseF1_h: ; 0x75eb7 to 0x75ec3 (12 bytes) (id=175)
+    db $01 ; tileset
+    db $04, $04 ; dimensions (y, x)
+    dw $4000, CopycatsHouseF1Texts, CopycatsHouseF1Script ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw CopycatsHouseF1Object ; objects
+
+CopycatsHouseF1Script: ; 0x75ec3
+    jp $3c3c
+; 0x75ec6
+
+CopycatsHouseF1Texts: ; 0x75ec6
+    dw CopycatsHouseF1Text1, CopycatsHouseF1Text2, CopycatsHouseF1Text3
+
+CopycatsHouseF1Text1: ; 0x75ecc
+    TX_FAR _CopycatsHouseF1Text1
+    db $50
+
+CopycatsHouseF1Text2: ; 0x75ed1
+    TX_FAR _CopycatsHouseF1Text2
+    db $50
+
+CopycatsHouseF1Text3: ; 0x75ed6
+    TX_FAR _CopycatsHouseF1Text3
+    db $8
+    ld a, $28
+    call $13d0
+    jp $24d7
+
+CopycatsHouseF1Object: ; 0x75ee3 (size=46)
+    db $a ; border tile
+
+    db $3 ; warps
+    db $7, $2, $0, $ff
+    db $7, $3, $0, $ff
+    db $1, $7, $0, COPYCATS_HOUSE_2F
+
+    db $0 ; signs
+
+    db $3 ; people
+    db SPRITE_MOM_GEISHA, $2 + 4, $2 + 4, $ff, $d0, $1 ; person
+    db SPRITE_FAT_BALD_GUY, $4 + 4, $5 + 4, $ff, $d2, $2 ; person
+    db SPRITE_CLEFAIRY, $4 + 4, $1 + 4, $fe, $1, $3 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $2
+    EVENT_DISP $4, $7, $3
+    EVENT_DISP $4, $1, $7 ; COPYCATS_HOUSE_2F
+
+INCBIN "baserom.gbc",$75f11,$75f1d - $75f11
+
+GaryScript: ; 0x75f1d
+    call $3c3c
+    ld hl, $5f31
+    ld a, [$d64c]
+    jp $3d97
+; 0x75f29
+
+INCBIN "baserom.gbc",$75f29,$75f31 - $75f29
+
+GaryScripts: ; 0x75f31
+    dw GaryScript0
+
+INCBIN "baserom.gbc",$75f33,$14
+
+GaryScript0: ; 0x75f47
+    ret
+; 0x75f48
+
+INCBIN "baserom.gbc",$75f48,$18e
+
+GaryTexts: ; 0x760d6
+    dw GaryText1, GaryText2, GaryText3, GaryText4, GaryText5
+
+GaryText1: ; 0x760e0
+    db $08 ; asm
+    ld a, [$d867]
+    bit 1, a
+    ld hl, $60f4
+    jr z, .asm_17e9f ; 0x760e9
+    ld hl, $6103
+.asm_17e9f ; 0x760ee
+    call PrintText
+    jp $24d7
+
+INCBIN "baserom.gbc",$760f4,$14
+
+GaryText2: ; 0x76108
+    TX_FAR _GaryText2
+    db $50
+
+GaryText3: ; 0x7610d
+INCBIN "baserom.gbc",$7610d,$76125 - $7610d
+
+GaryText4: ; 0x76125
+INCBIN "baserom.gbc",$76125,$7612a - $76125
+
+GaryText5: ; 0x7612a
+INCBIN "baserom.gbc",$7612a,$7612f - $7612a
+
+GaryObject: ; 0x7612f (size=48)
+    db $3 ; border tile
+
+    db $4 ; warps
+    db $7, $3, $1, LANCES_ROOM
+    db $7, $4, $2, LANCES_ROOM
+    db $0, $3, $0, HALL_OF_FAME
+    db $0, $4, $0, HALL_OF_FAME
+
+    db $0 ; signs
+
+    db $2 ; people
+    db SPRITE_BLUE, $2 + 4, $4 + 4, $ff, $d0, $1 ; person
+    db SPRITE_OAK, $7 + 4, $3 + 4, $ff, $d1, $2 ; person
+
+    ; warp-to
+    EVENT_DISP $4, $7, $3 ; LANCES_ROOM
+    EVENT_DISP $4, $7, $4 ; LANCES_ROOM
+    EVENT_DISP $4, $0, $3 ; HALL_OF_FAME
+    EVENT_DISP $4, $0, $4 ; HALL_OF_FAME
+
+GaryBlocks: ; 16
+    INCBIN "maps/gary.blk"
+
+Lorelei_h: ; 0x7616f to 0x7617b (12 bytes) (id=245)
+    db $07 ; tileset
+    db $06, $05 ; dimensions (y, x)
+    dw LoreleiBlocks, LoreleiTexts, LoreleiScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw LoreleiObject ; objects
+
+LoreleiScript: ; 0x7617b
+    call $6191
+    call $3c3c
+    ld hl, $6255
+    ld de, $61bb
+    ld a, [$d64d]
+    call $3160
+    ld [$d64d], a
+    ret
+; 0x76191
+
+INCBIN "baserom.gbc",$76191,$c0
+
+LoreleiTexts: ; 0x76251
+    dw LoreleiText1, LoreleiText2
+
+INCBIN "baserom.gbc",$76255,$d
+
+LoreleiText1: ; 0x76262
+    db $08 ; asm
+    ld hl, $6255
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$7626c,$7627b - $7626c
+
+LoreleiText2: ; 0x7627b
+INCBIN "baserom.gbc",$7627b,$76280 - $7627b
+
+LoreleiObject: ; 0x76280 (size=44)
+    db $3 ; border tile
+
+    db $4 ; warps
+    db $b, $4, $2, INDIGO_PLATEAU_LOBBY
+    db $b, $5, $2, INDIGO_PLATEAU_LOBBY
+    db $0, $4, $0, BRUNOS_ROOM
+    db $0, $5, $1, BRUNOS_ROOM
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_LORELEI, $2 + 4, $5 + 4, $ff, $d0, $41, LORELEI + $C8, $1 ; trainer
+
+    ; warp-to
+    EVENT_DISP $5, $b, $4 ; INDIGO_PLATEAU_LOBBY
+    EVENT_DISP $5, $b, $5 ; INDIGO_PLATEAU_LOBBY
+    EVENT_DISP $5, $0, $4 ; BRUNOS_ROOM
+    EVENT_DISP $5, $0, $5 ; BRUNOS_ROOM
+
+LoreleiBlocks: ; 30
+    INCBIN "maps/loreli.blk"
+
+Bruno_h: ; 0x762ca to 0x762d6 (12 bytes) (id=246)
+    db $07 ; tileset
+    db $06, $05 ; dimensions (y, x)
+    dw BrunoBlocks, BrunoTexts, BrunoScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw BrunoObject ; objects
+
+BrunoScript: ; 0x762d6
+    call $62ec
+    call $3c3c
+    ld hl, $63ac
+    ld de, $6312
+    ld a, [$d64e]
+    call $3160
+    ld [$d64e], a
+    ret
+; 0x762ec
+
+INCBIN "baserom.gbc",$762ec,$bc
+
+BrunoTexts: ; 0x763a8
+    dw BrunoText1, BrunoText2
+
+INCBIN "baserom.gbc",$763ac,$d
+
+BrunoText1: ; 0x763b9
+    db $08 ; asm
+    ld hl, $63ac
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$763c3,$763d2 - $763c3
+
+BrunoText2: ; 0x763d2
+INCBIN "baserom.gbc",$763d2,5
+
+BrunoObject: ; 0x763d7 (size=44)
+    db $3 ; border tile
+
+    db $4 ; warps
+    db $b, $4, $2, LORELEIS_ROOM
+    db $b, $5, $3, LORELEIS_ROOM
+    db $0, $4, $0, AGATHAS_ROOM
+    db $0, $5, $1, AGATHAS_ROOM
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_BRUNO, $2 + 4, $5 + 4, $ff, $d0, $41, BRUNO + $C8, $1 ; trainer
+
+    ; warp-to
+    EVENT_DISP $5, $b, $4 ; LORELEIS_ROOM
+    EVENT_DISP $5, $b, $5 ; LORELEIS_ROOM
+    EVENT_DISP $5, $0, $4 ; AGATHAS_ROOM
+    EVENT_DISP $5, $0, $5 ; AGATHAS_ROOM
+
+BrunoBlocks: ; 30
+    INCBIN "maps/bruno.blk"
+
+Agatha_h: ; 0x76421 to 0x7642d (12 bytes) (id=247)
+    db $0f ; tileset
+    db $06, $05 ; dimensions (y, x)
+    dw AgathaBlocks, AgathaTexts, AgathaScript ; blocks, texts, scripts
+    db $00 ; connections
+
+    dw AgathaObject ; objects
+
+AgathaScript: ; 0x7642d
+    call $6443
+    call $3c3c
+    ld hl, $6509
+    ld de, $6469
+    ld a, [$d64f]
+    call $3160
+    ld [$d64f], a
+    ret
+; 0x76443
+
+INCBIN "baserom.gbc",$76443,$c2
+
+AgathaTexts: ; 0x76505
+    dw AgathaText1, AgathaText2
+
+INCBIN "baserom.gbc",$76509,$d
+
+AgathaText1: ; 0x76516
+    db $08 ; asm
+    ld hl, $6509
+    call LoadTrainerHeader
+    jp $24d7
+
+INCBIN "baserom.gbc",$76520,$f
+
+AgathaText2: ; 0x7652f
+INCBIN "baserom.gbc",$7652f,5
+
+AgathaObject: ; 0x76534 (size=44)
+    db $0 ; border tile
+
+    db $4 ; warps
+    db $b, $4, $2, BRUNOS_ROOM
+    db $b, $5, $3, BRUNOS_ROOM
+    db $0, $4, $0, LANCES_ROOM
+    db $0, $5, $0, LANCES_ROOM
+
+    db $0 ; signs
+
+    db $1 ; people
+    db SPRITE_AGATHA, $2 + 4, $5 + 4, $ff, $d0, $41, AGATHA + $C8, $1 ; trainer
+
+    ; warp-to
+    EVENT_DISP $5, $b, $4 ; BRUNOS_ROOM
+    EVENT_DISP $5, $b, $5 ; BRUNOS_ROOM
+    EVENT_DISP $5, $0, $4 ; LANCES_ROOM
+    EVENT_DISP $5, $0, $5 ; LANCES_ROOM
+
+AgathaBlocks: ; 30
+    INCBIN "maps/agatha.blk"
+
+INCBIN "baserom.gbc",$7657e,$1a82
+
+SECTION "bank1E",DATA,BANK[$1E]
+
+INCBIN "baserom.gbc",$78000,$F1
+
+PlayAnimation: ; 40F1
+	xor a
+	ld [$FF8B],a
+	ld [$D08B],a
+	ld a,[$D07C] ; get animation number
+	dec a
+	ld l,a
+	ld h,0
+	add hl,hl
+	ld de,$607D
+	add hl,de
+	ld a,[hli]
+	ld h,[hl]
+	ld l,a
+.next7\@
+	ld a,[hli]
+	cp a,$FF
+	jr z,.AnimationOver\@
+	cp a,$C0 ; is this animation for a monster onscreen?
+	jr c,.next2\@
+	ld c,a
+	ld de,$50DA
+.next4\@
+	ld a,[de]
+	cp c
+	jr z,.next3\@
+	inc de
+	inc de
+	inc de
+	jr .next4\@
+.next3\@
+	ld a,[hli]
+	cp a,$FF
+	jr z,.next5\@
+	ld [$CF07],a
+	push hl
+	push de
+	call $586F
+	call $23B1
+	pop de
+	pop hl
+.next5\@
+	push hl
+	inc de
+	ld a,[de]
+	ld l,a
+	inc de
+	ld a,[de]
+	ld h,a
+	ld de,.next6\@
+	push de
+	jp [hl]
+.next2\@
+	ld c,a
+	and a,$3F
+	ld [$D086],a
+	xor a
+	sla c
+	rla
+	sla c
+	rla
+	ld [$D09F],a
+	ld a,[hli]
+	ld [$CF07],a
+	ld a,[hli]
+	ld c,l
+	ld b,h
+	ld l,a
+	ld h,0
+	add hl,hl
+	ld de,$676D
+	add hl,de
+	ld a,l
+	ld [$D094],a
+	ld a,h
+	ld [$D095],a
+	ld l,c
+	ld h,b
+	push hl
+	ld a,[rOBP0]
+	push af
+	ld a,[$CC79]
+	ld [rOBP0],a
+	call $41D2
+	call $417C
+	call RealPlayAnimation
+	pop af
+	ld [rOBP0],a
+.next6\@
+	pop hl
+	jr .next7\@
+.AnimationOver\@ ; 417B
+	ret
+
+INCBIN "baserom.gbc",$7817C,$78D5E - $7817C
+
+AttackAnimation: ; 4D5E
+	push hl
+	push de
+	push bc
+	push af
+	call $3748
+	call $4E23
+	ld a,[$D07C]
+	and a
+	jr z,.AnimationFinished\@
+
+	; if throwing a Poké Ball, skip the regular animation code
+	cp a,TOSS_ANIM
+	jr nz,.AttackAnimation\@
+	ld de,.AnimationFinished\@
+	push de
+	jp TossBallAnimation
+
+.AttackAnimation\@
+	; check if battle animations are disabled in the options
+	ld a,[$D355]
+	bit 7,a
+	jr nz,.AnimationsDisabled\@
+	call ShareAttackAnimations
+	call PlayAnimation
+	jr .next4\@
+.AnimationsDisabled\@
+	ld c,30
+	call DelayFrames
+.next4\@
+	call $4DBD ; reload pic and flash the pic in and out (to show damage)
+.AnimationFinished\@
+	call $3748
+	xor a
+	ld [$D096],a
+	ld [$D09B],a
+	ld [$D08B],a
+	dec a
+	ld [$CF07],a
+	pop af
+	pop bc
+	pop de
+	pop hl
+	ret
+
+ShareAttackAnimations: ; 4DA6
+; some moves just reuse animations from status conditions
+	ld a,[H_WHOSETURN]
+	and a
+	ret z
+
+	; opponent’s turn
+
+	ld a,[$D07C]
+
+	cp a,AMNESIA
+	ld b,CONF_ANIM
+	jr z,.Replace\@
+
+	cp a,REST
+	ld b,SLP_ANIM
+	ret nz
+
+.Replace\@
+	ld a,b
+	ld [$D07C],a
+	ret
+
+Function4DBD: ; 4DBD
+	ld a,[$CC5B]
+	and a
+	ret z
+	dec a
+	add a
+	ld c,a
+	ld b,0
+	ld hl,Pointer4DCF
+	add hl,bc
+	ld a,[hli]
+	ld h,[hl]
+	ld l,a
+	jp [hl]
+
+Pointer4DCF: ; 4DCF
+	dw $4DDB,$4DE3,$4DEB,$4DF0,$4DF6,$4DFE
+
+INCBIN "baserom.gbc",$78DDB,$78E53-$78DDB
+
+RealPlayAnimation: ; 4E53
+	ld a,[$CF07] ; get animation # − 1
+	cp a,$FF
+	jr z,.Next4E60
+	call $586F
+	call $23B1 ; play sound effect
+.Next4E60
+	ld hl,$C300
+	ld a,l
+	ld [$D09D],a
+	ld a,h
+	ld [$D09C],a
+	ld a,[$D097]
+	ld h,a
+	ld a,[$D096]
+	ld l,a
+	push hl
+	ld c,[hl]
+	ld b,0
+	ld hl,PointerTable6F74
+	add hl,bc
+	add hl,bc
+	ld a,[hli]
+	ld c,a
+	ld a,[hli]
+	ld b,a
+	pop hl
+	inc hl
+	push hl
+	ld e,[hl]
+	ld d,0
+	ld hl,$7C85
+	add hl,de
+	add hl,de
+	ld a,[hli]
+	ld [$D082],a
+	ld a,[hl]
+	ld [$D081],a
+	pop hl
+	inc hl
+	ld a,[hl]
+	ld [$D09E],a
+	call $4000
+	call $4ED7
+	ld a,[$D087]
+	dec a
+	ld [$D087],a
+	ret z
+	ld a,[$D097]
+	ld h,a
+	ld a,[$D096]
+	ld l,a
+	ld a,[$D08B]
+	cp a,4
+	ld bc,3
+	jr nz,.Next4EBC
+	ld bc,$FFFD
+.Next4EBC
+	add hl,bc
+	ld a,h
+	ld [$D097],a
+	ld a,l
+	ld [$D096],a
+	jp $4E73
+
+INCBIN "baserom.gbc",$78EC8,$7986F - $78EC8
+
+Func586F: ; 586F
+	ld hl,MoveSoundTable
+	ld e,a
+	ld d,0
+	add hl,de
+	add hl,de
+	add hl,de
+	ld a,[hli]
+	ld b,a
+	call IsCryMove
+	jr nc,.NotCryMove
+	ld a,[H_WHOSETURN]
+	and a
+	jr nz,.next\@
+	ld a,[$D014] ; get number of current monster
+	jr .Continue\@
+.next\@
+	ld a,[$CFE5]
+.Continue\@
+	push hl
+	call $13D9
+	ld b,a
+	pop hl
+	ld a,[$C0F1]
+	add [hl]
+	ld [$C0F1],a
+	inc hl
+	ld a,[$C0F2]
+	add [hl]
+	ld [$C0F2],a
+	jr .done\@
+.NotCryMove
+	ld a,[hli]
+	ld [$C0F1],a
+	ld a,[hli]
+	ld [$C0F2],a
+.done\@
+	ld a,b
+	ret
+IsCryMove:
+; set carry if the attack animation involves playing a monster cry
+	ld a,[$D07C]
+	cp a,GROWL
+	jr z,.CryMove
+	cp a,ROAR
+	jr z,.CryMove
+	and a ; clear carry
+	ret
+.CryMove
+	scf
+	ret
+
+MoveSoundTable:
+	db $a0,$00,$80
+	db $a2,$10,$80
+	db $b3,$00,$80
+	db $a1,$01,$80
+	db $a3,$00,$40
+	db $e9,$00,$ff
+	db $a3,$10,$60
+	db $a3,$20,$80
+	db $a3,$00,$a0
+	db $a6,$00,$80
+	db $a5,$20,$40
+	db $a5,$00,$80
+	db $a4,$00,$a0
+	db $a7,$10,$c0
+	db $a7,$00,$a0
+	db $a8,$00,$c0
+	db $a8,$10,$a0
+	db $a9,$00,$e0
+	db $a7,$20,$c0
+	db $aa,$00,$80
+	db $b9,$00,$80
+	db $ab,$01,$80
+	db $b7,$00,$80
+	db $ad,$f0,$40
+	db $b0,$00,$80
+	db $ad,$00,$80
+	db $b8,$10,$80
+	db $b1,$01,$a0
+	db $ae,$00,$80
+	db $b4,$00,$60
+	db $b4,$01,$40
+	db $b6,$00,$a0
+	db $b0,$10,$a0
+	db $b7,$00,$c0
+	db $aa,$10,$60
+	db $b0,$00,$a0
+	db $b9,$11,$c0
+	db $b0,$20,$c0
+	db $b8,$00,$80
+	db $b1,$00,$80
+	db $b1,$20,$c0
+	db $af,$00,$80
+	db $db,$ff,$40
+	db $b4,$00,$80
+	db $a1,$00,$c0
+	db $a1,$00,$40
+	db $e4,$00,$80
+	db $bf,$40,$60
+	db $bf,$00,$80
+	db $bf,$ff,$40
+	db $c7,$80,$c0
+	db $af,$10,$a0
+	db $af,$21,$e0
+	db $c5,$00,$80
+	db $bb,$20,$60
+	db $c7,$00,$80
+	db $cc,$00,$80
+	db $c2,$40,$80
+	db $c5,$f0,$e0
+	db $cf,$00,$80
+	db $c7,$f0,$60
+	db $c2,$00,$80
+	db $e6,$00,$80
+	db $9d,$01,$a0
+	db $a9,$f0,$20
+	db $ba,$01,$c0
+	db $ba,$00,$80
+	db $b0,$00,$e0
+	db $be,$01,$60
+	db $be,$20,$40
+	db $bb,$00,$80
+	db $bb,$40,$c0
+	db $b1,$03,$60
+	db $bd,$11,$e0
+	db $a8,$20,$e0
+	db $d2,$00,$80
+	db $b2,$00,$80
+	db $b2,$11,$a0
+	db $b2,$01,$c0
+	db $a9,$14,$c0
+	db $b1,$02,$a0
+	db $c5,$f0,$80
+	db $c5,$20,$c0
+	db $d5,$00,$20
+	db $d5,$20,$80
+	db $d2,$12,$60
+	db $be,$00,$80
+	db $aa,$01,$e0
+	db $c5,$0f,$e0
+	db $c5,$11,$20
+	db $a6,$10,$40
+	db $a5,$10,$c0
+	db $aa,$00,$20
+	db $d8,$00,$80
+	db $e4,$11,$18
+	db $9f,$20,$c0
+	db $9e,$20,$c0
+	db $bd,$00,$10
+	db $be,$f0,$20
+	db $df,$f0,$c0
+	db $a7,$f0,$e0
+	db $9f,$f0,$40
+	db $db,$00,$80
+	db $df,$80,$40
+	db $df,$00,$80
+	db $aa,$11,$20
+	db $aa,$22,$10
+	db $b1,$f1,$ff
+	db $a9,$f1,$ff
+	db $aa,$33,$30
+	db $dd,$40,$c0
+	db $a4,$20,$20
+	db $a4,$f0,$10
+	db $a5,$f8,$10
+	db $a7,$f0,$10
+	db $bd,$00,$80
+	db $ae,$00,$c0
+	db $dd,$c0,$ff
+	db $9f,$f2,$20
+	db $e1,$00,$80
+	db $e1,$00,$40
+	db $9f,$00,$40
+	db $a7,$10,$ff
+	db $c7,$20,$20
+	db $dd,$00,$80
+	db $c5,$1f,$20
+	db $bd,$2f,$80
+	db $a5,$1f,$ff
+	db $ca,$1f,$60
+	db $be,$1e,$20
+	db $be,$1f,$18
+	db $aa,$0f,$80
+	db $9f,$f8,$10
+	db $9e,$18,$20
+	db $dd,$08,$40
+	db $ad,$01,$e0
+	db $a7,$09,$ff
+	db $e4,$42,$01
+	db $b2,$00,$ff
+	db $dd,$08,$e0
+	db $bb,$00,$80
+	db $9f,$88,$10
+	db $bd,$48,$ff
+	db $9e,$ff,$ff
+	db $bb,$ff,$10
+	db $9e,$ff,$04
+	db $b2,$01,$ff
+	db $a9,$f8,$ff
+	db $a2,$f0,$f0
+	db $a5,$08,$10
+	db $a3,$f0,$ff
+	db $b0,$f0,$ff
+	db $e1,$10,$ff
+	db $a4,$f0,$20
+	db $ca,$f0,$60
+	db $b8,$12,$10
+	db $e6,$f0,$20
+	db $b4,$12,$ff
+	db $db,$80,$04
+	db $df,$f0,$10
+	db $c5,$f8,$ff
+	db $be,$f0,$ff
+	db $a7,$01,$ff
+	db $cc,$d8,$04
+	db $a1,$00,$80
+	db $a1,$00,$80
+
+INCBIN "baserom.gbc",$79AAE,$79E16 - $79AAE
+
+TossBallAnimation: ; 5E16
+	ld a,[W_ISINBATTLE]
+	cp a,2
+	jr z,.BlockBall\@ ; if in trainer battle, play different animation
+	ld a,[$D11E]
+	ld b,a
+
+	; upper nybble: how many animations (from PokeBallAnimations) to play
+	; this will be 4 for successful capture, 6 for breakout
+	and a,$F0
+	swap a
+	ld c,a
+
+	; lower nybble: number of shakes
+	; store these for later
+	ld a,b
+	and a,$F
+	ld [$CD3D],a
+
+	ld hl,.PokeBallAnimations
+	; choose which toss animation to use
+	ld a,[$CF91]
+	cp a,POKE_BALL
+	ld b,TOSS_ANIM
+	jr z,.done\@
+	cp a,GREAT_BALL
+	ld b,GREATTOSS_ANIM
+	jr z,.done\@
+	ld b,ULTRATOSS_ANIM
+.done\@
+	ld a,b
+.PlayNextAnimation\@
+	ld [$D07C],a
+	push bc
+	push hl
+	call PlayAnimation
+	pop hl
+	ld a,[hli]
+	pop bc
+	dec c
+	jr nz,.PlayNextAnimation\@
+	ret
+
+.PokeBallAnimations: ; 5E50
+; sequence of animations that make up the Poké Ball toss
+	db POOF_ANIM,HIDEPIC_ANIM,$C2,POOF_ANIM,SHOWPIC_ANIM
+
+.BlockBall\@ ; 5E55
+	ld a,$C1
+	ld [$D07C],a
+	call PlayAnimation
+	ld a,$95
+	call $23B1 ; play sound effect
+	ld a,BLOCKBALL_ANIM
+	ld [$D07C],a
+	jp PlayAnimation
+
+INCBIN "baserom.gbc",$79E6A,$7AF74 - $79E6A
+
+PointerTable6F74: ; 6F74
+	dw $7de7
+	dw $7068
+	dw $708d
+	dw $70ce
+	dw $70df
+	dw $70f0
+	dw $7101
+	dw $7132
+	dw $7173
+	dw $71b4
+	dw $71e5
+	dw $7216
+	dw $7227
+	dw $7238
+	dw $7259
+	dw $726a
+	dw $727b
+	dw $729c
+	dw $72bd
+	dw $72ca
+	dw $72db
+	dw $72fc
+	dw $732d
+	dw $734e
+	dw $735f
+	dw $7364
+	dw $736d
+	dw $7376
+	dw $737f
+	dw $7388
+	dw $7391
+	dw $73ab
+	dw $73b4
+	dw $73cd
+	dw $73fe
+	dw $744b
+	dw $745c
+	dw $7465
+	dw $7496
+	dw $74a7
+	dw $74bc
+	dw $74d5
+	dw $74e6
+	dw $74f7
+	dw $7500
+	dw $7505
+	dw $7526
+	dw $7547
+	dw $7558
+	dw $7569
+	dw $756e
+	dw $758b
+	dw $75a8
+	dw $75ad
+	dw $75c6
+	dw $75d7
+	dw $75e8
+	dw $75f9
+	dw $760a
+	dw $761b
+	dw $7630
+	dw $7649
+	dw $7666
+	dw $7687
+	dw $76a8
+	dw $76b5
+	dw $76c6
+	dw $76f3
+	dw $7720
+	dw $7731
+	dw $7742
+	dw $7753
+	dw $7764
+	dw $7775
+	dw $785a
+	dw $786b
+	dw $787c
+	dw $788d
+	dw $789e
+	dw $78bf
+	dw $78f0
+	dw $7911
+	dw $7932
+	dw $7943
+	dw $7950
+	dw $7961
+	dw $796e
+	dw $7987
+	dw $79ac
+	dw $79c9
+	dw $79ce
+	dw $79ff
+	dw $7a10
+	dw $7a31
+	dw $7a5e
+	dw $7a9b
+	dw $7aac
+	dw $7acd
+	dw $7afe
+	dw $7b3f
+	dw $7b58
+	dw $7b71
+	dw $7b8a
+	dw $7b93
+	dw $7b98
+	dw $7ba9
+	dw $7bae
+	dw $7bcf
+	dw $7bf0
+	dw $7c11
+	dw $7c1a
+	dw $7c2b
+	dw $7c3c
+	dw $77b6
+	dw $77f7
+	dw $7828
+	dw $7849
+	dw $739a
+	dw $7c4d
+	dw $7c6a
+	dw $7c7b
+	dw $7c80
+
+INCBIN "baserom.gbc",$7B068,$7C000 - $7B068
+
+SECTION "bank1F",DATA,BANK[$1F]
+
+INCBIN "baserom.gbc",$7C000,$4000
+
+SECTION "bank20",DATA,BANK[$20]
+
+INCBIN "baserom.gbc",$80000,$800b1 - $80000
+
+_VictoryRoad3Text10:
+_VictoryRoad3Text9:
+_VictoryRoad3Text8:
+_VictoryRoad3Text7:
+_VictoryRoad2Text13:
+_VictoryRoad2Text12:
+_VictoryRoad2Text11:
+_SeafoamIslands1Text2:
+_SeafoamIslands1Text1:
+_SeafoamIslands5Text2:
+_SeafoamIslands5Text1:
+_SeafoamIslands4Text6:
+_SeafoamIslands4Text5:
+_SeafoamIslands4Text4:
+_SeafoamIslands4Text3:
+_SeafoamIslands4Text2:
+_SeafoamIslands4Text1:
+_SeafoamIslands3Text2:
+_SeafoamIslands3Text1:
+_SeafoamIslands2Text2:
+_SeafoamIslands2Text1:
+_FuchsiaHouse2Text3:
+_VictoryRoad1Text7:
+_VictoryRoad1Text6:
+_VictoryRoad1Text5: ; 0x800b1
+    db $0, "This requires", $4f
+    db "STRENGTH to move!", $57
+
+_SaffronCityText19:
+_CinnabarIslandText4:
+_FuchsiaCityText14:
+_VermilionCityText9:
+_LavenderTownText6:
+_CeruleanCityText14:
+_PewterCityText8:
+_ViridianCityText11: ; 0x800d2
+    db $0, "All your item", $4f
+    db "needs fulfilled!", $55
+    db "#MON MART", $57
+
+_ViridianCityText12: ; 0x800fc
+    db $0, "Heal Your #MON!", $4f
+    db "#MON CENTER", $57
+
+INCBIN "baserom.gbc",$80119,$8031d - $80119
+
+_ViridianForestText1: ; 0x8031d
+    db $0, "I came here with", $4f
+    db "some friends!", $51
+    db "They're out for", $4f
+    db "#MON fights!", $57
+
+INCBIN "baserom.gbc",$80359,$804c7 - $80359
+
+_ViridianForestText8: ; 0x804c7
+    db $0, "I ran out of #", $4f
+    db "BALLs to catch", $55
+    db "#MON with!", $51
+    db "You should carry", $4f
+    db "extras!", $57
+
+_ViridianForestText9: ; 0x8050a
+    db $0, "TRAINER TIPS", $51
+    db "If you want to", $4f
+    db "avoid battles,", $55
+    db "stay away from", $55
+    db "grassy areas!", $57
+
+_ViridianForestText10: ; 0x80553
+    db $0, "For poison, use", $4f
+    db "ANTIDOTE! Get it", $55
+    db "at #MON MARTs!", $57
+
+_ViridianForestText11: ; 0x80584
+    db $0, "TRAINER TIPS", $51
+    db "Contact PROF.OAK", $4f
+    db "via PC to get", $55
+    db "your #DEX", $55
+    db "evaluated!", $57
+
+_ViridianForestText12: ; 0x805c6
+    db $0, "TRAINER TIPS", $51
+    db "No stealing of", $4f
+    db "#MON from", $55
+    db "other trainers!", $55
+    db "Catch only wild", $55
+    db "#MON!", $57
+
+_ViridianForestText13: ; 0x80613
+    db $0, "TRAINER TIPS", $51
+    db "Weaken #MON", $4f
+    db "before attempting", $55
+    db "capture!", $51
+    db "When healthy,", $4f
+    db "they may escape!", $57
+
+_ViridianForestText14: ; 0x80667
+    db $0, "LEAVING", $4f
+    db "VIRIDIAN FOREST", $55
+    db "PEWTER CITY AHEAD", $57
+
+INCBIN "baserom.gbc",$80692,$8093a - $80692
+
+_MtMoon1Text14: ; 0x8093a
+    db $0, "Beware! ZUBAT is", $4f
+    db "a blood sucker!", $57
+
+INCBIN "baserom.gbc",$8095c,$80c70 - $8095c
+
+_SSAnne1Text1: ; 0x80c70
+    db $0, "Bonjour!", $4f
+    db "I am le waiter on", $55
+    db "this ship!", $51
+    db "I will be happy", $4f
+    db "to serve you any-", $55
+    db "thing you please!", $51
+    db "Ah! Le strong", $4f
+    db "silent type!", $57
+
+_SSAnne1Text2: ; 0x80ce6
+    db $0, "The passengers", $4f
+    db "are restless!", $51
+    db "You might be", $4f
+    db "challenged by the", $55
+    db "more bored ones!", $57
+
+_SSAnne2Text1: ; 0x80d34
+    db $0, "This ship, she is", $4f
+    db "a luxury liner", $55
+    db "for trainers!", $51
+    db "At every port, we", $4f
+    db "hold parties with", $55
+    db "invited trainers!", $57
+
+INCBIN "baserom.gbc",$80d9a,$80f4b - $80d9a
+
+_SSAnne3Text1: ; 0x80f4b
+    db $0, "Our CAPTAIN is a", $4f
+    db "sword master!", $51
+    db "He even teaches", $4f
+    db "CUT to #MON!", $57
+
+_SSAnne5Text1: ; 0x80f88
+    db $0, "The party's over.", $4f
+    db "The ship will be", $55
+    db "departing soon.", $57
+
+_SSAnne5Text2: ; 0x80fbb
+    db $0, "Scrubbing decks", $4f
+    db "is hard work!", $57
+
+_SSAnne5Text3: ; 0x80fda
+    db $0, "Urf. I feel ill.", $51
+    db "I stepped out to", $4f
+    db "get some air.", $57
+
+INCBIN "baserom.gbc",$8100b,$810e5 - $8100b
+
+_SSAnne6Text1: ; 0x810e5
+    db $0, "You, mon petit!", $4f
+    db "We're busy here!", $55
+    db "Out of the way!", $57
+
+_SSAnne6Text2: ; 0x81116
+    db $0, "I saw an odd ball", $4f
+    db "in the trash.", $57
+
+_SSAnne6Text3: ; 0x81137
+    db $0, "I'm so busy I'm", $4f
+    db "getting dizzy!", $57
+
+_SSAnne6Text4: ; 0x81155
+    db $0, "Hum-de-hum-de-", $4f
+    db "ho...", $51
+    db "I peel spuds", $4f
+    db "every day!", $55
+    db "Hum-hum...", $57
+
+_SSAnne6Text5: ; 0x8118e
+    db $0, "Did you hear about", $4f
+    db "SNORLAX?", $51
+    db "All it does is", $4f
+    db "eat and sleep!", $57
+
+_SSAnne6Text6: ; 0x811c9
+    db $0, "Snivel...Sniff...", $51
+    db "I only get to", $4f
+    db "peel onions...", $55
+    db "Snivel...", $57
+
+INCBIN "baserom.gbc",$81203,$81480 - $81203
+
+_SSAnne7Text2: ; 0x81480
+    db $0, "Yuck! Shouldn't", $4f
+    db "have looked!", $57
+
+_SSAnne7Text3: ; 0x8149d
+    db $0, "How to Conquer", $4f
+    db "Seasickness...", $55
+    db "The CAPTAIN's", $55
+    db "reading this!", $57
+
+_SSAnne8Text8: ; 0x814d7
+    db $0, "WIGGLYTUFF: Puup", $4f
+    db "pupuu!@@"
+
+INCBIN "baserom.gbc",$814f1,$1d6
+
+_SSAnne8Text5: ; 0x816c7
+    db $0, "Waiter, I would", $4f
+    db "like a cherry pie", $55
+    db "please!", $57
+
+_SSAnne8Text6: ; 0x816f2
+    db $0, "A cruise is so", $4f
+    db "elegant yet cozy!", $57
+
+_SSAnne8Text7: ; 0x81714
+    db $0, "I always travel", $4f
+    db "with WIGGLYTUFF!", $57
+
+_SSAnne8Text9: ; 0x81736
+    db $0, "We are cruising", $4f
+    db "around the world.", $57
+
+_SSAnne8Text11: ; 0x81759
+    db $0, "Ssh! I'm a GLOBAL", $4f
+    db "POLICE agent!", $51
+    db "I'm on the trail", $4f
+    db "of TEAM ROCKET!", $57
+
+INCBIN "baserom.gbc",$81799,$81aaa - $81799
+
+_SSAnne10Text8: ; 0x81aaa
+    db $0, "MACHOKE: Gwoh!", $4f
+    db "Goggoh!@@"
+
+INCBIN "baserom.gbc",$81ac3,$289
+
+_SSAnne10Text7: ; 0x81d4c
+    db $0, "My buddy, MACHOKE,", $4f
+    db "is super strong!", $51
+    db "He has enough", $4f
+    db "STRENGTH to move", $55
+    db "big rocks!", $57
+
+INCBIN "baserom.gbc",$81d9b,$2265
+
+SECTION "bank21",DATA,BANK[$21]
+
+INCBIN "baserom.gbc",$84000,$840a4 - $84000
+
+_SilphCo5Text9: ; 0x840a4
+    db $0, "It's a #MON", $4f
+    db "REPORT!", $51
+    db "#MON LAB", $4f
+    db "created PORYGON,", $55
+    db "the first virtual", $55
+    db "reality #MON.", $57
+
+_SilphCo5Text10: ; 0x840f2
+    db $0, "It's a #MON", $4f
+    db "REPORT!", $51
+    db "Over 160 #MON", $4f
+    db "techniques have", $55
+    db "been confirmed.", $57
+
+_SilphCo5Text11: ; 0x84134
+    db $0, "It's a #MON", $4f
+    db "REPORT!", $51
+    db "4 #MON evolve", $4f
+    db "only when traded", $55
+    db "by link-cable.", $57
+
+INCBIN "baserom.gbc",$84176,$8502f - $84176
+
+_SilphCo11Text2: ; 0x8502f
+    db $0, "SECRETARY: Thank", $4f
+    db "you for rescuing", $55
+    db "all of us!", $51
+    db "We admire your", $4f
+    db "courage.", $57
+
+_SilphCo11Text3: ; 0x85075
+    db $0, "Ah ", $52, "!", $4f
+    db "So we meet again!", $51
+    db "The PRESIDENT and", $4f
+    db "I are discussing", $55
+    db "a vital business", $55
+    db "proposition.", $51
+    db "Keep your nose", $4f
+    db "out of grown-up", $55
+    db "matters...", $51
+    db "Or, experience a", $4f
+    db "world of pain!", $57
+
+INCBIN "baserom.gbc",$85119,$21d
+
+_Mansion2Text3: ; 0x85336
+    db $0, "Diary: July 5", $4f
+    db "Guyana,", $55
+    db "South America", $51
+    db "A new #MON was", $4f
+    db "discovered deep", $55
+    db "in the jungle.", $57
+
+_Mansion2Text4: ; 0x85389
+    db $0, "Diary: July 10", $4f
+    db "We christened the", $55
+    db "newly discovered", $55
+    db "#MON, MEW.", $57
+
+INCBIN "baserom.gbc",$853c7,$854a3 - $853c7
+
+_Mansion3Text5: ; 0x854a3
+    db $0, "Diary: Feb. 6", $4f
+    db "MEW gave birth.", $51
+    db "We named the", $4f
+    db "newborn MEWTWO.", $57
+
+INCBIN "baserom.gbc",$854df,$85583 - $854df
+
+_Mansion4Text7: ; 0x85583
+    db $0, "Diary; Sept. 1", $4f
+    db "MEWTWO is far too", $55
+    db "powerful.", $51
+    db "We have failed to", $4f
+    db "curb its vicious", $55
+    db "tendencies...", $57
+
+_SafariZoneEastText5: ; 0x855e0
+    db $0, "REST HOUSE", $57
+
+_SafariZoneEastText6: ; 0x855ec
+    db $0, "TRAINER TIPS", $51
+    db "The remaining time", $4f
+    db "declines only", $55
+    db "while you walk!", $57
+
+_SafariZoneEastText7: ; 0x8562b
+    db $0, "CENTER AREA", $4f
+    db "NORTH: AREA 2", $57
+
+_SafariZoneNorthText3: ; 0x85646
+    db $0, "REST HOUSE", $57
+
+_SafariZoneNorthText4: ; 0x85652
+    db $0, "TRAINER TIPS", $51
+    db "The SECRET HOUSE", $4f
+    db "is still ahead!", $57
+
+_SafariZoneNorthText5: ; 0x85681
+    db $0, "AREA 2", $57
+
+_SafariZoneNorthText6: ; 0x85689
+    db $0, "TRAINER TIPS", $51
+    db "#MON hide in", $4f
+    db "tall grass!", $51
+    db "Zigzag through", $4f
+    db "grassy areas to", $55
+    db "flush them out.", $57
+
+_SafariZoneNorthText7: ; 0x856df
+    db $0, "TRAINER TIPS", $51
+    db "Win a free HM for", $4f
+    db "finding the", $55
+    db "SECRET HOUSE!", $57
+
+_SafariZoneWestText5: ; 0x85719
+    db $0, "REST HOUSE", $57
+
+_SafariZoneWestText6: ; 0x85725
+    db $0, "REQUEST NOTICE", $51
+    db "Please find the", $4f
+    db "SAFARI WARDEN's", $55
+    db "lost GOLD TEETH.", $55
+    db "They're around", $55
+    db "here somewhere.", $51
+    db "Reward offered!", $4f
+    db "Contact: WARDEN", $57
+
+_SafariZoneWestText7: ; 0x857a3
+    db $0, "TRAINER TIPS", $51
+    db "Zone Exploration", $4f
+    db "Campaign!", $51
+    db "The Search for", $4f
+    db "the SECRET HOUSE!", $57
+
+_SafariZoneWestText8: ; 0x857ed
+    db $0, "AREA 3", $4f
+    db "EAST: CENTER AREA", $57
+
+_SafariZoneCenterText2: ; 0x85807
+    db $0, "REST HOUSE", $57
+
+_SafariZoneCenterText3: ; 0x85813
+    db $0, "TRAINER TIPS", $51
+    db "Press the START", $4f
+    db "Button to check", $55
+    db "remaining time!", $57
+
+_SafariZoneRestHouse1Text1: ; 0x85851
+    db $0, "SARA: Where did", $4f
+    db "my boy friend,", $55
+    db "ERIK, go?", $57
+
+_SafariZoneRestHouse1Text2: ; 0x8587b
+    db $0, "I'm catching", $4f
+    db "#MON to take", $55
+    db "home as gifts!", $57
+
+INCBIN "baserom.gbc",$858a4,$85a2f - $858a4
+
+_SafariZoneRestHouse2Text1: ; 0x85a2f
+    db $0, "Tossing ROCKs at", $4f
+    db "#MON might", $55
+    db "make them run,", $55
+    db "but they'll be", $55
+    db "easier to catch.", $57
+
+_SafariZoneRestHouse2Text2: ; 0x85a7a
+    db $0, "Using BAIT will", $4f
+    db "make #MON", $55
+    db "easier to catch.", $57
+
+_SafariZoneRestHouse2Text3: ; 0x85aa6
+    db $0, "I hiked a lot, but", $4f
+    db "I didn't see any", $55
+    db "#MON I wanted.", $57
+
+_SafariZoneRestHouse3Text1: ; 0x85ad9
+    db $0, "How many did you", $4f
+    db "catch? I'm bushed", $55
+    db "from the work!", $57
+
+_SafariZoneRestHouse3Text2: ; 0x85b0b
+    db $0, "I caught a", $4f
+    db "CHANSEY!", $51
+    db "That makes this", $4f
+    db "all worthwhile!", $57
+
+_SafariZoneRestHouse3Text3: ; 0x85b40
+    db $0, "Whew! I'm tired", $4f
+    db "from all the fun!", $57
+
+_SafariZoneRestHouse4Text1: ; 0x85b62
+    db $0, "You can keep any", $4f
+    db "item you find on", $55
+    db "the ground here.", $51
+    db "But, you'll run", $4f
+    db "out of time if", $55
+    db "you try for all", $55
+    db "of them at once!", $57
+
+_SafariZoneRestHouse4Text2: ; 0x85bd5
+    db $0, "Go to the deepest", $4f
+    db "part of the", $55
+    db "SAFARI ZONE. You", $55
+    db "will win a prize!", $57
+
+_SafariZoneRestHouse4Text3: ; 0x85c17
+    db $0, "My EEVEE evolved", $4f
+    db "into FLAREON!", $51
+    db "But, a friend's", $4f
+    db "EEVEE turned into", $55
+    db "a VAPOREON!", $55
+    db "I wonder why?", $57
+
+INCBIN "baserom.gbc",$85c72,$343
+
+_HallofFameRoomText1: ; 0x85fb5
+    db $0, "OAK: Er-hem!", $4f
+    db "Congratulations", $55
+    db $52, "!", $51
+    db "This floor is the", $4f
+    db "#MON HALL OF", $55
+    db "FAME!", $51
+    db "#MON LEAGUE", $4f
+    db "champions are", $55
+    db "honored for their", $55
+    db "exploits here!", $51
+    db "Their #MON are", $4f
+    db "also recorded in", $55
+    db "the HALL OF FAME!", $51
+    db $52, "! You have", $4f
+    db "endeavored hard", $55
+    db "to become the new", $55
+    db "LEAGUE champion!", $51
+    db "Congratulations,", $4f
+    db $52, ", you and", $55
+    db "your #MON are", $55
+    db "HALL OF FAMERs!", $57
+
+INCBIN "baserom.gbc",$860e1,$863c1 - $860e1
+
+_GaryText2: ; 0x863c1
+    db $0, "OAK: ", $52, "!", $57
+
+INCBIN "baserom.gbc",$863ca,$1c36
+
+SECTION "bank22",DATA,BANK[$22]
+
+INCBIN "baserom.gbc",$88000,$8807e - $88000
+
+_SeafoamIslands5Text4: ; 0x8807e
+    db $0, "Boulders might", $4f
+    db "change the flow", $55
+    db "of water!", $57
+
+_SeafoamIslands5Text5: ; 0x880a8
+    db $0, "DANGER", $4f
+    db "Fast current!", $57
+
+_AIBattleWithdrawText:
+	db 1
+	dw $D04A
+	db 0," with-",$4F,"drew @",1
+	dw $CFDA
+	db 0,"!",$58
+_AIBattleUseItemText:
+	db 1
+	dw $D04A
+	db 0,$4F,"used @",1
+	dw $CD6D
+	db 0,$55,"on @",1
+	dw $CFDA
+	db 0,"!",$58
+
+INCBIN "baserom.gbc",$880EF,$89784 - $880EF
+
+_TrainerAboutToUseText:
+	db 1
+	dw $D04A
+	db 0," is",$4F
+	db "about to use",$55,"@",1
+	dw $CFDA
+	db 0,"!",$51
+	db "Will ",$52,$4F
+	db "change #MON?",$57
+
+_TrainerSentOutText:
+	db 1
+	dw $D04A
+	db 0," sent",$4F
+	db "out @",1
+	dw $CFDA
+	db 0,"!",$57
+
+INCBIN "baserom.gbc",$897C9,$898AA - $897C9
+
+_MultiHitText:
+	db 0,"Hit the enemy",$4F,"@"
+	TX_NUM W_NUMHITS,1,1
+	db 0," times!",$58
+
+_ScaredText:
+	db 1
+	dw $D009
+	db 0," is too",$4F
+	db "scared to move!",$58
+
+_GetOutText:
+	db 0,"GHOST: Get out...",$4F
+	db "Get out...",$58
+
+_FastAsleepText:
+	db 0,$5A,$4F
+	db "is fast asleep!",$58
+
+_WokeUpText:
+	db 0,$5A,$4F
+	db "woke up!",$58
+
+_FrozenText:
+	db 0,$5A,$4F
+	db "is frozen solid!",$58
+
+_FullyParalyzedText:
+	db 0,$5A,"'s",$4F
+	db "fully paralyzed!",$58
+
+_FlinchedText:
+	db 0,$5A,$4F
+	db "flinched!",$58
+
+_MustRechargeText:
+	db 0,$5A,$4F
+	db "must recharge!",$58
+
+_DisabledNoMoreText:
+	db 0,$5A,"'s",$4F
+	db "disabled no more!",$58
+
+_IsConfusedText:
+	db 0,$5A,$4F
+	db "is confused!",$58
+
+_HurtItselfText:
+	db 0,"It hurt itself in",$4F
+	db "its confusion!",$58
+
+_ConfusedNoMoreText:
+	db 0,$5A,"'s",$4F
+	db "confused no more!",$58
+
+_SavingEnergyText:
+	db 0,$5A,$4F
+	db "is saving energy!",$58
+
+_UnleashedEnergyText:
+	db 0,$5A,$4F
+	db "unleashed energy!",$58
+
+_ThrashingAboutText:
+	db 0,$5A,"'s",$4F
+	db "thrashing about!",$57
+
+_AttackContinuesText:
+	db 0,$5A,"'s",$4F
+	db "attack continues!",$57
+
+_CantMoveText:
+	db 0,$5A,$4F
+	db "can't move!",$58
+
+INCBIN "baserom.gbc",$89A29,$8A28E - $89A29
+
+_RequireCoinCaseText: ; 22:628E
+        db 0,"A COIN CASE is",$4F
+        db "required!@@"
+
+_ExchangeCoinsForPrizesText: ; 22:62A9
+        db 0,"We exchange your",$4F
+        db "coins for prizes.",$58
+
+_WhichPrizeText: ; 22:62CD
+        db 0,"Which prize do",$4F
+        db "you want?",$57
+
+_HereYouGoText: ; 22:62E7
+        db 0,"Here you go!@@"
+
+_SoYouWantPrizeText: ; 22:62F6
+        db 0,"So, you want",$4F
+        db "@"
+        db 1
+        dw $CD6D
+        db 0,"?",$57
+
+_SorryNeedMoreCoins: ; 22:630B
+        db 0,"Sorry, you need",$4F
+        db "more coins.@@"
+
+_OopsYouDontHaveEnoughRoomText: ; 22:6329
+        db 0,"Oops! You don't",$4F
+        db "have enough room.@@"
+
+_OhFineThenText: ; 22:634C
+        db 0,"Oh, fine then.@@"
+;635d
+
+INCBIN "baserom.gbc",$8A35D,$8A425 - $8A35D
+
+INCLUDE "text/oakspeech.tx"
+
+INCBIN "baserom.gbc",$8A605,$6696 - $6605
+
+_Char00Text:
+	TX_NUM $FF8C,1,2
+	db 0," ERROR.",$57
+
+_Char55Text:
+	db 0,$4B,"@@"
+
+_DiglettsCaveRoute2Text1: ; 0x8a6a7
+    db $0, "I went to ROCK", $4f
+    db "TUNNEL, but it's", $55
+    db "dark and scary.", $51
+    db "If a #MON's", $4f
+    db "FLASH could light", $55
+    db "it up...", $57
+
+_ViridianForestexitText1: ; 0x8a6fd
+    db $0, "Many #MON live", $4f
+    db "only in forests ", $55
+    db "and caves.", $51
+    db "You need to look", $4f
+    db "everywhere to get", $55
+    db "different kinds!", $57
+
+_ViridianForestexitText2: ; 0x8a75d
+    db $0, "Have you noticed", $4f
+    db "the bushes on the", $55
+    db "roadside?", $51
+    db "They can be cut", $4f
+    db "down by a special", $55
+    db "#MON move.", $57
+
+_Route2HouseText1: ; 0x8a7b8
+    db $0, "A fainted #MON", $4f
+    db "can't fight. But, ", $55
+    db "it can still use ", $55
+    db "moves like CUT!", $57
+
+INCBIN "baserom.gbc",$8a7fc,$8a82c - $8a7fc
+
+_Route2GateText2: ; 0x8a82c
+    db $0, "Once a #MON", $4f
+    db "learns FLASH, you", $55
+    db "can get through", $55
+    db "ROCK TUNNEL.", $57
+
+_ViridianForestEntranceText1: ; 0x8a868
+    db $0, "Are you going to", $4f
+    db "VIRIDIAN FOREST?", $55
+    db "Be careful, it's", $55
+    db "a natural maze!", $57
+
+_ViridianForestEntranceText2: ; 0x8a8ab
+    db $0, "RATTATA may be", $4f
+    db "small, but its", $55
+    db "bite is wicked!", $55
+    db "Did you get one?", $57
+
+_MtMoonPokecenterText1: ; 0x8a8eb
+    db $0, "I've 6 # BALLs", $4f
+    db "set in my belt.", $51
+    db "At most, you can", $4f
+    db "carry 6 #MON.", $57
+
+_MtMoonPokecenterText3: ; 0x8a929
+    db $0, "TEAM ROCKET", $4f
+    db "attacks CERULEAN", $55
+    db "citizens...", $51
+    db "TEAM ROCKET is", $4f
+    db "always in the", $55
+    db "news!", $57
+
+INCBIN "baserom.gbc",$8a976,$8aa5a - $8a976
+
+_MtMoonPokecenterText5: ; 0x8aa5a
+    db $0, $57
+
+INCBIN "baserom.gbc",$8aa5c,$15a4
+
+SECTION "bank23",DATA,BANK[$23]
+
+INCBIN "baserom.gbc",$8c000,$8c0cb - $8c000
+
+_UndergroundTunnelEntranceRoute6Text1: ; 0x8c0cb
+    db $0, "People often lose", $4f
+    db "things in that", $55
+    db "UNDERGROUND PATH.", $57
+
+_UndergroundPathEntranceRoute7Text1: ; 0x8c0ff
+    db $0, "I heard a sleepy", $4f
+    db "#MON appeared", $55
+    db "near CELADON CITY.", $57
+
+INCBIN "baserom.gbc",$8c132,$8c28d - $8c132
+
+_UndergroundPathEntranceRoute8Text1: ; 0x8c28d
+    db $0, "The dept. store", $4f
+    db "in CELADON has a", $55
+    db "great selection!", $57
+
+_RockTunnelPokecenterText1: ; 0x8c2c0
+    db $0, "The element types", $4f
+    db "of #MON make", $55
+    db "them stronger", $55
+    db "than some types", $55
+    db "and weaker than", $55
+    db "others!", $57
+
+_RockTunnelPokecenterText3: ; 0x8c316
+    db $0, "I sold a useless", $4f
+    db "NUGGET for ", $f0, "5000!", $57
+
+INCBIN "baserom.gbc",$8c33a,$8c5b7 - $8c33a
+
+_RockTunnel1Text8: ; 0x8c5b7
+    db $0, "ROCK TUNNEL", $4f
+    db "CERULEAN CITY -", $55
+    db "LAVENDER TOWN", $57
+
+INCBIN "baserom.gbc",$8c5e2,$8c5f3 - $8c5e2
+
+_Route11GateText1: ; 0x8c5f3
+    db $0, "When you catch", $4f
+    db "lots of #MON,", $55
+    db "isn't it hard to", $55
+    db "think up names?", $51
+    db "In LAVENDER TOWN,", $4f
+    db "there's a man who", $55
+    db "rates #MON", $55
+    db "nicknames.", $51
+    db "He'll help you", $4f
+    db "rename them too!", $57
+
+INCBIN "baserom.gbc",$8c689,$8c7f9 - $8c689
+
+_DiglettsCaveEntranceRoute11Text1: ; 0x8c7f9
+    db $0, "What a surprise!", $4f
+    db "DIGLETTs dug this", $55
+    db "long tunnel!", $51
+    db "It goes right to", $4f
+    db "VIRIDIAN CITY!", $57
+
+_Route12GateText1: ; 0x8c84a
+    db $0, "There's a lookout", $4f
+    db "spot upstairs.", $57
+
+INCBIN "baserom.gbc",$8c86b,$8cb73 - $8c86b
+
+_Route15GateText1: ; 0x8cb73
+    db $0, "Are you working", $4f
+    db "on a #DEX?", $51
+    db "PROF.OAK's AIDE", $4f
+    db "came by here.", $57
+
+INCBIN "baserom.gbc",$8cbac,$8cd2a - $8cbac
+
+_Route16GateMapText2: ; 0x8cd2a
+    db $0, "How'd you get in?", $4f
+    db "Good effort!", $57
+
+INCBIN "baserom.gbc",$8cd49,$956
+
+_Route1Text2: ; 0x8d69f
+    db $0, "See those ledges", $4f
+    db "along the road?", $51
+    db "It's a bit scary,", $4f
+    db "but you can jump", $55
+    db "from them.", $51
+    db "You can get back", $4f
+    db "to PALLET TOWN", $55
+    db "quicker that way.", $57
+
+_Route1Text3: ; 0x8d720
+    db $0, "ROUTE 1", $4f
+    db "PALLET TOWN -", $55
+    db "VIRIDIAN CITY", $57
+
+_Route2Text3: ; 0x8d745
+    db $0, "ROUTE 2", $4f
+    db "VIRIDIAN CITY -", $55
+    db "PEWTER CITY", $57
+
+_Route2Text4: ; 0x8d76a
+    db $0, "DIGLETT's CAVE", $57
+
+_Route3Text1: ; 0x8d779
+    db $0, "Whew... I better", $4f
+    db "take a rest...", $55
+    db "Groan...", $51
+    db "That tunnel from", $4f
+    db "CERULEAN takes a", $55
+    db "lot out of you!", $57
+
+INCBIN "baserom.gbc",$8d7d5,$8db07 - $8d7d5
+
+_Route3Text10: ; 0x8db07
+    db $0, "ROUTE 3", $4f
+    db "MT.MOON AHEAD", $57
+
+_Route4Text1: ; 0x8db1e
+    db $0, "Ouch! I tripped", $4f
+    db "over a rocky", $55
+    db "#MON, GEODUDE!", $57
+
+INCBIN "baserom.gbc",$8db4b,$8dbcd - $8db4b
+
+_Route4Text5: ; 0x8dbcd
+    db $0, "MT.MOON", $4f
+    db "Tunnel Entrance", $57
+
+_Route4Text6: ; 0x8dbe6
+    db $0, "ROUTE 4", $4f
+    db "MT.MOON -", $55
+    db "CERULEAN CITY", $57
+
+_Route5Text1: ; 0x8dc07
+    db $0, "UNDERGROUND PATH", $4f
+    db "CERULEAN CITY -", $55
+    db "VERMILION CITY", $57
+
+INCBIN "baserom.gbc",$8dc38,$8de49 - $8dc38
+
+_Route6Text7: ; 0x8de49
+    db $0, "UNDERGROUND PATH", $4f
+    db "CERULEAN CITY -", $55
+    db "VERMILION CITY", $57
+
+_Route7Text1: ; 0x8de7a
+    db $0, "UNDERGROUND PATH", $4f
+    db "CELADON CITY -", $55
+    db "LAVENDER TOWN", $57
+
+INCBIN "baserom.gbc",$8dea9,$8e262 - $8dea9
+
+_Route8Text10: ; 0x8e262
+    db $0, "UNDERGROUND PATH", $4f
+    db "CELADON CITY -", $55
+    db "LAVENDER TOWN", $57
+
+INCBIN "baserom.gbc",$8e291,$8e61e - $8e291
+
+_Route9Text11: ; 0x8e61e
+    db $0, "ROUTE 9", $4f
+    db "CERULEAN CITY-", $55
+    db "ROCK TUNNEL", $57
+
+INCBIN "baserom.gbc",$8e642,$8e8d4 - $8e642
+
+_Route10Text9: ; 0x8e8d4
+_Route10Text7: ; 0x8e8d4
+    db $0, "ROCK TUNNEL", $57
+
+_Route10Text10: ; 0x8e8e1
+    db $0, "POWER PLANT", $57
+
+INCBIN "baserom.gbc",$8e8ee,$1712
+
+SECTION "bank24",DATA,BANK[$24]
+
+INCBIN "baserom.gbc",$90000,$9008f - $90000
+
+_Route11Text11: ; 0x9008f
+    db $0, "DIGLETT's CAVE", $57
+
+_Route12Text1: ; 0x9009e
+    db $0, "A sleeping #MON", $4f
+    db "blocks the way!", $57
+
+INCBIN "baserom.gbc",$900bf,$903bc - $900bf
+
+_Route12Text11: ; 0x903bc
+    db $0, "ROUTE 12 ", $4f
+    db "North to LAVENDER", $57
+
+_Route12Text12: ; 0x903d9
+    db $0, "SPORT FISHING AREA", $57
+
+INCBIN "baserom.gbc",$903ed,$90781 - $903ed
+
+_Route13Text11: ; 0x90781
+    db $0, "TRAINER TIPS", $51
+    db "Look to the left", $4f
+    db "of that post!", $57
+
+_Route13Text12: ; 0x907ae
+    db $0, "TRAINER TIPS", $51
+    db "Use SELECT to", $4f
+    db "switch items in", $55
+    db "the ITEM window!", $57
+
+_Route13Text13: ; 0x907eb
+    db $0, "ROUTE 13", $4f
+    db "North to SILENCE", $55
+    db "BRIDGE", $57
+
+INCBIN "baserom.gbc",$9080d,$90c1f - $9080d
+
+_Route14Text11: ; 0x90c1f
+    db $0, "ROUTE 14", $4f
+    db "West to FUCHSIA", $55
+    db "CITY", $57
+
+INCBIN "baserom.gbc",$90c3e,$91062 - $90c3e
+
+_Route15Text12: ; 0x91062
+    db $0, "ROUTE 15", $4f
+    db "West to FUCHSIA", $55
+    db "CITY", $57
+
+INCBIN "baserom.gbc",$91081,$91287 - $91081
+
+_Route16Text7: ; 0x91287
+    db $0, "A sleeping #MON", $4f
+    db "blocks the way!", $57
+
+INCBIN "baserom.gbc",$912a8,$9130d - $912a8
+
+_Route16Text8: ; 0x9130d
+    db $0, "Enjoy the slope!", $4f
+    db "CYCLING ROAD", $57
+
+_Route16Text9: ; 0x9132c
+    db $0, "ROUTE 16", $4f
+    db "CELADON CITY -", $55
+    db "FUCHSIA CITY", $57
+
+INCBIN "baserom.gbc",$91352,$91649 - $91352
+
+_Route17Text11: ; 0x91649
+    db $0, "It's a notice!", $51
+    db "Watch out for", $4f
+    db "discarded items!", $57
+
+_Route17Text12: ; 0x91677
+    db $0, "TRAINER TIPS", $51
+    db "All #MON are", $4f
+    db "unique.", $51
+    db "Even #MON of", $4f
+    db "the same type and", $55
+    db "level grow at", $55
+    db "different rates.", $57
+
+_Route17Text13: ; 0x916d8
+    db $0, "TRAINER TIPS", $51
+    db "Press the A or B", $4f
+    db "Button to stay in", $55
+    db "place while on a", $55
+    db "slope.", $57
+
+_Route17Text14: ; 0x91721
+    db $0, "ROUTE 17", $4f
+    db "CELADON CITY -", $55
+    db "FUCHSIA CITY", $57
+
+_Route17Text15: ; 0x91747
+    db $0, "It's a notice!", $51
+    db "Don't throw the", $4f
+    db "game, throw #", $55
+    db "BALLs instead!", $57
+
+_Route17Text16: ; 0x91782
+    db $0, "CYCLING ROAD", $4f
+    db "Slope ends here!", $57
+
+INCBIN "baserom.gbc",$917a1,$9189d - $917a1
+
+_Route18Text4: ; 0x9189d
+    db $0, "ROUTE 18", $4f
+    db "CELADON CITY -", $55
+    db "FUCHSIA CITY", $57
+
+_Route18Text5: ; 0x918c3
+    db $0, "CYCLING ROAD", $4f
+    db "No pedestrians", $55
+    db "permitted!", $57
+
+INCBIN "baserom.gbc",$918eb,$91c3c - $918eb
+
+_Route19Text11: ; 0x91c3c
+    db $0, "SEA ROUTE 19", $4f
+    db "FUCHSIA CITY -", $55
+    db "SEAFOAM ISLANDS", $57
+
+INCBIN "baserom.gbc",$91c69,$91fa7 - $91c69
+
+_Route20Text12: ; 0x91fa7
+_Route20Text11: ; 0x91fa7
+    db $0, "SEAFOAM ISLANDS", $57
+
+INCBIN "baserom.gbc",$91fb8,$92606 - $91fb8
+
+_Route22Text3: ; 0x92606
+    db $0, "#MON LEAGUE", $4f
+    db "Front Gate", $57
+
+INCBIN "baserom.gbc",$9261e,$92700 - $9261e
+
+_Route23Text8: ; 0x92700
+    db $0, "VICTORY ROAD GATE", $4f
+    db "- #MON LEAGUE", $57
+
+INCBIN "baserom.gbc",$92721,$18df
+
+SECTION "bank25",DATA,BANK[$25]
+
+INCBIN "baserom.gbc",$94000,$945d3 - $94000
+
+_Route25Text11: ; 0x945d3
+    db $0, "SEA COTTAGE", $4f
+    db "BILL lives here!", $57
+
+INCBIN "baserom.gbc",$945f1,$94b01 - $945f1
+
+_BattleCenterMText1: ; 0x94b01
+    db $0, "!", $57
+
+_TradeCenterMText1: ; 0x94b04
+    db $0, "!", $57
+
+INCLUDE "text/mapRedsHouse1F.tx"
+INCLUDE "text/mapBluesHouse.tx"
+
+INCBIN "baserom.gbc",$94d5b,$95268 - $94d5b
+
+_OaksLabText8: ; 0x95268
+    db $0, "?", $57
+
+INCBIN "baserom.gbc",$9526b,$95ba1 - $9526b
+
+_ViridianPokeCenterText2: ; 0x95ba1
+_ViridianPokeCenterText1: ; 0x95ba1
+    db $0, "You can use that", $4f
+    db "PC in the corner.", $51
+    db "The receptionist", $4f
+    db "told me. So kind!", $57
+
+_ViridianPokeCenterText3: ; 0x95be8
+    db $0, "There's a #MON", $4f
+    db "CENTER in every", $55
+    db "town ahead.", $51
+    db "They don't charge", $4f
+    db "any money either!", $57
+
+_ViridianMartText1: ; 0x95c36
+    db $0, "Okay! Say hi to", $4f
+    db "PROF.OAK for me!", $57
+
+INCBIN "baserom.gbc",$95c58,$95cd5 - $95c58
+
+_ViridianMartText2: ; 0x95cd5
+    db $0, "This shop sells", $4f
+    db "many ANTIDOTEs.", $57
+
+_ViridianMartText3: ; 0x95cf6
+    db $0, "No! POTIONs are", $4f
+    db "all sold out.", $57
+
+_SchoolText1: ; 0x95d15
+    db $0, "Whew! I'm trying", $4f
+    db "to memorize all", $55
+    db "my notes.", $57
+
+_SchoolText2: ; 0x95d40
+    db $0, "Okay!", $51
+    db "Be sure to read", $4f
+    db "the blackboard", $55
+    db "carefully!", $57
+
+_ViridianHouseText1: ; 0x95d71
+    db $0, "Coming up with", $4f
+    db "nicknames is fun,", $55
+    db "but hard.", $51
+    db "Simple names are", $4f
+    db "the easiest to", $55
+    db "remember.", $57
+
+_ViridianHouseText2: ; 0x95dc7
+    db $0, "My Daddy loves", $4f
+    db "#MON too.", $57
+
+INCBIN "baserom.gbc",$95de1,$95df3 - $95de1
+
+_ViridianHouseText4: ; 0x95df3
+    db $0, "SPEAROW", $4f
+    db "Name: SPEARY", $57
+
+INCBIN "baserom.gbc",$95e09,$96841 - $95e09
+
+_MuseumF2Text1: ; 0x96841
+    db $0, "MOON STONE?", $51
+    db "What's so special", $4f
+    db "about it?", $57
+
+_MuseumF2Text2: ; 0x96869
+    db $0, "July 20, 1969!", $51
+    db "The 1st lunar", $4f
+    db "landing!", $51
+    db "I bought a color", $4f
+    db "TV to watch it!", $57
+
+_MuseumF2Text3: ; 0x968b1
+    db $0, "We have a space", $4f
+    db "exhibit now.", $57
+
+_MuseumF2Text4: ; 0x968cf
+    db $0, "I want a PIKACHU!", $4f
+    db "It's so cute!", $51
+    db "I asked my Daddy", $4f
+    db "to catch me one!", $57
+
+_MuseumF2Text5: ; 0x96911
+    db $0, "Yeah, a PIKACHU", $4f
+    db "soon, I promise!", $57
+
+_MuseumF2Text6: ; 0x96933
+    db $0, "SPACE SHUTTLE", $4f
+    db "COLUMBIA", $57
+
+_MuseumF2Text7: ; 0x9694b
+    db $0, "Meteorite that", $4f
+    db "fell on MT.MOON.", $55
+    db "(MOON STONE?)", $57
+
+INCBIN "baserom.gbc",$9697a,$1686
+
+SECTION "bank26",DATA,BANK[$26]
+
+INCBIN "baserom.gbc",$98000,$984ce - $98000
+
+_PewterHouse1Text1: ; 0x984ce
+    db $0, "NIDORAN: Bowbow!@@"
+
+_PewterHouse1Text2: ; 0x984e1
+    db $0, "NIDORAN sit!", $57
+
+_PewterHouse1Text3: ; 0x984ef
+    db $0, "Our #MON's an", $4f
+    db "outsider, so it's", $55
+    db "hard to handle.", $51
+    db "An outsider is a", $4f
+    db "#MON that you", $55
+    db "get in a trade.", $51
+    db "It grows fast, but", $4f
+    db "it may ignore an", $55
+    db "unskilled trainer", $55
+    db "in battle!", $51
+    db "If only we had", $4f
+    db "some BADGEs...", $57
+
+INCBIN "baserom.gbc",$985ac,$98656 - $985ac
+
+_PewterHouse2Text1: ; 0x98656
+    db $0, "#MON learn new", $4f
+    db "techniques as", $55
+    db "they grow!", $51
+    db "But, some moves", $4f
+    db "must be taught by", $55
+    db "the trainer!", $57
+
+_PewterHouse2Text2: ; 0x986ae
+    db $0, "#MON become", $4f
+    db "easier to catch", $55
+    db "when they are", $55
+    db "hurt or asleep!", $51
+    db "But, it's not a", $4f
+    db "sure thing!", $57
+
+_PewterPokecenterText1: ; 0x98704
+    db $0, "What!?", $51
+    db "TEAM ROCKET is", $4f
+    db "at MT.MOON? Huh?", $55
+    db "I'm on the phone!", $51
+    db "Scram!", $57
+
+INCBIN "baserom.gbc",$98744,$98834 - $98744
+
+_CeruleanHouseTrashedText2: ; 0x98834
+    db $0, "TEAM ROCKET must", $4f
+    db "be trying to DIG", $55
+    db "their way into no", $55
+    db "good!", $57
+
+_CeruleanHouseTrashedText3: ; 0x9886f
+    db $0, "TEAM ROCKET left", $4f
+    db "a way out!", $57
+
+_CeruleanHouse2Text1: ; 0x9888c
+    db $0, "My husband likes", $4f
+    db "trading #MON.", $51
+    db "If you are a", $4f
+    db "collector, would", $55
+    db "you please trade", $55
+    db "with him?", $57
+
+_CeruleanPokecenterText1: ; 0x988e5
+    db $0, "That BILL!", $51
+    db "I heard that", $4f
+    db "he'll do whatever", $55
+    db "it takes to get", $55
+    db "rare #MON!", $57
+
+_CeruleanPokecenterText3: ; 0x9892a
+    db $0, "Have you heard", $4f
+    db "about BILL?", $51
+    db "Everyone calls", $4f
+    db "him a #MANIAC!", $51
+    db "I think people", $4f
+    db "are just jealous", $55
+    db "of BILL, though.", $51
+    db "Who wouldn't want", $4f
+    db "to boast about", $55
+    db "their #MON?", $57
+
+INCBIN "baserom.gbc",$989c1,$99012 - $989c1
+
+_CeruleanMartText2: ; 0x99012
+    db $0, "Use REPEL to keep", $4f
+    db "bugs and weak", $55
+    db "#MON away.", $51
+    db "Put your strongest", $4f
+    db "#MON at the", $55
+    db "top of the list", $55
+    db "for best results!", $57
+
+_CeruleanMartText3: ; 0x9907f
+    db $0, "Have you seen any", $4f
+    db "RARE CANDY?", $51
+    db "It's supposed to", $4f
+    db "make #MON go", $55
+    db "up one level!", $57
+
+INCBIN "baserom.gbc",$990c9,$9940e - $990c9
+
+_LavenderPokecenterText4:
+_LavenderPokecenterText2:
+_LavenderPokecenterText1: ; 0x9940e
+    db $0, "TEAM ROCKET will", $4f
+    db "do anything for", $55
+    db "the sake of gold!", $57
+
+_LavenderPokecenterText3: ; 0x99442
+    db $0, "I saw CUBONE's", $4f
+    db "mother die trying", $55
+    db "to escape from", $55
+    db "TEAM ROCKET!", $57
+
+_PokemonTower1Text1: ; 0x9947f
+    db $0, "#MON TOWER was", $4f
+    db "erected in the", $55
+    db "memory of #MON", $55
+    db "that had died.", $57
+
+_PokemonTower1Text2: ; 0x994bc
+    db $0, "Did you come to", $4f
+    db "pay respects?", $55
+    db "Bless you!", $57
+
+_PokemonTower1Text3: ; 0x994e6
+    db $0, "I came to pray", $4f
+    db "for my CLEFAIRY.", $51
+    db "Sniff! I can't", $4f
+    db "stop crying...", $57
+
+_PokemonTower1Text4: ; 0x99524
+    db $0, "My GROWLITHE...", $4f
+    db "Why did you die?", $57
+
+_PokemonTower1Text5: ; 0x99546
+    db $0, "I am a CHANNELER!", $4f
+    db "There are spirits", $55
+    db "up to mischief!", $57
+
+INCBIN "baserom.gbc",$9957b,$9971a - $9957b
+
+_PokemonTower2Text2: ; 0x9971a
+    db $0, "Even we could not", $4f
+    db "identify the", $55
+    db "wayward GHOSTs!", $51
+    db "A SILPH SCOPE", $4f
+    db "might be able to", $55
+    db "unmask them.", $57
+
+INCBIN "baserom.gbc",$99776,$99958 - $99776
+
+_PokemonTower5Text1: ; 0x99958
+    db $0, "Come, child! I", $4f
+    db "sealed this space", $55
+    db "with white magic!", $51
+    db "You can rest here!", $57
+
+INCBIN "baserom.gbc",$9999f,$99f72 - $9999f
+
+_LavenderHouse1Text3: ; 0x99f72
+    db $0, "PSYDUCK: Gwappa!@@"
+
+_LavenderHouse1Text4: ; 0x99f85
+    db $0, "NIDORINO: Gaoo!@@"
+
+INCBIN "baserom.gbc",$99f97,$9a0aa - $99f97
+
+_LavenderHouse1Text6: ; 0x9a0aa
+    db $0, "#MON Monthly", $4f
+    db "Grand Prize", $55
+    db "Drawing!", $51
+    db "The application", $4f
+    db "form is...", $51
+    db "Gone! It's been", $4f
+    db "clipped out!", $57
+
+_LavenderMartText2: ; 0x9a104
+    db $0, "I'm searching for", $4f
+    db "items that raise", $55
+    db "the abilities of", $55
+    db "#MON during a", $55
+    db "single battle.", $51
+    db "X ATTACK, X", $4f
+    db "DEFEND, X SPEED", $55
+    db "and X SPECIAL are", $55
+    db "what I'm after.", $51
+    db "Do you know where", $4f
+    db "I can get them?", $57
+
+INCBIN "baserom.gbc",$9a1b4,$9a238 - $9a1b4
+
+_LavenderHouse2Text1: ; 0x9a238
+    db $0, "CUBONE: Kyarugoo!@@"
+
+INCBIN "baserom.gbc",$9a24c,$266
+
+_VermilionPokecenterText2: ; 0x9a4b2
+_VermilionPokecenterText1: ; 0x9a4b2
+    db $0, "Even if they are", $4f
+    db "the same level,", $55
+    db "#MON can have", $55
+    db "very different", $55
+    db "abilities.", $51
+    db "A #MON raised", $4f
+    db "by a trainer is", $55
+    db "stronger than one", $55
+    db "in the wild.", $57
+
+_VermilionPokecenterText3: ; 0x9a539
+    db $0, "My #MON was", $4f
+    db "poisoned! It", $55
+    db "fainted while we", $55
+    db "were walking!", $57
+
+INCBIN "baserom.gbc",$9a572,$9a948 - $9a572
+
+_FanClubText6: ; 0x9a948
+    db $0, "Our Chairman is", $4f
+    db "very vocal about", $55
+    db "#MON.", $57
+
+_FanClubText7: ; 0x9a970
+    db $0, "Let's all listen", $4f
+    db "politely to other", $55
+    db "trainers!", $57
+
+_FanClubText8: ; 0x9a99d
+    db $0, "If someone brags,", $4f
+    db "brag right back!", $57
+
+_VermilionMartText2: ; 0x9a9c1
+    db $0, "There are evil", $4f
+    db "people who will", $55
+    db "use #MON for", $55
+    db "criminal acts.", $51
+    db "TEAM ROCKET", $4f
+    db "traffics in rare", $55
+    db "#MON.", $51
+    db "They also abandon", $4f
+    db "#MON that they", $55
+    db "consider not to", $55
+    db "be popular or", $55
+    db "useful.", $57
+
+_VermilionMartText3: ; 0x9aa67
+    db $0, "I think #MON", $4f
+    db "can be good or", $55
+    db "evil. It depends", $55
+    db "on the trainer.", $57
+
+INCBIN "baserom.gbc",$9aaa5,$155b
+
+SECTION "bank27",DATA,BANK[$27]
+INCBIN "baserom.gbc",$9c000,$9c449 - $9c000
+
+_VermilionHouse1Text1: ; 0x9c449
+    db $0, "I'm getting my", $4f
+    db "PIDGEY to fly a", $55
+    db "letter to SAFFRON", $55
+    db "in the north!", $57
+
+_VermilionHouse1Text2: ; 0x9c488
+    db $0, "PIDGEY: Kurukkoo!@@"
+
+_VermilionHouse1Text3: ; 0x9c49c
+    db $0, "Dear PIPPI, I hope", $4f
+    db "to see you soon.", $51
+    db "I heard SAFFRON", $4f
+    db "has problems with", $55
+    db "TEAM ROCKET.", $51
+    db "VERMILION appears", $4f
+    db "to be safe.", $57
+
+INCBIN "baserom.gbc",$9c50e,$9c672 - $9c50e
+
+_CeladonMart1Text1: ; 0x9c672
+    db $0, "Hello! Welcome to", $4f
+    db "CELADON DEPT.", $55
+    db "STORE.", $51
+    db "The board on the", $4f
+    db "right describes", $55
+    db "the store layout.", $57
+
+_CeladonMart1Text2: ; 0x9c6cd
+    db $0, "1F: SERVICE", $4f
+    db "    COUNTER", $51
+    db "2F: TRAINER'S", $4f
+    db "    MARKET", $51
+    db "3F: TV GAME SHOP", $51
+    db "4F: WISEMAN GIFTS", $51
+    db "5F: DRUG STORE", $51
+    db "ROOFTOP SQUARE:", $4f
+    db "VENDING MACHINES", $57
+
+_CeladonMart1Text3: ; 0x9c752
+    db $0, "1F: SERVICE", $4f
+    db "    COUNTER", $57
+
+_CeladonMart2Text3: ; 0x9c76b
+    db $0, "SUPER REPEL keeps", $4f
+    db "weak #MON at", $55
+    db "bay...", $51
+    db "Hmm, it's a more", $4f
+    db "powerful REPEL!", $57
+
+_CeladonMart2Text4: ; 0x9c7b2
+    db $0, "For long outings,", $4f
+    db "you should buy", $55
+    db "REVIVE.", $57
+
+_CeladonMart2Text5: ; 0x9c7dc
+    db $0, "Top Grade Items", $4f
+    db "for Trainers!", $51
+    db "2F: TRAINER'S", $4f
+    db "    MARKET", $57
+
+INCBIN "baserom.gbc",$9c814,$9c8c7 - $9c814
+
+_CeladonMart3Text2: ; 0x9c8c7
+    db $0, "Captured #MON", $4f
+    db "are registered", $55
+    db "with an ID No.", $55
+    db "and OT, the name", $55
+    db "of the Original", $55
+    db "Trainer that", $55
+    db "caught it!", $57
+
+_CeladonMart3Text3: ; 0x9c92d
+    db $0, "All right!", $51
+    db "My buddy's going", $4f
+    db "to trade me his", $55
+    db "KANGASKHAN for my", $55
+    db "GRAVELER!", $57
+
+_CeladonMart3Text4: ; 0x9c975
+    db $0, "Come on GRAVELER!", $51
+    db "I love GRAVELER!", $4f
+    db "I collect them!", $51
+    db "Huh?", $51
+    db "GRAVELER turned", $4f
+    db "into a different", $55
+    db "#MON!", $57
+
+_CeladonMart3Text5: ; 0x9c9d5
+    db $0, "You can identify", $4f
+    db "#MON you got", $55
+    db "in trades by", $55
+    db "their ID Numbers!", $57
+
+_CeladonMart3Text6: ; 0x9ca13
+    db $0, "It's an SNES!", $57
+
+_CeladonMart3Text7: ; 0x9ca21
+    db $0, "An RPG! There's", $4f
+    db "no time for that!", $57
+
+_CeladonMart3Text9: ; 0x9ca43
+    db $0, "A sports game!", $4f
+    db "Dad'll like that!", $57
+
+_CeladonMart3Text11: ; 0x9ca64
+    db $0, "A puzzle game!", $4f
+    db "Looks addictive!", $57
+
+_CeladonMart3Text13: ; 0x9ca85
+    db $0, "A fighting game!", $4f
+    db "Looks tough!", $57
+
+_CeladonMart3Text14: ; 0x9caa4
+    db $0, "3F: TV GAME SHOP", $57
+
+_CeladonMart3Text15: ; 0x9cab6
+    db $0, "Red and Blue!", $4f
+    db "Both are #MON!", $57
+
+_CeladonMart4Text2: ; 0x9cad4
+    db $0, "I'm getting a", $4f
+    db "# DOLL for my", $55
+    db "girl friend!", $57
+
+_CeladonMart4Text3: ; 0x9cafd
+    db $0, "I heard something", $4f
+    db "useful.", $51
+    db "You can run from", $4f
+    db "wild #MON by", $55
+    db "distracting them", $55
+    db "with a # DOLL!", $57
+
+_CeladonMart4Text4: ; 0x9cb56
+    db $0, "Express yourself", $4f
+    db "with gifts!", $51
+    db "4F: WISEMAN GIFTS", $51
+    db "Evolution Special!", $4f
+    db "Element STONEs on", $55
+    db "sale now!", $57
+
+INCBIN "baserom.gbc",$9cbb5,$9cd97 - $9cbb5
+
+_CeladonMartRoofText1: ; 0x9cd97
+    db $0, "My sister is a", $4f
+    db "trainer, believe", $55
+    db "it or not.", $51
+    db "But, she's so", $4f
+    db "immature, she", $55
+    db "drives me nuts!", $57
+
+INCBIN "baserom.gbc",$9cdee,$9ce50 - $9cdee
+
+_CeladonMartRoofText6: ; 0x9ce50
+    db $0, "ROOFTOP SQUARE:", $4f
+    db "VENDING MACHINES", $57
+
+INCBIN "baserom.gbc",$9ce72,$9ceee - $9ce72
+
+_CeladonMansion1Text1: ; 0x9ceee
+    db $0, "MEOWTH: Meow!@@"
+
+_CeladonMansion1Text2: ; 0x9cefe
+    db $0, "My dear #MON", $4f
+    db "keep me company.", $51
+    db "MEOWTH even brings", $4f
+    db "money home!", $57
+
+_CeladonMansion1Text3: ; 0x9cf3c
+    db $0, "CLEFAIRY: Pi", $4f
+    db "pippippi!@@"
+
+_CeladonMansion1Text4: ; 0x9cf55
+    db $0, "NIDORAN: Kya", $4f
+    db "kyaoo!@@"
+
+_CeladonMansion1Text5: ; 0x9cf6b
+    db $0, "CELADON MANSION", $4f
+    db "Manager's Suite", $57
+
+_CeladonMansion2Text1: ; 0x9cf8b
+    db $0, "GAME FREAK", $4f
+    db "Meeting Room", $57
+
+_CeladonMansion3Text1: ; 0x9cfa4
+    db $0, "Me? I'm the", $4f
+    db "programmer!", $57
+
+_CeladonMansion3Text2: ; 0x9cfbc
+    db $0, "I'm the graphic", $4f
+    db "artist!", $55
+    db "I drew you!", $57
+
+_CeladonMansion3Text3: ; 0x9cfe0
+    db $0, "I wrote the story!", $4f
+    db "Isn't ERIKA cute?", $51
+    db "I like MISTY a", $4f
+    db "lot too!", $51
+    db "Oh, and SABRINA,", $4f
+    db "I like her!", $57
+
+INCBIN "baserom.gbc",$9d03a,$9d0ed - $9d03a
+
+_CeladonMansion3Text5: ; 0x9d0ed
+    db $0, "It's the game", $4f
+    db "program! Messing", $55
+    db "with it could bug", $55
+    db "out the game!", $57
+
+_CeladonMansion3Text6: ; 0x9d12c
+    db $0, "Someone's playing", $4f
+    db "a game instead of", $55
+    db "working!", $57
+
+_CeladonMansion3Text7: ; 0x9d159
+    db $0, "It's the script!", $4f
+    db "Better not look", $55
+    db "at the ending!", $57
+
+_CeladonMansion3Text8: ; 0x9d189
+    db $0, "GAME FREAK", $4f
+    db "Development Room", $57
+
+_CeladonMansion4Text1: ; 0x9d1a6
+    db $0, "I KNOW EVERYTHING!", $57
+
+_CeladonMansion5Text1: ; 0x9d1ba
+    db $0, "I know everything", $4f
+    db "about the world", $55
+    db "of #MON in", $55
+    db "your GAME BOY!", $51
+    db "Get together with", $4f
+    db "your friends and", $55
+    db "trade #MON!", $57
+
+_CeladonPokecenterText1: ; 0x9d226
+    db $0, "# FLUTE awakens", $4f
+    db "#MON with a", $55
+    db "sound that only", $55
+    db "they can hear!", $57
+
+_CeladonPokecenterText3: ; 0x9d262
+    db $0, "I rode uphill on", $4f
+    db "CYCLING ROAD from", $55
+    db "FUCHSIA!", $57
+
+INCBIN "baserom.gbc",$9d28f,$9d8d5 - $9d28f
+
+_CeladonGameCornerText1: ; 0x9d8d5
+    db $0, "Welcome!", $51
+    db "You can exchange", $4f
+    db "your coins for", $55
+    db "fabulous prizes", $55
+    db "next door.", $57
+
+INCBIN "baserom.gbc",$9d91a,$9da1c - $9d91a
+
+_CeladonGameCornerText3: ; 0x9da1c
+    db $0, "Keep this quiet.", $51
+    db "It's rumored that", $4f
+    db "this place is run", $55
+    db "by TEAM ROCKET.", $57
+
+_CeladonGameCornerText4: ; 0x9da61
+    db $0, "I think these", $4f
+    db "machines have", $55
+    db "different odds.", $57
+
+INCBIN "baserom.gbc",$9da8e,$9daf4 - $9da8e
+
+_CeladonGameCornerText6: ; 0x9daf4
+    db $0, "I'm having a", $4f
+    db "wonderful time!", $57
+
+INCBIN "baserom.gbc",$9db11,$9dc06 - $9db11
+
+_CeladonGameCornerText8: ; 0x9dc06
+    db $0, "Games are scary!", $4f
+    db "It's so easy to", $55
+    db "get hooked!", $57
+
+INCBIN "baserom.gbc",$9dc33,$9ddff - $9dc33
+
+_CeladonMart5Text1: ; 0x9ddff
+    db $0, "#MON ability", $4f
+    db "enhancers can be", $55
+    db "bought only here.", $51
+    db "Use CALCIUM to", $4f
+    db "increase SPECIAL", $55
+    db "abilities.", $51
+    db "Use CARBOS to", $4f
+    db "increase SPEED.", $57
+
+_CeladonMart5Text2: ; 0x9de79
+    db $0, "I'm here for", $4f
+    db "#MON ability", $55
+    db "enhancers.", $51
+    db "PROTEIN increases", $4f
+    db "ATTACK power.", $51
+    db "IRON increases", $4f
+    db "DEFENSE!", $57
+
+_CeladonMart5Text5: ; 0x9ded6
+    db $0, "5F: DRUG STORE", $57
+
+_CeladonPrizeRoomText1: ; 0x9dee6
+    db $0, "I sure do fancy", $4f
+    db "that PORYGON!", $51
+    db "But, it's hard to", $4f
+    db "win at slots!", $57
+
+_CeladonPrizeRoomText2: ; 0x9df24
+    db $0, "I had a major", $4f
+    db "haul today!", $57
+
+_CeladonDinerText1: ; 0x9df3f
+    db $0, "Hi!", $51
+    db "We're taking a", $4f
+    db "break now.", $57
+
+_CeladonDinerText2: ; 0x9df5d
+    db $0, "My #MON are", $4f
+    db "weak, so I often", $55
+    db "have to go to the", $55
+    db "DRUG STORE.", $57
+
+_CeladonDinerText3: ; 0x9df99
+    db $0, "Psst! There's a", $4f
+    db "basement under", $55
+    db "the GAME CORNER.", $57
+
+_CeladonDinerText4: ; 0x9dfc9
+    db $0, "Munch...", $51
+    db "The man at that", $4f
+    db "table lost it all", $55
+    db "at the slots.", $57
+
+INCBIN "baserom.gbc",$9e003,$9e0d5 - $9e003
+
+_CeladonHouseText1: ; 0x9e0d5
+    db $0, "Hehehe! The slots", $4f
+    db "just reel in the", $55
+    db "dough, big time!", $57
+
+_CeladonHouseText2: ; 0x9e10a
+    db $0, "CHIEF!", $51
+    db "We just shipped", $4f
+    db "2000 #MON as", $55
+    db "slot prizes!", $57
+
+_CeladonHouseText3: ; 0x9e13c
+    db $0, "Don't touch the", $4f
+    db "poster at the", $55
+    db "GAME CORNER!", $51
+    db "There's no secret", $4f
+    db "switch behind it!", $57
+
+_CeladonHotelText1: ; 0x9e18a
+    db $0, "#MON? No, this", $4f
+    db "is a hotel for", $55
+    db "people.", $51
+    db "We're full up.", $57
+
+_CeladonHotelText2: ; 0x9e1bf
+    db $0, "I'm on vacation", $4f
+    db "with my brother", $55
+    db "and boy friend.", $51
+    db "CELADON is such a", $4f
+    db "pretty city!", $57
+
+_CeladonHotelText3: ; 0x9e20e
+    db $0, "Why did she bring", $4f
+    db "her brother?", $57
+
+_FuchsiaMartText2: ; 0x9e22e
+    db $0, "Do you have a", $4f
+    db "SAFARI ZONE flag?", $51
+    db "What about cards", $4f
+    db "or calendars?", $57
+
+_FuchsiaMartText3: ; 0x9e26e
+    db $0, "Did you try X", $4f
+    db "SPEED? It speeds", $55
+    db "up a #MON in", $55
+    db "battle!", $57
+
+_FuchsiaHouse1Text1: ; 0x9e2a3
+    db $0, "SAFARI ZONE's", $4f
+    db "WARDEN is old,", $55
+    db "but still active!", $51
+    db "All his teeth are", $4f
+    db "false, though.", $57
+
+_FuchsiaHouse1Text2: ; 0x9e2f3
+    db $0, "Hmm? You've met", $4f
+    db "BILL?", $51
+    db "He's my grandson!", $51
+    db "He always liked", $4f
+    db "collecting things", $55
+    db "even as a child!", $57
+
+_FuchsiaHouse1Text3: ; 0x9e34d
+    db $0, "BILL files his", $4f
+    db "own #MON data", $55
+    db "on his PC!", $51
+    db "Did he show you?", $57
+
+_FuchsiaPokecenterText1: ; 0x9e387
+    db $0, "You can't win", $4f
+    db "with just one", $55
+    db "strong #MON.", $51
+    db "It's tough, but", $4f
+    db "you have to raise", $55
+    db "them evenly.", $57
+
+_FuchsiaPokecenterText3: ; 0x9e3de
+    db $0, "There's a narrow", $4f
+    db "trail west of", $55
+    db "VIRIDIAN CITY.", $51
+    db "It goes to #MON", $4f
+    db "LEAGUE HQ.", $55
+    db "The HQ governs", $55
+    db "all trainers.", $57
+
+INCBIN "baserom.gbc",$9e444,$9e6c7 - $9e444
+
+_SafariZoneEntranceText1: ; 0x9e6c7
+    db $0, "Welcome to the", $4f
+    db "SAFARI ZONE!", $57
+
+INCBIN "baserom.gbc",$9e6e4,$191c
+
+SECTION "bank28",DATA,BANK[$28]
+
+INCBIN "baserom.gbc",$a0000,$a05a1 - $a0000
+
+_FuchsiaMeetingRoomText1: ; 0xa05a1
+    db $0, "We nicknamed the", $4f
+    db "WARDEN SLOWPOKE.", $51
+    db "He and SLOWPOKE", $4f
+    db "both look vacant!", $57
+
+_FuchsiaMeetingRoomText2: ; 0xa05e6
+    db $0, "SLOWPOKE is very", $4f
+    db "knowledgeable", $55
+    db "about #MON!", $51
+    db "He even has some", $4f
+    db "fossils of rare,", $55
+    db "extinct #MON!", $57
+
+_FuchsiaMeetingRoomText3: ; 0xa0642
+    db $0, "SLOWPOKE came in,", $4f
+    db "but I couldn't", $55
+    db "understand him.", $51
+    db "I think he's got", $4f
+    db "a speech problem!", $57
+
+INCBIN "baserom.gbc",$a0695,$a0df7 - $a0695
+
+_Lab1Text1: ; 0xa0df7
+    db $0, "We study #MON", $4f
+    db "extensively here.", $51
+    db "People often bring", $4f
+    db "us rare #MON", $55
+    db "for examination.", $57
+
+_Lab1Text2: ; 0xa0e49
+    db $0, "A photo of the", $4f
+    db "LAB's founder,", $55
+    db "DR.FUJI!", $57
+
+_Lab1Text3: ; 0xa0e70
+    db $0, "#MON LAB", $4f
+    db "Meeting Room", $57
+
+_Lab1Text4: ; 0xa0e87
+    db $0, "#MON LAB", $4f
+    db "R-and-D Room", $57
+
+_Lab1Text5: ; 0xa0e9e
+    db $0, "#MON LAB", $4f
+    db "Testing Room", $57
+
+_Lab2Text1: ; 0xa0eb5
+    db $0, "I found this very", $4f
+    db "strange fossil in", $55
+    db "MT.MOON!", $51
+    db "I think it's a", $4f
+    db "rare, prehistoric", $55
+    db "#MON!", $57
+
+INCBIN "baserom.gbc",$a0f09,$a0fe3 - $a0f09
+
+_Lab3Text2: ; 0xa0fe3
+    db $0, "EEVEE can evolve", $4f
+    db "into 1 of 3 kinds", $55
+    db "of #MON.", $57
+
+_Lab3Text3: ; 0xa1010
+    db $0, "There's an e-mail", $4f
+    db "message!", $51
+    db "...", $51
+    db "The 3 legendary", $4f
+    db "bird #MON are", $55
+    db "ARTICUNO, ZAPDOS", $55
+    db "and MOLTRES.", $51
+    db "Their whereabouts", $4f
+    db "are unknown.", $51
+    db "We plan to explore", $4f
+    db "the cavern close", $55
+    db "to CERULEAN.", $51
+    db "From: #MON", $4f
+    db "RESEARCH TEAM", $51
+    db "...", $57
+
+_Lab3Text5: ; 0xa10d8
+    db $0, "An amber pipe!", $57
+
+INCBIN "baserom.gbc",$a10e8,$a12de - $a10e8
+
+_CinnabarPokecenterText2:
+_CinnabarPokecenterText1: ; 0xa12de
+    db $0, "You can cancel", $4f
+    db "evolution.", $51
+    db "When a #MON is", $4f
+    db "evolving, you can", $55
+    db "stop it and leave", $55
+    db "it the way it is.", $57
+
+_CinnabarPokecenterText3: ; 0xa133e
+    db $0, "Do you have any", $4f
+    db "friends?", $51
+    db "#MON you get", $4f
+    db "in trades grow", $55
+    db "very quickly.", $51
+    db "I think it's", $4f
+    db "worth a try!", $57
+
+_CinnabarMartText2: ; 0xa139b
+    db $0, "Don't they have X", $4f
+    db "ATTACK? It's good", $55
+    db "for battles!", $57
+
+_CinnabarMartText3: ; 0xa13cb
+    db $0, "It never hurts to", $4f
+    db "have extra items!", $57
+
+_IndigoPlateauLobbyText1: ; 0xa13f0
+    db $0, "Yo! Champ in", $4f
+    db "making!", $51
+    db "At #MON LEAGUE,", $4f
+    db "you have to face", $55
+    db "the ELITE FOUR in", $55
+    db "succession.", $51
+    db "If you lose, you", $4f
+    db "have to start all", $55
+    db "over again! This", $55
+    db "is it! Go for it!", $57
+
+_IndigoPlateauLobbyText3: ; 0xa148b
+    db $0, "From here on, you", $4f
+    db "face the ELITE", $55
+    db "FOUR one by one!", $51
+    db "If you win, a", $4f
+    db "door opens to the", $55
+    db "next trainer!", $55
+    db "Good luck!", $57
+
+_CopycatsHouseF1Text1: ; 0xa14f7
+    db $0, "My daughter is so", $4f
+    db "self-centered.", $55
+    db "She only has a", $55
+    db "few friends.", $57
+
+_CopycatsHouseF1Text2: ; 0xa1535
+    db $0, "My daughter likes", $4f
+    db "to mimic people.", $51
+    db "Her mimicry has", $4f
+    db "earned her the", $55
+    db "nickname COPYCAT", $55
+    db "around here!", $57
+
+_CopycatsHouseF1Text3: ; 0xa1596
+    db $0, "CHANSEY: Chaan!", $4f
+    db "Sii!@@"
+
+INCBIN "baserom.gbc",$a15ad,$a1749 - $a15ad
+
+_CopycatsHouseF2Text2: ; 0xa1749
+    db $0, "DODUO: Giiih!", $51
+    db "MIRROR MIRROR ON", $4f
+    db "THE WALL, WHO IS", $55
+    db "THE FAIREST ONE", $55
+    db "OF ALL?", $57
+
+_CopycatsHouseF2Text3: ; 0xa1792
+    db $0, "This is a rare", $4f
+    db "#MON! Huh?", $55
+    db "It's only a doll!", $57
+
+_CopycatsHouseF2Text6: ; 0xa17be
+    db $0, "A game with MARIO", $4f
+    db "wearing a bucket", $55
+    db "on his head!", $57
+
+INCBIN "baserom.gbc",$a17ef,$a2305 - $a17ef
+
+_SaffronHouse1Text1: ; 0xa2305
+    db $0, "Thank you for", $4f
+    db "writing. I hope", $55
+    db "to see you soon!", $51
+    db "Hey! Don't look", $4f
+    db "at my letter!", $57
+
+_SaffronHouse1Text2: ; 0xa2352
+    db $0, "PIDGEY: Kurukkoo!@@"
+
+_SaffronHouse1Text3: ; 0xa2366
+    db $0, "The COPYCAT is", $4f
+    db "cute! I'm getting", $55
+    db "her a # DOLL!", $57
+
+_SaffronHouse1Text4: ; 0xa2395
+    db $0, "I was given a PP", $4f
+    db "UP as a gift.", $51
+    db "It's used for", $4f
+    db "increasing the PP", $55
+    db "of techniques!", $57
+
+_SaffronMartText2: ; 0xa23e3
+    db $0, "MAX REPEL lasts", $4f
+    db "longer than SUPER", $55
+    db "REPEL for keeping", $55
+    db "weaker #MON", $55
+    db "away!", $57
+
+_SaffronMartText3: ; 0xa242a
+    db $0, "REVIVE is costly,", $4f
+    db "but it revives", $55
+    db "fainted #MON!", $57
+
+_SilphCo1Text1: ; 0xa245a
+    db $0, "Welcome!", $51
+    db "The PRESIDENT is", $4f
+    db "in the boardroom", $55
+    db "on 11F!", $57
+
+_SaffronPokecenterText1: ; 0xa248e
+    db $0, "#MON growth", $4f
+    db "rates differ from", $55
+    db "specie to specie.", $57
+
+_SaffronPokecenterText3: ; 0xa24bf
+    db $0, "SILPH CO. is very", $4f
+    db "famous. That's", $55
+    db "why it attracted", $55
+    db "TEAM ROCKET!", $57
+
+INCBIN "baserom.gbc",$a24fe,$1b02
+
+SECTION "bank29",DATA,BANK[$29]
+
+INCBIN "baserom.gbc",$A4000,$245
+
+INCLUDE "text/mapPalletTown.tx"
+
+_ViridianCityText1:
+    db $0, "Those # BALLs", $4f
+    db "at your waist!", $55
+    db "You have #MON!", $51
+    db "It's great that", $4f
+    db "you can carry and", $55
+    db "use #MON any", $55
+    db "time, anywhere!", $57
+
+INCBIN "baserom.gbc",$a4437,$a4833 - $a4437
+
+_ViridianCityText8: ; 0xa4833
+    db $0, "VIRIDIAN CITY ", $4f
+    db "The Eternally", $55
+    db "Green Paradise", $57
+
+_ViridianCityText9: ; 0xa4860
+    db $0, "TRAINER TIPS", $51
+    db "Catch #MON", $4f
+    db "and expand your", $55
+    db "collection!", $51
+    db "The more you have,", $4f
+    db "the easier it is", $55
+    db "to fight!", $57
+
+_ViridianCityText10: ; 0xa48c3
+    db $0, "TRAINER TIPS", $51
+    db "The battle moves", $4f
+    db "of #MON are", $55
+    db "limited by their", $55
+    db "POWER POINTs, PP.", $51
+    db "To replenish PP,", $4f
+    db "rest your tired", $55
+    db "#MON at a", $55
+    db "#MON CENTER!", $57
+
+_ViridianCityText13: ; 0xa4949
+    db $0, "VIRIDIAN CITY", $4f
+    db "#MON GYM", $57
+
+INCBIN "baserom.gbc",$a4961,$a497f - $a4961
+
+_PewterCityText1: ; 0xa497f
+    db $0, "It's rumored that", $4f
+    db "CLEFAIRYs came", $55
+    db "from the moon!", $51
+    db "They appeared ", $4f
+    db "after MOON STONE", $55
+    db "fell on MT.MOON.", $57
+
+_PewterCityText2: ; 0xa49e0
+    db $0, "There aren't many", $4f
+    db "serious #MON", $55
+    db "trainers here!", $51
+    db "They're all like", $4f
+    db "BUG CATCHERs,", $55
+    db "but PEWTER GYM's", $55
+    db "BROCK is totally", $55
+    db "into it!", $57
+
+INCBIN "baserom.gbc",$a4a56,$a4bfe - $a4a56
+
+_PewterCityText6: ; 0xa4bfe
+    db $0, "TRAINER TIPS", $51
+    db "Any #MON that", $4f
+    db "takes part in", $55
+    db "battle, however", $55
+    db "short, earns EXP!", $57
+
+_PewterCityText7: ; 0xa4c4a
+    db $0, "NOTICE!", $51
+    db "Thieves have been", $4f
+    db "stealing #MON", $55
+    db "fossils at MT.", $55
+    db "MOON! Please call", $55
+    db "PEWTER POLICE", $55
+    db "with any info!", $57
+
+_PewterCityText10: ; 0xa4cb1
+    db $0, "PEWTER MUSEUM", $4f
+    db "OF SCIENCE", $57
+
+_PewterCityText11: ; 0xa4ccb
+    db $0, "PEWTER CITY", $4f
+    db "#MON GYM", $55
+    db "LEADER: BROCK", $51
+    db "The Rock Solid", $4f
+    db "#MON Trainer!", $57
+
+_PewterCityText12: ; 0xa4d0c
+    db $0, "PEWTER CITY", $4f
+    db "A Stone Gray", $55
+    db "City", $57
+
+INCBIN "baserom.gbc",$a4d2b,$a5030 - $a4d2b
+
+_CeruleanCityText3: ; 0xa5030
+    db $0, "You're a trainer", $4f
+    db "too? Collecting,", $55
+    db "fighting, it's a", $55
+    db "tough life.", $57
+
+_CeruleanCityText4: ; 0xa506e
+    db $0, "That bush in", $4f
+    db "front of the shop", $55
+    db "is in the way.", $51
+    db "There might be a", $4f
+    db "way around.", $57
+
+_CeruleanCityText5: ; 0xa50ba
+    db $0, "You're making an", $4f
+    db "encyclopedia on", $55
+    db "#MON? That", $55
+    db "sounds amusing.", $57
+
+_CeruleanCityText6: ; 0xa50f6
+    db $0, "The people here", $4f
+    db "were robbed.", $51
+    db "It's obvious that", $4f
+    db "TEAM ROCKET is", $55
+    db "behind this most", $55
+    db "heinous crime!", $51
+    db "Even our POLICE", $4f
+    db "force has trouble", $55
+    db "with the ROCKETs!", $57
+
+INCBIN "baserom.gbc",$a5188,$a52d6 - $a5188
+
+_CeruleanCityText9: ; 0xa52d6
+    db $0, "I want a bright", $4f
+    db "red BICYCLE!", $51
+    db "I'll keep it at", $4f
+    db "home, so it won't", $55
+    db "get dirty!", $57
+
+_CeruleanCityText10: ; 0xa531f
+    db $0, "This is CERULEAN", $4f
+    db "CAVE! Horribly", $55
+    db "strong #MON", $55
+    db "live in there!", $51
+    db "The #MON LEAGUE", $4f
+    db "champion is the", $55
+    db "only person who", $55
+    db "is allowed in!", $57
+
+_CeruleanCityText12: ; 0xa539a
+    db $0, "CERULEAN CITY", $4f
+    db "A Mysterious,", $55
+    db "Blue Aura", $55
+    db "Surrounds It", $57
+
+_CeruleanCityText13: ; 0xa53ce
+    db $0, "TRAINER TIPS", $51
+    db "Pressing B Button", $4f
+    db "during evolution", $55
+    db "cancels the whole", $55
+    db "process.", $57
+
+_CeruleanCityText16: ; 0xa541a
+    db $0, "Grass and caves", $4f
+    db "handled easily!", $55
+    db "BIKE SHOP", $57
+
+_CeruleanCityText17: ; 0xa5445
+    db $0, "CERULEAN CITY", $4f
+    db "#MON GYM", $55
+    db "LEADER: MISTY", $51
+    db "The Tomboyish", $4f
+    db "Mermaid!", $57
+
+INCBIN "baserom.gbc",$a5482,$a5506 - $a5482
+
+_LavenderTownText2: ; 0xa5506
+    db $0, "This town is known", $4f
+    db "as the grave site", $55
+    db "of #MON.", $51
+    db "Memorial services", $4f
+    db "are held in", $55
+    db "#MON TOWER.", $57
+
+_LavenderTownText3: ; 0xa555f
+    db $0, "GHOSTs appeared", $4f
+    db "in #MON TOWER.", $51
+    db "I think they're", $4f
+    db "the spirits of", $55
+    db "#MON that the", $55
+    db "ROCKETs killed.", $57
+
+_LavenderTownText4: ; 0xa55bb
+    db $0, "LAVENDER TOWN", $4f
+    db "The Noble Purple", $55
+    db "Town", $57
+
+_LavenderTownText5: ; 0xa55e0
+    db $0, "New SILPH SCOPE!", $51
+    db "Make the Invisible", $4f
+    db "Plain to See!", $51
+    db "SILPH CO.", $57
+
+_LavenderTownText8: ; 0xa561d
+    db $0, "LAVENDER VOLUNTEER", $4f
+    db "#MON HOUSE", $57
+
+_LavenderTownText9: ; 0xa563c
+    db $0, "May the Souls of", $4f
+    db "#MON Rest Easy", $55
+    db "#MON TOWER", $57
+
+_VermilionCityText1: ; 0xa5668
+    db $0, "We're careful", $4f
+    db "about pollution!", $51
+    db "We've heard GRIMER", $4f
+    db "multiplies in", $55
+    db "toxic sludge!", $57
+
+INCBIN "baserom.gbc",$a56b5,$a5805 - $a56b5
+
+_VermilionCityText4: ; 0xa5805
+    db $0, "I'm putting up a", $4f
+    db "building on this", $55
+    db "plot of land.", $51
+    db "My #MON is", $4f
+    db "tamping the land.", $57
+
+_VermilionCityText5: ; 0xa5852
+    db $0, "MACHOP: Guoh!", $4f
+    db "Gogogoh!@@"
+
+INCBIN "baserom.gbc",$a586b,$a5891 - $a586b
+
+_VermilionCityText6: ; 0xa5891
+    db $0, "S.S.ANNE is a", $4f
+    db "famous luxury", $55
+    db "cruise ship.", $51
+    db "We visit VERMILION", $4f
+    db "once a year.", $57
+
+_VermilionCityText7: ; 0xa58db
+    db $0, "VERMILION CITY", $4f
+    db "The Port of", $55
+    db "Exquisite Sunsets", $57
+
+_VermilionCityText8: ; 0xa5909
+    db $0, "NOTICE!", $51
+    db "ROUTE 12 may be", $4f
+    db "blocked off by a", $55
+    db "sleeping #MON.", $51
+    db "Detour through", $4f
+    db "ROCK TUNNEL to", $55
+    db "LAVENDER TOWN.", $51
+    db "VERMILION POLICE", $57
+
+_VermilionCityText11: ; 0xa5980
+    db $0, "#MON FAN CLUB", $4f
+    db "All #MON fans", $55
+    db "welcome!", $57
+
+_VermilionCityText12: ; 0xa59a6
+    db $0, "VERMILION CITY", $4f
+    db "#MON GYM", $55
+    db "LEADER: LT.SURGE", $51
+    db "The Lightning ", $4f
+    db "American!", $57
+
+_VermilionCityText13: ; 0xa59e9
+    db $0, "VERMILION HARBOR", $57
+
+_CeladonCityText1: ; 0xa59fb
+    db $0, "I got my KOFFING", $4f
+    db "in CINNABAR!", $51
+    db "It's nice, but it", $4f
+    db "breathes poison", $55
+    db "when it's angry!", $57
+
+_CeladonCityText2: ; 0xa5a4b
+    db $0, "Heheh! This GYM", $4f
+    db "is great! It's", $55
+    db "full of women!", $57
+
+_CeladonCityText3: ; 0xa5a79
+    db $0, "The GAME CORNER", $4f
+    db "is bad for our", $55
+    db "city's image!", $57
+
+_CeladonCityText4: ; 0xa5aa6
+    db $0, "Moan! I blew it", $4f
+    db "all at the slots!", $51
+    db "I knew I should", $4f
+    db "have cashed in my", $55
+    db "coins for prizes!", $57
+
+INCBIN "baserom.gbc",$a5afd,$a5bd9 - $a5afd
+
+_CeladonCityText6: ; 0xa5bd9
+    db $0, "This is my trusted", $4f
+    db "pal, POLIWRATH!", $51
+    db "It evolved from", $4f
+    db "POLIWHIRL when I", $55
+    db "used WATER STONE!", $57
+
+_CeladonCityText7: ; 0xa5c30
+    db $0, "POLIWRATH: Ribi", $4f
+    db "ribit!@@"
+
+_CeladonCityText8: ; 0xa5c49
+    db $0, "What are you", $4f
+    db "staring at?", $57
+
+_CeladonCityText9: ; 0xa5c63
+    db $0, "Keep out of TEAM", $4f
+    db "ROCKET's way!", $57
+
+_CeladonCityText10: ; 0xa5c82
+    db $0, "TRAINER TIPS", $51
+    db "X ACCURACY boosts", $4f
+    db "the accuracy of", $55
+    db "techniques!", $51
+    db "DIRE HIT jacks up", $4f
+    db "the likelihood of", $55
+    db "critical hits!", $51
+    db "Get your items at", $4f
+    db "CELADON DEPT.", $55
+    db "STORE!", $57
+
+_CeladonCityText11: ; 0xa5d18
+    db $0, "CELADON CITY", $4f
+    db "The City of", $55
+    db "Rainbow Dreams", $57
+
+_CeladonCityText13: ; 0xa5d41
+    db $0, "CELADON CITY", $4f
+    db "#MON GYM", $55
+    db "LEADER: ERIKA", $51
+    db "The Nature Loving", $4f
+    db "Princess!", $57
+
+_CeladonCityText14: ; 0xa5d82
+    db $0, "CELADON MANSION", $57
+
+_CeladonCityText15: ; 0xa5d93
+    db $0, "Find what you", $4f
+    db "need at CELADON", $55
+    db "DEPT. STORE!", $57
+
+_CeladonCityText16: ; 0xa5dbf
+    db $0, "TRAINER TIPS", $51
+    db "GUARD SPEC.", $4f
+    db "protects #MON", $55
+    db "against SPECIAL", $55
+    db "attacks such as", $55
+    db "fire and water!", $51
+    db "Get your items at", $4f
+    db "CELADON DEPT.", $55
+    db "STORE!", $57
+
+_CeladonCityText17: ; 0xa5e3e
+    db $0, "Coins exchanged", $4f
+    db "for prizes!", $55
+    db "PRIZE EXCHANGE", $57
+
+_CeladonCityText18: ; 0xa5e6a
+    db $0, "ROCKET GAME CORNER", $4f
+    db "The playground", $55
+    db "for grown-ups!", $57
+
+_FuchsiaCityText1: ; 0xa5e9c
+    db $0, "Did you try the", $4f
+    db "SAFARI GAME? Some", $55
+    db "#MON can only", $55
+    db "be caught there.", $57
+
+_FuchsiaCityText2: ; 0xa5ede
+    db $0, "SAFARI ZONE has a", $4f
+    db "zoo in front of", $55
+    db "the entrance.", $51
+    db "Out back is the", $4f
+    db "SAFARI GAME for", $55
+    db "catching #MON.", $57
+
+_FuchsiaCityText3: ; 0xa5f3e
+    db $0, "ERIK: Where's", $4f
+    db "SARA? I said I'd", $55
+    db "meet her here.", $57
+
+_FuchsiaCityText4: ; 0xa5f6b
+    db $0, "That item ball in", $4f
+    db "there is really a", $55
+    db "#MON.", $57
+
+_FuchsiaCityText5: ; 0xa5f96
+    db $0, "!", $57
+
+_FuchsiaCityText11: ; 0xa5f99
+    db $0, "FUCHSIA CITY", $4f
+    db "Behold! It's", $55
+    db "Passion Pink!", $57
+
+_FuchsiaCityText13: ; 0xa5fc1
+    db $0, "SAFARI GAME", $4f
+    db "#MON-U-CATCH!", $57
+
+_FuchsiaCityText16: ; 0xa5fdc
+    db $0, "SAFARI ZONE", $4f
+    db "WARDEN's HOME", $57
+
+_FuchsiaCityText17: ; 0xa5ff6
+    db $0, "#MON PARADISE", $4f
+    db "SAFARI ZONE", $57
+
+_FuchsiaCityText18: ; 0xa6011
+    db $0, "FUCHSIA CITY", $4f
+    db "#MON GYM", $55
+    db "LEADER: KOGA", $51
+    db "The Poisonous", $4f
+    db "Ninja Master", $57
+
+INCBIN "baserom.gbc",$a6050,$a61e6 - $a6050
+
+_CinnabarIslandText1: ; 0xa61e6
+    db $0, "CINNABAR GYM's", $4f
+    db "BLAINE is an odd", $55
+    db "man who has lived", $55
+    db "here for decades.", $57
+
+_CinnabarIslandText2: ; 0xa622a
+    db $0, "Scientists conduct", $4f
+    db "experiments in", $55
+    db "the burned out", $55
+    db "building.", $57
+
+_CinnabarIslandText3: ; 0xa6266
+    db $0, "CINNABAR ISLAND", $4f
+    db "The Fiery Town of", $55
+    db "Burning Desire", $57
+
+_CinnabarIslandText6: ; 0xa6298
+    db $0, "#MON LAB", $57
+
+_CinnabarIslandText7: ; 0xa62a2
+    db $0, "CINNABAR ISLAND", $4f
+    db "#MON GYM", $55
+    db "LEADER: BLAINE", $51
+    db "The Hot-Headed", $4f
+    db "Quiz Master!", $57
+
+_SaffronCityText1: ; 0xa62e7
+    db $0, "What do you want?", $4f
+    db "Get lost!", $57
+
+_SaffronCityText2: ; 0xa6304
+    db $0, "BOSS said he'll", $4f
+    db "take this town!", $57
+
+_SaffronCityText3: ; 0xa6324
+    db $0, "Get out of the", $4f
+    db "way!", $57
+
+_SaffronCityText4: ; 0xa6339
+    db $0, "SAFFRON belongs", $4f
+    db "to TEAM ROCKET!", $57
+
+_SaffronCityText5: ; 0xa635a
+    db $0, "Being evil makes", $4f
+    db "me feel so alive!", $57
+
+_SaffronCityText6: ; 0xa637e
+    db $0, "Ow! Watch where", $4f
+    db "you're walking!", $57
+
+_SaffronCityText7: ; 0xa639e
+    db $0, "With SILPH under", $4f
+    db "control, we can", $55
+    db "exploit #MON", $55
+    db "around the world!", $57
+
+_SaffronCityText8: ; 0xa63df
+    db $0, "You beat TEAM", $4f
+    db "ROCKET all alone?", $55
+    db "That's amazing!", $57
+
+_SaffronCityText9: ; 0xa640f
+    db $0, "Yeah! TEAM ROCKET", $4f
+    db "is gone!", $55
+    db "It's safe to go", $55
+    db "out again!", $57
+
+_SaffronCityText10: ; 0xa6445
+    db $0, "People should be", $4f
+    db "flocking back to", $55
+    db "SAFFRON now.", $57
+
+_SaffronCityText11: ; 0xa6475
+    db $0, "I flew here on my", $4f
+    db "PIDGEOT when I", $55
+    db "read about SILPH.", $51
+    db "It's already over?", $4f
+    db "I missed the", $55
+    db "media action.", $57
+
+_SaffronCityText12: ; 0xa64d6
+    db $0, "PIDGEOT: Bi bibii!@@"
+
+_SaffronCityText13: ; 0xa64eb
+    db $0, "I saw ROCKET", $4f
+    db "BOSS escaping", $55
+    db "SILPH's building.", $57
+
+_SaffronCityText14: ; 0xa6518
+    db $0, "I'm a security", $4f
+    db "guard.", $51
+    db "Suspicious kids I", $4f
+    db "don't allow in!", $57
+
+_SaffronCityText15: ; 0xa654f
+    db $0, "...", $4f
+    db "Snore...", $51
+    db "Hah! He's taking", $4f
+    db "a snooze!", $57
+
+_SaffronCityText16: ; 0xa6577
+    db $0, "SAFFRON CITY", $4f
+    db "Shining, Golden", $55
+    db "Land of Commerce", $57
+
+_SaffronCityText17: ; 0xa65a6
+    db $0, "FIGHTING DOJO", $57
+
+_SaffronCityText18: ; 0xa65b5
+    db $0, "SAFFRON CITY", $4f
+    db "#MON GYM", $55
+    db "LEADER: SABRINA", $51
+    db "The Master of", $4f
+    db "Psychic #MON!", $57
+
+_SaffronCityText20: ; 0xa65f8
+    db $0, "TRAINER TIPS", $51
+    db "FULL HEAL cures", $4f
+    db "all ailments like", $55
+    db "sleep and burns.", $51
+    db "It costs a bit", $4f
+    db "more, but it's", $55
+    db "more convenient.", $57
+
+_SaffronCityText21: ; 0xa6667
+    db $0, "TRAINER TIPS", $51
+    db "New GREAT BALL", $4f
+    db "offers improved", $55
+    db "capture rates.", $51
+    db "Try it on those", $4f
+    db "hard-to-catch", $55
+    db "#MON.", $57
+
+_SaffronCityText22: ; 0xa66c7
+    db $0, "SILPH CO.", $4f
+    db "OFFICE BUILDING", $57
+
+_SaffronCityText24: ; 0xa66e2
+    db $0, "MR.PSYCHIC's", $4f
+    db "HOUSE", $57
+
+_SaffronCityText25: ; 0xa66f5
+    db $0, "SILPH's latest", $4f
+    db "product!", $51
+    db "Release to be", $4f
+    db "determined...", $57
+
+_ItemUseBallText00:
+	db 0,"It dodged the",$4F
+	db "thrown BALL!",$51
+	db "This #MON",$4F
+	db "can't be caught!",$58
+
+_ItemUseBallText01:
+	db 0,"You missed the",$4F
+	db "#MON!",$58
+
+_ItemUseBallText02:
+	db 0,"Darn! The #MON",$4F
+	db "broke free!",$58
+
+_ItemUseBallText03:
+	db 0,"Aww! It appeared",$4F
+	db "to be caught! ",$58
+
+_ItemUseBallText04:
+	db 0,"Shoot! It was so",$4F
+	db "close too!",$58
+
+_ItemUseBallText05:
+	db 0,"All right!",$4F,"@",1
+	dw $CFDA
+	db 0," was",$55
+	db "caught!@@"
+
+_ItemUseBallText07:
+	db 1
+	dw $DE06
+	db 0," was",$4F
+	db "transferred to",$55
+	db "BILL's PC!",$58
+
+_ItemUseBallText08:
+	db 1
+	dw $DE06
+	db 0," was",$4F
+	db "transferred to",$55
+	db "someone's PC!",$58
+
+_ItemUseBallText06:
+	db 0,"New #DEX data",$4F
+	db "will be added for",$55,"@",1
+	dw $CFDA
+	db 0,"!@@"
+
+INCBIN "baserom.gbc",$A685E,$4000 - $285E
+
+SECTION "bank2A",DATA,BANK[$2A]
+
+_ItemUseText001:
+	db 0,$52," used@@"
+
+_ItemUseText002:
+	db 1
+	dw $CF4B
+	db 0,"!",$57
+
+INCBIN "baserom.gbc",$A800F,$4000-$F
+
+SECTION "bank2B",DATA,BANK[$2B]
+INCLUDE "text/pokedex.tx"
+
+SECTION "bank2C",DATA,BANK[$2C]
+
+MoveNames: ; 4000
+	db "POUND@"
+	db "KARATE CHOP@"
+	db "DOUBLESLAP@"
+	db "COMET PUNCH@"
+	db "MEGA PUNCH@"
+	db "PAY DAY@"
+	db "FIRE PUNCH@"
+	db "ICE PUNCH@"
+	db "THUNDERPUNCH@"
+	db "SCRATCH@"
+	db "VICEGRIP@"
+	db "GUILLOTINE@"
+	db "RAZOR WIND@"
+	db "SWORDS DANCE@"
+	db "CUT@"
+	db "GUST@"
+	db "WING ATTACK@"
+	db "WHIRLWIND@"
+	db "FLY@"
+	db "BIND@"
+	db "SLAM@"
+	db "VINE WHIP@"
+	db "STOMP@"
+	db "DOUBLE KICK@"
+	db "MEGA KICK@"
+	db "JUMP KICK@"
+	db "ROLLING KICK@"
+	db "SAND-ATTACK@"
+	db "HEADBUTT@"
+	db "HORN ATTACK@"
+	db "FURY ATTACK@"
+	db "HORN DRILL@"
+	db "TACKLE@"
+	db "BODY SLAM@"
+	db "WRAP@"
+	db "TAKE DOWN@"
+	db "THRASH@"
+	db "DOUBLE-EDGE@"
+	db "TAIL WHIP@"
+	db "POISON STING@"
+	db "TWINEEDLE@"
+	db "PIN MISSILE@"
+	db "LEER@"
+	db "BITE@"
+	db "GROWL@"
+	db "ROAR@"
+	db "SING@"
+	db "SUPERSONIC@"
+	db "SONICBOOM@"
+	db "DISABLE@"
+	db "ACID@"
+	db "EMBER@"
+	db "FLAMETHROWER@"
+	db "MIST@"
+	db "WATER GUN@"
+	db "HYDRO PUMP@"
+	db "SURF@"
+	db "ICE BEAM@"
+	db "BLIZZARD@"
+	db "PSYBEAM@"
+	db "BUBBLEBEAM@"
+	db "AURORA BEAM@"
+	db "HYPER BEAM@"
+	db "PECK@"
+	db "DRILL PECK@"
+	db "SUBMISSION@"
+	db "LOW KICK@"
+	db "COUNTER@"
+	db "SEISMIC TOSS@"
+	db "STRENGTH@"
+	db "ABSORB@"
+	db "MEGA DRAIN@"
+	db "LEECH SEED@"
+	db "GROWTH@"
+	db "RAZOR LEAF@"
+	db "SOLARBEAM@"
+	db "POISONPOWDER@"
+	db "STUN SPORE@"
+	db "SLEEP POWDER@"
+	db "PETAL DANCE@"
+	db "STRING SHOT@"
+	db "DRAGON RAGE@"
+	db "FIRE SPIN@"
+	db "THUNDERSHOCK@"
+	db "THUNDERBOLT@"
+	db "THUNDER WAVE@"
+	db "THUNDER@"
+	db "ROCK THROW@"
+	db "EARTHQUAKE@"
+	db "FISSURE@"
+	db "DIG@"
+	db "TOXIC@"
+	db "CONFUSION@"
+	db "PSYCHIC@"
+	db "HYPNOSIS@"
+	db "MEDITATE@"
+	db "AGILITY@"
+	db "QUICK ATTACK@"
+	db "RAGE@"
+	db "TELEPORT@"
+	db "NIGHT SHADE@"
+	db "MIMIC@"
+	db "SCREECH@"
+	db "DOUBLE TEAM@"
+	db "RECOVER@"
+	db "HARDEN@"
+	db "MINIMIZE@"
+	db "SMOKESCREEN@"
+	db "CONFUSE RAY@"
+	db "WITHDRAW@"
+	db "DEFENSE CURL@"
+	db "BARRIER@"
+	db "LIGHT SCREEN@"
+	db "HAZE@"
+	db "REFLECT@"
+	db "FOCUS ENERGY@"
+	db "BIDE@"
+	db "METRONOME@"
+	db "MIRROR MOVE@"
+	db "SELFDESTRUCT@"
+	db "EGG BOMB@"
+	db "LICK@"
+	db "SMOG@"
+	db "SLUDGE@"
+	db "BONE CLUB@"
+	db "FIRE BLAST@"
+	db "WATERFALL@"
+	db "CLAMP@"
+	db "SWIFT@"
+	db "SKULL BASH@"
+	db "SPIKE CANNON@"
+	db "CONSTRICT@"
+	db "AMNESIA@"
+	db "KINESIS@"
+	db "SOFTBOILED@"
+	db "HI JUMP KICK@"
+	db "GLARE@"
+	db "DREAM EATER@"
+	db "POISON GAS@"
+	db "BARRAGE@"
+	db "LEECH LIFE@"
+	db "LOVELY KISS@"
+	db "SKY ATTACK@"
+	db "TRANSFORM@"
+	db "BUBBLE@"
+	db "DIZZY PUNCH@"
+	db "SPORE@"
+	db "FLASH@"
+	db "PSYWAVE@"
+	db "SPLASH@"
+	db "ACID ARMOR@"
+	db "CRABHAMMER@"
+	db "EXPLOSION@"
+	db "FURY SWIPES@"
+	db "BONEMERANG@"
+	db "REST@"
+	db "ROCK SLIDE@"
+	db "HYPER FANG@"
+	db "SHARPEN@"
+	db "CONVERSION@"
+	db "TRI ATTACK@"
+	db "SUPER FANG@"
+	db "SLASH@"
+	db "SUBSTITUTE@"
+	db "STRUGGLE@"