{
   "labels" : [
      "electronic",
      "drone",
      "loop",
      "experimental"
   ],
   "is_private" : null,
   "id" : "1-1y",
   "code" : "(\r\nSynthDef(\"pulse\",{ arg freq,delayTime,amp = 1.0,attack = 0.01;\r\n\tvar out,out2,env;\r\n\tenv = EnvGen.kr(Env.perc(attack, 1, 5, 10),doneAction: 2);\r\n\tz = SinOsc.ar(freq,0,0.7);\r\n\ta = Pan2.ar(ToggleFF.ar(TDelay.ar(z,delayTime)) * SinOsc.ar(freq),\r\n\t         SinOsc.kr(3,0), 0.6);\r\n\tout = Pan2.ar(z, SinOsc.kr(5,1.0pi),0.7 ) + a;\r\n\tout = out * env;\r\n\tout = out.clip2(1);\r\n\t\t\r\n\tOut.ar(0,FreeVerb.ar(out,0.7,1.0,0.4, amp));\t\r\n}).send(s);\r\n\r\nSynthDef(\"droneee\", { arg freq = 440, amp = 1.0, outbus = 0, phase = 0;\r\n\tvar out, env;\r\n\tenv = EnvGen.kr(Env.sine(10),doneAction: 2);\r\n\tout = LFPulse.ar(freq , 0.15);\r\n\tout = RLPF.ar(out,SinOsc.kr(0.3, 0, 200, 1500), 0.1);\r\n\tout = FreeVerb.ar(out, 0.5, 0.5, 0.5) * env;\r\n\tout = Pan2.ar(out, SinOsc.kr(1/10, phase),amp);\r\n\t\r\n    Out.ar(outbus, out);\r\n}).send(s);\r\n\r\n\r\nSynthDef(\"bass\",{\r\n\targ freq,amp,outbus=0;\r\n\tvar env,out;\r\n\tout = SinOsc.ar(freq,0,amp);\r\n\tenv = EnvGen.kr(Env.perc(0.5,1,1,0),doneAction: 2);\t\r\n\tout = out*env;\r\n\tout = Pan2.ar(out,0);\r\n\tOut.ar(outbus,out);\r\n\t\t\r\n\t\r\n}).send(s);\r\n)\r\n\r\n\r\n(\r\n\r\np = Prand( [31,40, 45,64,68,69], inf).asStream;\r\nq = Prand( [3,0.7,1,0.5], inf ).asStream;\r\ne = Prand([59,72,76,79,81,88,90],inf).asStream;\r\n\r\nt = Task({\r\n\t\tinf.do({\r\n\t\t\r\n\t\tif( 0.1.coin, {\r\n\t\t\tSynth(\"pulse\",\r\n\t\t\t     [\\freq,e.value.midicps,\r\n\t\t\t      \\amp,0.07.rand +0.2,\r\n\t\t\t      \\attack,7.0.rand,\r\n\t\t\t            \\delayTime, 0.02;\r\n\t\t\t            ]);\r\n\t\t   });\r\n\r\n\r\n\t\tSynth(\"droneee\",\r\n\t\t       [\\outBus,0,\r\n\t\t        \\freq, p.value.midicps,\r\n\t\t        \\amp, (0.02.rand2 + 0.05) * 0.7,\r\n\t\t        \\phase,[0,1.5pi].wchoose([0.5,0.5]);\r\n\t\t        ]);\r\n\t\tq.value.wait;\r\n\t\t\r\n\t\tSynth(\"bass\",[\\freq,31.value.midicps,\\amp,0.3]);\r\n\r\n\t            });\r\n});\r\n\r\nt.start;\r\n)",
   "author" : "workworks",
   "name" : "ambient01",
   "ancestor_list" : [],
   "description" : "This is our first work and posting.\r\nPlease give us advice.\r\n\r\nFrom Japan."
}