«Ceci N'est Pas Une Pipe» by codepool
on 27 Apr'17 22:05 inMigration from the old SourceForge wiki.
1 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 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56
s.boot; p = ProxySpace.push(s); ~out.play; p.fadeTime = 2; ( f = { arg n = 10, fmin=1000, fmax=8000.0, dtMul=0.5; [ Array.rand(n, fmin, fmax).sort, nil, Array.rand(n, dtMul*0.1, dtMul).sort.reverse ] }; ~pipe = { var in; in = ~in.ar(8); in.collect({ arg chan; Klank.ar(Ref(f.value(rrand(4, 15), dtMul: rrand(40, 1).reciprocal)), chan) }) * 0.4 } ) ~out = { Pan2.ar(Mix(~pipe.ar(8)), LFNoise1.kr(0.1)) }; ~out = { Splay.ar(~pipe.ar(8)) * 8 }; ~in = { PanAz.ar(8, Impulse.ar(6, 0, 0.5) + WhiteNoise.ar(0.01), MouseX.kr(-1, 1)) }; ~in = { Array.fill(8, { Impulse.ar([1, 2, 3, 5].choose, pi.rand * MouseX.kr(0,1), 0.5) }) }; ~in[0] = { PanAz.ar(8, Impulse.ar(Rand(1, 4), 0, 0.5), LFNoise1.kr(0.1)) }; ~in[1] = { PanAz.ar(8, Impulse.ar(Rand(1, 4), 0, 0.5), LFNoise1.kr(0.1)) }; ~in[2] = { PanAz.ar(8, PinkNoise.ar(0.02), LFNoise1.kr(0.1)) }; ~in[3] = { PanAz.ar(8, PinkNoise.ar(0.02), LFNoise1.kr(0.1)) }; ~in[4] = { PanAz.ar(8, PinkNoise.ar(0.02), LFNoise1.kr(0.1)) }; ~in = { PanAz.ar(8, PinkNoise.ar(0.02), LFPulse.kr(Rand(1, 4), 0, Rand(0.02, 0.8)), LFNoise1.kr(0.1)) }; //add new layers ~in.send; ~in.send; ~in.send; //feed over ~in[0] = { PanAz.ar(8, ~in.ar(1, MouseY.kr(0,6)), LFNoise1.kr(0.1)) }; ~in[1] = { PanAz.ar(8, ~in.ar(1, MouseY.kr(1,7)), LFNoise1.kr(0.1)) }; ************ /* authors so far: jrh 03 */
reception
comments