Maintain hold nybble when releasing note

2022-10-30 17:35:31 -04:00 · 2022-10-30 17:35:31 -04:00 · c407ce0d6b
parent 38cb7cd1b4
commit c407ce0d6b
2 changed files with 3 additions and 2 deletions
--- a/applecorn.po
+++ b/applecorn.po
--- a/mainmem.audio.s
+++ b/mainmem.audio.s
@ -264,8 +264,9 @@ RELNOTE    PHX                               ; Preserve X
           JSR   GETBUFADDR                  ; Buffer address into A1L,A1H
           LDA   STARTINDICES,X              ; Output pointer for buf X
           TAY
-           LDA   #$00                        ; Release note ..
-           STA   (A1L),Y                     ; .. by overwriting seq # with zero
+           LDA   (A1L),Y                     ; Obtain Hold/Sync byte
+           AND   #$F0                        ; Set sync nybble to zero ..
+           STA   (A1L),Y                     ; .. to release the note
           PLX                               ; Recover original X
 :RTS       RTS