interpretor/faust-0.9.47mr3/examples/smoothdelay.dsp

   1 declare name    "SmoothDelay";
   2 declare author  "Yann Orlarey";
   3 declare copyright "Grame";
   4 declare version "1.0";
   5 declare license "STK-4.3";
   6
   7
   8 //--------------------------process----------------------------
   9 //
  10 //      A stereo smooth delay with a feedback control
  11 //
  12 //      This example shows how to use sdelay, a delay that doesn't
  13 //  click and doesn't transpose when the delay time is changed
  14 //-------------------------------------------------------------
  15
  16 import("music.lib");
  17
  18 process = par(i, 2, voice)
  19         with
  20         {
  21                 voice   = (+ : sdelay(N, interp, dtime)) ~ *(fback);
  22                 N               = int(2^19);
  23                 interp  = hslider("interpolation[unit:ms][style:knob]",10,1,100,0.1)*SR/1000.0;
  24                 dtime   = hslider("delay[unit:ms][style:knob]", 0, 0, 5000, 0.1)*SR/1000.0;
  25                 fback   = hslider("feedback[style:knob]",0,0,100,0.1)/100.0;
  26         };
  27
  28