|
|
|
@ -12,9 +12,18 @@ |
|
|
|
; CONSTANTS |
|
|
|
;====================================================================== |
|
|
|
; |
|
|
|
#IF (PLATFORM == PLT_SBC) & (SNMODE == SNMODE_VGM) |
|
|
|
SN76489_PORT_LEFT .EQU $C6 ; PORTS FOR ACCESSING THE SN76489 CHIP (LEFT) |
|
|
|
SN76489_PORT_RIGHT .EQU $C7 ; PORTS FOR ACCESSING THE SN76489 CHIP (RIGHT) |
|
|
|
;SN7CLK .EQU 3575950 ; CLOCK SPEED DRIVING THE SN76489 CHIPS |
|
|
|
#ENDIF |
|
|
|
|
|
|
|
#IF (PLATFORM == PLT_RCZ80) & (SNMODE == SNMODE_RCZ80) |
|
|
|
SN76489_PORT_LEFT .EQU $FF ; PORTS FOR ACCESSING THE SN76489 CHIP (LEFT) |
|
|
|
SN76489_PORT_RIGHT .EQU $FB ; PORTS FOR ACCESSING THE SN76489 CHIP (RIGHT) |
|
|
|
;SN7CLK .EQU CPUOSC/4; DEFAULT TO CPUOSC / 4 |
|
|
|
#ENDIF |
|
|
|
|
|
|
|
SN7_IDAT .EQU 0 |
|
|
|
SN7_TONECNT .EQU 3 ; COUNT NUMBER OF TONE CHANNELS |
|
|
|
SN7_NOISECNT .EQU 1 ; COUNT NUMBER OF NOISE CHANNELS |
|
|
|
@ -263,7 +272,7 @@ SN7_APPLY_VOL: ; APPLY VOLUME TO BOTH LEFT AND RIGHT CHANNELS |
|
|
|
|
|
|
|
#IFDEF SBCV2004 |
|
|
|
LD A,(HB_RTCVAL) |
|
|
|
OR %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
|
#ENDIF |
|
|
|
|
|
|
|
@ -308,7 +317,7 @@ SN7_APPLY_PRD: |
|
|
|
|
|
|
|
#IFDEF SBCV2004 |
|
|
|
LD A,(HB_RTCVAL) |
|
|
|
OR %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
|
#ENDIF |
|
|
|
|
|
|
|
@ -345,7 +354,7 @@ SN7_APPLY_PRD: |
|
|
|
|
|
|
|
#IFDEF SBCV2004 |
|
|
|
LD A,(HB_RTCVAL) |
|
|
|
OR %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
AND %11110111 ; SBC-V2-004+ CHANGE TO |
|
|
|
OUT (RTCIO),A ; NORMAL CLOCK SPEED |
|
|
|
#ENDIF |
|
|
|
|
|
|
|
@ -403,7 +412,7 @@ SNT_PLAY .DB "\r\nSN7_PLAY CH: $" |
|
|
|
SNT_REGWR .DB "\r\nOUT SN76489, $" |
|
|
|
#ENDIF |
|
|
|
|
|
|
|
; THE FREQUENCY BY QUARTER TONE STARTING AT A0# OCATVE 0 |
|
|
|
; THE FREQUENCY BY QUARTER TONE STARTING AT A0# OCTAVE 0 |
|
|
|
; USED TO MAP EACH OCTAVE (DIV BY 2 TO JUMP AN OCTAVE UP) |
|
|
|
; FIRST PLAYABLE NOTE WILL BE $2E |
|
|
|
; ASSUMING A CLOCK OF 1843200 THIS MAPS TO |
|
|
|
|