From 7ef3eaf70f3ec3ed7e6175238e48ebdf891f646f Mon Sep 17 00:00:00 2001
From: Bobbi Webber-Manners <bobbi.manners@gmail.com>
Date: Sat, 15 Oct 2022 02:22:25 -0400
Subject: [PATCH] Fixed mainmem.audio.s to use A1L,A1H not OSINTWS

---
 applecorn.po    | Bin 819200 -> 819200 bytes
 mainmem.audio.s |  18 +++++++++---------
 2 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/applecorn.po b/applecorn.po
index 1f30b2cba89d518b04f09298e42c2e496a1c4e8d..d1fa7ffe8826f4a6358bade351e76cef11f9dcc4 100644
GIT binary patch
delta 104
zcmZo@FluNp+K|J-Ey~2u@R&itUssf=xtyiFoP`mHnShuXh(UZ-AZ7z%b|B^eV$SX5
vEL^|Ovf1oyifgr<UU7-bh|y;H>PuYqK<f1+u2+mU?bj}IZNGMzTWbvfZR{hH

delta 104
zcmZo@FluNp+K|J-EziKv@R&itUss-?xtyiFoP`mHnShuXh(UZ-AZ7z%b|B^eV$SX5
wEL^|Ovi;iI6xaHDdc`F!BgS9TS6||?2U4#ualK;v)qd?V*Y<0dxwX~+0M61USpWb4

diff --git a/mainmem.audio.s b/mainmem.audio.s
index cd56b65..4123bc9 100644
--- a/mainmem.audio.s
+++ b/mainmem.audio.s
@@ -69,12 +69,12 @@ CHANCTR     DB    $00
 
 * Get address of sound buffer
 * On entry: X is buffer number
-* On exit: OSIRQWS points to start of buffer
+* On exit: A1L,A1H points to start of buffer
 * Called with interrupts disabled
 GETBUFADDR  LDA   :BUFADDRL,X
-            STA   OSINTWS+0
+            STA   A1L
             LDA   :BUFADDRH,X
-            STA   OSINTWS+1
+            STA   A1H
             RTS
 :BUFADDRL   DB    $00
             DB    $00
@@ -113,9 +113,9 @@ INS         PHP                              ; Save flags, turn off interrupts
             BEQ   :FULL
             LDY   ENDINDICES,X               ; Current position
             STA   ENDINDICES,X               ; Write updated input pointer
-            JSR   GETBUFADDR                 ; Buffer address into OSINTWS
+            JSR   GETBUFADDR                 ; Buffer address into A1L,A1H
             PLA                              ; Get value to write back
-            STA   (OSINTWS),Y                ; Write to buffer
+            STA   (A1L),Y                    ; Write to buffer
             PLY
             PLP                              ; Restore flags
             CLC                              ; Exit with carry clear
@@ -148,8 +148,8 @@ REM         PHP                              ; Save flags, turn off interrupts
             CMP   ENDINDICES,X
             BEQ   :EMPTY                     ; Buffer is empty
             TAY                              ; Buffer pointer into Y
-            JSR   GETBUFADDR                 ; Buffer address into OSINTWS
-            LDA   (OSINTWS),Y                ; Read byte from buffer
+            JSR   GETBUFADDR                 ; Buffer address into A1L,A1H
+            LDA   (A1L),Y                    ; Read byte from buffer
             PHA                              ; Stash for later
             BVS   :EXAM                      ; If only examination, done
             INY                              ; Next byte
@@ -288,10 +288,10 @@ CHORD       PHA
             TXA
             ORA   #$04                      ; Convert to buffer number
             TAX
-            JSR   GETBUFADDR                ; Audio buf addr -> OSINTWS
+            JSR   GETBUFADDR                ; Audio buf addr -> A1L,A1H
             PLX
             LDA   #$00
-            STA   (OSINTWS),Y               ; Zero sync nybble (+ hold nybble)
+            STA   (A1L),Y                   ; Zero sync nybble (+ hold nybble)
 :NEXT2      DEX
             BPL   :L2                       ; Next audio queue
             BRA   :DONE