|
|
|
@ -817,18 +817,33 @@
|
|
|
|
|
|
|
|
|
|
// {-------------------------------------------------------------------------
|
|
|
|
|
(
|
|
|
|
|
SynthDef(\singrain, { |freq = 440, amp = 0.2, sustain = 1|
|
|
|
|
|
var sig = SinOsc.ar(freq, 0, amp) * EnvGen.kr(
|
|
|
|
|
Env.perc(0.01, sustain), doneAction: 2
|
|
|
|
|
);
|
|
|
|
|
Out.ar(0, sig ! 2);
|
|
|
|
|
}).add;
|
|
|
|
|
SynthDef(
|
|
|
|
|
\singrain,
|
|
|
|
|
{
|
|
|
|
|
|freq = 440, amp = 0.2, sustain = 1|
|
|
|
|
|
|
|
|
|
|
var sig = SinOsc.ar(
|
|
|
|
|
freq, 0, amp
|
|
|
|
|
) * EnvGen.kr(
|
|
|
|
|
Env.perc(0.01, sustain), doneAction: 2
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
Out.ar(0, sig ! 2);
|
|
|
|
|
}
|
|
|
|
|
).add;
|
|
|
|
|
|
|
|
|
|
r = Routine({
|
|
|
|
|
var delta;
|
|
|
|
|
loop {
|
|
|
|
|
delta = rrand(1, 3) * 0.5;
|
|
|
|
|
Synth(\singrain, [freq: exprand(200, 800), amp: rrand(0.1, 0.5), sustain: delta * 0.8]);
|
|
|
|
|
Synth(
|
|
|
|
|
\singrain,
|
|
|
|
|
[
|
|
|
|
|
freq: exprand(200, 800),
|
|
|
|
|
amp: rrand(0.1, 0.5),
|
|
|
|
|
sustain: delta * 0.8
|
|
|
|
|
]
|
|
|
|
|
);
|
|
|
|
|
delta.yield;
|
|
|
|
|
}
|
|
|
|
|
});
|
|
|
|
|