...

WAVPLAY.ASM

@@ -285,6 +285,11 @@ FACE_OK:
 
 	LD (SAV_SP),SP
 
+
+ 	IF SoundBugFix
+	 IN	A,(SLOT3)
+	 LD	(SAV_PAGE3),A
+	ENDIF
 PLAY_ALL:
 	CALL TEST_SWITCH
 	
@@ -561,16 +566,16 @@ DATA_1:
 	LD BC,3
 	LDIR	; COPY LEN of DATA
 
- IF SoundBugFix
-	XOR	A
-	LD	B,L
-.loop:	DEC	HL
-	LD	(HL),A
-	DJNZ	.loop
- ENDIF
-
-	IN A,(SLOT3)
-	LD (SAV_PAGE3),A
+	IF SoundBugFix
+	 XOR	A
+	 LD	B,L
+.loop:	 DEC	HL
+	 LD	(HL),A
+	 DJNZ	.loop
+	ELSE
+	 IN	A,(SLOT3)
+	 LD	(SAV_PAGE3),A
+	ENDIF
 
 	;LD A,CBL.BUFFER_PAGE			; ᯥæ-áâà ­¨æ !
 	;LD (PLAY_PAGE),A
@@ -588,15 +593,18 @@ DATA_1:
 	CALL READ_FILE_X1
 
 	LD A,0
-	LD BC,#4E
+	LD BC,CBL.SYS_PORT
 	OUT (C),A
 
-	LD BC,#4F
+	LD BC,CBL.OUT
 	LD A,#80
 FILL_L0:
 	OUT (C),A	; § ¡¨âì ¢® ¢á¥ 80h
 	DJNZ FILL_L0
 
+
+
+
 	LD HL,0A000h	; CLEAR PAGE_IM2
 	LD DE,0A001h
 	LD BC,100h
@@ -613,7 +621,7 @@ FILL_L0:
 	IM 2
 
 	LD A,(CBL_MODE)
-	LD BC,#4E
+	LD BC,CBL.SYS_PORT
 	OUT (C),A
 
 	EI
@@ -947,10 +955,10 @@ EXIT_ALL:
 	IM 1
 
 	LD A,0
-	LD BC,#4E
+	LD BC,CBL.SYS_PORT
 	OUT (C),A
 
-	LD BC,#4F
+	LD BC,CBL.OUT 
 	LD A,#80
 
 .loop:	OUT (C),A	; § ¡¨âì ¢® ¢á¥ 80h
@@ -1133,7 +1141,6 @@ COLOR_+1: LD A,#FF
 
 ;*************************************
 
-
 FRQ_ON:
 	CALL OFF_IND
 	LD A,(FRQ_)
@@ -1277,7 +1284,7 @@ READ_FILE:		; HL - name,
 ;	LD DE,200h	; ç¨â âì § £®«®¢®ª
 	LD C,#13
 	RST ToDSS
-	RET C		; ®è¨¡ª  ¯à¨ ç⥭¨¨
+	;RET C		; ®è¨¡ª  ¯à¨ ç⥭¨¨
 			; ¤«¨­  áç¨â ­­ëå ¤ ­­ëå ¢ DE
 	RET	        ; ®è¨¡ª  ¯à¨ § ªàë⨨ ¨«¨ Ok