SCClassLibrary/Common/Audio/FreeVerb.sc

   1 // blackrain's freeverb ugen.
   2
   3 FreeVerb : Filter {
   4         *ar { arg in, mix = 0.33, room = 0.5, damp = 0.5, mul = 1.0, add = 0.0;
   5                 ^this.multiNew('audio', in, mix, room, damp).madd(mul, add)
   6         }
   7 }
   8
   9 FreeVerb2 : MultiOutUGen {
  10         *ar { arg in, in2, mix = 0.33, room = 0.5, damp = 0.5, mul = 1.0, add = 0.0;
  11                 ^this.multiNew('audio', in, in2, mix, room, damp).madd(mul, add)
  12         }
  13
  14         init { arg ... theInputs;
  15                 inputs = theInputs;
  16                 channels = [
  17                         OutputProxy(rate, this, 0),
  18                         OutputProxy(rate, this, 1)
  19                 ];
  20                 ^channels
  21         }
  22
  23         checkInputs { ^this.checkNInputs(2); }
  24 }