«mrcl snippets #3: feedback timer» by elgiano
on 20 Jul'18 22:20 in1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39
( Ndef(\fbTimer){ m = (Dust.ar(0.5!2)*20).tanh+\in.ar(0!2); r = Timer.kr(Onsets.kr(FFT(LocalBuf(128)!2,m))); c = CombL.ar(m+(LocalIn.ar(2)*0.8),4,r.clip(0.0001,4),r*4); l = Resonz.ar(c,TRand.kr(20,20000,m),0.1,1000).tanh; LocalOut.ar(m+l); m+c; }.play ) ( Ndef(\fbTimerSel){ m = (Dust.ar(0.5!2)*20).tanh+\in.ar(0!2); r = Timer.kr(Onsets.kr(FFT(LocalBuf(128)!2,m))); c = CombL.ar(m+(LocalIn.ar(2)*0.8),4,r.clip(0.0001,4),r*4); l = Resonz.ar(c,TRand.kr(20,20000,m),0.1,1000).tanh; n = SelectX.ar(LFNoise0.kr(r.linlin(0,4,0.1,10)).range(0,4),[m,K2A.ar(r),c,l]); LocalOut.ar(n); n }.play ) ( Ndef(\fbTimer3){ var localin = (LocalIn.ar(2)*0.98)+\in.ar(0!2); var dust = (Dust.ar(Rand(0.5,10)!2)*200)+\in.ar; var timer = Timer.ar(dust); var comb = CombL.ar(dust+localin,4,timer.clip(0.0001,4),timer*4); var filt = Resonz.ar(comb,TRand.kr(20,Rand(20,20000),dust),0.1,1000).tanh; LocalOut.ar(dust+filt); comb+dust; comb+dust*timer; }.play )
reception
comments