1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
/* ========================================
* Facet - Facet.h
* Copyright (c) 2016 airwindows, All rights reserved
* ======================================== */
#ifndef __Facet_H
#include "Facet.h"
#endif
void Facet::processReplacing(float **inputs, float **outputs, VstInt32 sampleFrames)
{
float* in1 = inputs[0];
float* in2 = inputs[1];
float* out1 = outputs[0];
float* out2 = outputs[1];
double pos = A;
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;
if (inputSampleL > pos) {
inputSampleL = ((inputSampleL-pos)*pos)+pos;
} //facet algorithm: put a corner distortion in producing an artifact
if (inputSampleL < -pos) {
inputSampleL = ((inputSampleL+pos)*pos)-pos;
} //we increasingly produce a sharp 'angle' in the transfer function
if (inputSampleR > pos) {
inputSampleR = ((inputSampleR-pos)*pos)+pos;
} //facet algorithm: put a corner distortion in producing an artifact
if (inputSampleR < -pos) {
inputSampleR = ((inputSampleR+pos)*pos)-pos;
} //we increasingly produce a sharp 'angle' in the transfer function
//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 Facet::processDoubleReplacing(double **inputs, double **outputs, VstInt32 sampleFrames)
{
double* in1 = inputs[0];
double* in2 = inputs[1];
double* out1 = outputs[0];
double* out2 = outputs[1];
double pos = A;
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;
if (inputSampleL > pos) {
inputSampleL = ((inputSampleL-pos)*pos)+pos;
} //facet algorithm: put a corner distortion in producing an artifact
if (inputSampleL < -pos) {
inputSampleL = ((inputSampleL+pos)*pos)-pos;
} //we increasingly produce a sharp 'angle' in the transfer function
if (inputSampleR > pos) {
inputSampleR = ((inputSampleR-pos)*pos)+pos;
} //facet algorithm: put a corner distortion in producing an artifact
if (inputSampleR < -pos) {
inputSampleR = ((inputSampleR+pos)*pos)-pos;
} //we increasingly produce a sharp 'angle' in the transfer function
//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++;
}
}
|
