Browse Source

whitespace: ay38910 and hbios

pull/119/head
Dean Netherton 6 years ago
parent
commit
f85205afb8
  1. 16
      Source/HBIOS/ay38910.asm
  2. 2
      Source/HBIOS/hbios.asm

16
Source/HBIOS/ay38910.asm

@ -58,7 +58,7 @@ AY_IDAT .EQU 0 ; NO INSTANCE DATA ASSOCIATED WITH THIS DEVICE
; ;
; DEVICE CAPABILITIES AND CONFIGURATION ; DEVICE CAPABILITIES AND CONFIGURATION
; ;
SBCV2004 .EQU 1 ; USE SBC-V2-004 HALF CLOCK DIVIDER
SBCV2004 .EQU 1 ; USE SBC-V2-004 HALF CLOCK DIVIDER
; ;
AY_TONECNT .EQU 3 ; COUNT NUMBER OF TONE CHANNELS AY_TONECNT .EQU 3 ; COUNT NUMBER OF TONE CHANNELS
AY_NOISECNT .EQU 1 ; COUNT NUMBER OF NOISE CHANNELS AY_NOISECNT .EQU 1 ; COUNT NUMBER OF NOISE CHANNELS
@ -106,11 +106,11 @@ AY38910_INIT:
LD D,AY_R3CHBP LD D,AY_R3CHBP
LD E,$00 LD E,$00
CALL AY_WRTPSG ; R03 = $00 = XXXX0000 CALL AY_WRTPSG ; R03 = $00 = XXXX0000
;
CALL LDELAY ; HALF SECOND
;
CALL LDELAY ; HALF SECOND
; ;
LD E,$00 ; SET VOLUME OFF LD E,$00 ; SET VOLUME OFF
CALL AY_SETV ; ON ALL CHANNELS
CALL AY_SETV ; ON ALL CHANNELS
; ;
; RET ; RET
; ;
@ -129,7 +129,7 @@ AY_INIT:
;====================================================================== ;======================================================================
; ;
AY_SETV: AY_SETV:
LD B,AY_TONECNT ; NUMBER OF CHANNELS
LD B,AY_TONECNT ; NUMBER OF CHANNELS
LD D,AY_R8AVOL ; BASE REGISTER FOR VOLUME LD D,AY_R8AVOL ; BASE REGISTER FOR VOLUME
AY_SV: CALL AY_WRTPSG ; CYCLING THROUGH ALL CHANNELS AY_SV: CALL AY_WRTPSG ; CYCLING THROUGH ALL CHANNELS
INC D INC D
@ -370,10 +370,10 @@ AY_APPLY_PRD:
RET RET
; ;
;====================================================================== ;======================================================================
;
;
; WRITE DATA IN E REGISTER TO DEVICE REGISTER D ; WRITE DATA IN E REGISTER TO DEVICE REGISTER D
; INTERRUPTS DISABLE DURING WRITE. WRITE IN SLOW MODE IF Z180 CPU. ; INTERRUPTS DISABLE DURING WRITE. WRITE IN SLOW MODE IF Z180 CPU.
;
;
;====================================================================== ;======================================================================
; ;
AY_WRTPSG: AY_WRTPSG:
@ -388,7 +388,7 @@ AY_WRTPSG:
OR %00110000 ; FORCE SLOW OPERATION (I/O W/S=3) OR %00110000 ; FORCE SLOW OPERATION (I/O W/S=3)
OUT0 (Z180_DCNTL),A ; AND UPDATE DCNTL OUT0 (Z180_DCNTL),A ; AND UPDATE DCNTL
#ENDIF #ENDIF
LD A,D ; SELECT THE REGISTER WE
LD A,D ; SELECT THE REGISTER WE
OUT (AY_RSEL),A ; WANT TO WRITE TO OUT (AY_RSEL),A ; WANT TO WRITE TO
LD A,E ; WRITE THE VALUE TO LD A,E ; WRITE THE VALUE TO
OUT (AY_RDAT),A ; THE SELECTED REGISTER OUT (AY_RDAT),A ; THE SELECTED REGISTER

2
Source/HBIOS/hbios.asm

@ -2555,7 +2555,7 @@ SYS_GETRTCCNT:
LD A,(RTC_DISPACT) ; IS RTC ACTIVE? LD A,(RTC_DISPACT) ; IS RTC ACTIVE?
OR A ; SET FLAGS OR A ; SET FLAGS
JR Z,SYS_GETRTCCNT1 ; IF NONE, DONE JR Z,SYS_GETRTCCNT1 ; IF NONE, DONE
INC E ; SET ONE DEVICE
INC E ; SET ONE DEVICE
SYS_GETRTCCNT1: SYS_GETRTCCNT1:
XOR A ; SIGNALS SUCCESS XOR A ; SIGNALS SUCCESS
RET RET

Loading…
Cancel
Save