banalen

steno_definitions.scd

t.quelle('a', {|in, c|
	in * SinOscFB.ar([50, 50.01] - (10 * In.kr(c.synthIndex%[8, 7])), RMS.ar(in).lag(0.1))
});
t.quelle('e', {|in, c|
	var freq = (c.synthIndex+[1, 0.1] - (800 * RMS.ar(in)));
	LFPulse.ar(freq, iphase: {Rand()}!2, width: 0.1).lag(0.01) * SinOscFB.ar(8000 - (200 * c.index), 0.3) * (1 - Amplitude.ar(in, 0.01, 0.5) * 0.1)
});
t.quelle('i', {|in, c|
	SoundIn.ar([0, 1]) * 20
});
t.quelle('o', {|in, c|
	var dyn = In.ar(c.index%8);
	var trig = Impulse.ar(dyn.linlin(-1, 1, 3, 30));
	var freq = RMS.ar(in).lag(0.4) * 500 + 1000;
	Decay.ar(trig, 0.37) * SinOsc.ar(freq) * Amplitude.kr(in).lag(0.01, 5);
});
t.quelle('u', {|in, c|
	var dyn = In.ar(c.index%8);
	var trig = Impulse.ar(dyn.linlin(-1, 1, 3, 30));
	var freq = RMS.ar(in).lag(0.4) * 200 + 100;
	Decay.ar(trig, 0.37) * SinOsc.ar(freq) * Amplitude.kr(in).lag(0.01, 5);
});
t.filter('f', {|in, c|
	var dyn = RMS.ar(in, 100).lag(0.1) * 3;

	BPF.ar(in * 0.1, 1800 - (dyn.reverse * 400), dyn * 0.5)
});
t.filter('l', {|in, c|
	in * LFTri.ar(RMS.ar(in).lag(0.1) * 10)
});
t.filter('d', {|in, c|
	var dyn = RMS.ar(in).lag(0.1);
	DelayL.ar(
		in, 0.2,
		dyn.reverse.clip(0, 0.2)
	)
});
t.filter('n', {|in, c|
	Amplitude.kr(SoundIn.ar([1, 0]), 0.1, 1) * in * 5
});
t.filter('g', {|in, c|
	SelectX.ar(LFNoise1.ar(0.1),
	[
		LFPulse.ar(Rand(10, 5)).lag(0.1),
		K2A.ar(1)
	]) * in
});
t.filter('x', {|in, c|
	CombL.ar(in, 0.2, RMS.ar(in).lag(0.1) * 0.2)
});