ChromeOxide

This commit is contained in:
Chris Johnson 2020-05-24 21:28:47 -04:00
parent e55cd09cef
commit 897c0830e6
44 changed files with 11621 additions and 0 deletions

View file

@ -42,6 +42,7 @@ add_airwindows_plugin(Channel6)
add_airwindows_plugin(Channel7)
add_airwindows_plugin(Chorus)
add_airwindows_plugin(ChorusEnsemble)
add_airwindows_plugin(ChromeOxide)
add_airwindows_plugin(Cider)
add_airwindows_plugin(ClipOnly)
add_airwindows_plugin(Coils)

View file

@ -0,0 +1,143 @@
/* ========================================
* ChromeOxide - ChromeOxide.h
* Copyright (c) 2016 airwindows, All rights reserved
* ======================================== */
#ifndef __ChromeOxide_H
#include "ChromeOxide.h"
#endif
AudioEffect* createEffectInstance(audioMasterCallback audioMaster) {return new ChromeOxide(audioMaster);}
ChromeOxide::ChromeOxide(audioMasterCallback audioMaster) :
AudioEffectX(audioMaster, kNumPrograms, kNumParameters)
{
iirSampleAL = 0.0;
iirSampleBL = 0.0;
iirSampleCL = 0.0;
iirSampleDL = 0.0;
secondSampleL = 0.0;
thirdSampleL = 0.0;
fourthSampleL = 0.0;
fifthSampleL = 0.0;
iirSampleAR = 0.0;
iirSampleBR = 0.0;
iirSampleCR = 0.0;
iirSampleDR = 0.0;
secondSampleR = 0.0;
thirdSampleR = 0.0;
fourthSampleR = 0.0;
fifthSampleR = 0.0;
flip = false;
A = 0.5;
B = 0.5;
fpd = 17;
//this is reset: values being initialized only once. Startup values, whatever they are.
_canDo.insert("plugAsChannelInsert"); // plug-in can be used as a channel insert effect.
_canDo.insert("plugAsSend"); // plug-in can be used as a send effect.
_canDo.insert("x2in2out");
setNumInputs(kNumInputs);
setNumOutputs(kNumOutputs);
setUniqueID(kUniqueId);
canProcessReplacing(); // supports output replacing
canDoubleReplacing(); // supports double precision processing
programsAreChunks(true);
vst_strncpy (_programName, "Default", kVstMaxProgNameLen); // default program name
}
ChromeOxide::~ChromeOxide() {}
VstInt32 ChromeOxide::getVendorVersion () {return 1000;}
void ChromeOxide::setProgramName(char *name) {vst_strncpy (_programName, name, kVstMaxProgNameLen);}
void ChromeOxide::getProgramName(char *name) {vst_strncpy (name, _programName, kVstMaxProgNameLen);}
//airwindows likes to ignore this stuff. Make your own programs, and make a different plugin rather than
//trying to do versioning and preventing people from using older versions. Maybe they like the old one!
static float pinParameter(float data)
{
if (data < 0.0f) return 0.0f;
if (data > 1.0f) return 1.0f;
return data;
}
VstInt32 ChromeOxide::getChunk (void** data, bool isPreset)
{
float *chunkData = (float *)calloc(kNumParameters, sizeof(float));
chunkData[0] = A;
chunkData[1] = B;
/* Note: The way this is set up, it will break if you manage to save settings on an Intel
machine and load them on a PPC Mac. However, it's fine if you stick to the machine you
started with. */
*data = chunkData;
return kNumParameters * sizeof(float);
}
VstInt32 ChromeOxide::setChunk (void* data, VstInt32 byteSize, bool isPreset)
{
float *chunkData = (float *)data;
A = pinParameter(chunkData[0]);
B = pinParameter(chunkData[1]);
/* We're ignoring byteSize as we found it to be a filthy liar */
/* calculate any other fields you need here - you could copy in
code from setParameter() here. */
return 0;
}
void ChromeOxide::setParameter(VstInt32 index, float value) {
switch (index) {
case kParamA: A = value; break;
case kParamB: B = value; break;
default: throw; // unknown parameter, shouldn't happen!
}
}
float ChromeOxide::getParameter(VstInt32 index) {
switch (index) {
case kParamA: return A; break;
case kParamB: return B; break;
default: break; // unknown parameter, shouldn't happen!
} return 0.0; //we only need to update the relevant name, this is simple to manage
}
void ChromeOxide::getParameterName(VstInt32 index, char *text) {
switch (index) {
case kParamA: vst_strncpy (text, "Intense", kVstMaxParamStrLen); break;
case kParamB: vst_strncpy (text, "Bias", kVstMaxParamStrLen); break;
default: break; // unknown parameter, shouldn't happen!
} //this is our labels for displaying in the VST host
}
void ChromeOxide::getParameterDisplay(VstInt32 index, char *text) {
switch (index) {
case kParamA: float2string (A, text, kVstMaxParamStrLen); break;
case kParamB: float2string (B, text, kVstMaxParamStrLen); break;
default: break; // unknown parameter, shouldn't happen!
} //this displays the values and handles 'popups' where it's discrete choices
}
void ChromeOxide::getParameterLabel(VstInt32 index, char *text) {
switch (index) {
case kParamA: vst_strncpy (text, "", kVstMaxParamStrLen); break;
case kParamB: vst_strncpy (text, "", kVstMaxParamStrLen); break;
default: break; // unknown parameter, shouldn't happen!
}
}
VstInt32 ChromeOxide::canDo(char *text)
{ return (_canDo.find(text) == _canDo.end()) ? -1: 1; } // 1 = yes, -1 = no, 0 = don't know
bool ChromeOxide::getEffectName(char* name) {
vst_strncpy(name, "ChromeOxide", kVstMaxProductStrLen); return true;
}
VstPlugCategory ChromeOxide::getPlugCategory() {return kPlugCategEffect;}
bool ChromeOxide::getProductString(char* text) {
vst_strncpy (text, "airwindows ChromeOxide", kVstMaxProductStrLen); return true;
}
bool ChromeOxide::getVendorString(char* text) {
vst_strncpy (text, "airwindows", kVstMaxVendorStrLen); return true;
}

View file

@ -0,0 +1,83 @@
/* ========================================
* ChromeOxide - ChromeOxide.h
* Created 8/12/11 by SPIAdmin
* Copyright (c) 2011 __MyCompanyName__, All rights reserved
* ======================================== */
#ifndef __ChromeOxide_H
#define __ChromeOxide_H
#ifndef __audioeffect__
#include "audioeffectx.h"
#endif
#include <set>
#include <string>
#include <math.h>
enum {
kParamA = 0,
kParamB = 1,
kNumParameters = 2
}; //
const int kNumPrograms = 0;
const int kNumInputs = 2;
const int kNumOutputs = 2;
const unsigned long kUniqueId = 'croy'; //Change this to what the AU identity is!
class ChromeOxide :
public AudioEffectX
{
public:
ChromeOxide(audioMasterCallback audioMaster);
~ChromeOxide();
virtual bool getEffectName(char* name); // The plug-in name
virtual VstPlugCategory getPlugCategory(); // The general category for the plug-in
virtual bool getProductString(char* text); // This is a unique plug-in string provided by Steinberg
virtual bool getVendorString(char* text); // Vendor info
virtual VstInt32 getVendorVersion(); // Version number
virtual void processReplacing (float** inputs, float** outputs, VstInt32 sampleFrames);
virtual void processDoubleReplacing (double** inputs, double** outputs, VstInt32 sampleFrames);
virtual void getProgramName(char *name); // read the name from the host
virtual void setProgramName(char *name); // changes the name of the preset displayed in the host
virtual VstInt32 getChunk (void** data, bool isPreset);
virtual VstInt32 setChunk (void* data, VstInt32 byteSize, bool isPreset);
virtual float getParameter(VstInt32 index); // get the parameter value at the specified index
virtual void setParameter(VstInt32 index, float value); // set the parameter at index to value
virtual void getParameterLabel(VstInt32 index, char *text); // label for the parameter (eg dB)
virtual void getParameterName(VstInt32 index, char *text); // name of the parameter
virtual void getParameterDisplay(VstInt32 index, char *text); // text description of the current value
virtual VstInt32 canDo(char *text);
private:
char _programName[kVstMaxProgNameLen + 1];
std::set< std::string > _canDo;
double iirSampleAL;
double iirSampleBL;
double iirSampleCL;
double iirSampleDL;
double secondSampleL;
double thirdSampleL;
double fourthSampleL;
double fifthSampleL;
double iirSampleAR;
double iirSampleBR;
double iirSampleCR;
double iirSampleDR;
double secondSampleR;
double thirdSampleR;
double fourthSampleR;
double fifthSampleR;
bool flip;
uint32_t fpd;
//default stuff
float A;
float B;
};
#endif

View file

@ -0,0 +1,331 @@
/* ========================================
* ChromeOxide - ChromeOxide.h
* Copyright (c) 2016 airwindows, All rights reserved
* ======================================== */
#ifndef __ChromeOxide_H
#include "ChromeOxide.h"
#endif
void ChromeOxide::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();
double bassSampleL;
double bassSampleR;
double randy;
double bias = B/1.31578947368421;
double intensity = 0.9+pow(A,2);
double iirAmount = pow(1.0-(intensity/(10+(bias*4.0))),2)/overallscale;
//make 10 higher for less trashy sound in high settings
double bridgerectifier;
double trebleGainTrim = 1.0;
double indrive = 1.0;
double densityA = (intensity*80)+1.0;
double noise = intensity/(1.0+bias);
double bassGainTrim = 1.0;
double glitch = 0.0;
bias *= overallscale;
noise *= overallscale;
if (intensity > 1.0)
{
glitch = intensity-1.0;
indrive = intensity*intensity;
bassGainTrim /= (intensity*intensity);
trebleGainTrim = (intensity+1.0)/2.0;
}
//everything runs off Intensity now
while (--sampleFrames >= 0)
{
long double inputSampleL = *in1;
long double inputSampleR = *in2;
if (fabs(inputSampleL)<1.18e-37) inputSampleL = fpd * 1.18e-37;
if (fabs(inputSampleR)<1.18e-37) inputSampleR = fpd * 1.18e-37;
inputSampleL *= indrive;
inputSampleR *= indrive;
bassSampleL = inputSampleL;
bassSampleR = inputSampleR;
if (flip)
{
iirSampleAL = (iirSampleAL * (1 - iirAmount)) + (inputSampleL * iirAmount);
iirSampleAR = (iirSampleAR * (1 - iirAmount)) + (inputSampleR * iirAmount);
inputSampleL -= iirSampleAL;
inputSampleR -= iirSampleAR;
}
else
{
iirSampleBL = (iirSampleBL * (1 - iirAmount)) + (inputSampleL * iirAmount);
iirSampleBR = (iirSampleBR * (1 - iirAmount)) + (inputSampleR * iirAmount);
inputSampleL -= iirSampleBL;
inputSampleR -= iirSampleBR;
}
//highpass section
bassSampleL -= (inputSampleL * (fabs(inputSampleL) * glitch) * (fabs(inputSampleL) * glitch) );
bassSampleR -= (inputSampleR * (fabs(inputSampleR) * glitch) * (fabs(inputSampleR) * glitch) );
//overdrive the bass channel
if (flip)
{
iirSampleCL = (iirSampleCL * (1 - iirAmount)) + (bassSampleL * iirAmount);
iirSampleCR = (iirSampleCR * (1 - iirAmount)) + (bassSampleR * iirAmount);
bassSampleL = iirSampleCL;
bassSampleR = iirSampleCR;
}
else
{
iirSampleDL = (iirSampleDL * (1 - iirAmount)) + (bassSampleL * iirAmount);
iirSampleDR = (iirSampleDR * (1 - iirAmount)) + (bassSampleR * iirAmount);
bassSampleL = iirSampleDL;
bassSampleR = iirSampleDR;
}
//bass filter same as high but only after the clipping
flip = !flip;
bridgerectifier = inputSampleL;
//insanity check
randy = bias+((rand()/(double)RAND_MAX)*noise);
if ((randy >= 0.0)&&(randy < 1.0)) bridgerectifier = (inputSampleL * randy)+(secondSampleL * (1.0-randy));
if ((randy >= 1.0)&&(randy < 2.0)) bridgerectifier = (secondSampleL * (randy-1.0))+(thirdSampleL * (2.0-randy));
if ((randy >= 2.0)&&(randy < 3.0)) bridgerectifier = (thirdSampleL * (randy-2.0))+(fourthSampleL * (3.0-randy));
if ((randy >= 3.0)&&(randy < 4.0)) bridgerectifier = (fourthSampleL * (randy-3.0))+(fifthSampleL * (4.0-randy));
fifthSampleL = fourthSampleL;
fourthSampleL = thirdSampleL;
thirdSampleL = secondSampleL;
secondSampleL = inputSampleL;
//high freq noise/flutter section
inputSampleL = bridgerectifier;
//apply overall, or just to the distorted bit? if the latter, below says 'fabs bridgerectifier'
bridgerectifier = inputSampleR;
//insanity check
randy = bias+((rand()/(double)RAND_MAX)*noise);
if ((randy >= 0.0)&&(randy < 1.0)) bridgerectifier = (inputSampleR * randy)+(secondSampleR * (1.0-randy));
if ((randy >= 1.0)&&(randy < 2.0)) bridgerectifier = (secondSampleR * (randy-1.0))+(thirdSampleR * (2.0-randy));
if ((randy >= 2.0)&&(randy < 3.0)) bridgerectifier = (thirdSampleR * (randy-2.0))+(fourthSampleR * (3.0-randy));
if ((randy >= 3.0)&&(randy < 4.0)) bridgerectifier = (fourthSampleR * (randy-3.0))+(fifthSampleR * (4.0-randy));
fifthSampleR = fourthSampleR;
fourthSampleR = thirdSampleR;
thirdSampleR = secondSampleR;
secondSampleR = inputSampleR;
//high freq noise/flutter section
inputSampleR = bridgerectifier;
//apply overall, or just to the distorted bit? if the latter, below says 'fabs bridgerectifier'
bridgerectifier = fabs(inputSampleL)*densityA;
if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
//max value for sine function
bridgerectifier = sin(bridgerectifier);
if (inputSampleL > 0) inputSampleL = bridgerectifier/densityA;
else inputSampleL = -bridgerectifier/densityA;
//blend according to densityA control
bridgerectifier = fabs(inputSampleR)*densityA;
if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
//max value for sine function
bridgerectifier = sin(bridgerectifier);
if (inputSampleR > 0) inputSampleR = bridgerectifier/densityA;
else inputSampleR = -bridgerectifier/densityA;
//blend according to densityA control
inputSampleL *= trebleGainTrim;
inputSampleR *= trebleGainTrim;
bassSampleL *= bassGainTrim;
bassSampleR *= bassGainTrim;
inputSampleL += bassSampleL;
inputSampleR += bassSampleR;
//that simple.
//begin 32 bit stereo floating point dither
int expon; frexpf((float)inputSampleL, &expon);
fpd ^= fpd << 13; fpd ^= fpd >> 17; fpd ^= fpd << 5;
inputSampleL += ((double(fpd)-uint32_t(0x7fffffff)) * 5.5e-36l * pow(2,expon+62));
frexpf((float)inputSampleR, &expon);
fpd ^= fpd << 13; fpd ^= fpd >> 17; fpd ^= fpd << 5;
inputSampleR += ((double(fpd)-uint32_t(0x7fffffff)) * 5.5e-36l * pow(2,expon+62));
//end 32 bit stereo floating point dither
*out1 = inputSampleL;
*out2 = inputSampleR;
*in1++;
*in2++;
*out1++;
*out2++;
}
}
void ChromeOxide::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();
double bassSampleL;
double bassSampleR;
double randy;
double bias = B/1.31578947368421;
double intensity = 0.9+pow(A,2);
double iirAmount = pow(1.0-(intensity/(10+(bias*4.0))),2)/overallscale;
//make 10 higher for less trashy sound in high settings
double bridgerectifier;
double trebleGainTrim = 1.0;
double indrive = 1.0;
double densityA = (intensity*80)+1.0;
double noise = intensity/(1.0+bias);
double bassGainTrim = 1.0;
double glitch = 0.0;
bias *= overallscale;
noise *= overallscale;
if (intensity > 1.0)
{
glitch = intensity-1.0;
indrive = intensity*intensity;
bassGainTrim /= (intensity*intensity);
trebleGainTrim = (intensity+1.0)/2.0;
}
//everything runs off Intensity now
while (--sampleFrames >= 0)
{
long double inputSampleL = *in1;
long double inputSampleR = *in2;
if (fabs(inputSampleL)<1.18e-43) inputSampleL = fpd * 1.18e-43;
if (fabs(inputSampleR)<1.18e-43) inputSampleR = fpd * 1.18e-43;
inputSampleL *= indrive;
inputSampleR *= indrive;
bassSampleL = inputSampleL;
bassSampleR = inputSampleR;
if (flip)
{
iirSampleAL = (iirSampleAL * (1 - iirAmount)) + (inputSampleL * iirAmount);
iirSampleAR = (iirSampleAR * (1 - iirAmount)) + (inputSampleR * iirAmount);
inputSampleL -= iirSampleAL;
inputSampleR -= iirSampleAR;
}
else
{
iirSampleBL = (iirSampleBL * (1 - iirAmount)) + (inputSampleL * iirAmount);
iirSampleBR = (iirSampleBR * (1 - iirAmount)) + (inputSampleR * iirAmount);
inputSampleL -= iirSampleBL;
inputSampleR -= iirSampleBR;
}
//highpass section
bassSampleL -= (inputSampleL * (fabs(inputSampleL) * glitch) * (fabs(inputSampleL) * glitch) );
bassSampleR -= (inputSampleR * (fabs(inputSampleR) * glitch) * (fabs(inputSampleR) * glitch) );
//overdrive the bass channel
if (flip)
{
iirSampleCL = (iirSampleCL * (1 - iirAmount)) + (bassSampleL * iirAmount);
iirSampleCR = (iirSampleCR * (1 - iirAmount)) + (bassSampleR * iirAmount);
bassSampleL = iirSampleCL;
bassSampleR = iirSampleCR;
}
else
{
iirSampleDL = (iirSampleDL * (1 - iirAmount)) + (bassSampleL * iirAmount);
iirSampleDR = (iirSampleDR * (1 - iirAmount)) + (bassSampleR * iirAmount);
bassSampleL = iirSampleDL;
bassSampleR = iirSampleDR;
}
//bass filter same as high but only after the clipping
flip = !flip;
bridgerectifier = inputSampleL;
//insanity check
randy = bias+((rand()/(double)RAND_MAX)*noise);
if ((randy >= 0.0)&&(randy < 1.0)) bridgerectifier = (inputSampleL * randy)+(secondSampleL * (1.0-randy));
if ((randy >= 1.0)&&(randy < 2.0)) bridgerectifier = (secondSampleL * (randy-1.0))+(thirdSampleL * (2.0-randy));
if ((randy >= 2.0)&&(randy < 3.0)) bridgerectifier = (thirdSampleL * (randy-2.0))+(fourthSampleL * (3.0-randy));
if ((randy >= 3.0)&&(randy < 4.0)) bridgerectifier = (fourthSampleL * (randy-3.0))+(fifthSampleL * (4.0-randy));
fifthSampleL = fourthSampleL;
fourthSampleL = thirdSampleL;
thirdSampleL = secondSampleL;
secondSampleL = inputSampleL;
//high freq noise/flutter section
inputSampleL = bridgerectifier;
//apply overall, or just to the distorted bit? if the latter, below says 'fabs bridgerectifier'
bridgerectifier = inputSampleR;
//insanity check
randy = bias+((rand()/(double)RAND_MAX)*noise);
if ((randy >= 0.0)&&(randy < 1.0)) bridgerectifier = (inputSampleR * randy)+(secondSampleR * (1.0-randy));
if ((randy >= 1.0)&&(randy < 2.0)) bridgerectifier = (secondSampleR * (randy-1.0))+(thirdSampleR * (2.0-randy));
if ((randy >= 2.0)&&(randy < 3.0)) bridgerectifier = (thirdSampleR * (randy-2.0))+(fourthSampleR * (3.0-randy));
if ((randy >= 3.0)&&(randy < 4.0)) bridgerectifier = (fourthSampleR * (randy-3.0))+(fifthSampleR * (4.0-randy));
fifthSampleR = fourthSampleR;
fourthSampleR = thirdSampleR;
thirdSampleR = secondSampleR;
secondSampleR = inputSampleR;
//high freq noise/flutter section
inputSampleR = bridgerectifier;
//apply overall, or just to the distorted bit? if the latter, below says 'fabs bridgerectifier'
bridgerectifier = fabs(inputSampleL)*densityA;
if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
//max value for sine function
bridgerectifier = sin(bridgerectifier);
if (inputSampleL > 0) inputSampleL = bridgerectifier/densityA;
else inputSampleL = -bridgerectifier/densityA;
//blend according to densityA control
bridgerectifier = fabs(inputSampleR)*densityA;
if (bridgerectifier > 1.57079633) bridgerectifier = 1.57079633;
//max value for sine function
bridgerectifier = sin(bridgerectifier);
if (inputSampleR > 0) inputSampleR = bridgerectifier/densityA;
else inputSampleR = -bridgerectifier/densityA;
//blend according to densityA control
inputSampleL *= trebleGainTrim;
inputSampleR *= trebleGainTrim;
bassSampleL *= bassGainTrim;
bassSampleR *= bassGainTrim;
inputSampleL += bassSampleL;
inputSampleR += bassSampleR;
//that simple.
//begin 64 bit stereo floating point dither
int expon; frexp((double)inputSampleL, &expon);
fpd ^= fpd << 13; fpd ^= fpd >> 17; fpd ^= fpd << 5;
inputSampleL += ((double(fpd)-uint32_t(0x7fffffff)) * 1.1e-44l * pow(2,expon+62));
frexp((double)inputSampleR, &expon);
fpd ^= fpd << 13; fpd ^= fpd >> 17; fpd ^= fpd << 5;
inputSampleR += ((double(fpd)-uint32_t(0x7fffffff)) * 1.1e-44l * pow(2,expon+62));
//end 64 bit stereo floating point dither
*out1 = inputSampleL;
*out2 = inputSampleR;
*in1++;
*in2++;
*out1++;
*out2++;
}
}