You've already forked pokecrystal-board
mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-09-08 08:13:02 -07:00
Use labels instead of constants for HRAM
Use explicit ldh instruction to access HRAM locations, don't rely on optimizing ld
This commit is contained in:
@@ -43,11 +43,11 @@ _TimeOfDayPals::
|
||||
ld hl, wBGPals1 palette PAL_BG_TEXT
|
||||
|
||||
; save wram bank
|
||||
ld a, [rSVBK]
|
||||
ldh a, [rSVBK]
|
||||
ld b, a
|
||||
|
||||
ld a, BANK(wBGPals1)
|
||||
ld [rSVBK], a
|
||||
ldh [rSVBK], a
|
||||
|
||||
; push palette
|
||||
ld c, NUM_PAL_COLORS
|
||||
@@ -62,7 +62,7 @@ _TimeOfDayPals::
|
||||
|
||||
; restore wram bank
|
||||
ld a, b
|
||||
ld [rSVBK], a
|
||||
ldh [rSVBK], a
|
||||
|
||||
; update sgb pals
|
||||
ld b, SCGB_MAPPALS
|
||||
@@ -72,11 +72,11 @@ _TimeOfDayPals::
|
||||
ld hl, wOBPals1 - 1 ; last byte in wBGPals1
|
||||
|
||||
; save wram bank
|
||||
ld a, [rSVBK]
|
||||
ldh a, [rSVBK]
|
||||
ld d, a
|
||||
|
||||
ld a, BANK(wOBPals1)
|
||||
ld [rSVBK], a
|
||||
ldh [rSVBK], a
|
||||
|
||||
; pop palette
|
||||
ld e, NUM_PAL_COLORS
|
||||
@@ -91,7 +91,7 @@ _TimeOfDayPals::
|
||||
|
||||
; restore wram bank
|
||||
ld a, d
|
||||
ld [rSVBK], a
|
||||
ldh [rSVBK], a
|
||||
|
||||
; update palettes
|
||||
call _UpdateTimePals
|
||||
@@ -158,10 +158,10 @@ FadeBlackQuickly:
|
||||
ret
|
||||
|
||||
FillWhiteBGColor:
|
||||
ld a, [rSVBK]
|
||||
ldh a, [rSVBK]
|
||||
push af
|
||||
ld a, BANK(wBGPals1)
|
||||
ld [rSVBK], a
|
||||
ldh [rSVBK], a
|
||||
|
||||
ld hl, wBGPals1
|
||||
ld a, [hli]
|
||||
@@ -182,7 +182,7 @@ endr
|
||||
jr nz, .loop
|
||||
|
||||
pop af
|
||||
ld [rSVBK], a
|
||||
ldh [rSVBK], a
|
||||
ret
|
||||
|
||||
ReplaceTimeOfDayPals:
|
||||
@@ -306,7 +306,7 @@ ConvertTimePalsDecHL:
|
||||
|
||||
GetTimePalFade:
|
||||
; check cgb
|
||||
ld a, [hCGB]
|
||||
ldh a, [hCGB]
|
||||
and a
|
||||
jr nz, .cgb
|
||||
|
||||
|
||||
Reference in New Issue
Block a user