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.
48 lines
807 B
Plaintext
48 lines
807 B
Plaintext
{CA1x.ar(100 + LFNoise0.kr(2), 40 + SinOsc.kr(40), 2, mul:2)}.play;
|
|
|
|
(
|
|
SynthDef(\ca, {
|
|
arg freq=180, amp = 2;
|
|
var sig, env;
|
|
sig = CA1.ar(freq + LFNoise0.kr(20), freq + SinOsc.kr(40), 2, mul:2) + CA2.ar();
|
|
// sig = SinOsc.ar(freq);
|
|
env = EnvGen.kr(Env.adsr(0, 0.1, 0.2), doneAction:2);
|
|
Out.ar(0, sig.dup, amp * env);
|
|
}).add;
|
|
)
|
|
|
|
Synth(\ca, [\freq, 120]);
|
|
|
|
|
|
{CA1.ar(440, 60, 18, ).dup}.play;
|
|
|
|
|
|
(
|
|
SynthDef(\ca2, {
|
|
arg freq=440, amp=1;
|
|
var sig, env, r;
|
|
|
|
r = Pca.r2;
|
|
|
|
sig = CA2.ar(freq, 50, r[10], trig:Impulse.kr(4 + SinOsc.kr(0.2)));
|
|
env = EnvGen.kr(Env.adsr(0, 0.1, 0.2), doneAction:2);
|
|
|
|
// sig = LPF.ar(sig, 800);
|
|
|
|
Out.ar(0, sig.dup * env * amp);
|
|
}).add;
|
|
)
|
|
|
|
|
|
{CA2.ar(2).dup}.play;
|
|
|
|
|
|
(
|
|
Pbind(
|
|
\instrument, \ca,
|
|
\dur, 0.25,
|
|
\freq, Pseq([60, 63, 65], inf),
|
|
\amp, 0.1,
|
|
\rel, 0.8,
|
|
).play;
|
|
) |