Browse Source

hbios - fix HB_SECTCK setting

pull/54/head
Phillip Stevens 6 years ago
parent
commit
976ef858d0
  1. 8
      Source/HBIOS/hbios.asm

8
Source/HBIOS/hbios.asm

@ -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

Loading…
Cancel
Save