|
|
@ -5058,6 +5058,13 @@ SYS_GETFN: |
|
|
; DE:HL: TIMER VALUE (32 BIT) |
|
|
; DE:HL: TIMER VALUE (32 BIT) |
|
|
; |
|
|
; |
|
|
SYS_GETTIMER: |
|
|
SYS_GETTIMER: |
|
|
|
|
|
#IF (CPUFAM == CPU_EZ80) |
|
|
|
|
|
LD A, 2 |
|
|
|
|
|
LD B, 0 ; GET TIMER TICK |
|
|
|
|
|
EZ80_FN |
|
|
|
|
|
RET |
|
|
|
|
|
|
|
|
|
|
|
#ELSE |
|
|
LD HL,HB_TICKS |
|
|
LD HL,HB_TICKS |
|
|
HB_DI |
|
|
HB_DI |
|
|
CALL LD32 |
|
|
CALL LD32 |
|
|
@ -5065,6 +5072,8 @@ SYS_GETTIMER: |
|
|
LD C, TICKFREQ |
|
|
LD C, TICKFREQ |
|
|
XOR A |
|
|
XOR A |
|
|
RET |
|
|
RET |
|
|
|
|
|
#ENDIF |
|
|
|
|
|
|
|
|
; |
|
|
; |
|
|
; GET SECONDS |
|
|
; GET SECONDS |
|
|
; RETURNS: |
|
|
; RETURNS: |
|
|
@ -5072,6 +5081,13 @@ SYS_GETTIMER: |
|
|
; C: NUM TICKS WITHIN CURRENT SECOND |
|
|
; C: NUM TICKS WITHIN CURRENT SECOND |
|
|
; |
|
|
; |
|
|
SYS_GETSECS: |
|
|
SYS_GETSECS: |
|
|
|
|
|
#IF (CPUFAM == CPU_EZ80) |
|
|
|
|
|
LD A, 2 |
|
|
|
|
|
LD B, 1 ; GET SECOND TICK |
|
|
|
|
|
EZ80_FN |
|
|
|
|
|
RET |
|
|
|
|
|
|
|
|
|
|
|
#ELSE |
|
|
LD HL,HB_SECS |
|
|
LD HL,HB_SECS |
|
|
HB_DI |
|
|
HB_DI |
|
|
CALL LD32 |
|
|
CALL LD32 |
|
|
@ -5082,6 +5098,7 @@ SYS_GETSECS: |
|
|
LD C,A |
|
|
LD C,A |
|
|
XOR A |
|
|
XOR A |
|
|
RET |
|
|
RET |
|
|
|
|
|
#ENDIF |
|
|
; |
|
|
; |
|
|
; GET BOOT INFORMATION |
|
|
; GET BOOT INFORMATION |
|
|
; RETURNS: |
|
|
; RETURNS: |
|
|
@ -5289,24 +5306,38 @@ SYS_SETBOOTINFO: |
|
|
; DE:HL: TIMER VALUE (32 BIT) |
|
|
; DE:HL: TIMER VALUE (32 BIT) |
|
|
; |
|
|
; |
|
|
SYS_SETTIMER: |
|
|
SYS_SETTIMER: |
|
|
|
|
|
#IF (CPUFAM == CPU_EZ80) |
|
|
|
|
|
LD A, 2 |
|
|
|
|
|
LD B, 2 ; SET TICKS |
|
|
|
|
|
EZ80_FN |
|
|
|
|
|
RET |
|
|
|
|
|
#ELSE |
|
|
LD BC,HB_TICKS |
|
|
LD BC,HB_TICKS |
|
|
HB_DI |
|
|
HB_DI |
|
|
CALL ST32 |
|
|
CALL ST32 |
|
|
HB_EI |
|
|
HB_EI |
|
|
XOR A |
|
|
XOR A |
|
|
RET |
|
|
RET |
|
|
|
|
|
#ENDIF |
|
|
; |
|
|
; |
|
|
; SET SECS |
|
|
; SET SECS |
|
|
; ON ENTRY: |
|
|
; ON ENTRY: |
|
|
; DE:HL: SECONDS VALUE (32 BIT) |
|
|
; DE:HL: SECONDS VALUE (32 BIT) |
|
|
; |
|
|
; |
|
|
SYS_SETSECS: |
|
|
SYS_SETSECS: |
|
|
|
|
|
#IF (CPUFAM == CPU_EZ80) |
|
|
|
|
|
LD A, 2 |
|
|
|
|
|
LD B, 3 ; SET SECS |
|
|
|
|
|
EZ80_FN |
|
|
|
|
|
RET |
|
|
|
|
|
#ELSE |
|
|
LD BC,HB_SECS |
|
|
LD BC,HB_SECS |
|
|
HB_DI |
|
|
HB_DI |
|
|
CALL ST32 |
|
|
CALL ST32 |
|
|
HB_EI |
|
|
HB_EI |
|
|
XOR A |
|
|
XOR A |
|
|
RET |
|
|
RET |
|
|
|
|
|
#ENDIF |
|
|
; |
|
|
; |
|
|
; SET SYSTEM CPU SPEED ATTRIBUTES |
|
|
; SET SYSTEM CPU SPEED ATTRIBUTES |
|
|
; ON ENTRY: |
|
|
; ON ENTRY: |
|
|
|