audio/wavetable
2
0
Fork 0
mirror of https://codeberg.org/armin/wavetable.git synced 2026-09-01 05:50:46 +02:00
Code Issues Projects Releases Packages Wiki Activity

More juce

Browse source
This commit is contained in:
Roland Rabien 2025-08-07 11:27:56 -07:00
commit 19804716d4
1 changed files with 12 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

24
plugin/Source/FX/GrindAmpProc.cpp
View file

@ -50,7 +50,7 @@ void GrindAmp::processReplacing(float **inputs, float **outputs, VstInt32 sample
fixE[fix_reso] = 0.52972649; fixE[fix_reso] = 0.52972649;
fixF[fix_reso] = 0.50316379; fixF[fix_reso] = 0.50316379;
double K = tan(M_PI * fixA[fix_freq]); //lowpass double K = tan(juce::MathConstants<float>::pi * fixA[fix_freq]); //lowpass
double norm = 1.0 / (1.0 + K / fixA[fix_reso] + K * K); double norm = 1.0 / (1.0 + K / fixA[fix_reso] + K * K);
fixA[fix_a0] = K * K * norm; fixA[fix_a0] = K * K * norm;
fixA[fix_a1] = 2.0 * fixA[fix_a0]; fixA[fix_a1] = 2.0 * fixA[fix_a0];
@ -58,7 +58,7 @@ void GrindAmp::processReplacing(float **inputs, float **outputs, VstInt32 sample
fixA[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixA[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixA[fix_b2] = (1.0 - K / fixA[fix_reso] + K * K) * norm; fixA[fix_b2] = (1.0 - K / fixA[fix_reso] + K * K) * norm;
K = tan(M_PI * fixB[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixB[fix_freq]);
norm = 1.0 / (1.0 + K / fixB[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixB[fix_reso] + K * K);
fixB[fix_a0] = K * K * norm; fixB[fix_a0] = K * K * norm;
fixB[fix_a1] = 2.0 * fixB[fix_a0]; fixB[fix_a1] = 2.0 * fixB[fix_a0];
@ -66,7 +66,7 @@ void GrindAmp::processReplacing(float **inputs, float **outputs, VstInt32 sample
fixB[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixB[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixB[fix_b2] = (1.0 - K / fixB[fix_reso] + K * K) * norm; fixB[fix_b2] = (1.0 - K / fixB[fix_reso] + K * K) * norm;
K = tan(M_PI * fixC[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixC[fix_freq]);
norm = 1.0 / (1.0 + K / fixC[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixC[fix_reso] + K * K);
fixC[fix_a0] = K * K * norm; fixC[fix_a0] = K * K * norm;
fixC[fix_a1] = 2.0 * fixC[fix_a0]; fixC[fix_a1] = 2.0 * fixC[fix_a0];
@ -74,7 +74,7 @@ void GrindAmp::processReplacing(float **inputs, float **outputs, VstInt32 sample
fixC[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixC[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixC[fix_b2] = (1.0 - K / fixC[fix_reso] + K * K) * norm; fixC[fix_b2] = (1.0 - K / fixC[fix_reso] + K * K) * norm;
K = tan(M_PI * fixD[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixD[fix_freq]);
norm = 1.0 / (1.0 + K / fixD[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixD[fix_reso] + K * K);
fixD[fix_a0] = K * K * norm; fixD[fix_a0] = K * K * norm;
fixD[fix_a1] = 2.0 * fixD[fix_a0]; fixD[fix_a1] = 2.0 * fixD[fix_a0];
@ -82,7 +82,7 @@ void GrindAmp::processReplacing(float **inputs, float **outputs, VstInt32 sample
fixD[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixD[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixD[fix_b2] = (1.0 - K / fixD[fix_reso] + K * K) * norm; fixD[fix_b2] = (1.0 - K / fixD[fix_reso] + K * K) * norm;
K = tan(M_PI * fixE[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixE[fix_freq]);
norm = 1.0 / (1.0 + K / fixE[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixE[fix_reso] + K * K);
fixE[fix_a0] = K * K * norm; fixE[fix_a0] = K * K * norm;
fixE[fix_a1] = 2.0 * fixE[fix_a0]; fixE[fix_a1] = 2.0 * fixE[fix_a0];
@ -90,7 +90,7 @@ void GrindAmp::processReplacing(float **inputs, float **outputs, VstInt32 sample
fixE[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixE[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixE[fix_b2] = (1.0 - K / fixE[fix_reso] + K * K) * norm; fixE[fix_b2] = (1.0 - K / fixE[fix_reso] + K * K) * norm;
K = tan(M_PI * fixF[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixF[fix_freq]);
norm = 1.0 / (1.0 + K / fixF[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixF[fix_reso] + K * K);
fixF[fix_a0] = K * K * norm; fixF[fix_a0] = K * K * norm;
fixF[fix_a1] = 2.0 * fixF[fix_a0]; fixF[fix_a1] = 2.0 * fixF[fix_a0];
@ -873,7 +873,7 @@ void GrindAmp::processDoubleReplacing(double **inputs, double **outputs, VstInt3
fixE[fix_reso] = 0.52972649; fixE[fix_reso] = 0.52972649;
fixF[fix_reso] = 0.50316379; fixF[fix_reso] = 0.50316379;
double K = tan(M_PI * fixA[fix_freq]); //lowpass double K = tan(juce::MathConstants<float>::pi * fixA[fix_freq]); //lowpass
double norm = 1.0 / (1.0 + K / fixA[fix_reso] + K * K); double norm = 1.0 / (1.0 + K / fixA[fix_reso] + K * K);
fixA[fix_a0] = K * K * norm; fixA[fix_a0] = K * K * norm;
fixA[fix_a1] = 2.0 * fixA[fix_a0]; fixA[fix_a1] = 2.0 * fixA[fix_a0];
@ -881,7 +881,7 @@ void GrindAmp::processDoubleReplacing(double **inputs, double **outputs, VstInt3
fixA[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixA[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixA[fix_b2] = (1.0 - K / fixA[fix_reso] + K * K) * norm; fixA[fix_b2] = (1.0 - K / fixA[fix_reso] + K * K) * norm;
K = tan(M_PI * fixB[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixB[fix_freq]);
norm = 1.0 / (1.0 + K / fixB[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixB[fix_reso] + K * K);
fixB[fix_a0] = K * K * norm; fixB[fix_a0] = K * K * norm;
fixB[fix_a1] = 2.0 * fixB[fix_a0]; fixB[fix_a1] = 2.0 * fixB[fix_a0];
@ -889,7 +889,7 @@ void GrindAmp::processDoubleReplacing(double **inputs, double **outputs, VstInt3
fixB[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixB[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixB[fix_b2] = (1.0 - K / fixB[fix_reso] + K * K) * norm; fixB[fix_b2] = (1.0 - K / fixB[fix_reso] + K * K) * norm;
K = tan(M_PI * fixC[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixC[fix_freq]);
norm = 1.0 / (1.0 + K / fixC[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixC[fix_reso] + K * K);
fixC[fix_a0] = K * K * norm; fixC[fix_a0] = K * K * norm;
fixC[fix_a1] = 2.0 * fixC[fix_a0]; fixC[fix_a1] = 2.0 * fixC[fix_a0];
@ -897,7 +897,7 @@ void GrindAmp::processDoubleReplacing(double **inputs, double **outputs, VstInt3
fixC[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixC[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixC[fix_b2] = (1.0 - K / fixC[fix_reso] + K * K) * norm; fixC[fix_b2] = (1.0 - K / fixC[fix_reso] + K * K) * norm;
K = tan(M_PI * fixD[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixD[fix_freq]);
norm = 1.0 / (1.0 + K / fixD[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixD[fix_reso] + K * K);
fixD[fix_a0] = K * K * norm; fixD[fix_a0] = K * K * norm;
fixD[fix_a1] = 2.0 * fixD[fix_a0]; fixD[fix_a1] = 2.0 * fixD[fix_a0];
@ -905,7 +905,7 @@ void GrindAmp::processDoubleReplacing(double **inputs, double **outputs, VstInt3
fixD[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixD[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixD[fix_b2] = (1.0 - K / fixD[fix_reso] + K * K) * norm; fixD[fix_b2] = (1.0 - K / fixD[fix_reso] + K * K) * norm;
K = tan(M_PI * fixE[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixE[fix_freq]);
norm = 1.0 / (1.0 + K / fixE[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixE[fix_reso] + K * K);
fixE[fix_a0] = K * K * norm; fixE[fix_a0] = K * K * norm;
fixE[fix_a1] = 2.0 * fixE[fix_a0]; fixE[fix_a1] = 2.0 * fixE[fix_a0];
@ -913,7 +913,7 @@ void GrindAmp::processDoubleReplacing(double **inputs, double **outputs, VstInt3
fixE[fix_b1] = 2.0 * (K * K - 1.0) * norm; fixE[fix_b1] = 2.0 * (K * K - 1.0) * norm;
fixE[fix_b2] = (1.0 - K / fixE[fix_reso] + K * K) * norm; fixE[fix_b2] = (1.0 - K / fixE[fix_reso] + K * K) * norm;
K = tan(M_PI * fixF[fix_freq]); K = tan(juce::MathConstants<float>::pi * fixF[fix_freq]);
norm = 1.0 / (1.0 + K / fixF[fix_reso] + K * K); norm = 1.0 / (1.0 + K / fixF[fix_reso] + K * K);
fixF[fix_a0] = K * K * norm; fixF[fix_a0] = K * K * norm;
fixF[fix_a1] = 2.0 * fixF[fix_a0]; fixF[fix_a1] = 2.0 * fixF[fix_a0];