{
   "description" : "a little fork of the Chicago chord pad. Edit: eliminate the click by replacing adsr by dadsr",
   "ancestor_list" : [
      "1-4QJ"
   ],
   "author" : "grirgz",
   "name" : "Re: Chicago Chord Pad",
   "is_private" : null,
   "id" : "1-4QL",
   "code" : "(\r\nSynthDef(\\ChicagoPad2, { |out = 0, freq = 440, freq2=660, freq3=528, cutoff = 500, amp = 0.2, gate=1|\r\n\r\n    var snd;\r\n    var delay = 0.045+0.05;\r\n\r\n    freq = freq + SinOsc.kr(freq*1/2, 0, freq/2, 0);\r\n\r\n    snd = Saw.ar([freq, freq+1, freq-1, freq2, freq3] * [0.99,1])*0.1;\r\n\r\n    snd = snd + VarSaw.ar(0.99*[freq, freq+1, freq-1, freq2, freq3, freq2+1, freq3+1],0, LFTri.kr(7.13).range(0.00,0.1))*0.1;\r\n\r\n\r\n    snd = Mix(snd);\r\n    snd = FreeVerb.ar(snd, 0.51,10,0.1)*2;\r\n    snd = snd *8;\r\n    snd = RLPF.ar(snd, SinOsc.kr([0.1,4.2], 0, [1700,480], [4000,700,5000])/[20.51,20], SinOsc.ar(0.1,1.5*pi)+1.05)/3;\r\n    snd = Mix(snd);\r\n\r\n    snd = MoogFF.ar(snd, SinOsc.kr(0.08, 0.5, cutoff/10, cutoff), 3, 0);\r\n\r\n    snd = snd * EnvGen.ar(Env.dadsr(delay,0.4, 0.01,0.8,0.4), gate, doneAction:2);\r\n    //snd = snd * EnvGen.ar(Env.adsr(0.4, 0.01,0.8,0.4), gate, doneAction:2);\r\n\r\n    snd = [snd , AllpassC.ar(snd, delay, 0.05+SinOsc.ar(0.11).range(0,0.045), 0.3)];\r\n    snd = snd * amp;\r\n    Out.ar(out, snd);\r\n\r\n}).add;\r\n)\r\n\r\n(\r\nPdef(\\plop2, Pbind(\r\n\t\\instrument, \\ChicagoPad2,\r\n\t\\degree, Pseq([0,4,0,3,1],inf),\r\n\t\\root, -4,\r\n\t\\freq2, Pkey(\\freq)*(3/2) / 2,\r\n\t\\freq3, Pkey(\\freq)*(5/6) / 2,\r\n\t\\legato, 1,\r\n\t\\cutoff, 4500,\r\n\t\\dur, 4,\r\n\t\\amp, 0.2\r\n)).play;\r\n);",
   "labels" : [
      "techno",
      "code fork",
      "chicago",
      "pad"
   ]
}
