hbios - fix HB_SECTCK setting

This commit is contained in:
Phillip Stevens
2019-11-10 15:29:16 +11:00
parent 6cb051ec52
commit 976ef858d0

View File

@@ -1245,7 +1245,7 @@ HB_CPU1:
LD (IVT(INT_TIM0)),HL ; Z180 TIMER 0
; SETUP PERIODIC TIMER INTERRUPT ON TIMER 0
LD HL,CPUOSC/TICKSPERSEC/20-1 ; 50HZ = 18432000/ 50 / 20
LD HL,CPUOSC/TICKSPERSEC/20-1 ; 50HZ = 18432000 / 50 / 20
LD B,0
LD C,Z180_RLDR0L ; INITIALIZE TIMER 0 RELOAD REGISTER
OUT (C),L
@@ -2400,7 +2400,7 @@ SYS_GETTIMER:
;
SYS_GETSECS:
LD HL,HB_SECTCK
LD A,TICKSPERSEC-1
LD A,TICKSPERSEC
HB_DI
SUB (HL)
INC HL ; NOW POINTING TO HB_SECS
@@ -2752,7 +2752,7 @@ HB_TIMINT2:
DEC (HL) ; COUNTDOWN 50 TICKS
JR NZ,HB_TIMINT3 ; NOT ZERO YET, DONE FOR THIS CYCLE
; 50 TICKS HAVE ELAPSED
LD A,TICKSPERSEC-1 ; 50 TICKS PER SECOND
LD A,TICKSPERSEC ; 50 TICKS PER SECOND
LD (HL),A ; RESET COUNTDOWN REGISTER
; INCREMENT SECONDS COUNTER
LD HL,HB_SECS ; POINT TO SECONDS COUNTER
@@ -4062,7 +4062,7 @@ IDLECOUNT .DB 0
HEAPCURB .DW 0 ; MARK HEAP ADDRESS AFTER INITIALIZATION
;
HB_TICKS .FILL 4,0 ; 32 BIT TICK COUNTER
HB_SECTCK .DB TICKSPERSEC-1 ; TICK COUNTER FOR FRACTIONAL SECONDS
HB_SECTCK .DB TICKSPERSEC ; TICK COUNTER FOR FRACTIONAL SECONDS
HB_SECS .FILL 4,0 ; 32 BIT SECONDS COUNTER
;
HB_CPUTYPE .DB 0 ; 0=Z80, 1=80180, 2=SL1960, 3=ASCI BRG