mirror of
https://github.com/wwarthen/RomWBW.git
synced 2026-02-06 14:11:48 -06:00
Add option to force DS1302 RTC to turn on super caps and battery recharging at boot.
This commit is contained in:
@@ -19,6 +19,7 @@ HTIMENABLE .EQU FALSE ; TRUE FOR SIMH TIMER SUPPORT
|
||||
SIMRTCENABLE .EQU FALSE ; SIMH CLOCK DRIVER
|
||||
DSRTCENABLE .EQU TRUE ; DS-1302 CLOCK DRIVER
|
||||
DSRTCMODE .EQU DSRTCMODE_STD ; DSRTCMODE_STD, DSRTCMODE_MFPIC
|
||||
DSRTCCHG .EQU FALSE ; DS-1302 CONFIGURE CHARGE ON (TRUE) OR OFF (FALSE)
|
||||
;
|
||||
ASCIENABLE .EQU FALSE ; TRUE FOR Z180 ASCI SUPPORT
|
||||
UARTENABLE .EQU TRUE ; TRUE FOR UART SUPPORT (ALMOST ALWAYS WANT THIS TO BE TRUE)
|
||||
|
||||
@@ -122,6 +122,27 @@ DSRTC_INIT1:
|
||||
CALL DSRTC_CLK2TIM
|
||||
LD HL,DSRTC_TIMBUF
|
||||
CALL PRTDT
|
||||
|
||||
#IF DSRTCCHG ; FORCE_RTC_CHARGE_ENABLE
|
||||
LD C,$8E ; ACCESS WRITE PROT REG
|
||||
CALL DSRTC_CMD ;
|
||||
LD A,$00 ; WRITE PROTECT OFF
|
||||
CALL DSRTC_PUT ;
|
||||
CALL DSRTC_END ; FINISH CMD
|
||||
|
||||
LD C,$90 ; ACCESS CHARGE REGISTER
|
||||
CALL DSRTC_CMD ;
|
||||
LD A,$A5 ; STD CHARGE VALUES
|
||||
CALL DSRTC_PUT ;
|
||||
CALL DSRTC_END ; FINISH REG WRITE
|
||||
|
||||
LD C,$8E ; ACCESS WRITE PROT REG
|
||||
CALL DSRTC_CMD ;
|
||||
LD A,$80 ; WRITE PROTECT ON
|
||||
CALL DSRTC_PUT ;
|
||||
CALL DSRTC_END ; FINISH CMD
|
||||
#ENDIF
|
||||
|
||||
PRTS(" CHARGE=$")
|
||||
CALL DSRTC_TSTCHG
|
||||
JR NZ,NOCHG1
|
||||
|
||||
Reference in New Issue
Block a user