c8960dd2c8
Annotated the SGB functions in predef/sgb.asm, and some of the map scripts. Renamed several functions in home. Renamed six WRAM addresses corresponding to party icon animations, and renamed several others relative to these.
1119 lines
16 KiB
NASM
1119 lines
16 KiB
NASM
; Replaces the functionality of sgb.asm to work with CGB hardware.
|
|
|
|
CheckCGB: ; 8d55
|
|
ld a, [hCGB]
|
|
and a
|
|
ret
|
|
; 8d59
|
|
|
|
Function8d59: ; 8d59
|
|
ld a, b
|
|
cp $ff
|
|
jr nz, .asm_8d61
|
|
ld a, [SGBPredef]
|
|
|
|
.asm_8d61
|
|
cp -4
|
|
jp z, Function96f3
|
|
call Function9673
|
|
ld l, a
|
|
ld h, 0
|
|
add hl, hl
|
|
ld de, Table8d7a
|
|
add hl, de
|
|
ld a, [hli]
|
|
ld h, [hl]
|
|
ld l, a
|
|
ld de, Function8d79
|
|
push de
|
|
jp [hl]
|
|
; 8d79
|
|
|
|
Function8d79: ; 8d79
|
|
ret
|
|
; 8d7a
|
|
|
|
Table8d7a: ; 8d7a
|
|
dw Function8db8
|
|
dw Function8ddb
|
|
dw Function8eb9
|
|
dw Function8edb
|
|
dw Function8f70
|
|
dw Function906e
|
|
dw Function90f8
|
|
dw Function9122
|
|
dw Function91ad
|
|
dw Function91c8
|
|
dw Function91d1
|
|
dw Function91e4
|
|
dw Function9228
|
|
dw Function9251
|
|
dw Function9373
|
|
dw Function93a6
|
|
dw Function93ba
|
|
dw Function9195
|
|
dw Function9499
|
|
dw Function94d0
|
|
dw Function93d3
|
|
dw Function9289
|
|
dw Function903e
|
|
dw Function8fca
|
|
dw Function925e
|
|
dw Function94fa
|
|
dw Function9529
|
|
dw Function9555
|
|
dw Function9578
|
|
dw Function9591
|
|
dw Function9542
|
|
; 8db8
|
|
|
|
Function8db8: ; 8db8
|
|
ld hl, PalPacket_9c66 + 1
|
|
ld de, Unkn1Pals
|
|
ld c, $4
|
|
call Function9615
|
|
ld hl, PalPacket_9c66 + 1
|
|
ld de, Unkn1Pals + $20
|
|
ld c, $4
|
|
call Function9615
|
|
ld hl, PalPacket_9c66 + 1
|
|
ld de, Unkn2Pals
|
|
ld c, $2
|
|
call Function9615
|
|
jr Function8e23
|
|
|
|
Function8ddb: ; 8ddb
|
|
ld de, Unkn1Pals
|
|
call Function9729
|
|
push hl
|
|
call Function9643
|
|
call Function973a
|
|
push hl
|
|
call Function9643
|
|
ld a, [EnemyHPPal]
|
|
ld l, a
|
|
ld h, $0
|
|
rept 2
|
|
add hl, hl
|
|
endr
|
|
ld bc, Palettes_a8be
|
|
add hl, bc
|
|
call Function9643
|
|
ld a, [PlayerHPPal]
|
|
ld l, a
|
|
ld h, $0
|
|
rept 2
|
|
add hl, hl
|
|
endr
|
|
ld bc, Palettes_a8be
|
|
add hl, bc
|
|
call Function9643
|
|
ld hl, Palettes_a8ca
|
|
call Function9643
|
|
ld de, Unkn2Pals
|
|
pop hl
|
|
call Function9643
|
|
pop hl
|
|
call Function9643
|
|
ld a, $1
|
|
ld [SGBPredef], a
|
|
call Function96a4
|
|
|
|
Function8e23: ; 8e23
|
|
call Function8e85
|
|
hlcoord 0, 0, AttrMap
|
|
ld bc, SCREEN_WIDTH * SCREEN_HEIGHT
|
|
ld a, $2
|
|
call ByteFill
|
|
hlcoord 0, 4, AttrMap
|
|
ld bc, $080a
|
|
ld a, $0
|
|
call Function9663
|
|
hlcoord 10, 0, AttrMap
|
|
ld bc, $070a
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 0, 0, AttrMap
|
|
ld bc, $040a
|
|
ld a, $2
|
|
call Function9663
|
|
hlcoord 10, 7, AttrMap
|
|
ld bc, $050a
|
|
ld a, $3
|
|
call Function9663
|
|
hlcoord 10, 11, AttrMap
|
|
ld bc, $0109
|
|
ld a, $4
|
|
call Function9663
|
|
hlcoord 0, 12, AttrMap
|
|
ld bc, $0078
|
|
ld a, $7
|
|
call ByteFill
|
|
ld hl, Palettes_979c
|
|
ld de, Unkn2Pals + $10
|
|
ld bc, $0030
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function96b3
|
|
ret
|
|
; 8e85
|
|
|
|
|
|
Function8e85: ; 8e85
|
|
callba Function100dc0
|
|
|
|
Function8e8b: ; 8e8b
|
|
ld hl, Palette_b311
|
|
jr nc, .asm_8e93
|
|
ld hl, Palette_b309
|
|
|
|
.asm_8e93
|
|
ld de, Unkn1Pals + 8 * 7
|
|
ld bc, $0008
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
ret
|
|
; 8e9f
|
|
|
|
Function8e9f: ; 8e9f
|
|
callba Function100dc0
|
|
ld hl, Palette_b311
|
|
jr nc, .asm_8ead
|
|
ld hl, Palette_b309
|
|
|
|
.asm_8ead
|
|
ld de, Unkn1Pals
|
|
ld bc, $0008
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
ret
|
|
; 8eb9
|
|
|
|
Function8eb9: ; 8eb9
|
|
ld a, [PlayerGender]
|
|
bit 0, a
|
|
jr z, .asm_8ec5
|
|
ld hl, Palettes_b759
|
|
jr .asm_8ec8
|
|
|
|
.asm_8ec5
|
|
ld hl, Palettes_b729
|
|
|
|
.asm_8ec8
|
|
ld de, Unkn1Pals
|
|
ld bc, $0030
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 8edb
|
|
|
|
Function8edb: ; 8edb
|
|
ld de, Unkn1Pals
|
|
ld a, [wcda1]
|
|
ld l, a
|
|
ld h, $0
|
|
rept 2
|
|
add hl, hl
|
|
endr
|
|
ld bc, Palettes_a8be
|
|
add hl, bc
|
|
call Function9643
|
|
ld a, [CurPartySpecies]
|
|
ld bc, TempMonDVs
|
|
call Function974b
|
|
call Function9643
|
|
ld hl, Palettes_a8ca
|
|
call Function9643
|
|
ld hl, Palette8f52
|
|
ld de, Unkn1Pals + 8 * 3
|
|
ld bc, $0018
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function9699
|
|
hlcoord 0, 0, AttrMap
|
|
ld bc, $0814
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 10, 16, AttrMap
|
|
ld bc, $000a
|
|
ld a, $2
|
|
call ByteFill
|
|
hlcoord 13, 5, AttrMap
|
|
ld bc, $0202
|
|
ld a, $3
|
|
call Function9663
|
|
hlcoord 15, 5, AttrMap
|
|
ld bc, $0202
|
|
ld a, $4
|
|
call Function9663
|
|
hlcoord 17, 5, AttrMap
|
|
ld bc, $0202
|
|
ld a, $5
|
|
call Function9663
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 8f52
|
|
|
|
Palette8f52: ; 8f52
|
|
RGB 31, 31, 31
|
|
RGB 31, 19, 31
|
|
RGB 31, 15, 31
|
|
RGB 00, 00, 00
|
|
|
|
RGB 31, 31, 31
|
|
RGB 21, 31, 14
|
|
RGB 17, 31, 00
|
|
RGB 00, 00, 00
|
|
|
|
RGB 31, 31, 31
|
|
RGB 17, 31, 31
|
|
RGB 17, 31, 31
|
|
RGB 00, 00, 00
|
|
; 8f6a
|
|
|
|
Unknown_8f6a: ; 8f6a
|
|
RGB 31, 19, 31
|
|
|
|
RGB 21, 31, 14
|
|
|
|
RGB 17, 31, 31
|
|
; 8f70
|
|
|
|
Function8f70: ; 8f70
|
|
ld de, Unkn1Pals
|
|
ld a, $1d
|
|
call Function9625
|
|
call Function9630
|
|
ld a, [CurPartySpecies]
|
|
cp $ff
|
|
jr nz, .asm_8f8a
|
|
ld hl, Palette8fba
|
|
call Function9630
|
|
jr .asm_8f90
|
|
|
|
.asm_8f8a
|
|
call Function9775
|
|
call Function9643
|
|
|
|
.asm_8f90
|
|
call Function9699
|
|
hlcoord 1, 1, AttrMap
|
|
ld bc, $0707
|
|
ld a, $1
|
|
call Function9663
|
|
call Function971a
|
|
ld hl, Palette8fc2
|
|
ld de, Unkn2Pals + $38
|
|
ld bc, $0008
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 8fba
|
|
|
|
Palette8fba: ; 8fba
|
|
RGB 11, 23, 00
|
|
RGB 07, 17, 00
|
|
RGB 06, 16, 03
|
|
RGB 05, 12, 01
|
|
|
|
Palette8fc2: ; 8fc2
|
|
RGB 00, 00, 00
|
|
RGB 11, 23, 00
|
|
RGB 07, 17, 00
|
|
RGB 00, 00, 00
|
|
; 8fca
|
|
|
|
Function8fca: ; 8fca
|
|
ld de, Unkn1Pals
|
|
ld a, $1d
|
|
call Function9625
|
|
call Function9630
|
|
ld a, [CurPartySpecies]
|
|
cp $ff
|
|
jr nz, .asm_8fe4
|
|
ld hl, Palette9036
|
|
call Function9630
|
|
jr .asm_8fed
|
|
|
|
.asm_8fe4
|
|
ld bc, TempMonDVs
|
|
call Function974b
|
|
call Function9643
|
|
|
|
.asm_8fed
|
|
call Function9699
|
|
hlcoord 1, 4, AttrMap
|
|
ld bc, $0707
|
|
ld a, $1
|
|
call Function9663
|
|
call Function971a
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 9009
|
|
|
|
Function9009: ; 9009
|
|
ld hl, Palette9036
|
|
call Function9630
|
|
jr .asm_901a
|
|
|
|
ld bc, TempMonDVs
|
|
call Function974b
|
|
call Function9643
|
|
|
|
.asm_901a
|
|
call Function9699
|
|
hlcoord 1, 1, AttrMap
|
|
ld bc, $0707
|
|
ld a, $1
|
|
call Function9663
|
|
call Function971a
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 9036
|
|
|
|
Palette9036: ; 9036
|
|
RGB 31, 15, 00
|
|
RGB 23, 12, 00
|
|
RGB 15, 07, 00
|
|
RGB 00, 00, 00
|
|
; 903e
|
|
|
|
Function903e: ; 903e
|
|
ld de, Unkn1Pals
|
|
ld a, $1d
|
|
call Function9625
|
|
call Function9630
|
|
ld a, [CurPartySpecies]
|
|
call Function9775
|
|
call Function9643
|
|
call Function9699
|
|
hlcoord 7, 5, AttrMap
|
|
ld bc, $0707
|
|
ld a, $1
|
|
call Function9663
|
|
call Function971a
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 906e
|
|
|
|
Function906e: ; 906e
|
|
ld hl, Palettes_b7a9
|
|
ld de, Unkn1Pals
|
|
ld bc, $0080
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function9699
|
|
hlcoord 0, 2, AttrMap
|
|
ld bc, $0a03
|
|
ld a, $2
|
|
call Function9663
|
|
hlcoord 17, 2, AttrMap
|
|
ld bc, $0a03
|
|
ld a, $2
|
|
call Function9663
|
|
hlcoord 0, 4, AttrMap
|
|
ld bc, $0603
|
|
ld a, $3
|
|
call Function9663
|
|
hlcoord 17, 4, AttrMap
|
|
ld bc, $0603
|
|
ld a, $3
|
|
call Function9663
|
|
hlcoord 0, 6, AttrMap
|
|
ld bc, $0203
|
|
ld a, $4
|
|
call Function9663
|
|
hlcoord 17, 6, AttrMap
|
|
ld bc, $0203
|
|
ld a, $4
|
|
call Function9663
|
|
hlcoord 4, 2, AttrMap
|
|
ld bc, $020c
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 3, 2, AttrMap
|
|
ld bc, $0a01
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 16, 2, AttrMap
|
|
ld bc, $0a01
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 0, 12, AttrMap
|
|
ld bc, $0078
|
|
ld a, $7
|
|
call ByteFill
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 90f8
|
|
|
|
Function90f8: ; 90f8
|
|
ld hl, PalPacket_9ca6 + 1
|
|
call Function9610
|
|
call Function9699
|
|
ld de, Unkn2Pals
|
|
ld a, $3c
|
|
call Function9625
|
|
call Function9630
|
|
hlcoord 0, 6, AttrMap
|
|
ld bc, $0c14
|
|
ld a, $1
|
|
call Function9663
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 9122
|
|
|
|
Function9122: ; 9122
|
|
ld b, 0
|
|
ld hl, Jumptable_912d
|
|
rept 2
|
|
add hl, bc
|
|
endr
|
|
ld a, [hli]
|
|
ld h, [hl]
|
|
ld l, a
|
|
jp [hl]
|
|
; 912d
|
|
|
|
Jumptable_912d: ; 912d
|
|
dw Function9133
|
|
dw Function9166
|
|
dw Function9180
|
|
; 9133
|
|
|
|
Function9133: ; 9133
|
|
ld hl, Palette_914e
|
|
ld de, Unkn1Pals
|
|
call Function9630
|
|
ld hl, Palette_9156
|
|
ld de, Unkn2Pals
|
|
ld bc, $0010
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function9699
|
|
ret
|
|
; 914e
|
|
|
|
Palette_914e: ; 914e
|
|
RGB 19, 31, 19
|
|
RGB 18, 23, 31
|
|
RGB 11, 21, 28
|
|
RGB 04, 16, 24
|
|
|
|
Palette_9156: ; 9156
|
|
RGB 29, 29, 29
|
|
RGB 20, 19, 20
|
|
RGB 19, 06, 04
|
|
RGB 03, 04, 06
|
|
|
|
RGB 31, 31, 31
|
|
RGB 31, 31, 31
|
|
RGB 31, 00, 00
|
|
RGB 03, 04, 06
|
|
; 9166
|
|
|
|
Function9166: ; 9166
|
|
ld de, Unkn1Pals
|
|
ld a, $38
|
|
call Function9625
|
|
call Function9630
|
|
ld de, Unkn2Pals
|
|
ld a, $39
|
|
call Function9625
|
|
call Function9630
|
|
call Function9699
|
|
ret
|
|
; 9180
|
|
|
|
Function9180: ; 9180
|
|
ld hl, PalPacket_9c36 + 1
|
|
call Function9610
|
|
ld de, Unkn2Pals
|
|
ld a, $3a
|
|
call Function9625
|
|
call Function9630
|
|
call Function9699
|
|
ret
|
|
; 9195
|
|
|
|
Function9195: ; 9195
|
|
ld hl, Palettes_b789
|
|
ld de, Unkn1Pals
|
|
ld bc, $0028
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function96a4
|
|
call Function9699
|
|
call Function96b3
|
|
ret
|
|
; 91ad
|
|
|
|
Function91ad: ; 91ad
|
|
ld hl, Palettes_b641
|
|
ld de, Unkn1Pals
|
|
ld bc, $0080
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
ld hl, PalPacket_9cb6 + 1
|
|
call Function9610
|
|
call Function9699
|
|
call Function96b3
|
|
ret
|
|
; 91c8
|
|
|
|
Function91c8: ; 91c8
|
|
call Functionb1de
|
|
ld a, $9
|
|
ld [SGBPredef], a
|
|
ret
|
|
; 91d1
|
|
|
|
Function91d1: ; 91d1
|
|
ld hl, PalPacket_9c56 + 1
|
|
call Function9610
|
|
call Function8e9f
|
|
call Function8e85
|
|
call Function971a
|
|
call Function96b3
|
|
ret
|
|
; 91e4
|
|
|
|
Function91e4: ; 91e4
|
|
ld de, Unkn1Pals
|
|
ld a, c
|
|
and a
|
|
jr z, .asm_91f5
|
|
ld a, $1a
|
|
call Function9625
|
|
call Function9630
|
|
jr .asm_921a
|
|
|
|
.asm_91f5
|
|
ld hl, PartyMon1DVs
|
|
ld bc, PartyMon2 - PartyMon1
|
|
ld a, [CurPartyMon]
|
|
call AddNTimes
|
|
ld c, l
|
|
ld b, h
|
|
ld a, [PlayerHPPal]
|
|
call Function974b
|
|
call Function9643
|
|
ld hl, Palettes_979c
|
|
ld de, Unkn2Pals + $10
|
|
ld bc, $0030
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
|
|
.asm_921a
|
|
call Function9699
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 9228
|
|
|
|
Function9228: ; 9228
|
|
ld hl, Palettes_b6f1
|
|
ld de, Unkn1Pals
|
|
ld bc, $0028
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
ld hl, Palettes_b719
|
|
ld de, Unkn2Pals
|
|
ld bc, $0010
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
ld a, $8
|
|
ld [SGBPredef], a
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 9251
|
|
|
|
Function9251: ; 9251
|
|
ld hl, PalPacket_9cb6 + 1
|
|
call Function9610
|
|
call Function9699
|
|
call Function96b3
|
|
ret
|
|
; 925e
|
|
|
|
Function925e: ; 925e
|
|
ld hl, PalPacket_9bc6 + 1
|
|
call Function9610
|
|
ld de, Unkn2Pals
|
|
ld a, $4c
|
|
call Function9625
|
|
call Function9630
|
|
ld a, [rSVBK]
|
|
push af
|
|
ld a, $5
|
|
ld [rSVBK], a
|
|
ld hl, Unkn2Pals
|
|
ld a, $1f
|
|
ld [hli], a
|
|
ld a, $0
|
|
ld [hl], a
|
|
pop af
|
|
ld [rSVBK], a
|
|
call Function9699
|
|
call Function96b3
|
|
ret
|
|
; 9289
|
|
|
|
Function9289: ; 9289
|
|
ld de, Unkn1Pals
|
|
xor a
|
|
call Function976b
|
|
call Function9643
|
|
ld a, $1
|
|
call Function976b
|
|
call Function9643
|
|
ld a, $3
|
|
call Function976b
|
|
call Function9643
|
|
ld a, $2
|
|
call Function976b
|
|
call Function9643
|
|
ld a, $4
|
|
call Function976b
|
|
call Function9643
|
|
ld a, $7
|
|
call Function976b
|
|
call Function9643
|
|
ld a, $6
|
|
call Function976b
|
|
call Function9643
|
|
ld a, $5
|
|
call Function976b
|
|
call Function9643
|
|
ld a, $24
|
|
call Function9625
|
|
call Function9630
|
|
hlcoord 0, 0, AttrMap
|
|
ld bc, SCREEN_WIDTH * SCREEN_HEIGHT
|
|
ld a, [PlayerGender]
|
|
and a
|
|
ld a, $1
|
|
jr z, .asm_92e3
|
|
ld a, $0
|
|
|
|
.asm_92e3
|
|
call ByteFill
|
|
hlcoord 14, 1, AttrMap
|
|
ld bc, $0705
|
|
ld a, [PlayerGender]
|
|
and a
|
|
ld a, $0
|
|
jr z, .asm_92f6
|
|
ld a, $1
|
|
|
|
.asm_92f6
|
|
call Function9663
|
|
hlcoord 18, 1, AttrMap
|
|
ld [hl], $1
|
|
hlcoord 2, 11, AttrMap
|
|
ld bc, $0204
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 6, 11, AttrMap
|
|
ld bc, $0204
|
|
ld a, $2
|
|
call Function9663
|
|
hlcoord 10, 11, AttrMap
|
|
ld bc, $0204
|
|
ld a, $3
|
|
call Function9663
|
|
hlcoord 14, 11, AttrMap
|
|
ld bc, $0204
|
|
ld a, $4
|
|
call Function9663
|
|
hlcoord 2, 14, AttrMap
|
|
ld bc, $0204
|
|
ld a, $5
|
|
call Function9663
|
|
hlcoord 6, 14, AttrMap
|
|
ld bc, $0204
|
|
ld a, $6
|
|
call Function9663
|
|
hlcoord 10, 14, AttrMap
|
|
ld bc, $0204
|
|
ld a, $7
|
|
call Function9663
|
|
ld a, [PlayerGender]
|
|
and a
|
|
push af
|
|
jr z, .asm_935d
|
|
hlcoord 14, 14, AttrMap
|
|
ld bc, $0204
|
|
ld a, $1
|
|
call Function9663
|
|
|
|
.asm_935d
|
|
pop af
|
|
ld c, $0
|
|
jr nz, .asm_9363
|
|
inc c
|
|
|
|
.asm_9363
|
|
ld a, c
|
|
hlcoord 18, 1, AttrMap
|
|
ld [hl], a
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 9373
|
|
|
|
Function9373: ; 9373
|
|
ld de, Unkn1Pals
|
|
ld a, $10
|
|
call Function9625
|
|
call Function9630
|
|
ld a, [PlayerHPPal]
|
|
ld l, a
|
|
ld h, 0
|
|
rept 2
|
|
add hl, hl
|
|
endr
|
|
ld bc, Palettes_a8be
|
|
add hl, bc
|
|
call Function9643
|
|
call Function9699
|
|
hlcoord 11, 1, AttrMap
|
|
ld bc, $0209
|
|
ld a, $1
|
|
call Function9663
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 93a6
|
|
|
|
Function93a6: ; 93a6
|
|
ld hl, PalPacket_9c46 + 1
|
|
call Function9610
|
|
call Function9699
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 93ba
|
|
|
|
Function93ba: ; 93ba
|
|
ld de, Unkn1Pals
|
|
ld a, $1d
|
|
call Function9625
|
|
call Function9630
|
|
call Function9699
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 93d3
|
|
|
|
Function93d3: ; 93d3
|
|
ld a, [BattleType]
|
|
cp BATTLETYPE_TUTORIAL
|
|
jr z, .asm_93e6
|
|
|
|
ld a, [PlayerGender]
|
|
bit 0, a
|
|
jr z, .asm_93e6
|
|
|
|
ld hl, Palettes_9469
|
|
jr .asm_93e9
|
|
|
|
.asm_93e6
|
|
ld hl, Palettes_9439
|
|
|
|
.asm_93e9
|
|
ld de, Unkn1Pals
|
|
ld bc, $0040
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function9699
|
|
hlcoord 0, 0, AttrMap
|
|
ld bc, $010a
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 10, 0, AttrMap
|
|
ld bc, $010a
|
|
ld a, $2
|
|
call Function9663
|
|
hlcoord 7, 2, AttrMap
|
|
ld bc, $0901
|
|
ld a, $3
|
|
call Function9663
|
|
hlcoord 0, 7, AttrMap
|
|
ld bc, $0305
|
|
ld a, $4
|
|
call Function9663
|
|
hlcoord 0, 3, AttrMap
|
|
ld bc, $0305
|
|
ld a, $5
|
|
call Function9663
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 9439
|
|
|
|
Palettes_9439: ; 9439
|
|
RGB 31, 31, 31
|
|
RGB 15, 15, 31
|
|
RGB 00, 00, 31
|
|
RGB 00, 00, 00
|
|
RGB 31, 31, 31
|
|
RGB 15, 15, 31
|
|
RGB 00, 00, 31
|
|
RGB 00, 00, 00
|
|
RGB 31, 11, 31
|
|
RGB 15, 15, 31
|
|
RGB 00, 00, 31
|
|
RGB 00, 00, 00
|
|
RGB 31, 31, 31
|
|
RGB 15, 15, 31
|
|
RGB 00, 00, 31
|
|
RGB 31, 00, 00
|
|
RGB 31, 31, 31
|
|
RGB 15, 15, 31
|
|
RGB 31, 00, 00
|
|
RGB 00, 00, 00
|
|
RGB 31, 31, 31
|
|
RGB 07, 19, 07
|
|
RGB 07, 19, 07
|
|
RGB 00, 00, 00
|
|
; 9469
|
|
|
|
Palettes_9469: ; 9469
|
|
RGB 31, 31, 31
|
|
RGB 31, 14, 31
|
|
RGB 31, 07, 31
|
|
RGB 00, 00, 00
|
|
RGB 31, 31, 31
|
|
RGB 31, 14, 31
|
|
RGB 31, 07, 31
|
|
RGB 00, 00, 00
|
|
RGB 15, 15, 31
|
|
RGB 31, 14, 31
|
|
RGB 31, 07, 31
|
|
RGB 00, 00, 00
|
|
RGB 31, 31, 31
|
|
RGB 31, 14, 31
|
|
RGB 31, 07, 31
|
|
RGB 31, 00, 00
|
|
RGB 31, 31, 31
|
|
RGB 31, 14, 31
|
|
RGB 31, 00, 00
|
|
RGB 00, 00, 00
|
|
RGB 31, 31, 31
|
|
RGB 07, 19, 07
|
|
RGB 07, 19, 07
|
|
RGB 00, 00, 00
|
|
; 9499
|
|
|
|
Function9499: ; 9499
|
|
call Function91c8
|
|
ld de, $0014
|
|
hlcoord 0, 0, AttrMap
|
|
ld a, [wcf82]
|
|
.asm_94a5
|
|
and a
|
|
jr z, .asm_94ac
|
|
dec a
|
|
add hl, de
|
|
jr .asm_94a5
|
|
|
|
.asm_94ac
|
|
ld a, [wcf83]
|
|
ld e, a
|
|
ld d, $0
|
|
add hl, de
|
|
ld a, [wcf82]
|
|
ld b, a
|
|
ld a, [wcf84]
|
|
inc a
|
|
sub b
|
|
ld b, a
|
|
ld a, [wcf83]
|
|
ld c, a
|
|
ld a, [wcf85]
|
|
sub c
|
|
inc a
|
|
ld c, a
|
|
ld a, $0
|
|
call Function9663
|
|
call Function96b3
|
|
ret
|
|
; 94d0
|
|
|
|
Function94d0: ; 94d0
|
|
ld hl, PalPacket_9ba6 + 1
|
|
call Function9610
|
|
call Function9699
|
|
hlcoord 0, 4, AttrMap
|
|
ld bc, $0a14
|
|
ld a, $2
|
|
call Function9663
|
|
hlcoord 0, 6, AttrMap
|
|
ld bc, $0614
|
|
ld a, $1
|
|
call Function9663
|
|
call Function96b3
|
|
call Function96a4
|
|
ld a, $1
|
|
ld [hCGBPalUpdate], a
|
|
ret
|
|
; 94fa
|
|
|
|
Function94fa: ; 94fa
|
|
ld de, Unkn1Pals
|
|
ld a, $4e
|
|
call Function9625
|
|
call Function9630
|
|
ld hl, Palette_9521
|
|
ld de, Unkn2Pals
|
|
call Function9630
|
|
ld hl, Palette_9521
|
|
ld de, Unkn2Pals + 8
|
|
call Function9630
|
|
call Function9699
|
|
call Function96b3
|
|
call Function96a4
|
|
ret
|
|
; 9521
|
|
|
|
Palette_9521: ; 9521
|
|
RGB 31, 31, 31
|
|
RGB 13, 11, 00
|
|
RGB 23, 12, 28
|
|
RGB 00, 00, 00
|
|
; 9529
|
|
|
|
Function9529: ; 9529
|
|
ld de, Unkn1Pals
|
|
ld a, [CurPartySpecies]
|
|
ld bc, TempMonDVs
|
|
call Function974b
|
|
call Function9643
|
|
call Function9699
|
|
call Function96b3
|
|
call Function96a4
|
|
ret
|
|
; 9542
|
|
|
|
Function9542: ; 9542
|
|
ld de, Unkn1Pals
|
|
ld a, [CurPartySpecies]
|
|
call Function9775
|
|
call Function9643
|
|
call Function9699
|
|
call Function96b3
|
|
ret
|
|
; 9555
|
|
|
|
Function9555: ; 9555
|
|
ld hl, PalPacket_9cc6 + 1
|
|
call Function9610
|
|
ld hl, Palettes_b681
|
|
ld de, Unkn2Pals
|
|
ld bc, $0008
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
ld de, Unkn2Pals + $38
|
|
ld a, $1c
|
|
call Function9625
|
|
call Function9630
|
|
call Function9699
|
|
ret
|
|
; 9578
|
|
|
|
Function9578: ; 9578
|
|
ld de, Unkn1Pals
|
|
ld a, [CurPartySpecies]
|
|
ld bc, TempMonDVs
|
|
call Function9764
|
|
call Function9643
|
|
call Function9699
|
|
call Function96b3
|
|
call Function96a4
|
|
ret
|
|
; 9591
|
|
|
|
Function9591: ; 9591
|
|
ld hl, Palette95e0
|
|
ld de, Unkn1Pals
|
|
ld bc, $0010
|
|
ld a, $5
|
|
call FarCopyWRAM
|
|
call Function96a4
|
|
call Function9699
|
|
hlcoord 3, 7, AttrMap
|
|
ld bc, $080e
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 1, 5, AttrMap
|
|
ld bc, $0112
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 1, 16, AttrMap
|
|
ld bc, $0112
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 0, 0, AttrMap
|
|
ld bc, $1102
|
|
ld a, $1
|
|
call Function9663
|
|
hlcoord 18, 5, AttrMap
|
|
ld bc, $0c01
|
|
ld a, $1
|
|
call Function9663
|
|
call Function96b3
|
|
ret
|
|
; 95e0
|
|
|
|
Palette95e0: ; 95e0
|
|
RGB 31, 31, 31
|
|
RGB 16, 31, 14
|
|
RGB 05, 14, 21
|
|
RGB 05, 13, 10
|
|
|
|
RGB 31, 31, 31
|
|
RGB 11, 21, 25
|
|
RGB 05, 14, 21
|
|
RGB 00, 03, 19
|
|
; 95f0
|