Apple-2-SW/Applecorn
1
0
Fork 0
mirror of https://github.com/bobbimanners/Applecorn.git synced 2025-08-15 08:27:29 +00:00
Code Issues Projects Releases Wiki Activity

Pitch envelope fixes.

Browse Source
This commit is contained in:
Bobbi Webber-Manners
2022-10-15 23:04:43 -04:00
parent 55cca2ea25
commit fc05237d37
2 changed files with 3 additions and 1 deletions
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

@@ -516,9 +516,11 @@ PITCHENV LDA CHANENV,X ; Set envelope number
* Update pitch value. Called by PITCHENV. * Update pitch value. Called by PITCHENV.
* On entry: A - Change of pitch/step, X is audio channel # * On entry: A - Change of pitch/step, X is audio channel #
* X is preserved * X is preserved
UPDPITCH CLC UPDPITCH STX OSCNUM
CLC
ADC CURRPITCH,X ; Add change to current ADC CURRPITCH,X ; Add change to current
STA CURRPITCH,X ; Update STA CURRPITCH,X ; Update
TAY
JSR ENSQFREQ ; Update Ensoniq regs JSR ENSQFREQ ; Update Ensoniq regs
RTS RTS