blob: f8504822393a2360d7210e83af0377934ef53d4f (
plain) (
blame)
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
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
|
#include "PocketVerbs.h"
#include <iostream>
#include <lv2wrapper.h>
PocketVerbs::PocketVerbs(double rate)
: LV2Plugin(rate)
{
}
void PocketVerbs::activate()
{
A = 0.0;
B = 0.5;
C = 0.0;
D = 0.5;
for(count = 0; count < 6; count++) {dAL[count] = 0.0; dBL[count] = 0.0; dCL[count] = 0.0; dDL[count] = 0.0; dEL[count] = 0.0;
dFL[count] = 0.0; dGL[count] = 0.0; dHL[count] = 0.0; dIL[count] = 0.0; dJL[count] = 0.0; dKL[count] = 0.0; dLL[count] = 0.0;
dML[count] = 0.0; dNL[count] = 0.0; dOL[count] = 0.0; dPL[count] = 0.0; dQL[count] = 0.0; dRL[count] = 0.0; dSL[count] = 0.0;
dTL[count] = 0.0; dUL[count] = 0.0; dVL[count] = 0.0; dWL[count] = 0.0; dXL[count] = 0.0; dYL[count] = 0.0; dZL[count] = 0.0;}
for(count = 0; count < 15149; count++) {aAL[count] = 0.0;}
for(count = 0; count < 15149; count++) {oAL[count] = 0.0;}
for(count = 0; count < 14617; count++) {aBL[count] = 0.0;}
for(count = 0; count < 14617; count++) {oBL[count] = 0.0;}
for(count = 0; count < 14357; count++) {aCL[count] = 0.0;}
for(count = 0; count < 14357; count++) {oCL[count] = 0.0;}
for(count = 0; count < 13817; count++) {aDL[count] = 0.0;}
for(count = 0; count < 13817; count++) {oDL[count] = 0.0;}
for(count = 0; count < 13561; count++) {aEL[count] = 0.0;}
for(count = 0; count < 13561; count++) {oEL[count] = 0.0;}
for(count = 0; count < 13045; count++) {aFL[count] = 0.0;}
for(count = 0; count < 13045; count++) {oFL[count] = 0.0;}
for(count = 0; count < 11965; count++) {aGL[count] = 0.0;}
for(count = 0; count < 11965; count++) {oGL[count] = 0.0;}
for(count = 0; count < 11129; count++) {aHL[count] = 0.0;}
for(count = 0; count < 11129; count++) {oHL[count] = 0.0;}
for(count = 0; count < 10597; count++) {aIL[count] = 0.0;}
for(count = 0; count < 10597; count++) {oIL[count] = 0.0;}
for(count = 0; count < 9809; count++) {aJL[count] = 0.0;}
for(count = 0; count < 9809; count++) {oJL[count] = 0.0;}
for(count = 0; count < 9521; count++) {aKL[count] = 0.0;}
for(count = 0; count < 9521; count++) {oKL[count] = 0.0;}
for(count = 0; count < 8981; count++) {aLL[count] = 0.0;}
for(count = 0; count < 8981; count++) {oLL[count] = 0.0;}
for(count = 0; count < 8785; count++) {aML[count] = 0.0;}
for(count = 0; count < 8785; count++) {oML[count] = 0.0;}
for(count = 0; count < 8461; count++) {aNL[count] = 0.0;}
for(count = 0; count < 8461; count++) {oNL[count] = 0.0;}
for(count = 0; count < 8309; count++) {aOL[count] = 0.0;}
for(count = 0; count < 8309; count++) {oOL[count] = 0.0;}
for(count = 0; count < 7981; count++) {aPL[count] = 0.0;}
for(count = 0; count < 7981; count++) {oPL[count] = 0.0;}
for(count = 0; count < 7321; count++) {aQL[count] = 0.0;}
for(count = 0; count < 7321; count++) {oQL[count] = 0.0;}
for(count = 0; count < 6817; count++) {aRL[count] = 0.0;}
for(count = 0; count < 6817; count++) {oRL[count] = 0.0;}
for(count = 0; count < 6505; count++) {aSL[count] = 0.0;}
for(count = 0; count < 6505; count++) {oSL[count] = 0.0;}
for(count = 0; count < 6001; count++) {aTL[count] = 0.0;}
for(count = 0; count < 6001; count++) {oTL[count] = 0.0;}
for(count = 0; count < 5837; count++) {aUL[count] = 0.0;}
for(count = 0; count < 5837; count++) {oUL[count] = 0.0;}
for(count = 0; count < 5501; count++) {aVL[count] = 0.0;}
for(count = 0; count < 5501; count++) {oVL[count] = 0.0;}
for(count = 0; count < 5009; count++) {aWL[count] = 0.0;}
for(count = 0; count < 5009; count++) {oWL[count] = 0.0;}
for(count = 0; count < 4849; count++) {aXL[count] = 0.0;}
for(count = 0; count < 4849; count++) {oXL[count] = 0.0;}
for(count = 0; count < 4295; count++) {aYL[count] = 0.0;}
for(count = 0; count < 4295; count++) {oYL[count] = 0.0;}
for(count = 0; count < 4179; count++) {aZL[count] = 0.0;}
for(count = 0; count < 4179; count++) {oZL[count] = 0.0;}
for(count = 0; count < 6; count++) {dAR[count] = 0.0; dBR[count] = 0.0; dCR[count] = 0.0; dDR[count] = 0.0; dER[count] = 0.0;
dFR[count] = 0.0; dGR[count] = 0.0; dHR[count] = 0.0; dIR[count] = 0.0; dJR[count] = 0.0; dKR[count] = 0.0; dLR[count] = 0.0;
dMR[count] = 0.0; dNR[count] = 0.0; dOR[count] = 0.0; dPR[count] = 0.0; dQR[count] = 0.0; dRR[count] = 0.0; dSR[count] = 0.0;
dTR[count] = 0.0; dUR[count] = 0.0; dVR[count] = 0.0; dWR[count] = 0.0; dXR[count] = 0.0; dYR[count] = 0.0; dZR[count] = 0.0;}
for(count = 0; count < 15149; count++) {aAR[count] = 0.0;}
for(count = 0; count < 15149; count++) {oAR[count] = 0.0;}
for(count = 0; count < 14617; count++) {aBR[count] = 0.0;}
for(count = 0; count < 14617; count++) {oBR[count] = 0.0;}
for(count = 0; count < 14357; count++) {aCR[count] = 0.0;}
for(count = 0; count < 14357; count++) {oCR[count] = 0.0;}
for(count = 0; count < 13817; count++) {aDR[count] = 0.0;}
for(count = 0; count < 13817; count++) {oDR[count] = 0.0;}
for(count = 0; count < 13561; count++) {aER[count] = 0.0;}
for(count = 0; count < 13561; count++) {oER[count] = 0.0;}
for(count = 0; count < 13045; count++) {aFR[count] = 0.0;}
for(count = 0; count < 13045; count++) {oFR[count] = 0.0;}
for(count = 0; count < 11965; count++) {aGR[count] = 0.0;}
for(count = 0; count < 11965; count++) {oGR[count] = 0.0;}
for(count = 0; count < 11129; count++) {aHR[count] = 0.0;}
for(count = 0; count < 11129; count++) {oHR[count] = 0.0;}
for(count = 0; count < 10597; count++) {aIR[count] = 0.0;}
for(count = 0; count < 10597; count++) {oIR[count] = 0.0;}
for(count = 0; count < 9809; count++) {aJR[count] = 0.0;}
for(count = 0; count < 9809; count++) {oJR[count] = 0.0;}
for(count = 0; count < 9521; count++) {aKR[count] = 0.0;}
for(count = 0; count < 9521; count++) {oKR[count] = 0.0;}
for(count = 0; count < 8981; count++) {aLR[count] = 0.0;}
for(count = 0; count < 8981; count++) {oLR[count] = 0.0;}
for(count = 0; count < 8785; count++) {aMR[count] = 0.0;}
for(count = 0; count < 8785; count++) {oMR[count] = 0.0;}
for(count = 0; count < 8461; count++) {aNR[count] = 0.0;}
for(count = 0; count < 8461; count++) {oNR[count] = 0.0;}
for(count = 0; count < 8309; count++) {aOR[count] = 0.0;}
for(count = 0; count < 8309; count++) {oOR[count] = 0.0;}
for(count = 0; count < 7981; count++) {aPR[count] = 0.0;}
for(count = 0; count < 7981; count++) {oPR[count] = 0.0;}
for(count = 0; count < 7321; count++) {aQR[count] = 0.0;}
for(count = 0; count < 7321; count++) {oQR[count] = 0.0;}
for(count = 0; count < 6817; count++) {aRR[count] = 0.0;}
for(count = 0; count < 6817; count++) {oRR[count] = 0.0;}
for(count = 0; count < 6505; count++) {aSR[count] = 0.0;}
for(count = 0; count < 6505; count++) {oSR[count] = 0.0;}
for(count = 0; count < 6001; count++) {aTR[count] = 0.0;}
for(count = 0; count < 6001; count++) {oTR[count] = 0.0;}
for(count = 0; count < 5837; count++) {aUR[count] = 0.0;}
for(count = 0; count < 5837; count++) {oUR[count] = 0.0;}
for(count = 0; count < 5501; count++) {aVR[count] = 0.0;}
for(count = 0; count < 5501; count++) {oVR[count] = 0.0;}
for(count = 0; count < 5009; count++) {aWR[count] = 0.0;}
for(count = 0; count < 5009; count++) {oWR[count] = 0.0;}
for(count = 0; count < 4849; count++) {aXR[count] = 0.0;}
for(count = 0; count < 4849; count++) {oXR[count] = 0.0;}
for(count = 0; count < 4295; count++) {aYR[count] = 0.0;}
for(count = 0; count < 4295; count++) {oYR[count] = 0.0;}
for(count = 0; count < 4179; count++) {aZR[count] = 0.0;}
for(count = 0; count < 4179; count++) {oZR[count] = 0.0;}
outAL = 1; alpAL = 1;
outBL = 1; alpBL = 1;
outCL = 1; alpCL = 1;
outDL = 1; alpDL = 1;
outEL = 1; alpEL = 1;
outFL = 1; alpFL = 1;
outGL = 1; alpGL = 1;
outHL = 1; alpHL = 1;
outIL = 1; alpIL = 1;
outJL = 1; alpJL = 1;
outKL = 1; alpKL = 1;
outLL = 1; alpLL = 1;
outML = 1; alpML = 1;
outNL = 1; alpNL = 1;
outOL = 1; alpOL = 1;
outPL = 1; alpPL = 1;
outQL = 1; alpQL = 1;
outRL = 1; alpRL = 1;
outSL = 1; alpSL = 1;
outTL = 1; alpTL = 1;
outUL = 1; alpUL = 1;
outVL = 1; alpVL = 1;
outWL = 1; alpWL = 1;
outXL = 1; alpXL = 1;
outYL = 1; alpYL = 1;
outZL = 1; alpZL = 1;
outAR = 1; alpAR = 1; delayA = 4; maxdelayA = 7573;
outBR = 1; alpBR = 1; delayB = 4; maxdelayB = 7307;
outCR = 1; alpCR = 1; delayC = 4; maxdelayC = 7177;
outDR = 1; alpDR = 1; delayD = 4; maxdelayD = 6907;
outER = 1; alpER = 1; delayE = 4; maxdelayE = 6779;
outFR = 1; alpFR = 1; delayF = 4; maxdelayF = 6521;
outGR = 1; alpGR = 1; delayG = 4; maxdelayG = 5981;
outHR = 1; alpHR = 1; delayH = 4; maxdelayH = 5563;
outIR = 1; alpIR = 1; delayI = 4; maxdelayI = 5297;
outJR = 1; alpJR = 1; delayJ = 4; maxdelayJ = 4903;
outKR = 1; alpKR = 1; delayK = 4; maxdelayK = 4759;
outLR = 1; alpLR = 1; delayL = 4; maxdelayL = 4489;
outMR = 1; alpMR = 1; delayM = 4; maxdelayM = 4391;
outNR = 1; alpNR = 1; delayN = 4; maxdelayN = 4229;
outOR = 1; alpOR = 1; delayO = 4; maxdelayO = 4153;
outPR = 1; alpPR = 1; delayP = 4; maxdelayP = 3989;
outQR = 1; alpQR = 1; delayQ = 4; maxdelayQ = 3659;
outRR = 1; alpRR = 1; delayR = 4; maxdelayR = 3407;
outSR = 1; alpSR = 1; delayS = 4; maxdelayS = 3251;
outTR = 1; alpTR = 1; delayT = 4; maxdelayT = 2999;
outUR = 1; alpUR = 1; delayU = 4; maxdelayU = 2917;
outVR = 1; alpVR = 1; delayV = 4; maxdelayV = 2749;
outWR = 1; alpWR = 1; delayW = 4; maxdelayW = 2503;
outXR = 1; alpXR = 1; delayX = 4; maxdelayX = 2423;
outYR = 1; alpYR = 1; delayY = 4; maxdelayY = 2146;
outZR = 1; alpZR = 1; delayZ = 4; maxdelayZ = 2088;
savedRoomsize = -1.0; //force update to begin
countdown = -1;
peakL = 1.0;
peakR = 1.0;
fpd = 17;
//this is reset: values being initialized only once. Startup values, whatever they are.
}
void PocketVerbs::run(uint32_t num_samples)
{
A = *params[0];
B = *params[1];
C = *params[2];
D = *params[3];
processReplacing(const_cast<float **>(in), out, num_samples);
}
//
// Include the processing code from the VST version.
//
#include <cmath>
#include "../../../LinuxVST/src/PocketVerbs/PocketVerbsProc.cpp"
// Create the LV2Wrapper and register the plugin
LV2Wrapper<PocketVerbs> plugin;
|
