Rename Pals labels in WRAM bank 5

This commit is contained in:
xCrystal
2018-01-01 15:08:21 +01:00
parent 6e12a51503
commit 37369d1ae0
35 changed files with 309 additions and 309 deletions

View File

@@ -68,21 +68,21 @@ Predef_LoadSGBLayoutCGB: ; 8d59
_CGB_BattleGrayscale: ; 8db8
ld hl, PalPacket_9c66 + 1
ld de, UnknBGPals
ld de, wBGPals1
ld c, 4
call CopyPalettes
ld hl, PalPacket_9c66 + 1
ld de, UnknBGPals palette PAL_BATTLE_BG_EXP
ld de, wBGPals1 palette PAL_BATTLE_BG_EXP
ld c, 4
call CopyPalettes
ld hl, PalPacket_9c66 + 1
ld de, UnknOBPals
ld de, wOBPals1
ld c, 2
call CopyPalettes
jr _CGB_FinishBattleScreenLayout
_CGB_BattleColors: ; 8ddb
ld de, UnknBGPals
ld de, wBGPals1
call GetBattlemonBackpicPalettePointer
push hl
call LoadPalette_White_Col1_Col2_Black ; PAL_BATTLE_BG_PLAYER
@@ -107,7 +107,7 @@ _CGB_BattleColors: ; 8ddb
call LoadPalette_White_Col1_Col2_Black ; PAL_BATTLE_BG_PLAYER_HP
ld hl, ExpBarPalette
call LoadPalette_White_Col1_Col2_Black ; PAL_BATTLE_BG_EXP
ld de, UnknOBPals
ld de, wOBPals1
pop hl
call LoadPalette_White_Col1_Col2_Black ; PAL_BATTLE_OB_ENEMY
pop hl
@@ -146,9 +146,9 @@ _CGB_FinishBattleScreenLayout: ; 8e23
ld a, PAL_BATTLE_BG_TEXT
call ByteFill
ld hl, BattleObjectPals
ld de, UnknOBPals palette PAL_BATTLE_OB_GRAY
ld de, wOBPals1 palette PAL_BATTLE_OB_GRAY
ld bc, 6 palettes
ld a, BANK(UnknOBPals)
ld a, BANK(wOBPals1)
call FarCopyWRAM
call ApplyAttrMap
ret
@@ -162,9 +162,9 @@ Mobile_InitPartyMenuBGPal7: ; 8e8b
jr nc, .not_mobile
ld hl, Palette_b309
.not_mobile
ld de, UnknBGPals palette 7
ld de, wBGPals1 palette 7
ld bc, 1 palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
ret
; 8e9f
@@ -175,9 +175,9 @@ InitPartyMenuBGPal0: ; 8e9f
jr nc, .not_mobile
ld hl, Palette_b309
.not_mobile
ld de, UnknBGPals palette 0
ld de, wBGPals1 palette 0
ld bc, 1 palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
ret
; 8eb9
@@ -192,9 +192,9 @@ _CGB_PokegearPals: ; 8eb9
.male
ld hl, MalePokegearPals
.got_pals
ld de, UnknBGPals
ld de, wBGPals1
ld bc, 6 palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
call ApplyPals
ld a, $1
@@ -203,7 +203,7 @@ _CGB_PokegearPals: ; 8eb9
; 8edb
_CGB_StatsScreenHPPals: ; 8edb
ld de, UnknBGPals
ld de, wBGPals1
ld a, [wCurHPPal]
ld l, a
ld h, $0
@@ -219,9 +219,9 @@ _CGB_StatsScreenHPPals: ; 8edb
ld hl, ExpBarPalette
call LoadPalette_White_Col1_Col2_Black ; exp palette
ld hl, StatsScreenPagePals
ld de, UnknBGPals palette 3
ld de, wBGPals1 palette 3
ld bc, 3 palettes ; pink, green, and blue page palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
call WipeAttrMap
@@ -285,7 +285,7 @@ StatsScreenPals: ; 8f6a
; 8f70
_CGB_Pokedex: ; 8f70
ld de, UnknBGPals
ld de, wBGPals1
ld a, $1d
call GetPredefPal
call LoadHLPaletteIntoDE ; dex interface palette
@@ -307,9 +307,9 @@ _CGB_Pokedex: ; 8f70
call FillBoxCGB
call InitPartyMenuOBPals
ld hl, .PokedexCursorPalette
ld de, UnknOBPals palette 7 ; green cursor palette
ld de, wOBPals1 palette 7 ; green cursor palette
ld bc, 1 palettes
ld a, BANK(UnknOBPals)
ld a, BANK(wOBPals1)
call FarCopyWRAM
call ApplyAttrMap
call ApplyPals
@@ -332,7 +332,7 @@ _CGB_Pokedex: ; 8f70
; 8fca
_CGB_BillsPC: ; 8fca
ld de, UnknBGPals
ld de, wBGPals1
ld a, $1d
call GetPredefPal
call LoadHLPaletteIntoDE
@@ -392,7 +392,7 @@ _CGB_BillsPC: ; 8fca
; 903e
_CGB_PokedexUnownMode: ; 903e
ld de, UnknBGPals
ld de, wBGPals1
ld a, $1d
call GetPredefPal
call LoadHLPaletteIntoDE
@@ -414,9 +414,9 @@ _CGB_PokedexUnownMode: ; 903e
_CGB_SlotMachine: ; 906e
ld hl, SlotMachinePals
ld de, UnknBGPals
ld de, wBGPals1
ld bc, 16 palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
call WipeAttrMap
hlcoord 0, 2, AttrMap
@@ -470,7 +470,7 @@ _CGB06: ; 90f8
ld hl, PalPacket_9ca6 + 1
call CopyFourPalettes
call WipeAttrMap
ld de, UnknOBPals
ld de, wOBPals1
ld a, $3c
call GetPredefPal
call LoadHLPaletteIntoDE
@@ -504,12 +504,12 @@ _CGB07: ; 9122
.Function9133: ; 9133
ld hl, .Palette_914e
ld de, UnknBGPals
ld de, wBGPals1
call LoadHLPaletteIntoDE
ld hl, .Palette_9156
ld de, UnknOBPals
ld de, wOBPals1
ld bc, 2 palettes
ld a, BANK(UnknOBPals)
ld a, BANK(wOBPals1)
call FarCopyWRAM
call WipeAttrMap
ret
@@ -534,12 +534,12 @@ _CGB07: ; 9122
; 9166
.Function9166: ; 9166
ld de, UnknBGPals
ld de, wBGPals1
ld a, $38
call GetPredefPal
call LoadHLPaletteIntoDE
ld de, UnknOBPals
ld de, wOBPals1
ld a, $39
call GetPredefPal
call LoadHLPaletteIntoDE
@@ -550,7 +550,7 @@ _CGB07: ; 9122
.Function9180: ; 9180
ld hl, PalPacket_9c36 + 1
call CopyFourPalettes
ld de, UnknOBPals
ld de, wOBPals1
ld a, $3a
call GetPredefPal
call LoadHLPaletteIntoDE
@@ -560,9 +560,9 @@ _CGB07: ; 9122
_CGB11: ; 9195
ld hl, Palettes_b789
ld de, UnknBGPals
ld de, wBGPals1
ld bc, 5 palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
call ApplyPals
call WipeAttrMap
@@ -572,9 +572,9 @@ _CGB11: ; 9195
_CGB_Diploma: ; 91ad
ld hl, DiplomaPalettes
ld de, UnknBGPals
ld de, wBGPals1
ld bc, 16 palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
ld hl, PalPacket_9cb6 + 1
@@ -602,7 +602,7 @@ _CGB_PartyMenu: ; 91d1
; 91e4
_CGB_Evolution: ; 91e4
ld de, UnknBGPals
ld de, wBGPals1
ld a, c
and a
jr z, .pokemon
@@ -622,9 +622,9 @@ _CGB_Evolution: ; 91e4
call GetPlayerOrMonPalettePointer
call LoadPalette_White_Col1_Col2_Black
ld hl, BattleObjectPals
ld de, UnknOBPals palette PAL_BATTLE_OB_GRAY
ld de, wOBPals1 palette PAL_BATTLE_OB_GRAY
ld bc, 6 palettes
ld a, BANK(UnknOBPals)
ld a, BANK(wOBPals1)
call FarCopyWRAM
.got_palette
@@ -638,14 +638,14 @@ _CGB_Evolution: ; 91e4
_CGB0c: ; 9228
ld hl, Palettes_b6f1
ld de, UnknBGPals
ld de, wBGPals1
ld bc, 5 palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
ld hl, Palettes_b719
ld de, UnknOBPals
ld de, wOBPals1
ld bc, 2 palettes
ld a, BANK(UnknOBPals)
ld a, BANK(wOBPals1)
call FarCopyWRAM
ld a, SCGB_DIPLOMA
ld [SGBPredef], a
@@ -666,15 +666,15 @@ _CGB0d: ; 9251
_CGB_UnownPuzzle: ; 925e
ld hl, PalPacket_9bc6 + 1
call CopyFourPalettes
ld de, UnknOBPals
ld de, wOBPals1
ld a, $4c
call GetPredefPal
call LoadHLPaletteIntoDE
ld a, [rSVBK]
push af
ld a, BANK(UnknOBPals)
ld a, BANK(wOBPals1)
ld [rSVBK], a
ld hl, UnknOBPals
ld hl, wOBPals1
ld a, $1f
ld [hli], a
ld a, $0
@@ -687,7 +687,7 @@ _CGB_UnownPuzzle: ; 925e
; 9289
_CGB_TrainerCard: ; 9289
ld de, UnknBGPals
ld de, wBGPals1
xor a ; CHRIS
call GetTrainerPalettePointer
call LoadPalette_White_Col1_Col2_Black
@@ -793,7 +793,7 @@ _CGB_TrainerCard: ; 9289
; 9373
_CGB_MoveList: ; 9373
ld de, UnknBGPals
ld de, wBGPals1
ld a, $10
call GetPredefPal
call LoadHLPaletteIntoDE
@@ -829,7 +829,7 @@ _CGB0f: ; 93a6
; 93ba
_CGB_PokedexSearchOption: ; 93ba
ld de, UnknBGPals
ld de, wBGPals1
ld a, $1d
call GetPredefPal
call LoadHLPaletteIntoDE
@@ -858,9 +858,9 @@ _CGB_PackPals: ; 93d3
ld hl, .ChrisPackPals
.got_gender
ld de, UnknBGPals
ld de, wBGPals1
ld bc, 8 palettes ; 6 palettes?
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
call WipeAttrMap
hlcoord 0, 0, AttrMap
@@ -953,15 +953,15 @@ _CGB13: ; 94d0
; 94fa
_CGB_GamefreakLogo: ; 94fa
ld de, UnknBGPals
ld de, wBGPals1
ld a, $4e
call GetPredefPal
call LoadHLPaletteIntoDE
ld hl, .Palette
ld de, UnknOBPals
ld de, wOBPals1
call LoadHLPaletteIntoDE
ld hl, .Palette
ld de, UnknOBPals palette 1
ld de, wOBPals1 palette 1
call LoadHLPaletteIntoDE
call WipeAttrMap
call ApplyAttrMap
@@ -977,7 +977,7 @@ _CGB_GamefreakLogo: ; 94fa
; 9529
_CGB_PlayerOrMonFrontpicPals: ; 9529
ld de, UnknBGPals
ld de, wBGPals1
ld a, [CurPartySpecies]
ld bc, TempMonDVs
call GetPlayerOrMonPalettePointer
@@ -989,7 +989,7 @@ _CGB_PlayerOrMonFrontpicPals: ; 9529
; 9542
_CGB1e: ; 9542
ld de, UnknBGPals
ld de, wBGPals1
ld a, [CurPartySpecies]
call GetMonPalettePointer_
call LoadPalette_White_Col1_Col2_Black
@@ -1002,11 +1002,11 @@ _CGB_TradeTube: ; 9555
ld hl, PalPacket_9cc6 + 1
call CopyFourPalettes
ld hl, PartyMenuOBPals
ld de, UnknOBPals
ld de, wOBPals1
ld bc, 1 palettes
ld a, BANK(UnknOBPals)
ld a, BANK(wOBPals1)
call FarCopyWRAM
ld de, UnknOBPals palette 7
ld de, wOBPals1 palette 7
ld a, $1c
call GetPredefPal
call LoadHLPaletteIntoDE
@@ -1015,7 +1015,7 @@ _CGB_TradeTube: ; 9555
; 9578
_CGB_TrainerOrMonFrontpicPals: ; 9578
ld de, UnknBGPals
ld de, wBGPals1
ld a, [CurPartySpecies]
ld bc, TempMonDVs
call GetFrontpicPalettePointer
@@ -1028,9 +1028,9 @@ _CGB_TrainerOrMonFrontpicPals: ; 9578
_CGB_MysteryGift: ; 9591
ld hl, .Palettes
ld de, UnknBGPals
ld de, wBGPals1
ld bc, 2 palettes
ld a, BANK(UnknBGPals)
ld a, BANK(wBGPals1)
call FarCopyWRAM
call ApplyPals
call WipeAttrMap