Autres/audacity
1
0
Fork 0
mirror of https://github.com/cookiengineer/audacity synced 2025-12-10 06:36:24 +01:00
Code Issues Releases Wiki Activity

Update Nyquist to v3.09.

Browse Source
This commit is contained in:
Leland Lucius
2015-04-07 22:10:17 -05:00
parent f88b27e6d8
commit 9fb0ce5b82
358 changed files with 26327 additions and 7043 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
lib-src/libnyquist/nyquist/tran/stkpitshift.alg
View File

@@ -1,20 +1,17 @@
(STKPITSHIFT-ALG
(NAME "stkpitshift")
(ARGUMENTS ("sound_type" "s1")("double" "shift")("double" "mix")("rate_type" "sr"))
(ARGUMENTS ("sound_type" "s1") ("double" "shift") ("double" "mix"))
(STATE ("struct stkEffect *" "mych" "initStkPitShift(shift, round(sr));
stkEffectSetMix(susp->mych, mix)"))
(ALWAYS-SCALE s1)
(START (MIN s1))
(TERMINATE (MIN s1))
(LOGICAL-STOP (MIN s1))
(NOT-IN-INNER-LOOP "mych" "shift" "mix" "sr")
(SAMPLE-RATE "sr")
(SAMPLE-RATE (MAX s1))
(SUPPORT-FUNCTIONS "
#include \"stkint.h\"
#include \"stkint.h\"
")
(INNER-LOOP "
output = (sample_type) (stkEffectTick(mych, s1))
")
(FINALIZATION "
deleteStkEffect(susp->mych);
")
)
(INNER-LOOP "output = (sample_type) (stkEffectTick(mych, s1))")
(FINALIZATION " deleteStkEffect(susp->mych);\n")
)