initial commit

1 files changed, 30 insertions, 0 deletions

diff --git a/loquelic_vo.dsp b/loquelic_vo.dsp
new file mode 100644
index 0000000..7687932
--- /dev/null
+++ b/loquelic_vo.dsp
@@ -0,0 +1,30 @@
+import("stdfaust.lib");
+import("src/util.dsp");
+
+UIGroupOscA(x) = hgroup("Oscillator A", x);
+UIFreqA = UIGroupOscA(vslider("Frequency", 440.0, 20.0, 10000.0, 1));
+UIFoldGain = UIGroupOscA(vslider("Fold", 1.0, 0.0, 5.0, 0.01));
+UIMorph = UIGroupOscA(vslider("Morph", 0.5, 0.0, 1.0, 0.001));
+
+UIGroupOscB(x) = hgroup("Oscillator B", x);
+UIFreqB = UIGroupOscB(vslider("Frequency", 440.0, 20.0, 10000.0, 1));
+UIDecay = UIGroupOscB(vslider("Decay", 0.0, 0.0, 1.0, 0.01));
+
+UIMod = vslider("Modulation", 0.0, 0.0, 1.0, 0.001);
+
+process = oscA * oscB
+with {
+  oscB = UIFreqA
+         : phase
+         : *(-UIDecay*10.0)
+         : exp;
+
+  oscA = UIFreqB
+         : phase
+         : +(oscB*UIMod)
+         : fmod(_,1.0)
+         : knee(UIMorph)
+         : sin(_*2.0*ma.PI)
+         : *(UIFoldGain)
+         : fold;
+};