New directory tree, with preprocessor/ inside interpretor/.

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

diff --git a/interpretor/preprocessor/faust-0.9.47mr3/examples/panpot.dsp b/interpretor/preprocessor/faust-0.9.47mr3/examples/panpot.dsp
new file mode 100644 (file)
index 0000000..56fcce6
--- /dev/null
+++ b/interpretor/preprocessor/faust-0.9.47mr3/examples/panpot.dsp
@@ -0,0 +1,17 @@
+declare name           "panpot";
+declare version        "1.0";
+declare author                 "Grame";
+declare license        "BSD";
+declare copyright      "(c)GRAME 2006";
+
+//-------------------------------------------------
+// Stereo panpot
+//-------------------------------------------------
+
+panpot(x)      = sqrt(c)*x, sqrt(1-c)*x
+                       with {
+                               c=(nentry("[1]pan[style:knob]",0,-90,90,1)-90.0)/-180.0;
+                       };
+
+process                = panpot;
+