mirror of
https://github.com/wwarthen/RomWBW.git
synced 2026-02-06 14:11:48 -06:00
Update ay38910.asm
This commit is contained in:
@@ -64,7 +64,7 @@ AY_IDAT .EQU 0 ; NO INSTANCE DATA ASSOCIATED WITH THIS DEVICE
|
||||
;
|
||||
; DEVICE CAPABILITIES AND CONFIGURATION
|
||||
;
|
||||
SBCV2004 .EQU 0 ; USE SBC-V2-004 HALF CLOCK DIVIDER
|
||||
SBCV2004 .EQU 0 ; USE SBC-V2-004 HALF CLOCK DIVIDER
|
||||
;
|
||||
AY_TONECNT .EQU 3 ; COUNT NUMBER OF TONE CHANNELS
|
||||
AY_NOISECNT .EQU 1 ; COUNT NUMBER OF NOISE CHANNELS
|
||||
@@ -96,17 +96,17 @@ AY38910_INIT:
|
||||
LD A,$FF ; ACTIVATE DEVICEBIT 4 IS AY RESET CONTROL, BIT 3 IS ACTIVE LED
|
||||
OUT (AY_ACR),A ; SET INIT AUX CONTROL REG
|
||||
#ENDIF
|
||||
|
||||
;
|
||||
LD D,AY_R2CHBP ; SIMPLE HARDWARE PROBE
|
||||
LD E,$AA
|
||||
LD E,$55
|
||||
CALL AY_WRTPSG ; WRITE AND
|
||||
CALL AY_RDPSG
|
||||
LD A,$AA
|
||||
CP E
|
||||
CALL AY_RDPSG ; READ TO A
|
||||
LD A,$55 ; SOUND CHANNEL
|
||||
CP E ; REGISTER
|
||||
JR Z,AY_FND
|
||||
|
||||
;
|
||||
CALL PRTSTRD \ .TEXT " NOT PRESENT$"
|
||||
|
||||
;
|
||||
LD A,$FF ; UNSUCCESSFULL INIT
|
||||
RET
|
||||
;
|
||||
@@ -120,9 +120,9 @@ AY_FND: LD IY, AY_IDAT ; SETUP FUNCTION TABLE
|
||||
LD E,$07 ; SET VOLUME TO 50%
|
||||
CALL AY_SETV ; ON ALL CHANNELS
|
||||
;
|
||||
LD D,AY_R2CHBP ; BEEP ON CHANNEL B (CENTER)
|
||||
LD E,$55
|
||||
CALL AY_WRTPSG ; R02 = $55 = 01010101
|
||||
; LD D,AY_R2CHBP ; BEEP ON CHANNEL B (CENTER)
|
||||
; LD E,$55
|
||||
; CALL AY_WRTPSG ; R02 = $55 = 01010101
|
||||
LD D,AY_R3CHBP
|
||||
LD E,$00
|
||||
CALL AY_WRTPSG ; R03 = $00 = XXXX0000
|
||||
|
||||
Reference in New Issue
Block a user