Fork Code: bird

name

code content

(
Ndef(\bird).addSpec(\dur, [0.01, 1]);
Ndef(\bird).addSpec(\trig, [0, 1, \lin, 1]);
Ndef(\bird, {|dur = 1|

	var freqEnv, env, wEnv, src;
	var startFreq = \startFreq.kr(1000);
	var endFreq   = \endFreq.kr(4000);
	var trig = \trig.tr(1);

	env = EnvGen.ar(Env(
		[0, 1, 1, 0],
		[0.1, 1, 0.5].normalizeSum
	), trig, timeScale: dur);


	wEnv = EnvGen.ar(Env(
		[0, 1, 0],
		[1, 0],
		2
	), trig, timeScale: dur);

	freqEnv = wEnv * (endFreq - startFreq).abs + startFreq;
	wEnv = 1- (wEnv * 0.5);
	
	src = Pulse.ar(freqEnv * SinOsc.ar(0.1).range(0.99, 1.01), wEnv) * env!2;
	src
})
)

Ndef(\bird).play


Ndef(\bird).set(\trig, 1, \dur, 0.1)


Ndef(\bird).set(\trig, 1, \dur, rrand(0.1, 0.2), \endFreq, exprand(500, 1000), \startFreq, 4000)

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