aboutsummaryrefslogtreecommitdiffstats
path: root/plugins/MacAU/StarChild/StarChild.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/MacAU/StarChild/StarChild.cpp')
-rwxr-xr-xplugins/MacAU/StarChild/StarChild.cpp44
1 files changed, 10 insertions, 34 deletions
diff --git a/plugins/MacAU/StarChild/StarChild.cpp b/plugins/MacAU/StarChild/StarChild.cpp
index 7a434e9..61959c8 100755
--- a/plugins/MacAU/StarChild/StarChild.cpp
+++ b/plugins/MacAU/StarChild/StarChild.cpp
@@ -237,13 +237,8 @@ ComponentResult StarChild::Reset(AudioUnitScope inScope, AudioUnitElement inEle
increment = 1;
dutyCycle = 1;
- demotimer = 0;
-
- fpNShapeAL = 0.0;
- fpNShapeBL = 0.0;
- fpNShapeAR = 0.0;
- fpNShapeBR = 0.0;
- fpFlip = true;
+ fpNShapeL = 0.0;
+ fpNShapeR = 0.0;
return noErr;
}
@@ -262,9 +257,6 @@ OSStatus StarChild::ProcessBufferLists(AudioUnitRenderActionFlags & ioActionFla
Float32 * outputL = (Float32*)(outBuffer.mBuffers[0].mData);
Float32 * outputR = (Float32*)(outBuffer.mBuffers[1].mData);
- Float32 fpTemp;
- Float64 fpOld = 0.618033988749894848204586; //golden ratio!
- Float64 fpNew = 1.0 - fpOld;
UInt32 nSampleFrames = inFramesToProcess;
Float32 drySampleL;
@@ -283,8 +275,6 @@ OSStatus StarChild::ProcessBufferLists(AudioUnitRenderActionFlags & ioActionFla
//let's try making it always be the max delay: smaller range forces scale to be longer
Float32 outputPad = 4 * rangeDirect * sqrt(rangeDirect);
-
-
Float32 overallscale = ((1.0-GetParameter( kParam_Two ))*9.0)+1.0;
//apply the singlestage groove wear strongest when bits are heavily crushed
Float32 gain = overallscale;
@@ -314,9 +304,6 @@ OSStatus StarChild::ProcessBufferLists(AudioUnitRenderActionFlags & ioActionFla
//and now it's neatly scaled, too
Float32 accumulatorSample;
Float32 correction;
-
-
-
Float32 wetness = GetParameter( kParam_Three );
Float32 dryness = 1.0 - wetness; //reverb setup
@@ -644,25 +631,14 @@ OSStatus StarChild::ProcessBufferLists(AudioUnitRenderActionFlags & ioActionFla
drySampleR += inputSampleR;
//here we combine the tanks with the dry signal
- //noise shaping to 32-bit floating point
- if (fpFlip) {
- fpTemp = drySampleL;
- fpNShapeAL = (fpNShapeAL*fpOld)+((drySampleL-fpTemp)*fpNew);
- drySampleL += fpNShapeAL;
- fpTemp = drySampleR;
- fpNShapeAR = (fpNShapeAR*fpOld)+((drySampleR-fpTemp)*fpNew);
- drySampleR += fpNShapeAR;
- }
- else {
- fpTemp = drySampleL;
- fpNShapeBL = (fpNShapeBL*fpOld)+((drySampleL-fpTemp)*fpNew);
- drySampleL += fpNShapeBL;
- fpTemp = drySampleR;
- fpNShapeBR = (fpNShapeBR*fpOld)+((drySampleR-fpTemp)*fpNew);
- drySampleR += fpNShapeBR;
- }
- fpFlip = not fpFlip;
- //end noise shaping on 32 bit output
+ //stereo 32 bit dither, made small and tidy.
+ int expon; frexpf((Float32)drySampleL, &expon);
+ long double dither = (rand()/(RAND_MAX*7.737125245533627e+25))*pow(2,expon+62);
+ drySampleL += (dither-fpNShapeL); fpNShapeL = dither;
+ frexpf((Float32)drySampleR, &expon);
+ dither = (rand()/(RAND_MAX*7.737125245533627e+25))*pow(2,expon+62);
+ drySampleR += (dither-fpNShapeR); fpNShapeR = dither;
+ //end 32 bit dither
*outputL = drySampleL;
*outputR = drySampleR;