You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
17 lines
596 B
Plaintext
17 lines
596 B
Plaintext
b = Buffer.read(s, "/home/lcoogan/snd/installation/zeitlin-six_lines.wav");
|
|
|
|
(
|
|
SynthDef(\voiceObscured, {
|
|
arg out=0, bufnum, rate=1, shift=0, cutoff=1200, amp = 40;
|
|
var sig;
|
|
sig = PlayBuf.ar(1, bufnum, BufRateScale.kr(bufnum) * rate, doneAction: 2);
|
|
// sig = NoiseRepellent.ar(sig, learner:NRAverage(\isLearning.kr(0)), reductionAmount:40);
|
|
sig = HPF.ar(sig, cutoff); // soften sibilance
|
|
sig = sig * amp ;
|
|
Out.ar(out, sig.dup);
|
|
}).add;
|
|
)
|
|
|
|
x = Synth(\voiceObscured, [\bufnum, b, \amp, 60]);
|
|
x.set(\isLearning, 1); // capture some noise
|
|
x.set(\isLearning, 0); // start the script |