ref: 8ab56853a2c5552634042ed900b09f2f62485e7d
parent: e6a8977234369840ae729b98cbb76a299df0a114
author: yenatch <yenatch@gmail.com>
date: Thu Feb 5 18:02:17 EST 2015
A bunch of bank 5c incbins.
--- a/main.asm
+++ b/main.asm
@@ -125620,6 +125620,9 @@
Unknown_11d4fe:
+; Pokemon sorted by kana.
+; Notably, Rhydon is missing.
+
dw Unknown_11d558
dw Unknown_11d55f
dw Unknown_11d565
@@ -127916,8 +127919,113 @@
ret
; 170139
-INCBIN "baserom.gbc",$170139,$170215 - $170139
+Function170139: ; 170139
+ ld a, $5
+ call GetSRAMBank
+ ld de, $aa41
+ ld h, $0
+ ld l, h
+ ld bc, $03e8
+ call Function17020c
+ ld bc, $0064
+ call Function17020c
+ ld bc, $000a
+ call Function17020c
+ ld a, [de]
+ ld c, a
+ ld b, $0
+ add hl, bc
+ call CloseSRAM
+ ld a, h
+ ld [$c608], a
+ ld a, l
+ ld [$c609], a
+ ld hl, $c628
+ ld a, [PlayerID]
+ ld [hli], a
+ ld a, [$d47c]
+ ld [hli], a
+ ld a, [$d84a]
+ ld [hli], a
+ ld a, [$d84b]
+ ld [hli], a
+ ld e, l
+ ld d, h
+ ld hl, PlayerName
+ ld bc, $0005
+ call CopyBytes
+ ld bc, PlayerID
+ ld de, PlayerGender
+ callba Function4e929
+ ld de, $c631
+ ld a, c
+ ld [de], a
+ inc de
+ ld a, $df
+ ld [$cd49], a
+ ld a, $dc
+ ld [$cd4a], a
+ ld a, $41
+ ld [$cd4b], a
+ ld a, $de
+ ld [$cd4c], a
+ ld a, $3
+.asm_1701ac
+ push af
+ ld a, [$cd49]
+ ld l, a
+ ld a, [$cd4a]
+ ld h, a
+ ld bc, $0030
+ call CopyBytes
+ ld a, l
+ ld [$cd49], a
+ ld a, h
+ ld [$cd4a], a
+ ld a, [$cd4b]
+ ld l, a
+ ld a, [$cd4c]
+ ld h, a
+ ld bc, $0006
+ call CopyBytes
+ ld a, l
+ ld [$cd4b], a
+ ld a, h
+ ld [$cd4c], a
+ pop af
+ dec a
+ jr nz, .asm_1701ac
+ ld a, $4
+ call GetSRAMBank
+ ld hl, $a013
+ ld bc, $0024
+ call CopyBytes
+ call CloseSRAM
+ ld a, $5
+ call GetSRAMBank
+ ld hl, $a894
+ ld bc, $0006
+ call CopyBytes
+ ld hl, $c608
+ ld de, $a948
+ ld bc, $00f6
+ call CopyBytes
+ call CloseSRAM
+ ret
+; 17020c
+Function17020c: ; 17020c
+ ld a, [de]
+ inc de
+ and a
+ ret z
+.asm_170210
+ add hl, bc
+ dec a
+ jr nz, .asm_170210
+ ret
+; 170215
+
Function170215: ; 170215
xor a
ld [$cf63], a
@@ -127951,8 +128059,8 @@
Function17023a: ; 17023a
ld a, [$cf63]
ld e, a
- ld d, $0
- ld hl, $4249
+ ld d, 0
+ ld hl, Jumptable_170249
add hl, de
add hl, de
ld a, [hli]
@@ -127961,8 +128069,276 @@
jp [hl]
; 170249
-INCBIN "baserom.gbc", $170249, $17042c - $170249
+Jumptable_170249: ; 170249
+ dw Function17024d
+ dw Function1704c9
+; 17024d
+Function17024d: ; 17024d
+ ld a, [Options]
+ push af
+ ld hl, Options
+ set 6, [hl]
+ ld a, [$cfc0]
+ push af
+ or $1
+ ld [$cfc0], a
+ xor a
+ ld [InLinkBattle], a
+ callba Function1060a2
+ callba Functionc658
+ call Function1702b7
+ call Function170bf7
+ ld a, $16
+ call Predef
+ callba Function1500c
+ callba Functionc658
+ ld a, [$d0ee]
+ ld [ScriptVar], a
+ and a
+ jr nz, .asm_1702a9
+ ld a, $1
+ call GetSRAMBank
+ ld a, [$be46]
+ ld [$cf64], a
+ call CloseSRAM
+ ld hl, StringBuffer3
+ ld a, [$cf64]
+ add $f7
+ ld [hli], a
+ ld a, $50
+ ld [hl], a
+
+.asm_1702a9
+ pop af
+ ld [$cfc0], a
+ pop af
+ ld [Options], a
+ ld a, $1
+ ld [$cf63], a
+ ret
+; 1702b7
+
+Function1702b7: ; 1702b7
+ call Function1704a2
+ ld de, $c643
+ ld c, $b
+ callba Function17d073
+ jr nc, .asm_1702db
+ ld a, [$c613]
+ ld [$d265], a
+ call GetPokemonName
+ ld l, e
+ ld h, d
+ ld de, $c643
+ ld bc, $000b
+ call CopyBytes
+
+.asm_1702db
+ ld de, $c67e
+ ld c, $b
+ callba Function17d073
+ jr nc, .asm_1702fc
+ ld a, [$c64e]
+ ld [$d265], a
+ call GetPokemonName
+ ld l, e
+ ld h, d
+ ld de, $c67e
+ ld bc, $000b
+ call CopyBytes
+
+.asm_1702fc
+ ld de, $c6b9
+ ld c, $b
+ callba Function17d073
+ jr nc, .asm_17031d
+ ld a, [$c689]
+ ld [$d265], a
+ call GetPokemonName
+ ld l, e
+ ld h, d
+ ld de, $c6b9
+ ld bc, $000b
+ call CopyBytes
+
+.asm_17031d
+ ld a, $50
+ ld [$c64d], a
+ ld [$c688], a
+ ld [$c6c3], a
+ call Function170c98
+ ld de, $c608
+ ld c, $a
+ callba Function17d073
+ jr nc, .asm_17033d
+ ld hl, String_170426
+ jr .asm_170340
+
+.asm_17033d
+ ld hl, $c608
+
+.asm_170340
+ ld de, $d26b
+ ld bc, $000a
+ call CopyBytes
+ ld a, $50
+ ld [de], a
+ ld hl, $c612
+ ld a, [hli]
+ ld [OtherTrainerClass], a
+ ld a, $ea
+ ld [BGMapBuffer], a
+ ld a, $d3
+ ld [$cd21], a
+ ld de, OTPartyMon1Species
+ ld bc, OTPartyCount
+ ld a, $3
+ ld [bc], a
+ inc bc
+.asm_170367
+ push af
+ ld a, [hl]
+ ld [bc], a
+ inc bc
+ push bc
+ ld bc, $0030
+ call CopyBytes
+ push de
+ ld a, [BGMapBuffer]
+ ld e, a
+ ld a, [$cd21]
+ ld d, a
+ ld bc, $000b
+ call CopyBytes
+ ld a, e
+ ld [BGMapBuffer], a
+ ld a, d
+ ld [$cd21], a
+ pop de
+ pop bc
+ pop af
+ dec a
+ and a
+ jr nz, .asm_170367
+ ld a, $ff
+ ld [bc], a
+ ret
+; 170394
+
+Function170394: ; 170394
+ ld hl, $c613
+ ld d, $3
+.asm_170399
+ push de
+ push hl
+ ld b, h
+ ld c, l
+ ld a, [hl]
+ and a
+ jr z, .asm_1703b1
+ cp $ff
+ jr z, .asm_1703b1
+ cp $fe
+ jr z, .asm_1703b1
+ cp $fd
+ jr z, .asm_1703b1
+ cp $fc
+ jr nz, .asm_1703b4
+
+.asm_1703b1
+ ld a, $eb
+ ld [hl], a
+
+.asm_1703b4
+ ld [CurSpecies], a
+ call GetBaseData
+ ld a, $5
+ call GetSRAMBank
+ ld a, [$b2fb]
+ call CloseSRAM
+ ld e, a
+ ld hl, $001f
+ add hl, bc
+ ld a, [hl]
+ cp $2
+ ld a, $2
+ jr c, .asm_1703d6
+ ld a, [hl]
+ cp e
+ jr c, .asm_1703d7
+ ld a, e
+
+.asm_1703d6
+ ld [hl], a
+
+.asm_1703d7
+ ld [CurPartyLevel], a
+ ld hl, $0002
+ add hl, bc
+ ld d, $3
+ ld a, [hli]
+ and a
+ jr z, .asm_1703ea
+ cp $fc
+ jr nc, .asm_1703ea
+ jr .asm_1703f4
+
+.asm_1703ea
+ dec hl
+ ld a, $1
+ ld [hli], a
+ xor a
+ ld [hli], a
+ ld [hli], a
+ ld [hl], a
+ jr .asm_1703ff
+
+.asm_1703f4
+ ld a, [hl]
+ cp $fc
+ jr c, .asm_1703fb
+ ld [hl], $0
+
+.asm_1703fb
+ inc hl
+ dec d
+ jr nz, .asm_1703f4
+
+.asm_1703ff
+ ld hl, $0024
+ add hl, bc
+ ld d, h
+ ld e, l
+ push hl
+ push de
+ ld hl, $000a
+ add hl, bc
+ ld b, $1
+ ld a, $c
+ call Predef
+ pop de
+ pop hl
+ dec de
+ dec de
+ ld a, [hli]
+ ld [de], a
+ inc de
+ ld a, [hl]
+ ld [de], a
+ pop hl
+ ld bc, $003b
+ add hl, bc
+ pop de
+ dec d
+ jp nz, .asm_170399
+ ret
+; 170426
+
+String_170426: ; 170426
+ db "CHRIS@"
+; 17042c
+
Function17042c: ; 17042c
ld hl, OTPartyMon2ID
ld a, $7
@@ -127979,10 +128355,10 @@
cp $f
jr nc, .asm_17045b
push hl
- ld hl, $4470
+ ld hl, Unknown_170470
dec a
ld e, a
- ld d, $0
+ ld d, 0
add hl, de
ld a, [hl]
pop hl
@@ -128018,8 +128394,55 @@
ret
; 170470
-INCBIN "baserom.gbc", $170470, $1704e1 - $170470
+Unknown_170470:
+ db $12, $24, $45, $45, $42, $42, $45, $42, $27, $27, $45, $27, $42, $24
+Unknown_17047e:
+INCBIN "baserom.gbc", $17047e, $1704a2 - $17047e
+; 1704a2
+
+Function1704a2: ; 1704a2
+ ld a, [rSVBK]
+ push af
+ ld a, $3
+ ld [rSVBK], a
+ ld hl, LYOverrides
+ ld de, $c608
+ ld bc, $00e0
+ call CopyBytes
+ pop af
+ ld [rSVBK], a
+ ld a, $1
+ call GetSRAMBank
+ ld a, $2
+ ld [$be45], a
+ ld hl, $be46
+ inc [hl]
+ call CloseSRAM
+Function1704c9:
+ ret
+; 1704ca
+
+Function1704ca: ; 1704ca
+ ld a, [$be46]
+ cp $7
+ jr c, .asm_1704d3
+ ld a, $6
+
+.asm_1704d3
+ ld hl, $afce
+ ld de, -$e0
+.asm_1704d9
+ and a
+ jr z, .asm_1704e0
+ add hl, de
+ dec a
+ jr .asm_1704d9
+
+.asm_1704e0
+ ret
+; 1704e1
+
Function1704e1: ; 1704e1
call SpeechTextBox
call FadeToMenu
@@ -128049,8 +128472,8 @@
Function170510: ; 170510
ld a, [$cf63]
ld e, a
- ld d, $0
- ld hl, $451f
+ ld d, 0
+ ld hl, Jumptable_17051f
add hl, de
add hl, de
ld a, [hli]
@@ -128059,8 +128482,242 @@
jp [hl]
; 17051f
-INCBIN "baserom.gbc",$17051f,$170687 - $17051f
+Jumptable_17051f: ; 17051f
+ dw Function170525
+ dw Function170571
+ dw Function170577
+; 170525
+Function170525: ; 170525
+ ld a, $5
+ call GetSRAMBank
+ ld hl, $a89c
+ ld de, StringBuffer3
+ ld bc, $0016
+ call CopyBytes
+ ld hl, $a8b2
+ ld de, $c608
+ ld bc, $0096
+ call CopyBytes
+ call CloseSRAM
+ ld hl, $c4b5
+ ld de, StringBuffer3
+ call PlaceString
+ ld hl, $c4dd
+ ld de, String_170676
+ call PlaceString
+ ld hl, $c4e0
+ ld de, StringBuffer4
+ call PlaceString
+ ld hl, $c4e4
+ ld de, String_17067a
+ call PlaceString
+ call Function1705b7
+ call Function1705f0
+ jr Function1705b2
+
+Function170571:
+ call Function32f9
+ call Function1705b2
+
+Function170577:
+ ld hl, hJoyPressed
+ ld a, [hl]
+ and $1
+ jr nz, .asm_1705ac
+ ld a, [hl]
+ and $2
+ jr nz, .asm_1705ac
+ ld a, [hl]
+ and $40
+ jr nz, .asm_17058f
+ ld a, [hl]
+ and $80
+ jr nz, .asm_17059d
+ ret
+
+.asm_17058f
+ ld a, [$cf64]
+ and a
+ ret z
+ sub $f
+ ld [$cf64], a
+ call Function1705f0
+ ret
+
+.asm_17059d
+ ld a, [$cf64]
+ cp $3c
+ ret z
+ add $f
+ ld [$cf64], a
+ call Function1705f0
+ ret
+
+.asm_1705ac
+ ld hl, $cf63
+ set 7, [hl]
+ ret
+
+Function1705b2:
+ ld hl, $cf63
+ inc [hl]
+ ret
+; 1705b7
+
+Function1705b7: ; 1705b7
+ ld hl, $c4f0
+ ld a, $79
+ ld [hli], a
+ ld c, $12
+.asm_1705bf
+ ld a, $7a
+ ld [hli], a
+ dec c
+ jr nz, .asm_1705bf
+ ld a, $7b
+ ld [hli], a
+ ld de, $0014
+ ld c, $c
+.asm_1705cd
+ ld a, $7c
+ ld [hl], a
+ add hl, de
+ dec c
+ jr nz, .asm_1705cd
+ ld a, $7d
+ ld [hli], a
+ ld c, $12
+.asm_1705d9
+ ld a, $7a
+ ld [hli], a
+ dec c
+ jr nz, .asm_1705d9
+ ld a, $7e
+ ld [hl], a
+ ld de, $ffec
+ add hl, de
+ ld c, $c
+.asm_1705e8
+ ld a, $7c
+ ld [hl], a
+ add hl, de
+ dec c
+ jr nz, .asm_1705e8
+ ret
+; 1705f0
+
+Function1705f0: ; 1705f0
+ call Function17064b
+ call Function17065d
+ ld a, $50
+ ld [$cd4e], a
+ ld hl, $c608
+ ld a, [$cf64]
+ ld c, a
+ xor a
+ ld b, a
+ add hl, bc
+ push hl
+ pop bc
+ ld hl, $c519
+ ld a, $6
+.asm_17060c
+ push af
+ push hl
+ ld a, $3
+.asm_170610
+ push af
+ ld de, $cd49
+ ld a, [bc]
+ and a
+ jr z, .asm_170625
+ ld a, $5
+.asm_17061a
+ push af
+ ld a, [bc]
+ ld [de], a
+ inc bc
+ inc de
+ pop af
+ dec a
+ jr nz, .asm_17061a
+ jr .asm_170631
+
+.asm_170625
+ ld a, $5
+.asm_170627
+ push af
+ ld a, $e3
+ ld [de], a
+ inc de
+ inc bc
+ pop af
+ dec a
+ jr nz, .asm_170627
+
+.asm_170631
+ ld de, $cd49
+ push bc
+ call PlaceString
+ ld de, $0006
+ add hl, de
+ pop bc
+ pop af
+ dec a
+ jr nz, .asm_170610
+ pop hl
+ ld de, $0028
+ add hl, de
+ pop af
+ dec a
+ jr nz, .asm_17060c
+ ret
+; 17064b
+
+Function17064b: ; 17064b
+ ld hl, $c505
+ xor a
+ ld b, $c
+.asm_170651
+ ld c, $12
+.asm_170653
+ ld [hli], a
+ dec c
+ jr nz, .asm_170653
+ inc hl
+ inc hl
+ dec b
+ jr nz, .asm_170651
+ ret
+; 17065d
+
+Function17065d: ; 17065d
+ ld a, [$cf64]
+ and a
+ jr z, .asm_170669
+ ld hl, $c516
+ ld a, $61
+ ld [hl], a
+
+.asm_170669
+ ld a, [$cf64]
+ cp $3c
+ ret z
+ ld hl, $c5f2
+ ld a, $ee
+ ld [hl], a
+ ret
+; 170676
+
+String_170676: ; 170676
+ db "ルーム@"
+; 17067a
+
+String_17067a: ; 17067a
+ db "れきだいりーダーいちらん@"
+; 170687
+
Function170687: ; 170687
ld a, [ScriptVar]
ld e, a
@@ -128766,7 +129423,7 @@
ld b, $0
pop af
ld [rSVBK], a
- ld hl, $4b90
+ ld hl, Unknown_170b90
add hl, bc
ld a, [hl]
ld [$cd49], a
@@ -128795,6 +129452,7 @@
ret
; 170b90
+Unknown_170b90:
INCBIN "baserom.gbc",$170b90,$170bd2 - $170b90
Function170bd2: ; 170bd2
@@ -128826,8 +129484,120 @@
ret
; 170bf7
-INCBIN "baserom.gbc", $170bf7, $170c8b - $170bf7
+Function170bf7: ; 170bf7
+ ld a, $5
+ call GetSRAMBank
+ ld hl, $a89a
+ xor a
+ ld [hli], a
+ ld [hl], a
+ call CloseSRAM
+ ret
+; 170c06
+Function170c06: ; 170c06
+ ld a, $5
+ call GetSRAMBank
+ ld hl, $a894
+ ld a, [$d0ee]
+ and a
+ jr nz, .asm_170c15
+ inc [hl]
+
+.asm_170c15
+ inc hl
+ inc hl
+ ld a, [$a89b]
+ add [hl]
+ ld [hld], a
+ ld a, [$a89a]
+ adc [hl]
+ ld [hli], a
+ jr nc, .asm_170c27
+ ld a, $ff
+ ld [hld], a
+ ld [hli], a
+
+.asm_170c27
+ inc hl
+ push hl
+ ld de, 0
+ xor a
+ ld [$d265], a
+.asm_170c30
+ ld hl, PartyMon1HP
+ ld a, [$d265]
+ call GetPartyLocation
+ ld a, [hli]
+ ld b, a
+ ld c, [hl]
+ inc hl
+ inc hl
+ ld a, [hld]
+ sub c
+ ld c, a
+ ld a, [hl]
+ sbc b
+ ld b, a
+ push de
+ pop hl
+ add hl, bc
+ push hl
+ pop de
+ jr c, .asm_170c58
+ ld a, [$d265]
+ inc a
+ ld [$d265], a
+ cp $3
+ jr c, .asm_170c30
+ jr .asm_170c5b
+
+.asm_170c58
+ ld de, -1
+
+.asm_170c5b
+ pop hl
+ inc hl
+ ld a, e
+ add [hl]
+ ld [hld], a
+ ld a, d
+ adc [hl]
+ ld [hli], a
+ jr nc, .asm_170c69
+ ld a, $ff
+ ld [hld], a
+ ld [hli], a
+
+.asm_170c69
+ inc hl
+ push hl
+ ld b, $0
+ ld c, $0
+.asm_170c6f
+ ld hl, PartyMon1HP
+ ld a, b
+ push bc
+ call GetPartyLocation
+ pop bc
+ ld a, [hli]
+ or [hl]
+ jr nz, .asm_170c7d
+ inc c
+
+.asm_170c7d
+ inc b
+ ld a, b
+ cp $3
+ jr c, .asm_170c6f
+ pop hl
+ ld a, [hl]
+ add c
+ ld [hl], a
+ call CloseSRAM
+ ret
+; 170c8b
+
Function170c8b: ; 170c8b
ld hl, LastPlayerCounterMove
ld b, $5
@@ -128840,8 +129610,98 @@
ret
; 170c98
-INCBIN "baserom.gbc",$170c98,$1719c8 - $170c98
+Function170c98: ; 170c98
+ ld c, $3
+ ld hl, $c615
+.asm_170c9d
+ push hl
+ ld a, [hl]
+ cp $fc
+ jr c, .asm_170ca6
+ ld a, $1
+ ld [hl], a
+.asm_170ca6
+ inc hl
+ ld b, $3
+.asm_170ca9
+ ld a, [hl]
+ and a
+ jr z, .asm_170cb1
+ cp $fc
+ jr c, .asm_170cb9
+
+.asm_170cb1
+ xor a
+ ld [hl], a
+ inc hl
+ dec b
+ jr nz, .asm_170cb1
+ jr .asm_170cbd
+
+.asm_170cb9
+ inc hl
+ dec b
+ jr nz, .asm_170ca9
+
+.asm_170cbd
+ pop hl
+ ld de, $003b
+ add hl, de
+ dec c
+ jr nz, .asm_170c9d
+ ret
+; 170cc6
+
+Function170cc6: ; 170cc6
+ ld a, [rSVBK]
+ push af
+ ld a, $6
+ ld [rSVBK], a
+ ld hl, LZ_170d16
+ ld de, $d000
+ call Decompress
+ ld a, $1
+ ld [rVBK], a
+ ld de, $d000
+ ld hl, VTiles0
+ lb bc, $6, $c1
+ call Get2bpp
+ xor a
+ ld [rVBK], a
+ ld hl, LZ_1715a4
+ ld de, $d000
+ call Decompress
+ ld de, Unkn1Pals
+ ld hl, VTiles0
+ lb bc, $6, $53
+ call Get2bpp
+ pop af
+ ld [rSVBK], a
+ ret
+; 170d02
+
+Function170d02: ; 170d02
+ ld a, $1
+ ld [rVBK], a
+ ld de, GFX_171848
+ ld hl, $8c10
+ lb bc, BANK(GFX_171848), $18
+ call Get2bpp
+ xor a
+ ld [rVBK], a
+ ret
+; 170d16
+
+LZ_170d16:
+INCBIN "baserom.gbc", $170d16, $1715a4 - $170d16
+
+LZ_1715a4:
+INCBIN "baserom.gbc", $1715a4, $171848 - $1715a4
+
+GFX_171848:
+INCBIN "baserom.gbc", $171848, $1719c8 - $171848
+
Function1719c8: ; 1719c8 (5c:59c8)
ld a, [$ffaa]
push af
@@ -128949,12 +129809,17 @@
Function171a95: ; 171a95 (5c:5a95)
callba Function171ccd
hlcoord 2, 8
- ld de, $5aa7
+ ld de, String_171aa7
call PlaceString
jp Function171c66
; 171aa7 (5c:5aa7)
-INCBIN "baserom.gbc",$171aa7,$171ac9 - $171aa7
+String_171aa7: ; 171aa7
+ db "モバイルアダプタに"
+ next "せつぞく しています"
+ next "しばらく おまちください"
+ db "@"
+; 171ac9
Function171ac9: ; 171ac9 (5c:5ac9)
ld de, $cd81
@@ -129034,7 +129899,7 @@
jr Function171b42
Function171b4b: ; 171b4b (5c:5b4b)
- ld de, $4010
+ lb de, $40, $10
ld a, $1d
call Function3b2a
ld hl, $c
@@ -129041,7 +129906,7 @@
add hl, bc
ld a, $8
ld [hl], a
- ld de, $4098
+ lb de, $40, $98
ld a, $1d
call Function3b2a
ld hl, $c
@@ -129048,7 +129913,7 @@
add hl, bc
ld a, $9
ld [hl], a
- ld de, $8a70
+ lb de, $8a, $70
ld a, $1d
call Function3b2a
ld hl, $c
@@ -129131,13 +129996,13 @@
ld a, [$cd4a]
ld [$aa4a], a
call CloseSRAM
- ld hl, $5c6b
+ ld hl, MenuDataHeader_171c6b
call LoadMenuDataHeader
call Function1cbb
call Function1cfd
callba Function104061
hlcoord 1, 14
- ld de, $5c73
+ ld de, String_171c73
call PlaceString
ld a, [$cd4a]
cp $2
@@ -129186,31 +130051,42 @@
ret
; 171c6b (5c:5c6b)
-INCBIN "baserom.gbc",$171c6b,$171c87 - $171c6b
+MenuDataHeader_171c6b: ; 171c6b
+ db $40 ; flags
+ db 12, 0 ; start coords
+ db 17, 19 ; end coords
+ dw NULL
+ db 0 ; default option
+; 171c73
+String_171c73: ; 171c73
+ db "モバイルセンターを けってい"
+ next "しました@"
+; 171c87
+
Function171c87: ; 171c87 (5c:5c87)
call DisableLCD
- ld hl, $5db1
+ ld hl, GFX_171db1
ld de, $9000
ld bc, $6e0
call CopyBytes
- ld hl, $6abd
+ ld hl, LZ_172abd
ld de, $8000
call Decompress
call EnableLCD
- ld hl, $6491
+ ld hl, Tilemap_172491
ld de, TileMap ; $c4a0 (aliases: SpritesEnd)
ld bc, $168
call CopyBytes
- ld hl, $67ed
+ ld hl, Attrmap_1727ed
ld de, AttrMap ; $cdd9
ld bc, $168
call CopyBytes
hlcoord 3, 2
- ld de, $6e31
+ ld de, String_172e31
call PlaceString
hlcoord 3, 16
- ld de, $6e3f
+ ld de, String_172e3f
call PlaceString
ret
@@ -129219,7 +130095,7 @@
push af
ld a, $5
ld [rSVBK], a ; $ff00+$70
- ld hl, $5d71
+ ld hl, Palette_171d71
ld de, Unkn1Pals ; $d000
ld bc, $40
call CopyBytes
@@ -129243,51 +130119,82 @@
ld [$cd4b], a
and a
jr nz, .asm_171d16
- ld hl, $651d
+ ld hl, Tilemap_17251d
decoord 0, 7
ld bc, $8c
call CopyBytes
hlcoord 3, 16
- ld de, $6e3f
+ ld de, String_172e3f
jp PlaceString
.asm_171d16
- ld hl, $65f9
+ ld hl, Tilemap_1725f9
decoord 0, 7
ld bc, $8c
call CopyBytes
hlcoord 3, 16
- ld de, $6e4e
+ ld de, String_172e4e
jp PlaceString
Function171d2b: ; 171d2b (5c:5d2b)
call DisableLCD
- ld hl, $5db1
+ ld hl, GFX_171db1
ld de, $9000
ld bc, $6e0
call CopyBytes
- ld hl, $6abd
+ ld hl, LZ_172abd
ld de, $8000
call Decompress
call EnableLCD
- ld hl, $6685
+ ld hl, Tilemap_172685
ld de, TileMap ; $c4a0 (aliases: SpritesEnd)
ld bc, $168
call CopyBytes
- ld hl, $6955
+ ld hl, Attrmap_172955
ld de, AttrMap ; $cdd9
ld bc, $168
call CopyBytes
hlcoord 2, 2
- ld de, $6e5d
+ ld de, String_172e5d
call PlaceString
hlcoord 14, 16
- ld de, $6e58
+ ld de, String_172e58
call PlaceString
ret
; 171d71 (5c:5d71)
-INCBIN "baserom.gbc",$171d71,$172e78 - $171d71
+Palette_171d71:
+INCBIN "baserom.gbc", $171d71, $171db1 - $171d71
+GFX_171db1:
+INCBIN "baserom.gbc", $171db1, $172491 - $171db1
+Tilemap_172491:
+INCBIN "baserom.gbc", $172491, $17251d - $172491
+Tilemap_17251d:
+INCBIN "baserom.gbc", $17251d, $1725f9 - $17251d
+Tilemap_1725f9:
+INCBIN "baserom.gbc", $1725f9, $172685 - $1725f9
+Tilemap_172685:
+INCBIN "baserom.gbc", $172685, $1727ed - $172685
+Attrmap_1727ed:
+INCBIN "baserom.gbc", $1727ed, $172955 - $1727ed
+Attrmap_172955:
+INCBIN "baserom.gbc", $172955, $172abd - $172955
+LZ_172abd:
+INCBIN "gfx/pokedex/slowpoke.2bpp.lz"
+String_172e31: ; 172e31
+ db "パスワード", $1f, "いれてください@"
+String_172e3f: ; 172e3f
+ db "きりかえ やめる けってい@"
+String_172e4e: ; 172e4e
+ db "きりかえ やめる "
+String_172e58:
+ db "けってい@"
+String_172e5d: ; 172e5d
+ db "せつぞくする モバイルセンターを"
+ next "えらんで ください@"
+; 172e78
+
+
Function172e78: ; 172e78 (5c:6e78)
ld a, $7f
ld hl, TileMap ; $c4a0 (aliases: SpritesEnd)
@@ -129298,16 +130205,16 @@
ld bc, $168
call ByteFill
call DisableLCD
- ld hl, $6f1f
+ ld hl, GFX_172f1f
ld de, $9000
ld bc, $610
call CopyBytes
call EnableLCD
- ld hl, $73af
+ ld hl, Tilemap_1733af
ld de, TileMap ; $c4a0 (aliases: SpritesEnd)
ld bc, $168
call CopyBytes
- ld hl, $7517
+ ld hl, Attrmap_173517
ld de, AttrMap ; $cdd9
ld bc, $168
call CopyBytes
@@ -129319,11 +130226,11 @@
push af
ld a, $5
ld [rSVBK], a ; $ff00+$70
- ld hl, $6edf
+ ld hl, Palette_172edf
ld de, Unkn1Pals ; $d000
ld bc, $40
call CopyBytes
- ld hl, $6edf
+ ld hl, Palette_172edf
ld de, BGPals ; $d080
ld bc, $40
call CopyBytes
@@ -129333,9 +130240,19 @@
ret
; 172edf (5c:6edf)
-INCBIN "baserom.gbc",$172edf,$17367f - $172edf
+Palette_172edf:
+INCBIN "baserom.gbc",$172edf,$172f1f - $172edf
+GFX_172f1f:
+INCBIN "baserom.gbc",$172f1f,$1733af - $172f1f
+Tilemap_1733af:
+INCBIN "baserom.gbc",$1733af,$173517 - $1733af
+
+Attrmap_173517:
+INCBIN "baserom.gbc",$173517,$17367f - $173517
+
+
SECTION "bank5D", ROMX, BANK[$5D]
INCLUDE "text/phone/extra3.asm"
@@ -129606,7 +130523,7 @@
; 17d187
Function17d187: ; 17d187
- ld hl, $5194
+ ld hl, Unknown_17d194
ld de, $c63d
ld bc, $0005
call CopyBytes
@@ -129613,10 +130530,11 @@
ret
; 17d194
+Unknown_17d194:
INCBIN "baserom.gbc", $17d194, $17d199 - $17d194
Function17d199: ; 17d199
- ld hl, $51a6
+ ld hl, Unknown_17d1a6
ld de, $c642
ld bc, $0005
call CopyBytes
@@ -129623,6 +130541,7 @@
ret
; 17d1a6
+Unknown_17d1a6:
INCBIN "baserom.gbc", $17d1a6, $17d1ab - $17d1a6
Function17d1ab: ; 17d1ab
@@ -129630,7 +130549,7 @@
ld hl, $c647
ld bc, $0021
call ByteFill
- ld hl, $51c3
+ ld hl, Unknown_17d1c3
ld de, $c647
ld bc, $0006
call CopyBytes
@@ -129637,6 +130556,7 @@
ret
; 17d1c3
+Unknown_17d1c3:
INCBIN "baserom.gbc", $17d1c3, $17d1c9 - $17d1c3
Function17d1c9: ; 17d1c9
@@ -129644,7 +130564,7 @@
ld de, $c668
ld bc, $0005
call ByteFill
- ld hl, $5194
+ ld hl, Unknown_17d194
ld de, $c668
ld bc, $0005
call CopyBytes
@@ -129704,13 +130624,13 @@
jr nz, .asm_17d234
ld a, $4
ld [ScriptVar], a
- ld hl, $526a
+ ld hl, MenuDataHeader_17d26a
jr .asm_17d23c
.asm_17d234
ld a, $4
ld [ScriptVar], a
- ld hl, $528f
+ ld hl, MenuDataHeader_17d28f
.asm_17d23c
call LoadMenuDataHeader
@@ -129745,7 +130665,36 @@
ret
; 17d26a
-INCBIN "baserom.gbc",$17d26a,$17d2b6 - $17d26a
+MenuDataHeader_17d26a: ; 17d26a
+ db $40 ; flags
+ db 0, 0 ; start coords
+ db 9, 14 ; end coords
+ dw MenuData2_17d272
+ db 1 ; default option
+
+MenuData2_17d272: ; 17d272
+ db $a0 ; flags
+ db 4
+ db "ニュース", $1f, "よみこむ@"
+ db "ニュース", $1f, "みる@"
+ db "せつめい@"
+ db "やめる@"
+; 17d28f
+
+MenuDataHeader_17d28f: ; 17d28f
+ db $40 ; flags
+ db 0, 0 ; start coords
+ db 7, 14 ; end coords
+ dw MenuData2_17d297
+ db 1 ; default option
+
+MenuData2_17d297: ; 17d297
+ db $a0 ; flags
+ db 3
+ db "Challenge@"
+ db "Explanation@"
+ db "Cancel@"
+; 17d2b6
Function17d2b6: ; 17d2b6
call Function17d2c0