From d518a1ba26548e555703bb1a859d5a1886b4dc91 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Tue, 18 Jun 2019 13:07:24 -0400
Subject: [PATCH] pt3_player: some more smc code, remove a zp variable

---
 pt3_player/mockingboard_a.s | 7 ++++---
 pt3_player/zp.inc           | 5 ++---
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/pt3_player/mockingboard_a.s b/pt3_player/mockingboard_a.s
index d7e92658..e8bac8f9 100644
--- a/pt3_player/mockingboard_a.s
+++ b/pt3_player/mockingboard_a.s
@@ -81,7 +81,7 @@ reset_ay_both:
 clear_ay_both:
 	ldx	#14
 	lda	#0
-	sta	MB_VALUE
+	sta	MB_VALUE_smc+1
 clear_ay_left_loop:
 ;	Write sequence
 ;	Inactive -> Latch Address -> Inactive -> Write Data -> Inactive
@@ -104,7 +104,8 @@ write_ay_both:
 	sty	MOCK_6522_ORB2						; 3
 
 	; value
-	lda	MB_VALUE						; 3
+MB_VALUE_smc:
+	lda	#$d1							; 2
 	sta	MOCK_6522_ORA1		; put value on PA1		; 3
 	sta	MOCK_6522_ORA2		; put value on PA2		; 3
 	lda	#MOCK_AY_WRITE		;				; 2
@@ -114,7 +115,7 @@ write_ay_both:
 	sty	MOCK_6522_ORB2						; 3
 
 								;===========
-								;       45
+								;       44
 	dex
 	bpl	clear_ay_left_loop
 	rts
diff --git a/pt3_player/zp.inc b/pt3_player/zp.inc
index 80ccdb04..a2211113 100644
--- a/pt3_player/zp.inc
+++ b/pt3_player/zp.inc
@@ -67,9 +67,8 @@ ORNAMENT_H	= $03
 SAMPLE_L	= $04
 SAMPLE_H	= $05
 
-WHICH_FILE	= $62
-LOOP		= $63
-MB_VALUE	= $64
+WHICH_FILE	= $63
+LOOP		= $64
 MB_ADDRL	= $65
 MB_ADDRH	= $66
 DONE_PLAYING	= $67