L'électron rare
de035a8596
git-subtree-dir: sound_algo git-subtree-mainline:b7940d650fgit-subtree-split:38b17c42a0
14 lines
576 B
Plaintext
14 lines
576 B
Plaintext
// =====================================================================
|
|
// fx/insert/vcf_ladder.scd -- SynthDef \vcfLadder
|
|
// Extracted from live.scd during v2 reorganization.
|
|
// =====================================================================
|
|
(
|
|
SynthDef(\vcfLadder, {
|
|
arg busIn = 0, freq = 1500, q = 1.0, mix = 1.0, drive = 1.0;
|
|
var sig = In.ar(busIn, 2);
|
|
var wet = LPF.ar(LPF.ar(sig * drive, freq), freq);
|
|
wet = wet + (RHPF.ar(wet, freq, q.reciprocal.clip(0.1, 2)) * (q * 0.3));
|
|
ReplaceOut.ar(busIn, (sig * (1 - mix)) + (wet * mix));
|
|
}).add;
|
|
)
|