Fork Code: Bugger Soundtrack

name

code content

//a SynthDef
(
SynthDef("plucking", {arg amp = 0.1, freq = 220, decay = 5, coef = 0.1;

var env, snd;
env = EnvGen.kr(Env.linen(0, decay, 0.5), doneAction: 2);
snd = Pluck.ar(
        in: Saw.ar(freq, 0.5*amp),
        trig: Impulse.kr(0),

        maxdelaytime: 0.1,
        delaytime: freq.reciprocal,
        decaytime: decay,
        coef: coef);
    Out.ar(0, [snd, snd]);
}).add;
)

//Bugger soundtrack
(
Pbind(
    \instrument, "plucking",
    \scale, Scale.lydian,
	\degree, Prand([[-2.5, -4.001], [-7.002, -5], [-1, -3.003], [1.005, 0.51]], inf),
	\amp, Pseq([0.1, 0.2, 0.3, 0.4, 0.5, 0.5, 0.5, 0.5], inf),
	\decay, Pseq([0.25,1, 0.5, 0.125], inf),
	\coef, Pseq([0.7, 0.8, 0.9], inf),
	\dur, Pseq([0.01, 0.0025, 0.2475, 0.24, 0.5], inf)
).play;
)

code description use markdown for formating

category tags comma separated, i.g. "wild, siren" (do not enter default SC class names, please)

ancestor(s) comma separated identificators, i.g. "1-C,1-1,1-4M,1-x"

Private? the code will be accessible by direct url and not visible in public activity

comment of change