diff --git a/Source/HBIOS/dsrtc.asm b/Source/HBIOS/dsrtc.asm
index fc580570..14d17093 100644
--- a/Source/HBIOS/dsrtc.asm
+++ b/Source/HBIOS/dsrtc.asm
@@ -122,7 +122,14 @@ DSRTC_INIT1:
 	CALL	DSRTC_CLK2TIM
 	LD	HL,DSRTC_TIMBUF
 	CALL	PRTDT
-;
+	PRTS(" CHARGE=$")
+	CALL DSRTC_TSTCHG
+	JR		NZ,NOCHG1
+	PRTS("ON$")
+	JR		NOCHG2
+NOCHG1:
+	PRTS("OFF$")
+NOCHG2:
 	XOR	A	; SIGNAL SUCCESS
 	RET
 ;
@@ -260,6 +267,17 @@ DSRTC_TIM2CLK:
 	LD	(DSRTC_DAY),A
 	RET
 ;
+; TEST CLOCK FOR CHARGE DATA
+;
+DSRTC_TSTCHG:
+	LD		C,$91			; CHARGE RESISTOR & DIODE VALUES
+	CALL	DSRTC_CMD		; SEND THE COMMAND
+	CALL	DSRTC_GET		; READ THE REGISTER
+	CALL	DSRTC_END		; FINISH IT
+	AND		%11110000		; CHECK FOR
+	CP		%10100000		; ENABLED FLAG
+	RET	
+;
 ; TEST CLOCK FOR VALID DATA
 ;   READ CLOCK HALT BIT AND RETURN ZF BASED ON BIT VALUE
 ;   0 = RUNNING