aboutsummaryrefslogtreecommitdiffstats
path: root/plugins/MacVST/ElectroHat/source/ElectroHatProc.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/MacVST/ElectroHat/source/ElectroHatProc.cpp')
-rwxr-xr-xplugins/MacVST/ElectroHat/source/ElectroHatProc.cpp306
1 files changed, 306 insertions, 0 deletions
diff --git a/plugins/MacVST/ElectroHat/source/ElectroHatProc.cpp b/plugins/MacVST/ElectroHat/source/ElectroHatProc.cpp
new file mode 100755
index 0000000..69b1a00
--- /dev/null
+++ b/plugins/MacVST/ElectroHat/source/ElectroHatProc.cpp
@@ -0,0 +1,306 @@
+/* ========================================
+ * ElectroHat - ElectroHat.h
+ * Copyright (c) 2016 airwindows, All rights reserved
+ * ======================================== */
+
+#ifndef __ElectroHat_H
+#include "ElectroHat.h"
+#endif
+
+void ElectroHat::processReplacing(float **inputs, float **outputs, VstInt32 sampleFrames)
+{
+ float* in1 = inputs[0];
+ float* in2 = inputs[1];
+ float* out1 = outputs[0];
+ float* out2 = outputs[1];
+
+ double overallscale = 1.0;
+ overallscale /= 44100.0;
+ overallscale *= getSampleRate();
+ bool highSample = false;
+ if (getSampleRate() > 64000) highSample = true;
+ //we will go to another dither for 88 and 96K
+ float fpTemp;
+ long double fpOld = 0.618033988749894848204586; //golden ratio!
+ long double fpNew = 1.0 - fpOld;
+
+ double drySampleL;
+ double drySampleR;
+ double tempSampleL;
+ double tempSampleR;
+ long double inputSampleL;
+ long double inputSampleR;
+
+ int deSyn = (VstInt32)( A * 5.999 )+1;
+ double increment = B;
+ double brighten = C;
+ double outputlevel = D;
+ double wet = E;
+ double dry = 1.0-wet;
+
+ if (deSyn == 4) {deSyn = 1; increment = 0.411; brighten = 0.87;}
+ //606 preset
+ if (deSyn == 5) {deSyn = 2; increment = 0.111; brighten = 1.0;}
+ //808 preset
+ if (deSyn == 6) {deSyn = 2; increment = 0.299; brighten = 0.359;}
+ //909 preset
+ int tok = deSyn + 1;
+ increment *= 0.98;
+ increment += 0.01;
+ increment += (double)tok;
+ double fosA = increment;
+ double fosB = fosA * increment;
+ double fosC = fosB * increment;
+ double fosD = fosC * increment;
+ double fosE = fosD * increment;
+ double fosF = fosE * increment;
+ int posA = fosA;
+ int posB = fosB;
+ int posC = fosC;
+ int posD = fosD;
+ int posE = fosE;
+ int posF = fosF;
+ int posG = posF*posE*posD*posC*posB; //factorial
+
+ while (--sampleFrames >= 0)
+ {
+ inputSampleL = *in1;
+ inputSampleR = *in2;
+ drySampleL = inputSampleL;
+ drySampleR = inputSampleR;
+
+ inputSampleL = fabs(inputSampleL)*outputlevel;
+ inputSampleR = fabs(inputSampleR)*outputlevel;
+
+ if (flip) { //will always be true unless we have high sample rate
+ tik++;
+ tik = tik % posG;
+ tok = tik * tik; tok = tok % posF;
+ tok *= tok; tok = tok % posE;
+ tok *= tok; tok = tok % posD;
+ tok *= tok; tok = tok % posC;
+ tok *= tok; tok = tok % posB;
+ tok *= tok; tok = tok % posA;
+
+ inputSampleL = tok*inputSampleL;
+ if ((abs(lok-tok)<abs(lok+tok))&&(deSyn == 1)) {inputSampleL = -tok*inputSampleL;}
+ if ((abs(lok-tok)>abs(lok+tok))&&(deSyn == 2)) {inputSampleL = -tok*inputSampleL;}
+ if ((abs(lok-tok)<abs(lok+tok))&&(deSyn == 3)) {inputSampleL = -tok*inputSampleL;}
+
+ inputSampleR = tok*inputSampleR;
+ if ((abs(lok-tok)<abs(lok+tok))&&(deSyn == 1)) {inputSampleR = -tok*inputSampleR;}
+ if ((abs(lok-tok)>abs(lok+tok))&&(deSyn == 2)) {inputSampleR = -tok*inputSampleR;}
+ if ((abs(lok-tok)<abs(lok+tok))&&(deSyn == 3)) {inputSampleR = -tok*inputSampleR;}
+
+ lok = tok;
+
+ tempSampleL = inputSampleL;
+ inputSampleL = inputSampleL - (lastSampleL*brighten);
+ lastSampleL = tempSampleL;
+
+ tempSampleR = inputSampleR;
+ inputSampleR = inputSampleR - (lastSampleR*brighten);
+ lastSampleR = tempSampleR;
+ } else { //we have high sample rate and this is an interpolate sample
+ inputSampleL = lastSampleL;
+ inputSampleR = lastSampleR;
+ //not really interpolating, just sample-and-hold
+ }
+
+ if (highSample) {
+ flip = !flip;
+ } else {
+ flip = true;
+ }
+
+ tempSampleL = inputSampleL;
+ inputSampleL += storedSampleL;
+ storedSampleL = tempSampleL;
+
+ tempSampleR = inputSampleR;
+ inputSampleR += storedSampleR;
+ storedSampleR = tempSampleR;
+
+ if (wet !=1.0) {
+ inputSampleL = (inputSampleL * wet) + (drySampleL * dry);
+ inputSampleR = (inputSampleR * wet) + (drySampleR * dry);
+ }
+
+ //noise shaping to 32-bit floating point
+ if (fpFlip) {
+ fpTemp = inputSampleL;
+ fpNShapeLA = (fpNShapeLA*fpOld)+((inputSampleL-fpTemp)*fpNew);
+ inputSampleL += fpNShapeLA;
+ fpTemp = inputSampleR;
+ fpNShapeRA = (fpNShapeRA*fpOld)+((inputSampleR-fpTemp)*fpNew);
+ inputSampleR += fpNShapeRA;
+ }
+ else {
+ fpTemp = inputSampleL;
+ fpNShapeLB = (fpNShapeLB*fpOld)+((inputSampleL-fpTemp)*fpNew);
+ inputSampleL += fpNShapeLB;
+ fpTemp = inputSampleR;
+ fpNShapeRB = (fpNShapeRB*fpOld)+((inputSampleR-fpTemp)*fpNew);
+ inputSampleR += fpNShapeRB;
+ }
+ fpFlip = !fpFlip;
+ //end noise shaping on 32 bit output
+
+ *out1 = inputSampleL;
+ *out2 = inputSampleR;
+
+ *in1++;
+ *in2++;
+ *out1++;
+ *out2++;
+ }
+}
+
+void ElectroHat::processDoubleReplacing(double **inputs, double **outputs, VstInt32 sampleFrames)
+{
+ double* in1 = inputs[0];
+ double* in2 = inputs[1];
+ double* out1 = outputs[0];
+ double* out2 = outputs[1];
+
+ double overallscale = 1.0;
+ overallscale /= 44100.0;
+ overallscale *= getSampleRate();
+ bool highSample = false;
+ if (getSampleRate() > 64000) highSample = true;
+ //we will go to another dither for 88 and 96K
+ double fpTemp;
+ long double fpOld = 0.618033988749894848204586; //golden ratio!
+ long double fpNew = 1.0 - fpOld;
+
+ double drySampleL;
+ double drySampleR;
+ double tempSampleL;
+ double tempSampleR;
+ long double inputSampleL;
+ long double inputSampleR;
+
+ int deSyn = (VstInt32)( A * 5.999 )+1;
+ double increment = B;
+ double brighten = C;
+ double outputlevel = D;
+ double wet = E;
+ double dry = 1.0-wet;
+
+ if (deSyn == 4) {deSyn = 1; increment = 0.411; brighten = 0.87;}
+ //606 preset
+ if (deSyn == 5) {deSyn = 2; increment = 0.111; brighten = 1.0;}
+ //808 preset
+ if (deSyn == 6) {deSyn = 2; increment = 0.299; brighten = 0.359;}
+ //909 preset
+ int tok = deSyn + 1;
+ increment *= 0.98;
+ increment += 0.01;
+ increment += (double)tok;
+ double fosA = increment;
+ double fosB = fosA * increment;
+ double fosC = fosB * increment;
+ double fosD = fosC * increment;
+ double fosE = fosD * increment;
+ double fosF = fosE * increment;
+ int posA = fosA;
+ int posB = fosB;
+ int posC = fosC;
+ int posD = fosD;
+ int posE = fosE;
+ int posF = fosF;
+ int posG = posF*posE*posD*posC*posB; //factorial
+
+ while (--sampleFrames >= 0)
+ {
+ inputSampleL = *in1;
+ inputSampleR = *in2;
+ drySampleL = inputSampleL;
+ drySampleR = inputSampleR;
+
+ inputSampleL = fabs(inputSampleL)*outputlevel;
+ inputSampleR = fabs(inputSampleR)*outputlevel;
+
+ if (flip) { //will always be true unless we have high sample rate
+ tik++;
+ tik = tik % posG;
+ tok = tik * tik; tok = tok % posF;
+ tok *= tok; tok = tok % posE;
+ tok *= tok; tok = tok % posD;
+ tok *= tok; tok = tok % posC;
+ tok *= tok; tok = tok % posB;
+ tok *= tok; tok = tok % posA;
+
+ inputSampleL = tok*inputSampleL;
+ if ((abs(lok-tok)<abs(lok+tok))&&(deSyn == 1)) {inputSampleL = -tok*inputSampleL;}
+ if ((abs(lok-tok)>abs(lok+tok))&&(deSyn == 2)) {inputSampleL = -tok*inputSampleL;}
+ if ((abs(lok-tok)<abs(lok+tok))&&(deSyn == 3)) {inputSampleL = -tok*inputSampleL;}
+
+ inputSampleR = tok*inputSampleR;
+ if ((abs(lok-tok)<abs(lok+tok))&&(deSyn == 1)) {inputSampleR = -tok*inputSampleR;}
+ if ((abs(lok-tok)>abs(lok+tok))&&(deSyn == 2)) {inputSampleR = -tok*inputSampleR;}
+ if ((abs(lok-tok)<abs(lok+tok))&&(deSyn == 3)) {inputSampleR = -tok*inputSampleR;}
+
+ lok = tok;
+
+ tempSampleL = inputSampleL;
+ inputSampleL = inputSampleL - (lastSampleL*brighten);
+ lastSampleL = tempSampleL;
+
+ tempSampleR = inputSampleR;
+ inputSampleR = inputSampleR - (lastSampleR*brighten);
+ lastSampleR = tempSampleR;
+ } else { //we have high sample rate and this is an interpolate sample
+ inputSampleL = lastSampleL;
+ inputSampleR = lastSampleR;
+ //not really interpolating, just sample-and-hold
+ }
+
+ if (highSample) {
+ flip = !flip;
+ } else {
+ flip = true;
+ }
+
+ tempSampleL = inputSampleL;
+ inputSampleL += storedSampleL;
+ storedSampleL = tempSampleL;
+
+ tempSampleR = inputSampleR;
+ inputSampleR += storedSampleR;
+ storedSampleR = tempSampleR;
+
+ if (wet !=1.0) {
+ inputSampleL = (inputSampleL * wet) + (drySampleL * dry);
+ inputSampleR = (inputSampleR * wet) + (drySampleR * dry);
+ }
+
+ //noise shaping to 64-bit floating point
+ if (fpFlip) {
+ fpTemp = inputSampleL;
+ fpNShapeLA = (fpNShapeLA*fpOld)+((inputSampleL-fpTemp)*fpNew);
+ inputSampleL += fpNShapeLA;
+ fpTemp = inputSampleR;
+ fpNShapeRA = (fpNShapeRA*fpOld)+((inputSampleR-fpTemp)*fpNew);
+ inputSampleR += fpNShapeRA;
+ }
+ else {
+ fpTemp = inputSampleL;
+ fpNShapeLB = (fpNShapeLB*fpOld)+((inputSampleL-fpTemp)*fpNew);
+ inputSampleL += fpNShapeLB;
+ fpTemp = inputSampleR;
+ fpNShapeRB = (fpNShapeRB*fpOld)+((inputSampleR-fpTemp)*fpNew);
+ inputSampleR += fpNShapeRB;
+ }
+ fpFlip = !fpFlip;
+ //end noise shaping on 64 bit output
+
+ *out1 = inputSampleL;
+ *out2 = inputSampleR;
+
+ *in1++;
+ *in2++;
+ *out1++;
+ *out2++;
+ }
+} \ No newline at end of file
generated by cgit v1.2.3 (git 2.25.1) at 2024-06-26 10:06:26 +0000