Bugfix for ADSR with change/step = 0

2022-10-25 14:36:02 -04:00 · 2022-10-25 14:36:02 -04:00 · 911424173b
parent a31c9d6374
commit 911424173b
2 changed files with 2 additions and 1 deletions
--- a/applecorn.po
+++ b/applecorn.po
--- a/mainmem.audio.s
+++ b/mainmem.audio.s
@ -598,6 +598,7 @@ ADSRENV     LDA   CHANENV,X                 ; Get envelope number
 ADSRPHASE   STX   OSCNUM
            STA   :TARGET                   ; Stash target level for later
            CPY   #$00                      ; Check sign of change/step
+            BEQ   :DONE                     ; If change/step is zero
            BMI   :DESCEND                  ; Descending amplitude
 :ASCEND     CMP   CURRAMP,X                 ; Compare tgt with current level
            BNE   :S1                       ; Not equal to target, keep going
@ -623,7 +624,7 @@ ADSRPHASE   STX   OSCNUM
 :UPDATE     STA   CURRAMP,X                 ; Store updated amplitude
            TAY                             ; Tell the Ensoniq
            JSR   ENSQAMP
-            CLC                             ; CC to indicate phase continues
+:DONE       CLC                             ; CC to indicate phase continues
            RTS
 :TARGET     DB    $00