pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2024-11-16 11:27:33 -08:00
Code Issues Packages Projects Releases Wiki Activity
7cc1b301ab
pokecrystal-board/predef/cgb.asm

1115 lines
16 KiB
NASM
Raw Normal View History

split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
; 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 $fc
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
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9c66 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, $d000
ld c, $4
item effect incbins
2013-12-24 14:11:52 -08:00
call Function9615
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9c66 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, $d020
ld c, $4
item effect incbins
2013-12-24 14:11:52 -08:00
call Function9615
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9c66 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, MartPointer
ld c, $2
item effect incbins
2013-12-24 14:11:52 -08:00
call Function9615
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
jr Function8e23
Function8ddb: ; 8ddb
ld de, $d000
call Function9729
push hl
call Function9643
call Function973a
push hl
call Function9643
ld a, [EnemyHPPal]
ld l, a
ld h, $0
add hl, hl
add hl, hl
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld bc, Palettes_a8be
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
add hl, bc
call Function9643
ld a, [PlayerHPPal]
ld l, a
ld h, $0
add hl, hl
add hl, hl
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld bc, Palettes_a8be
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
add hl, bc
call Function9643
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_a8ca
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9643
ld de, MartPointer
pop hl
call Function9643
pop hl
call Function9643
ld a, $1
ld [SGBPredef], a
call Function96a4
Function8e23: ; 8e23
call Function8e85
ld hl, AttrMap
ld bc, $0168
ld a, $2
call ByteFill
ld hl, $ce29
ld bc, $080a
ld a, $0
call Function9663
ld hl, $cde3
ld bc, $070a
ld a, $1
call Function9663
ld hl, AttrMap
ld bc, $040a
ld a, $2
call Function9663
ld hl, $ce6f
ld bc, $050a
ld a, $3
call Function9663
ld hl, $cebf
ld bc, $0109
ld a, $4
call Function9663
ld hl, $cec9
ld bc, $0078
ld a, $7
call ByteFill
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_979c
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, $d050
ld bc, $0030
ld a, $5
call FarCopyWRAM
call Function96b3
ret
; 8e85
Function8e85: ; 8e85
* more callab/callba macros
2013-10-01 17:47:54 -07:00
callba Function100dc0
* applied callab/callba macros where possible * corrected some mislabeled jump addresses
2013-10-01 16:59:16 -07:00
Function8e8b: ; 8e8b
More SGB and CGB palettes.
2014-03-01 22:22:33 -08:00
ld hl, Palette_b311
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
jr nc, .asm_8e93
More SGB and CGB palettes.
2014-03-01 22:22:33 -08:00
ld hl, Palette_b309
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
.asm_8e93
ld de, $d038
ld bc, $0008
ld a, $5
call FarCopyWRAM
ret
; 8e9f
Function8e9f: ; 8e9f
callba Function100dc0
More SGB and CGB palettes.
2014-03-01 22:22:33 -08:00
ld hl, Palette_b311
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
jr nc, .asm_8ead
More SGB and CGB palettes.
2014-03-01 22:22:33 -08:00
ld hl, Palette_b309
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
.asm_8ead
ld de, $d000
ld bc, $0008
ld a, $5
call FarCopyWRAM
ret
; 8eb9
Function8eb9: ; 8eb9
ld a, [PlayerGender]
bit 0, a
jr z, .asm_8ec5
More SGB and CGB palettes.
2014-03-01 22:22:33 -08:00
ld hl, Palettes_b759
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
jr .asm_8ec8
.asm_8ec5
More SGB and CGB palettes.
2014-03-01 22:22:33 -08:00
ld hl, Palettes_b729
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
.asm_8ec8
ld de, $d000
ld bc, $0030
ld a, $5
call FarCopyWRAM
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 8edb
Function8edb: ; 8edb
ld de, $d000
ld a, [$cda1]
ld l, a
ld h, $0
add hl, hl
add hl, hl
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld bc, Palettes_a8be
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
add hl, bc
call Function9643
ld a, [CurPartySpecies]
ld bc, TempMonDVs
call Function974b
call Function9643
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_a8ca
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9643
dump a couple palettes in predef/cgb.asm
2013-09-15 14:31:18 -07:00
ld hl, Palette8f52
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, $d018
ld bc, $0018
ld a, $5
call FarCopyWRAM
call Function9699
ld hl, AttrMap
ld bc, $0814
ld a, $1
call Function9663
ld hl, $cf23
ld bc, $000a
ld a, $2
call ByteFill
ld hl, $ce4a
ld bc, $0202
ld a, $3
call Function9663
ld hl, $ce4c
ld bc, $0202
ld a, $4
call Function9663
ld hl, $ce4e
ld bc, $0202
ld a, $5
call Function9663
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 8f52
dump a couple palettes in predef/cgb.asm
2013-09-15 14:31:18 -07:00
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
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
Unknown_8f6a: ; 8f6a
RGB 31, 19, 31
RGB 21, 31, 14
RGB 17, 31, 31
; 8f70
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
Function8f70: ; 8f70
ld de, Unkn1Pals
ld a, $1d
call Function9625
call Function9630
ld a, [CurPartySpecies]
cp $ff
jr nz, .asm_8f8a
dump a couple palettes in predef/cgb.asm
2013-09-15 14:31:18 -07:00
ld hl, Palette8fba
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9630
jr .asm_8f90
.asm_8f8a
call Function9775
call Function9643
.asm_8f90
call Function9699
ld hl, $cdee
ld bc, $0707
ld a, $1
call Function9663
call Function971a
dump a couple palettes in predef/cgb.asm
2013-09-15 14:31:18 -07:00
ld hl, Palette8fc2
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, $d078
ld bc, $0008
ld a, $5
call FarCopyWRAM
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 8fba
dump a couple palettes in predef/cgb.asm
2013-09-15 14:31:18 -07:00
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
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
Function8fca: ; 8fca
ld de, Unkn1Pals
ld a, $1d
call Function9625
call Function9630
ld a, [CurPartySpecies]
cp $ff
jr nz, .asm_8fe4
dump a couple palettes in predef/cgb.asm
2013-09-15 14:31:18 -07:00
ld hl, Palette9036
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9630
jr .asm_8fed
.asm_8fe4
ld bc, TempMonDVs
call Function974b
call Function9643
.asm_8fed
call Function9699
ld hl, $ce2a
ld bc, $0707
ld a, $1
call Function9663
call Function971a
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 9009
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
Function9009: ; 9009
ld hl, Palette9036
call Function9630
jr .asm_901a
ld bc, TempMonDVs
call Function974b
call Function9643
.asm_901a
call Function9699
ld hl, $cdee
ld bc, $0707
ld a, $1
call Function9663
call Function971a
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 9036
dump a couple palettes in predef/cgb.asm
2013-09-15 14:31:18 -07:00
Palette9036: ; 9036
RGB 31, 15, 00
RGB 23, 12, 00
RGB 15, 07, 00
RGB 00, 00, 00
; 903e
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
Function903e: ; 903e
ld de, Unkn1Pals
ld a, $1d
call Function9625
call Function9630
ld a, [CurPartySpecies]
call Function9775
call Function9643
call Function9699
ld hl, $ce44
ld bc, $0707
ld a, $1
call Function9663
call Function971a
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 906e
Function906e: ; 906e
More SGB and CGB palettes.
2014-03-01 22:22:33 -08:00
ld hl, Palettes_b7a9
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, Unkn1Pals
ld bc, $0080
ld a, $5
call FarCopyWRAM
call Function9699
ld hl, $ce01
ld bc, $0a03
ld a, $2
call Function9663
ld hl, $ce12
ld bc, $0a03
ld a, $2
call Function9663
ld hl, $ce29
ld bc, $0603
ld a, $3
call Function9663
ld hl, $ce3a
ld bc, $0603
ld a, $3
call Function9663
ld hl, $ce51
ld bc, $0203
ld a, $4
call Function9663
ld hl, $ce62
ld bc, $0203
ld a, $4
call Function9663
ld hl, $ce05
ld bc, $020c
ld a, $1
call Function9663
ld hl, $ce04
ld bc, $0a01
ld a, $1
call Function9663
ld hl, $ce11
ld bc, $0a01
ld a, $1
call Function9663
ld hl, $cec9
ld bc, $0078
ld a, $7
call ByteFill
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 90f8
Function90f8: ; 90f8
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9ca6 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9610
call Function9699
ld de, Unkn2Pals
ld a, $3c
call Function9625
call Function9630
ld hl, $ce51
ld bc, $0c14
ld a, $1
call Function9663
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 9122
Function9122: ; 9122
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld b, 0
ld hl, Jumptable_912d
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
add hl, bc
add hl, bc
ld a, [hli]
ld h, [hl]
ld l, a
jp [hl]
; 912d
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
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
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
Function9195: ; 9195
More SGB and CGB palettes.
2014-03-01 22:22:33 -08:00
ld hl, Palettes_b789
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, Unkn1Pals
ld bc, $0028
ld a, $5
call FarCopyWRAM
call Function96a4
call Function9699
call Function96b3
ret
; 91ad
Function91ad: ; 91ad
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_b641
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, Unkn1Pals
ld bc, $0080
ld a, $5
call FarCopyWRAM
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9cb6 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9610
call Function9699
call Function96b3
ret
; 91c8
Function91c8: ; 91c8
call Functionb1de
ld a, $9
ld [SGBPredef], a
ret
; 91d1
Function91d1: ; 91d1
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9c56 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
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
More PartyMon labels for relative addressing.
2014-06-23 12:45:30 -07:00
ld bc, PartyMon2 - PartyMon1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld a, [CurPartyMon]
call AddNTimes
ld c, l
ld b, h
ld a, [PlayerHPPal]
call Function974b
call Function9643
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_979c
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, $d050
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
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_b6f1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, Unkn1Pals
ld bc, $0028
ld a, $5
call FarCopyWRAM
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_b719
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
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
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9cb6 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9610
call Function9699
call Function96b3
ret
; 925e
Function925e: ; 925e
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9bc6 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
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
ld hl, AttrMap
ld bc, $0168
ld a, [PlayerGender]
and a
ld a, $1
jr z, .asm_92e3
ld a, $0
.asm_92e3
call ByteFill
ld hl, $cdfb
ld bc, $0705
ld a, [PlayerGender]
and a
ld a, $0
jr z, .asm_92f6
ld a, $1
.asm_92f6
call Function9663
ld hl, $cdff
ld [hl], $1
ld hl, $ceb7
ld bc, $0204
ld a, $1
call Function9663
ld hl, $cebb
ld bc, $0204
ld a, $2
call Function9663
ld hl, $cebf
ld bc, $0204
ld a, $3
call Function9663
ld hl, $cec3
ld bc, $0204
ld a, $4
call Function9663
ld hl, $cef3
ld bc, $0204
ld a, $5
call Function9663
ld hl, $cef7
ld bc, $0204
ld a, $6
call Function9663
ld hl, $cefb
ld bc, $0204
ld a, $7
call Function9663
ld a, [PlayerGender]
and a
push af
jr z, .asm_935d
ld hl, $ceff
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
ld hl, $cdff
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
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld h, 0
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
add hl, hl
add hl, hl
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld bc, Palettes_a8be
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
add hl, bc
call Function9643
call Function9699
ld hl, $cdf8
ld bc, $0209
ld a, $1
call Function9663
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 93a6
Function93a6: ; 93a6
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9c46 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
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]
Battle type constants in the wild. Also add constants for trap and Celebi event battles.
2014-06-13 22:53:20 -07:00
cp BATTLETYPE_TUTORIAL
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
jr z, .asm_93e6
Battle type constants in the wild. Also add constants for trap and Celebi event battles.
2014-06-13 22:53:20 -07:00
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld a, [PlayerGender]
bit 0, a
jr z, .asm_93e6
Battle type constants in the wild. Also add constants for trap and Celebi event battles.
2014-06-13 22:53:20 -07:00
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_9469
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
jr .asm_93e9
.asm_93e6
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_9439
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
.asm_93e9
ld de, Unkn1Pals
ld bc, $0040
ld a, $5
call FarCopyWRAM
call Function9699
ld hl, AttrMap
ld bc, $010a
ld a, $1
call Function9663
ld hl, $cde3
ld bc, $010a
ld a, $2
call Function9663
ld hl, $ce08
ld bc, $0901
ld a, $3
call Function9663
ld hl, $ce65
ld bc, $0305
ld a, $4
call Function9663
ld hl, $ce15
ld bc, $0305
ld a, $5
call Function9663
call Function96b3
call Function96a4
ld a, $1
ld [hCGBPalUpdate], a
ret
; 9439
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
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
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
Function9499: ; 9499
call Function91c8
ld de, $0014
ld hl, AttrMap
ld a, [$cf82]
.asm_94a5
and a
jr z, .asm_94ac
dec a
add hl, de
jr .asm_94a5
.asm_94ac
ld a, [$cf83]
ld e, a
ld d, $0
add hl, de
ld a, [$cf82]
ld b, a
ld a, [$cf84]
inc a
sub b
ld b, a
ld a, [$cf83]
ld c, a
ld a, [$cf85]
sub c
inc a
ld c, a
ld a, $0
call Function9663
call Function96b3
ret
; 94d0
Function94d0: ; 94d0
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9ba6 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9610
call Function9699
ld hl, $ce29
ld bc, $0a14
ld a, $2
call Function9663
ld hl, $ce51
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
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palette_9521
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, Unkn2Pals
call Function9630
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palette_9521
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, $d048
call Function9630
call Function9699
call Function96b3
call Function96a4
ret
; 9521
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
Palette_9521: ; 9521
RGB 31, 31, 31
RGB 13, 11, 00
RGB 23, 12, 28
RGB 00, 00, 00
; 9529
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
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
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, PalPacket_9cc6 + 1
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
call Function9610
Finish off SGB and CGB code and data. That should be it for bank 2.
2014-03-02 13:02:55 -08:00
ld hl, Palettes_b681
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, Unkn2Pals
ld bc, $0008
ld a, $5
call FarCopyWRAM
ld de, $d078
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
move part of an incbin into predef/cgb.asm
2013-09-15 14:08:10 -07:00
ld hl, Palette95e0
split sgb-to-cgb asm into predef/cgb.asm
2013-09-09 12:33:03 -07:00
ld de, Unkn1Pals
ld bc, $0010
ld a, $5
call FarCopyWRAM
call Function96a4
call Function9699
ld hl, $ce68
ld bc, $080e
ld a, $1
call Function9663
ld hl, $ce3e
ld bc, $0112
ld a, $1
call Function9663
ld hl, $cf1a
ld bc, $0112
ld a, $1
call Function9663
ld hl, AttrMap
ld bc, $1102
ld a, $1
call Function9663
ld hl, $ce4f
ld bc, $0c01
ld a, $1
call Function9663
call Function96b3
ret
; 95e0
move part of an incbin into predef/cgb.asm
2013-09-15 14:08:10 -07:00
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
Reference in New Issue Copy Permalink