pokecrystal-board/home/rtc.asm
2018-06-24 16:13:22 +02:00

23 lines
288 B
NASM

RTC::
; update time and time-sensitive palettes
; rtc enabled?
ld a, [wSpriteUpdatesEnabled]
cp 0
ret z
call UpdateTime
; obj update on?
ld a, [wVramState]
bit 0, a ; obj update
ret z
TimeOfDayPals::
callfar _TimeOfDayPals
ret
UpdateTimePals::
callfar _UpdateTimePals
ret