Autres/audacity
1
0
Fork 0
mirror of https://github.com/cookiengineer/audacity synced 2026-04-26 07:53:42 +02: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

26
lib-src/libnyquist/nyquist/tran/stkchorus.alg
View File

@@ -1,21 +1,17 @@
(STKCHORUS-ALG
(NAME "stkchorus")
(ARGUMENTS ("sound_type" "s1")("double" "baseDelay")("double" "depth")("double" "freq")
("double" "mix")("rate_type" "sr"))
(STATE ("struct stkEffect *" "mych" "initStkChorus(baseDelay, depth, freq, round(sr));
(ARGUMENTS ("sound_type" "s1") ("double" "baseDelay") ("double" "depth")
("double" "freq") ("double" "mix"))
(STATE ("struct stkEffect *" "mych"
"initStkChorus(baseDelay, depth, freq, round(sr));
stkEffectSetMix(susp->mych, mix)"))
(LINEAR s1)
(START (MIN s1))
(TERMINATE (MIN s1))
(LOGICAL-STOP (MIN s1))
(NOT-IN-INNER-LOOP "mych" "baseDelay" "depth" "freq" "mix" "sr")
(SAMPLE-RATE "sr")
(SUPPORT-FUNCTIONS "
#include \"stkint.h\"
")
(INNER-LOOP "
output = (sample_type) (stkEffectTick(mych, s1))
")
(FINALIZATION "
deleteStkEffect(susp->mych);
")
)
(NOT-IN-INNER-LOOP "mych" "baseDelay" "depth" "freq" "mix")
(SAMPLE-RATE (MAX s1))
(SUPPORT-FUNCTIONS "#include \"stkint.h\"\n")
(INNER-LOOP "output = (sample_type) (stkEffectTick(mych, s1))")
(FINALIZATION " deleteStkEffect(susp->mych);\n")
)