hbios - z180 CMR/CCR config

This commit is contained in:
Phillip Stevens
2019-11-15 11:40:50 +11:00
parent 1fac76f80c
commit c0ca96cb96

View File

@@ -1279,19 +1279,23 @@ HB_CPU1:
; REFLECT SPEED CHANGE
LD C,CPUOSC / 1000000
LD DE,CPUOSC / 1000
#ENDIF
#ELSE
;
#IF (Z180_CLKDIV >= 2)
LD A,(HB_CPUTYPE) ; GET CPU TYPE
CP 3 ; Z8S180 REV N OR BETTER?
JR C,HB_CPU2 ; IF NOT, NOT POSSIBLE!
; SET CPU MULTIPLIER TO 1 RESULTING IN XTAL * 2 SPEED
LD A,$80
OUT0 (Z180_CMR),A
OUT0 (Z180_CMR),A ; MUST SET CMR BEFORE CCR
OUT0 (Z180_CCR),A
; REFLECT SPEED CHANGE
LD C,(CPUOSC * 2) / 1000000
LD DE,(CPUOSC * 2) / 1000
#ENDIF
;
#ENDIF
;
HB_CPU2:
; SAVE CPU SPEED IN CONFIG BLOCK
LD A,C