|
|
@ -87,6 +87,7 @@ SN7_INIT: |
|
|
#IFDEF SBCV2004 |
|
|
#IFDEF SBCV2004 |
|
|
LD A,(HB_RTCVAL) |
|
|
LD A,(HB_RTCVAL) |
|
|
OR %00001000 ; SBC-V2-004+ CHANGE |
|
|
OR %00001000 ; SBC-V2-004+ CHANGE |
|
|
|
|
|
EZ80_IO |
|
|
OUT (RTCIO),A ; TO HALF CLOCK SPEED |
|
|
OUT (RTCIO),A ; TO HALF CLOCK SPEED |
|
|
#ENDIF |
|
|
#ENDIF |
|
|
; |
|
|
; |
|
|
@ -95,13 +96,16 @@ SN7_INIT: |
|
|
SN7_INIT1 |
|
|
SN7_INIT1 |
|
|
LD A,(HL) |
|
|
LD A,(HL) |
|
|
INC HL ; BUMP FOR NEXT TIME |
|
|
INC HL ; BUMP FOR NEXT TIME |
|
|
|
|
|
EZ80_IO |
|
|
OUT (SN76489_PORT_LEFT), A ; WRITE LEFT PORT |
|
|
OUT (SN76489_PORT_LEFT), A ; WRITE LEFT PORT |
|
|
|
|
|
EZ80_IO |
|
|
OUT (SN76489_PORT_RIGHT), A ; WRITE RIGHT PORT |
|
|
OUT (SN76489_PORT_RIGHT), A ; WRITE RIGHT PORT |
|
|
DJNZ SN7_INIT1 ; LOOP TILL DONE |
|
|
DJNZ SN7_INIT1 ; LOOP TILL DONE |
|
|
; |
|
|
; |
|
|
#IFDEF SBCV2004 |
|
|
#IFDEF SBCV2004 |
|
|
LD A,(HB_RTCVAL) |
|
|
LD A,(HB_RTCVAL) |
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
|
|
EZ80_IO |
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
#ENDIF |
|
|
#ENDIF |
|
|
; |
|
|
; |
|
|
@ -288,16 +292,19 @@ SN7_APPLY_VOL: ; APPLY VOLUME TO BOTH LEFT AND RIGHT CHANNELS |
|
|
PUSH AF |
|
|
PUSH AF |
|
|
LD A,(HB_RTCVAL) |
|
|
LD A,(HB_RTCVAL) |
|
|
OR %00001000 ; SBC-V2-004+ CHANGE |
|
|
OR %00001000 ; SBC-V2-004+ CHANGE |
|
|
|
|
|
EZ80_IO |
|
|
OUT (RTCIO),A ; TO HALF CLOCK SPEED |
|
|
OUT (RTCIO),A ; TO HALF CLOCK SPEED |
|
|
POP AF |
|
|
POP AF |
|
|
#ENDIF |
|
|
#ENDIF |
|
|
|
|
|
|
|
|
|
|
|
EZ80_IO |
|
|
OUT (SN76489_PORT_LEFT), A |
|
|
OUT (SN76489_PORT_LEFT), A |
|
|
|
|
|
EZ80_IO |
|
|
OUT (SN76489_PORT_RIGHT), A |
|
|
OUT (SN76489_PORT_RIGHT), A |
|
|
|
|
|
|
|
|
#IFDEF SBCV2004 |
|
|
#IFDEF SBCV2004 |
|
|
LD A,(HB_RTCVAL) |
|
|
LD A,(HB_RTCVAL) |
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
|
|
EZ80_IO |
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
#ENDIF |
|
|
#ENDIF |
|
|
|
|
|
|
|
|
@ -333,16 +340,19 @@ SN7_APPLY_PRD: |
|
|
PUSH AF |
|
|
PUSH AF |
|
|
LD A,(HB_RTCVAL) |
|
|
LD A,(HB_RTCVAL) |
|
|
OR %00001000 ; SBC-V2-004+ CHANGE |
|
|
OR %00001000 ; SBC-V2-004+ CHANGE |
|
|
|
|
|
EZ80_IO |
|
|
OUT (RTCIO),A ; TO HALF CLOCK SPEED |
|
|
OUT (RTCIO),A ; TO HALF CLOCK SPEED |
|
|
POP AF |
|
|
POP AF |
|
|
#ENDIF |
|
|
#ENDIF |
|
|
|
|
|
|
|
|
|
|
|
EZ80_IO |
|
|
OUT (SN76489_PORT_LEFT), A |
|
|
OUT (SN76489_PORT_LEFT), A |
|
|
|
|
|
EZ80_IO |
|
|
OUT (SN76489_PORT_RIGHT), A |
|
|
OUT (SN76489_PORT_RIGHT), A |
|
|
|
|
|
|
|
|
#IFDEF SBCV2004 |
|
|
#IFDEF SBCV2004 |
|
|
LD A,(HB_RTCVAL) |
|
|
LD A,(HB_RTCVAL) |
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
|
|
EZ80_IO |
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
#ENDIF |
|
|
#ENDIF |
|
|
|
|
|
|
|
|
@ -370,16 +380,19 @@ SN7_APPLY_PRD: |
|
|
PUSH AF |
|
|
PUSH AF |
|
|
LD A,(HB_RTCVAL) |
|
|
LD A,(HB_RTCVAL) |
|
|
OR %00001000 ; SBC-V2-004+ CHANGE |
|
|
OR %00001000 ; SBC-V2-004+ CHANGE |
|
|
|
|
|
EZ80_IO |
|
|
OUT (RTCIO),A ; TO HALF CLOCK SPEED |
|
|
OUT (RTCIO),A ; TO HALF CLOCK SPEED |
|
|
POP AF |
|
|
POP AF |
|
|
#ENDIF |
|
|
#ENDIF |
|
|
|
|
|
|
|
|
|
|
|
EZ80_IO |
|
|
OUT (SN76489_PORT_LEFT), A |
|
|
OUT (SN76489_PORT_LEFT), A |
|
|
|
|
|
EZ80_IO |
|
|
OUT (SN76489_PORT_RIGHT), A |
|
|
OUT (SN76489_PORT_RIGHT), A |
|
|
|
|
|
|
|
|
#IFDEF SBCV2004 |
|
|
#IFDEF SBCV2004 |
|
|
LD A,(HB_RTCVAL) |
|
|
LD A,(HB_RTCVAL) |
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
|
|
EZ80_IO |
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
#ENDIF |
|
|
#ENDIF |
|
|
|
|
|
|
|
|
|