// title: Feedback with beats // author: rukano // description: // Trying out some stuff to get some melodies/pads out of feedback and some beats in the background. // code: Ndef(\a, { var src, loc, delay=0.01; src = Decay2.ar(Impulse.ar(1/8), LFNoise2.kr(4).range(0.001, 0.0001), LFNoise2.kr(4).range(0.005, 0.05))!2 * Saw.ar(LFNoise2.kr(4).exprange(40, 4000)); loc = BPF.ar(LocalIn.ar(2) + [src, 0], LFNoise0.kr(1/4).range(100, 1200).lag, 3.2); loc = GVerb.ar(loc, 100, 4, mul:0.02, add:loc); loc = Compander.ar(loc, loc, 0.9, 1, 0.001); loc = (loc * 0.501).tanh; loc = Compander.ar(loc, loc, 0.1, 1, 0.1); loc = DelayC.ar(loc, delay * 2, delay * 1); LocalOut.ar(loc.reverse * 0.49); Out.ar(0, loc * 0.9) }).play; Ndef(\b, { var src, loc, del; del = 1/100; src = Decay2.ar(TDuty.ar(1/4,0,Dseq([1, 0.5, 0.3, 0.1],inf)), LFNoise2.kr(4).range(0.001, 0.0001), LFNoise2.kr(4).range(0.005, 0.05))!2 * Saw.ar(LFNoise2.kr(200).exprange(40, 14000)); loc = BPF.ar(LocalIn.ar(2) + [src, 0], LFNoise2.kr(0.1).range(40, 400), 3.2); loc = GVerb.ar(loc, 100, 4, mul:0.02, add:loc); loc = Compander.ar(loc, loc, 0.9, 1, 0.001); loc = (loc * 0.51).tanh; loc = Compander.ar(loc, loc, 0.1, 1, 0.1); loc = DelayC.ar(loc, del * 2, del * 1); LocalOut.ar(loc.reverse * 0.45); Out.ar(0, Compander.ar(loc,loc,0.1, 1, 0.05) * 1.2) }).play; Ndef(\c, { var src, loc, del=1/4; src = Decay2.ar(Impulse.ar(1), 0.0001, 0.05) * SinOsc.ar(60); loc = src + LocalIn.ar(2); loc = BPF.ar(loc, 800, 3.2).softclip; loc = DelayN.ar(loc, del, [0, del]); LocalOut.ar(loc.reverse * 0.99); Out.ar(0, loc * 2) }).play;