shithub: pokecrystal

Download patch

ref: b6055b19446e2de0a885565c0b6749fc11627b46
parent: ac48d654987ef1df3a7ca6e5a40d8e6eab477d7f
author: mid-kid <esteve.varela@gmail.com>
date: Mon Aug 3 19:41:01 EDT 2020

Use TRUE for hCGBPalUpdate

--- a/engine/battle/battle_transition.asm
+++ b/engine/battle/battle_transition.asm
@@ -673,7 +673,7 @@
 	call CopyBytes
 	pop af
 	ldh [rSVBK], a
-	ld a, 1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	call DelayFrame
 	call BattleStart_CopyTilemapAtOnce
--- a/engine/battle_anims/anim_commands.asm
+++ b/engine/battle_anims/anim_commands.asm
@@ -1417,7 +1417,7 @@
 	call CopyPals
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -1438,7 +1438,7 @@
 	call CopyPals
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/engine/battle_anims/bg_effects.asm
+++ b/engine/battle_anims/bg_effects.asm
@@ -2546,7 +2546,7 @@
 	pop bc
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -2573,7 +2573,7 @@
 	pop bc
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/engine/debug/color_picker.asm
+++ b/engine/debug/color_picker.asm
@@ -448,7 +448,7 @@
 	hlcoord 15, 2
 	ld de, wc608 + 2
 	call Function81ca7
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ld a, $3
 	ld [wJumptableIndex], a
@@ -1227,7 +1227,7 @@
 	call Function81ca7
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	call DelayFrame
 	ret
--- a/engine/events/heal_machine_anim.asm
+++ b/engine/events/heal_machine_anim.asm
@@ -167,7 +167,7 @@
 	ld bc, 1 palettes
 	ld a, BANK(wOBPals2)
 	call FarCopyWRAM
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -231,7 +231,7 @@
 
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/engine/events/poisonstep_pals.asm
+++ b/engine/events/poisonstep_pals.asm
@@ -39,7 +39,7 @@
 	jr nz, .loop
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ld c, 4
 	call DelayFrames
--- a/engine/gfx/cgb_layouts.asm
+++ b/engine/gfx/cgb_layouts.asm
@@ -189,7 +189,7 @@
 	ld a, BANK(wBGPals1)
 	call FarCopyWRAM
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -243,7 +243,7 @@
 
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -282,7 +282,7 @@
 	call FarCopyWRAM
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -317,7 +317,7 @@
 	call InitPartyMenuOBPals
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -339,7 +339,7 @@
 	call InitPartyMenuOBPals
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -362,7 +362,7 @@
 	call InitPartyMenuOBPals
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -415,7 +415,7 @@
 	call ByteFill
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -433,7 +433,7 @@
 	call FillBoxCGB
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -573,7 +573,7 @@
 	call WipeAttrmap
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -591,7 +591,7 @@
 	ld a, SCGB_DIPLOMA
 	ld [wDefaultSGBLayout], a
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -725,7 +725,7 @@
 	ld [hl], a
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -749,7 +749,7 @@
 	call FillBoxCGB
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -759,7 +759,7 @@
 	call WipeAttrmap
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -771,7 +771,7 @@
 	call WipeAttrmap
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -819,7 +819,7 @@
 	call FillBoxCGB
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -877,7 +877,7 @@
 	call FillBoxCGB
 	call ApplyAttrmap
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/engine/gfx/color.asm
+++ b/engine/gfx/color.asm
@@ -150,7 +150,7 @@
 	call FarCopyWRAM
 
 	call ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -352,7 +352,7 @@
 	ld bc, 4
 	ld a, BANK(wBGPals2)
 	call FarCopyWRAM
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/engine/gfx/crystal_layouts.asm
+++ b/engine/gfx/crystal_layouts.asm
@@ -157,7 +157,7 @@
 .asm_49467
 	farcall ApplyAttrmap
 	farcall ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/engine/movie/intro.asm
+++ b/engine/movie/intro.asm
@@ -308,7 +308,7 @@
 	ld [wOBPals2 + 13], a
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -1508,7 +1508,7 @@
 	jr nz, .loop1
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -1632,7 +1632,7 @@
 
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -1710,7 +1710,7 @@
 
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -1773,7 +1773,7 @@
 
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -1886,7 +1886,7 @@
 	dw IntroGrass2GFX
 
 Intro_SetCGBPalUpdate:
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -1903,7 +1903,7 @@
 
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	call DelayFrame
 	call DelayFrame
--- a/engine/movie/title.asm
+++ b/engine/movie/title.asm
@@ -198,7 +198,7 @@
 	ld a, -112
 	ldh [hWY], a
 
-	ld a, 1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 
 ; Update BG Map 0 (bank 0)
--- a/engine/movie/unused_title.asm
+++ b/engine/movie/unused_title.asm
@@ -88,7 +88,7 @@
 	pop af
 	ldh [rSVBK], a
 
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 
 	ld de, MUSIC_TITLE
--- a/engine/overworld/init_map.asm
+++ b/engine/overworld/init_map.asm
@@ -33,7 +33,7 @@
 	call _OpenAndCloseMenu_HDMATransferTilemapAndAttrmap
 	farcall LoadOW_BGPal7
 	farcall ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	xor a
 	ldh [hBGMapMode], a
--- a/home/palettes.asm
+++ b/home/palettes.asm
@@ -99,7 +99,7 @@
 	ld c, 8
 	call CopyPals
 ; request pal update
-	ld a, 1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 
 	pop af
@@ -147,7 +147,7 @@
 	ld c, 8
 	call CopyPals
 ; request pal update
-	ld a, 1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 
 	pop af
@@ -182,7 +182,7 @@
 	ld b, a
 	ld c, 1
 	call CopyPals
-	ld a, 1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 
 	pop af
@@ -219,7 +219,7 @@
 	ld b, a
 	ld c, 1
 	call CopyPals
-	ld a, 1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 
 	pop af
@@ -319,7 +319,7 @@
 	call ByteFill
 	pop af
 	ldh [rSVBK], a
-	ld a, 1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	call DelayFrame
 	ret
--- a/home/tilemap.asm
+++ b/home/tilemap.asm
@@ -197,7 +197,7 @@
 	ldh [rSVBK], a
 
 ; Request palette update
-	ld a, 1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/mobile/mobile_40.asm
+++ b/mobile/mobile_40.asm
@@ -409,7 +409,7 @@
 Function1002ed:
 	farcall LoadOW_BGPal7
 	farcall ApplyPals
-	ld a, $01
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	call DelayFrame
 	ret
@@ -2210,7 +2210,7 @@
 
 Function100ed4:
 	farcall ApplyPals
-	ld a, $01
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/mobile/mobile_42.asm
+++ b/mobile/mobile_42.asm
@@ -1450,7 +1450,7 @@
 	jr nz, .loop
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret
 
@@ -1474,7 +1474,7 @@
 	ld [hld], a
 	pop af
 	ldh [rSVBK], a
-	ld a, $1
+	ld a, TRUE 
 	ldh [hCGBPalUpdate], a
 	ret
 
--- a/mobile/mobile_5b.asm
+++ b/mobile/mobile_5b.asm
@@ -650,7 +650,7 @@
 	ld a, $5
 	call FarCopyWRAM
 	farcall ApplyPals
-	ld a, $1
+	ld a, TRUE
 	ldh [hCGBPalUpdate], a
 	ret