ez80: report if RTC is not powered

This commit is contained in:
Dean Netherton
2024-07-16 17:02:53 +10:00
parent ba8cd05cb7
commit 37a7574f1f

View File

@@ -25,8 +25,14 @@ EZ80RTC_INIT:
LD A, 1 ; RTC FIRMWARE FUNCTION GROUP
LD B, 0 ; RTC INIT FUNCTION
EZ80_FN
; TODO VERIFY SUCCESS -> A IS ZERO
JR Z, RTC_POWERED
PUSH AF
PRTS("NOT POWERED$")
POP AF
RET
RTC_POWERED:
; DISPLAY CURRENT TIME
LD HL, EZ80RTC_BCDBUF_EXT ; POINT TO BCD BUF EXTENDED
LD A, 1 ; RTC FIRMWARE FUNCTION GROUP