New directory tree, with preprocessor/ inside interpretor/.

[Faustine.git] / interpretor / preprocessor / faust-0.9.47mr3 / examples / smoothdelay.dsp

diff --git a/interpretor/preprocessor/faust-0.9.47mr3/examples/smoothdelay.dsp b/interpretor/preprocessor/faust-0.9.47mr3/examples/smoothdelay.dsp
new file mode 100644 (file)
index 0000000..189ba63
--- /dev/null
+++ b/interpretor/preprocessor/faust-0.9.47mr3/examples/smoothdelay.dsp
@@ -0,0 +1,28 @@
+declare name   "SmoothDelay";
+declare author         "Yann Orlarey";
+declare copyright "Grame";
+declare version "1.0";
+declare license "STK-4.3";
+
+
+//--------------------------process----------------------------
+//
+//     A stereo smooth delay with a feedback control
+//  
+//     This example shows how to use sdelay, a delay that doesn't
+//  click and doesn't transpose when the delay time is changed
+//-------------------------------------------------------------
+
+import("music.lib");
+
+process = par(i, 2, voice)
+       with 
+       { 
+               voice   = (+ : sdelay(N, interp, dtime)) ~ *(fback);
+               N               = int(2^19); 
+               interp  = hslider("interpolation[unit:ms][style:knob]",10,1,100,0.1)*SR/1000.0; 
+               dtime   = hslider("delay[unit:ms][style:knob]", 0, 0, 5000, 0.1)*SR/1000.0;
+               fback   = hslider("feedback[style:knob]",0,0,100,0.1)/100.0; 
+       };
+
+