Browse Source
Merge pull request #18 from b1ackmai1er/master
Force DS1302 charging at reboot.
pull/23/head
Wayne Warthen
7 years ago
committed by
GitHub
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
5 changed files with
42 additions and
1 deletions
-
Source/Apps/Build.cmd
-
Source/Apps/reboot.asm
-
Source/HBIOS/Build.ps1
-
Source/HBIOS/cfg_sbc.asm
-
Source/HBIOS/dsrtc.asm
|
|
|
@ -21,6 +21,7 @@ call :asm Mode || goto :eof |
|
|
|
call :asm RTC || goto :eof |
|
|
|
call :asm Timer || goto :eof |
|
|
|
call :asm180 IntTest || goto :eof |
|
|
|
call :asm Reboot || goto :eof |
|
|
|
|
|
|
|
zx Z80ASM -SYSGEN/F |
|
|
|
|
|
|
|
|
|
|
|
@ -0,0 +1,18 @@ |
|
|
|
;=============================================================================== |
|
|
|
; |
|
|
|
; REBOOT - Execute HBIOS reset to restart to boot loader. |
|
|
|
; |
|
|
|
;=============================================================================== |
|
|
|
; |
|
|
|
BID_BOOT .EQU $00 |
|
|
|
HB_BNKCALL .EQU $FFF9 |
|
|
|
|
|
|
|
.org $100 |
|
|
|
|
|
|
|
LD A,BID_BOOT ; BOOT BANK |
|
|
|
LD HL,0 ; ADDRESS ZERO |
|
|
|
CALL HB_BNKCALL ; DOES NOT RETURN |
|
|
|
HALT |
|
|
|
|
|
|
|
.end |
|
|
|
|
|
|
|
@ -104,7 +104,7 @@ $ImgFile = "${OutDir}/${RomName}.img" # Final name of IMG image (memory loadable |
|
|
|
if ($Platform -eq "UNA") {$CBiosFile = '../CBIOS/cbios_una.bin'} else {$CBiosFile = '../CBIOS/cbios_wbw.bin'} |
|
|
|
|
|
|
|
# List of RomWBW proprietary apps to imbed in ROM disk. |
|
|
|
$RomApps = "assign","fdu","format","mode","osldr","rtc","survey","syscopy","sysgen","talk","timer","xm","inttest" |
|
|
|
$RomApps = "assign","fdu","format","mode","osldr","rtc","survey","syscopy","sysgen","talk","timer","xm","inttest","reboot" |
|
|
|
|
|
|
|
"" |
|
|
|
"Building ${RomName}: ${ROMSize}KB ROM configuration ${Config} for Z${CPUType}..." |
|
|
|
|
|
|
|
@ -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 |
|
|
|
|
