mirror of
https://github.com/wwarthen/RomWBW.git
synced 2026-02-06 14:11:48 -06:00
hbios - fix HB_SECTCK setting
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user