Handle lack of RTC better

DSRTC driver now correctly returns an error if there is no RTC present.
This commit is contained in:
Wayne Warthen
2020-03-31 11:30:11 -07:00
parent 663a532967
commit 99dadbc17c
8 changed files with 50 additions and 41 deletions

View File

@@ -236,6 +236,9 @@ DSRTC_SETBLK:
; 24 HOUR TIME FORMAT IS ASSUMED
;
DSRTC_GETTIM:
LD A,(DSRTC_STAT) ; GET DEVICE STATUS
OR A ; SET FLAGS
RET NZ ; BAIL OUT ON ERROR
;
PUSH HL ; SAVE ADR OF OUTPUT BUF
;
@@ -272,6 +275,9 @@ DSRTC_GETTIM:
; 24 HOUR TIME FORMAT IS ASSUMED
;
DSRTC_SETTIM:
LD A,(DSRTC_STAT) ; GET DEVICE STATUS
OR A ; SET FLAGS
RET NZ ; BAIL OUT ON ERROR
;
; COPY INCOMING TIME DATA TO OUR TIME BUFFER
LD A,(HB_INVBNK) ; COPY FROM CURRENT USER BANK
@@ -303,6 +309,9 @@ DSRTC_SETTIM:
; E: VALUE (OUTPUT)
;
DSRTC_GETBYT:
LD A,(DSRTC_STAT) ; GET DEVICE STATUS
OR A ; SET FLAGS
RET NZ ; BAIL OUT ON ERROR
LD A,C ; INDEX
SLA A ; SHIFT TO INDEX BITS
ADD A,$C1 ; CMD OFFSET
@@ -316,6 +325,9 @@ DSRTC_GETBYT:
; E: VALUE
;
DSRTC_SETBYT:
LD A,(DSRTC_STAT) ; GET DEVICE STATUS
OR A ; SET FLAGS
RET NZ ; BAIL OUT ON ERROR
LD A,C ; INDEX
SLA A ; SHIFT TO INDEX BITS
ADD A,$C0 ; CMD OFFSET