2016年5月21日土曜日

1.6.2 Output-Interpolated Stereo Panner


低負荷の改良型Pan (ステレオ入出力)



そしてついに、"Output-Interpolated Stereo Panner"です。

ここでは、モノラル入力だったときと同じように、
`smooth` 関数を `sqrt` 関数とともに演算させています。

  1 
  2 import("filter.lib") ;
  3 t = hslider("interpolation time", 0.001, 0, 0.01, 0.0001);
  4 c = hslider("pan", 0.5, 0, 1, 0.01);
  5 
  6 OutL(c,l,r) = sqrt(min(1, 2-2*c))*l + sqrt(max(0,1-2*c))*r;
  7 OutR(c,l,r) = sqrt(max(0, 2*c-1))*l + sqrt(min(1,2*c))*r ;
  8 pan(c,l,r) = smooth(tau2pole(t))(OutL(c,l,r)/2), smooth(tau2pole(t))(OutR(c,l,r)/2);
  9 
 10 process = pan(c);

SVGダイアグラム



0 件のコメント:

コメントを投稿