20 lines
423 B
Plaintext
20 lines
423 B
Plaintext
/* Generic modulable buffer granulator */
|
|
(
|
|
SynthDef(\grainoo, {
|
|
|buf|
|
|
var sig;
|
|
sig = GrainBuf.ar(
|
|
numChannels: 2,
|
|
trigger: Impulse.ar(\trig_rate.kr(20)),
|
|
dur: \gdur.kr(0.5),
|
|
sndbuf: buf,
|
|
pos: \gpos.kr(0),
|
|
rate: \rate.kr(0.5).lag(1),
|
|
);
|
|
sig = RLPF.ar(sig, \ff.kr(6000), \rq.kr(1));
|
|
sig = Pan2.ar(sig, LFNoise0.ar(0.5));
|
|
sig = sig * \amp.kr(1);
|
|
sig = Limiter.ar(sig);
|
|
Out.ar(\out.kr(0), sig);
|
|
}).add;
|
|
) |