{
   "name" : "The Last Thing We Wanna Do",
   "author" : "mimetikmusic",
   "ancestor_list" : [],
   "description" : "A little homage to \"Come Out\" by Steve Reich.",
   "labels" : [
      "tape experimental reich"
   ],
   "is_private" : null,
   "id" : "1-4S8",
   "code" : "/* A little homage to \"Come Out\" by Steve Reich.\r\n   It explores ryhtmic aspects created by phasing, retriggering, and pitch shifting.\r\n   It \"detours\" the original audio message available here\r\n   http://www.freesound.org/people/ERH/sounds/34667/\r\n   in which a police patrol recites\r\n   \"We don't want to scare your children, that's the last thing we wanna do\".\r\n   \r\n    */\r\n\r\n\r\ns.options.memSize=128*1024;\r\ns.boot;\r\n\r\n~bus=Bus.audio(s,2);\r\n~buf=Buffer.readChannel(s,\"/home/***/Supercollider/sounds/v.wav\");\r\n\r\n(\r\nSynthDef(\\playbuff,{arg in=0,out=0,t_trig=0;\r\n    var i=EnvGen.kr(Env([0,40,0.3,0.4,40,0],[0,60,20,20,30]),gate:1);\r\n    var r=EnvGen.kr(Env([0,10,-0.9,-0.9],[40,20,15]),gate:t_trig,doneAction:2);\r\n    var sig1=PlayBuf.ar(1,in,rate:1+r,trigger:Impulse.kr(i),loop:1);\r\n    var sig2=PlayBuf.ar(1,in,rate:1+r,trigger:Impulse.kr(i+0.01),loop:1);\r\nOut.ar(out,Splay.ar([sig1,sig2],0.5));\r\n};\r\n).add;\r\n\r\nSynthDef(\\rev,{arg in=0,out=0;\r\n    var sig=In.ar(in,2);\r\n    sig=Compander.ar(sig,sig,0.8,1/3);\r\n    sig=FreeVerb.ar(sig,mix:0.4);\r\nOut.ar(out,sig);\r\n};\r\n).add;\r\n);\r\n\r\nSynth(\\rev,[\\in:~bus]);\r\n\r\nfork{\r\nx=Synth(\\playbuff,[\\out:~bus]);\r\n75.wait;\r\nx.set(\\t_trig,1);\r\n};\r\n\r\ns.quit;"
}