Fork Code: minor scale filtered pulsewave demands

name

code content

(
{
	arg amp=0.1;
	var a, trig, basefreq, snd, cutoffmod, rqmod;
	
	a = Dseq([0, 2, 3, 5, 7, 8, 10, 12], inf);
	trig = Impulse.kr(4);
	basefreq = Demand.kr(trig, 0, a) + 38;
	basefreq = basefreq.midicps;
	cutoffmod = LFNoise2.ar(0.2).range(100,1500);
	rqmod = LFNoise2.ar(0.2).range(1,0.05);

	snd = (Pulse.ar(basefreq + 1 * SinOsc.kr(0.1.rand).range(0.99,1.010)) * amp) 
	+ (Pulse.ar(basefreq + 2 * SinOsc.kr(0.1.rand).range(0.99,1.010)) * amp) 
	+ (Pulse.ar(basefreq + 3 * SinOsc.kr(0.1.rand).range(0.99,1.01)) * amp)
	+ (Pulse.ar(basefreq + 4 * SinOsc.kr(0.1.rand).range(0.99,1.01)) * amp)
	+ (Pulse.ar(basefreq + 5 * SinOsc.kr(0.1.rand).range(0.99,1.01)) * amp)
	+ (Pulse.ar(basefreq + 2 * SinOsc.kr(0.1.rand).range(0.99,1.010)) * amp) 
	+ (Pulse.ar(basefreq + 3 * SinOsc.kr(0.1.rand).range(0.99,1.01)) * amp)
	+ (Pulse.ar(basefreq + 4 * SinOsc.kr(0.1.rand).range(0.99,1.01)) * amp)
	+ (Pulse.ar(basefreq + 5 * SinOsc.kr(0.1.rand).range(0.99,1.01)) * amp)
	+ (Pulse.ar(basefreq + 6 * SinOsc.kr(0.1.rand).range(0.99,1.01)) * amp);
	
	
	snd = LeakDC.ar(snd);
	snd = RLPF.ar(snd, cutoffmod, rqmod);
	snd = Limiter.ar(in: snd, level: 0.8, dur:0.001);
	snd.dup;
	
}.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