shithub: pokered

Info  •  Files  •  Log  •  Branches

Another attempt at splitting Red/Blue versions.

hg-commit-id: bd7cb987f964

--- a/Makefile

+++ b/Makefile

@@ -5,8 +5,11 @@

 all: pokered.gbc

-pokered.o: pokered.tx constants.asm ${TEXTFILES}

-	rgbasm -o pokered.o pokered.tx

+pokered.o: pokered.asm common.tx constants.asm ${TEXTFILES}

+	rgbasm -o pokered.o pokered.asm

+	

+pokeblue.o: pokeblue.asm common.tx constants.asm ${TEXTFILES}

+	rgbasm -o pokeblue.o pokeblue.asm

 redrle: extras/redrle.c

 	${CC} -o $@ $>

@@ -14,10 +17,16 @@

 .asm.tx:

 	awk -f textpre.awk < $< > $@

-.o.gbc:

+pokered.gbc: pokered.o

 	rgblink -o $@ $<

 	rgbfix -jsv -k 01 -l 0x33 -m 0x13 -p 0 -r 03 -t "POKEMON RED" $@

 	cmp baserom.gbc $@

+	

+pokeblue.gbc: pokeblue.o

+	rgblink -o $@ $<

+	rgbfix -jsv -k 01 -l 0x33 -m 0x13 -p 0 -r 03 -t "POKEMON BLUE" $@

 clean:

-	rm -f pokered.tx pokered.o pokered.gbc redrle ${TEXTFILES}

+	rm -f common.tx pokered.o pokered.gbc pokeblue.o pokeblue.gbc redrle ${TEXTFILES}

+

+more: pokered.gbc pokeblue.gbc

\ No newline at end of file

--- /dev/null

+++ b/common.asm

@@ -1,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@"

binary files /dev/null b/gfx/blue/blueversion.1bpp differ

binary files /dev/null b/gfx/blue/introfight.2bpp differ

binary files /dev/null b/gfx/blue/slotmachine1.2bpp differ

binary files /dev/null b/gfx/blue/slotmachine2.2bpp differ

binary files /dev/null b/gfx/blue/supergameboyborder.2bpp differ

binary files /dev/null b/gfx/red/introfight.2bpp differ

binary files /dev/null b/gfx/red/redgreenversion.1bpp differ

binary files /dev/null b/gfx/red/slotmachine1.2bpp differ

binary files /dev/null b/gfx/red/slotmachine2.2bpp differ

binary files /dev/null b/gfx/red/supergameboyborder.2bpp differ

binary files a/gfx/redgreenversion.1bpp /dev/null differ

--- /dev/null

+++ b/pokeblue.asm

@@ -1,0 +1,3 @@

+_RED EQU 0

+_BLUE EQU 1

+INCLUDE "common.tx"

\ No newline at end of file

--- a/pokered.asm

+++ b/pokered.asm

@@ -1,41467 +1,3 @@

-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

-

-INCBIN "gfx/redgreenversion.1bpp"

-

-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 CredRed

-	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

-

-CredRed:

-	db "2RED VERSION STAFF@"

-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@"

+_RED EQU 1

+_BLUE EQU 0

+INCLUDE "common.tx"

\ No newline at end of file