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