ez80: report if RTC is not powered

2 years ago · 37a7574f1f
1 changed files with 7 additions and 1 deletions
--- a/Source/HBIOS/ez80rtc.asm
+++ b/Source/HBIOS/ez80rtc.asm
@ -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