aboutsummaryrefslogtreecommitdiffstats
path: root/plugins/LV2/src/ToTape5
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/LV2/src/ToTape5')
-rw-r--r--plugins/LV2/src/ToTape5/ToTape5.cpp123
-rw-r--r--plugins/LV2/src/ToTape5/ToTape5.h122
-rw-r--r--plugins/LV2/src/ToTape5/ToTape5.ttl84
-rw-r--r--plugins/LV2/src/ToTape5/manifest.ttl.in6
4 files changed, 335 insertions, 0 deletions
diff --git a/plugins/LV2/src/ToTape5/ToTape5.cpp b/plugins/LV2/src/ToTape5/ToTape5.cpp
new file mode 100644
index 0000000..7807a61
--- /dev/null
+++ b/plugins/LV2/src/ToTape5/ToTape5.cpp
@@ -0,0 +1,123 @@
+#include "ToTape5.h"
+#include <iostream>
+#include <lv2wrapper.h>
+
+ToTape5::ToTape5(double rate)
+ : LV2Plugin(rate)
+{
+}
+
+void ToTape5::activate()
+{
+ A = 0.25;
+ B = 0.0;
+ C = 0.0;
+ D = 0.0;
+ E = 1.0;
+ F = 1.0;
+
+ iirMidRollerAL = 0.0;
+ iirMidRollerBL = 0.0;
+ iirMidRollerCL = 0.0;
+ iirHeadBumpAL = 0.0;
+ iirHeadBumpBL = 0.0;
+ iirHeadBumpCL = 0.0;
+ iirMinHeadBumpL = 0.0;
+
+ iirMidRollerAR = 0.0;
+ iirMidRollerBR = 0.0;
+ iirMidRollerCR = 0.0;
+ iirHeadBumpAR = 0.0;
+ iirHeadBumpBR = 0.0;
+ iirHeadBumpCR = 0.0;
+ iirMinHeadBumpR = 0.0;
+
+ iirSampleAL = 0.0;
+ iirSampleBL = 0.0;
+ iirSampleCL = 0.0;
+ iirSampleDL = 0.0;
+ iirSampleEL = 0.0;
+ iirSampleFL = 0.0;
+ iirSampleGL = 0.0;
+ iirSampleHL = 0.0;
+ iirSampleIL = 0.0;
+ iirSampleJL = 0.0;
+ iirSampleKL = 0.0;
+ iirSampleLL = 0.0;
+ iirSampleML = 0.0;
+ iirSampleNL = 0.0;
+ iirSampleOL = 0.0;
+ iirSamplePL = 0.0;
+ iirSampleQL = 0.0;
+ iirSampleRL = 0.0;
+ iirSampleSL = 0.0;
+ iirSampleTL = 0.0;
+ iirSampleUL = 0.0;
+ iirSampleVL = 0.0;
+ iirSampleWL = 0.0;
+ iirSampleXL = 0.0;
+ iirSampleYL = 0.0;
+ iirSampleZL = 0.0;
+
+ iirSampleAR = 0.0;
+ iirSampleBR = 0.0;
+ iirSampleCR = 0.0;
+ iirSampleDR = 0.0;
+ iirSampleER = 0.0;
+ iirSampleFR = 0.0;
+ iirSampleGR = 0.0;
+ iirSampleHR = 0.0;
+ iirSampleIR = 0.0;
+ iirSampleJR = 0.0;
+ iirSampleKR = 0.0;
+ iirSampleLR = 0.0;
+ iirSampleMR = 0.0;
+ iirSampleNR = 0.0;
+ iirSampleOR = 0.0;
+ iirSamplePR = 0.0;
+ iirSampleQR = 0.0;
+ iirSampleRR = 0.0;
+ iirSampleSR = 0.0;
+ iirSampleTR = 0.0;
+ iirSampleUR = 0.0;
+ iirSampleVR = 0.0;
+ iirSampleWR = 0.0;
+ iirSampleXR = 0.0;
+ iirSampleYR = 0.0;
+ iirSampleZR = 0.0;
+
+ for (int temp = 0; temp < 999; temp++) {dL[temp] = 0.0; eL[temp] = 0.0; dR[temp] = 0.0; eR[temp] = 0.0;}
+
+ gcount = 0;
+ rateof = 0.5;
+ sweep = 0.0;
+ nextmax = 0.5;
+ hcount = 0;
+ flip = 0;
+
+ fpNShapeL = 0.0;
+ fpNShapeR = 0.0;
+ //this is reset: values being initialized only once. Startup values, whatever they are.
+
+}
+
+void ToTape5::run(uint32_t num_samples)
+{
+ A = *params[0];
+ B = *params[1];
+ C = *params[2];
+ D = *params[3];
+ E = *params[4];
+ F = *params[5];
+
+ processReplacing(const_cast<float **>(in), out, num_samples);
+}
+
+//
+// Include the processing code from the VST version.
+//
+#include <cmath>
+#include "../../../LinuxVST/src/ToTape5/ToTape5Proc.cpp"
+
+// Create the LV2Wrapper and register the plugin
+LV2Wrapper<ToTape5> plugin;
diff --git a/plugins/LV2/src/ToTape5/ToTape5.h b/plugins/LV2/src/ToTape5/ToTape5.h
new file mode 100644
index 0000000..f1661f8
--- /dev/null
+++ b/plugins/LV2/src/ToTape5/ToTape5.h
@@ -0,0 +1,122 @@
+#ifndef __ToTape5_H
+#define __ToTape5_H
+
+#include <lv2plugin.h>
+
+class ToTape5 : public LV2Plugin<6> {
+public:
+ ToTape5(double rate);
+
+ void activate();
+ void run(uint32_t num_samples);
+
+ static constexpr const char * URI = "https://www.airwindows.com/totape5";
+
+private:
+ /*
+ * These are the original DSP functions from the VST plugin.
+ * They need to be called from the LV2 plugins `run` function.
+ */
+ void processReplacing(float **in, float **out, VstInt32 samples);
+ void processDoubleReplacing(double **in, double **out, VstInt32 samples);
+
+ /*
+ * Members needed by the processing functions.
+ */
+
+ int gcount;
+ double rateof;
+ double sweep;
+ double nextmax;
+ int hcount;
+ int flip;
+
+ double dL[1000];
+ double eL[1000];
+ double dR[1000];
+ double eR[1000];
+
+ double iirMidRollerAL;
+ double iirMidRollerBL;
+ double iirMidRollerCL;
+ double iirHeadBumpAL;
+ double iirHeadBumpBL;
+ double iirHeadBumpCL;
+ double iirMinHeadBumpL;
+
+ double iirMidRollerAR;
+ double iirMidRollerBR;
+ double iirMidRollerCR;
+ double iirHeadBumpAR;
+ double iirHeadBumpBR;
+ double iirHeadBumpCR;
+ double iirMinHeadBumpR;
+
+ double iirSampleAL;
+ double iirSampleBL;
+ double iirSampleCL;
+ double iirSampleDL;
+ double iirSampleEL;
+ double iirSampleFL;
+ double iirSampleGL;
+ double iirSampleHL;
+ double iirSampleIL;
+ double iirSampleJL;
+ double iirSampleKL;
+ double iirSampleLL;
+ double iirSampleML;
+ double iirSampleNL;
+ double iirSampleOL;
+ double iirSamplePL;
+ double iirSampleQL;
+ double iirSampleRL;
+ double iirSampleSL;
+ double iirSampleTL;
+ double iirSampleUL;
+ double iirSampleVL;
+ double iirSampleWL;
+ double iirSampleXL;
+ double iirSampleYL;
+ double iirSampleZL;
+
+ double iirSampleAR;
+ double iirSampleBR;
+ double iirSampleCR;
+ double iirSampleDR;
+ double iirSampleER;
+ double iirSampleFR;
+ double iirSampleGR;
+ double iirSampleHR;
+ double iirSampleIR;
+ double iirSampleJR;
+ double iirSampleKR;
+ double iirSampleLR;
+ double iirSampleMR;
+ double iirSampleNR;
+ double iirSampleOR;
+ double iirSamplePR;
+ double iirSampleQR;
+ double iirSampleRR;
+ double iirSampleSR;
+ double iirSampleTR;
+ double iirSampleUR;
+ double iirSampleVR;
+ double iirSampleWR;
+ double iirSampleXR;
+ double iirSampleYR;
+ double iirSampleZR;
+
+
+ long double fpNShapeL;
+ long double fpNShapeR;
+ //default stuff
+
+ float A;
+ float B;
+ float C;
+ float D;
+ float E;
+ float F;
+};
+
+#endif
diff --git a/plugins/LV2/src/ToTape5/ToTape5.ttl b/plugins/LV2/src/ToTape5/ToTape5.ttl
new file mode 100644
index 0000000..7e87c4b
--- /dev/null
+++ b/plugins/LV2/src/ToTape5/ToTape5.ttl
@@ -0,0 +1,84 @@
+# Airwindows ToTape5 plugin description
+
+@prefix lv2: <http://lv2plug.in/ns/lv2core#> .
+@prefix rdf: <http://www.w3.org/1999/02/22-rdf-syntax-ns#> .
+@prefix rdfs: <http://www.w3.org/2000/01/rdf-schema#> .
+@prefix units: <http://lv2plug.in/ns/extensions/units#> .
+
+<https://www.airwindows.com/totape5>
+ a lv2:Plugin ,
+ lv2:DistortionPlugin ;
+ lv2:project <https://www.airwindows.com> ;
+
+ lv2:optionalFeature lv2:hardRTCapable ;
+
+ # Define the ports for this plugin.
+ lv2:port [
+ a lv2:InputPort , lv2:ControlPort ;
+ lv2:index 0 ;
+ lv2:symbol "A" ;
+ lv2:name "Louder" ;
+ lv2:default 0.5 ;
+ lv2:minimum 0.0 ;
+ lv2:maximum 1.0 ;
+ ] , [
+ a lv2:InputPort , lv2:ControlPort ;
+ lv2:index 1 ;
+ lv2:symbol "B" ;
+ lv2:name "Softer" ;
+ lv2:default 0.5 ;
+ lv2:minimum 0.0 ;
+ lv2:maximum 1.0 ;
+ ] , [
+ a lv2:InputPort , lv2:ControlPort ;
+ lv2:index 2 ;
+ lv2:symbol "C" ;
+ lv2:name "Fatter" ;
+ lv2:default 0.5 ;
+ lv2:minimum 0.0 ;
+ lv2:maximum 1.0 ;
+ ] , [
+ a lv2:InputPort , lv2:ControlPort ;
+ lv2:index 3 ;
+ lv2:symbol "D" ;
+ lv2:name "Flutter" ;
+ lv2:default 0.5 ;
+ lv2:minimum 0.0 ;
+ lv2:maximum 1.0 ;
+ ] , [
+ a lv2:InputPort , lv2:ControlPort ;
+ lv2:index 4 ;
+ lv2:symbol "E" ;
+ lv2:name "Output" ;
+ lv2:default 0.5 ;
+ lv2:minimum 0.0 ;
+ lv2:maximum 1.0 ;
+ ] , [
+ a lv2:InputPort , lv2:ControlPort ;
+ lv2:index 5 ;
+ lv2:symbol "F" ;
+ lv2:name "Dry/Wet" ;
+ lv2:default 0.5 ;
+ lv2:minimum 0.0 ;
+ lv2:maximum 1.0 ;
+ ] , [
+ a lv2:InputPort , lv2:AudioPort ;
+ lv2:index 6 ;
+ lv2:symbol "in_l" ;
+ lv2:name "In left" ;
+ ] , [
+ a lv2:InputPort , lv2:AudioPort ;
+ lv2:index 7 ;
+ lv2:symbol "in_r" ;
+ lv2:name "In right" ;
+ ] , [
+ a lv2:OutputPort , lv2:AudioPort ;
+ lv2:index 8 ;
+ lv2:symbol "out_l" ;
+ lv2:name "Out left" ;
+ ] , [
+ a lv2:OutputPort , lv2:AudioPort ;
+ lv2:index 9 ;
+ lv2:symbol "out_r" ;
+ lv2:name "Out right" ;
+ ] .
diff --git a/plugins/LV2/src/ToTape5/manifest.ttl.in b/plugins/LV2/src/ToTape5/manifest.ttl.in
new file mode 100644
index 0000000..bb02750
--- /dev/null
+++ b/plugins/LV2/src/ToTape5/manifest.ttl.in
@@ -0,0 +1,6 @@
+airwindows:totape5
+ a lv2:Plugin ;
+ doap:name "Airwindows ToTape5" ;
+ doap:license <http://opensource.org/licenses/mit> ;
+ lv2:binary <ToTape5@CMAKE_SHARED_LIBRARY_SUFFIX@> ;
+ rdfs:seeAlso <ToTape5.ttl> .
generated by cgit v1.2.3 (git 2.25.1) at 2024-05-14 09:37:28 +0000