Apple-2-SW
/
Applecorn
mirror of https://github.com/bobbimanners/Applecorn.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

If prev note hasn't decayed, use residual amplitude

This commit is contained in:
Bobbi Webber-Manners 2022-10-30 17:54:22 -04:00
parent c407ce0d6b
commit f3ee7bfef2
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
applecorn.po
View File

Binary file not shown.

4
mainmem.audio.s
View File

@ -442,7 +442,6 @@ ENSQISR INC COUNTER+0 ; Increment centisecond timer
STA CHANTIMES,X
PLA ; Recover frequency
STA CURRPITCH,X ; Store for pitch envelope
STZ CURRAMP,X ; Amp envelope starts at zero
PLY ; Recover amplitude
JSR ENSQNOTE ; Start note playing
:NEXT DEX
@ -469,7 +468,8 @@ ENSQISR INC COUNTER+0 ; Increment centisecond timer
* On entry: X is audio channel #
NONOTE LDA CHANENV,X ; See if envelope is in effect
CMP #$FF
BNE :RELEASE ; Has envelope, start release phase
BNE :RELEASE ; If envelope -> start rel phase
STZ CURRAMP,X ; Next env will start at zero vol
LDY #$00 ; Zero volume
LDA #$00 ; Zero freq
JSR ENSQNOTE ; Silence channel Y