{
   "description" : "",
   "ancestor_list" : [],
   "name" : "Gravel",
   "author" : "alextiberiuskirk",
   "id" : "1-4Vh",
   "is_private" : null,
   "code" : "(\r\nSynthDef(\\Grain,\r\n\t{var sig, grain, env, sum, filt, pan1,pan2;\r\n\t\tsig = DynKlank.ar(`[Array.fill(14,{Rand(60,1200)}),Array.fill(14,{ExpRand(0.128, 0.7)}),Array.fill(14,{ExpRand(0.128, 0.7)})],BrownNoise.ar(0.7));\r\n\t\tgrain = GrainIn.ar(1,Dust.kr(14), 0.0128, sig);\r\n\t\tgrain = CombC.ar(grain, LFNoise0.kr(0.7).range(0.7,3),0.7, 7);\r\n\t\tgrain = FreeVerb.ar(grain, 0.3,0.3,0.3);\r\n\t\tenv = EnvGen.kr(Env.sine(TRand.kr(1.28,3, Dust.kr(0.07))), Dust.kr(0.07));\r\n\t\tfilt = LPF.ar(sig, 500);\r\n\t\tsum = filt*env;\r\n\t\tpan1 = Pan4.ar(sum, FSinOsc.kr(0.128,(pi * 1)), FSinOsc.kr(0.128,(pi * 0.5)));\r\n\t\tpan2 = Pan4.ar(grain, FSinOsc.kr(0.07,(pi * 2)), FSinOsc.kr(0.07,(pi * 1.5)));\r\n\t\tOut.ar(0, pan1+pan2*0.0007);\r\n}).add;\r\n(\r\nSynthDef(\\Verb,\r\n\t{var comb;\r\n\t\tcomb = {FreeVerb.ar(In.ar(0),0.3,0.6,0,0.7)}!4;\r\n\t\t//comb1 = {CombC.ar(comb, 1.28,0.3,0.7)}!4;\r\n\t\tOut.ar(0,comb);\r\n}).add;\r\n);\r\n)\r\n)\r\n\r\n(\r\n(\r\n~sound = Group.head(s);\r\n~fx = Group.tail(s);\r\n);\r\n(\r\nSynth.head(~source,\\Grain);\r\nSynth.head(~fx,\\Verb);\r\n)\r\n)",
   "labels" : [
      "filter",
      "grain",
      "bus",
      "brown noise"
   ]
}
