1 // generated from file '../src/faust/gxamp6.dsp' by dsp2cc:
2 // Code generated with Faust (https://faust.grame.fr)
3
4 #include "valve.h"
5
6 namespace gxamp6 {
7
8 class Dsp: public PluginDef {
9 private:
10 gx_resample::FixedRateResampler smp;
11 int sample_rate;
12 int fSampleRate;
13 FAUSTFLOAT fCheckbox0;
14 FAUSTFLOAT *fCheckbox0_;
15 double fConst4;
16 double fConst6;
17 double fConst7;
18 double fConst10;
19 double fConst12;
20 double fConst14;
21 double fConst15;
22 double fConst17;
23 double fConst19;
24 double fConst20;
25 double fConst23;
26 FAUSTFLOAT fCheckbox1;
27 FAUSTFLOAT *fCheckbox1_;
28 double fRec29[2];
29 double fRec28[3];
30 double fConst25;
31 double fVec0[2];
32 double fConst26;
33 double fRec30[2];
34 double fRec27[2];
35 double fConst27;
36 double fConst28;
37 double fRec26[2];
38 double fConst30;
39 double fConst31;
40 double fRec31[2];
41 double fRec41[2];
42 double fRec40[3];
43 double fConst33;
44 double fVec1[2];
45 double fConst34;
46 double fRec42[2];
47 double fRec39[2];
48 double fRec38[2];
49 double fRec43[2];
50 FAUSTFLOAT fVslider0;
51 FAUSTFLOAT *fVslider0_;
52 double fRec48[2];
53 double fVec2[2];
54 double fRec47[2];
55 double fRec46[3];
56 double fConst36;
57 double fVec3[2];
58 double fConst37;
59 double fRec49[2];
60 double fRec45[2];
61 double fRec44[2];
62 double fRec50[2];
63 double fRec37[3];
64 double fRec36[2];
65 double fRec35[2];
66 double fRec34[3];
67 double fVec4[2];
68 double fRec51[2];
69 double fRec33[2];
70 double fRec32[2];
71 double fRec52[2];
72 double fRec25[3];
73 double fRec24[2];
74 double fRec23[3];
75 double fVec5[2];
76 double fRec53[2];
77 double fRec22[2];
78 double fRec21[2];
79 double fRec54[2];
80 FAUSTFLOAT fVslider1;
81 FAUSTFLOAT *fVslider1_;
82 double fRec55[2];
83 double fRec56[2];
84 int IOTA;
85 double fVec6[32768];
86 double fConst38;
87 int iConst39;
88 double fRec58[2];
89 double fRec57[2];
90 double fConst40;
91 double fConst41;
92 double fRec20[3];
93 double fVec7[2];
94 double fRec19[2];
95 double fRec18[2];
96 double fConst42;
97 double fConst44;
98 double fConst45;
99 double fRec17[3];
100 double fVec8[2];
101 double fConst46;
102 double fConst47;
103 double fConst48;
104 double fRec16[2];
105 double fConst49;
106 double fConst50;
107 double fRec15[3];
108 double fConst51;
109 double fConst55;
110 double fConst56;
111 double fConst57;
112 double fConst59;
113 double fConst60;
114 double fRec14[3];
115 FAUSTFLOAT fVslider2;
116 FAUSTFLOAT *fVslider2_;
117 double fRec59[2];
118 double fConst61;
119 double fRec63[2];
120 double fRec62[3];
121 double fConst62;
122 double fConst63;
123 double fConst64;
124 double fRec61[3];
125 double fRec60[3];
126 double fConst65;
127 double fConst66;
128 double fConst67;
129 double fRec67[2];
130 double fRec66[3];
131 double fVec9[2];
132 double fConst68;
133 double fConst69;
134 double fRec65[2];
135 double fConst70;
136 double fRec64[3];
137 double fConst71;
138 double fConst72;
139 double fRec69[2];
140 double fRec68[3];
141 double fVec10[2];
142 double fRec13[2];
143 double fVec11[2];
144 double fRec12[2];
145 FAUSTFLOAT fVslider3;
146 FAUSTFLOAT *fVslider3_;
147 double fRec70[2];
148 double fVec12[2];
149 double fRec11[2];
150 double fRec10[3];
151 double fVec13[2];
152 double fRec71[2];
153 double fRec9[2];
154 double fRec8[2];
155 double fRec72[2];
156 double fVec14[2];
157 double fRec75[2];
158 double fRec74[2];
159 double fRec73[2];
160 double fRec76[2];
161 double fRec6[2];
162 double fRec4[2];
163 double fRec2[2];
164 double fRec0[2];
165
166 void clear_state_f();
167 void init(unsigned int sample_rate);
168 void compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0);
169 int register_par(const ParamReg& reg);
170
171 static void clear_state_f_static(PluginDef*);
172 static void init_static(unsigned int sample_rate, PluginDef*);
173 static void compute_static(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0, PluginDef*);
174 static int register_params_static(const ParamReg& reg);
175 static void del_instance(PluginDef *p);
176 public:
177 Dsp();
178 ~Dsp();
179 };
180
181
182
Dsp()183 Dsp::Dsp()
184 : PluginDef() {
185 version = PLUGINDEF_VERSION;
186 flags = 0;
187 id = "pre 6DJ8/ push-pull 6V6";
188 name = N_("pre 6DJ8/ push-pull 6V6");
189 groups = 0;
190 description = ""; // description (tooltip)
191 category = ""; // category
192 shortname = ""; // shortname
193 mono_audio = compute_static;
194 stereo_audio = 0;
195 set_samplerate = init_static;
196 activate_plugin = 0;
197 register_params = register_params_static;
198 load_ui = 0;
199 clear_state = clear_state_f_static;
200 delete_instance = del_instance;
201 }
202
~Dsp()203 Dsp::~Dsp() {
204 }
205
clear_state_f()206 inline void Dsp::clear_state_f()
207 {
208 for (int l0 = 0; (l0 < 2); l0 = (l0 + 1)) fRec29[l0] = 0.0;
209 for (int l1 = 0; (l1 < 3); l1 = (l1 + 1)) fRec28[l1] = 0.0;
210 for (int l2 = 0; (l2 < 2); l2 = (l2 + 1)) fVec0[l2] = 0.0;
211 for (int l3 = 0; (l3 < 2); l3 = (l3 + 1)) fRec30[l3] = 0.0;
212 for (int l4 = 0; (l4 < 2); l4 = (l4 + 1)) fRec27[l4] = 0.0;
213 for (int l5 = 0; (l5 < 2); l5 = (l5 + 1)) fRec26[l5] = 0.0;
214 for (int l6 = 0; (l6 < 2); l6 = (l6 + 1)) fRec31[l6] = 0.0;
215 for (int l7 = 0; (l7 < 2); l7 = (l7 + 1)) fRec41[l7] = 0.0;
216 for (int l8 = 0; (l8 < 3); l8 = (l8 + 1)) fRec40[l8] = 0.0;
217 for (int l9 = 0; (l9 < 2); l9 = (l9 + 1)) fVec1[l9] = 0.0;
218 for (int l10 = 0; (l10 < 2); l10 = (l10 + 1)) fRec42[l10] = 0.0;
219 for (int l11 = 0; (l11 < 2); l11 = (l11 + 1)) fRec39[l11] = 0.0;
220 for (int l12 = 0; (l12 < 2); l12 = (l12 + 1)) fRec38[l12] = 0.0;
221 for (int l13 = 0; (l13 < 2); l13 = (l13 + 1)) fRec43[l13] = 0.0;
222 for (int l14 = 0; (l14 < 2); l14 = (l14 + 1)) fRec48[l14] = 0.0;
223 for (int l15 = 0; (l15 < 2); l15 = (l15 + 1)) fVec2[l15] = 0.0;
224 for (int l16 = 0; (l16 < 2); l16 = (l16 + 1)) fRec47[l16] = 0.0;
225 for (int l17 = 0; (l17 < 3); l17 = (l17 + 1)) fRec46[l17] = 0.0;
226 for (int l18 = 0; (l18 < 2); l18 = (l18 + 1)) fVec3[l18] = 0.0;
227 for (int l19 = 0; (l19 < 2); l19 = (l19 + 1)) fRec49[l19] = 0.0;
228 for (int l20 = 0; (l20 < 2); l20 = (l20 + 1)) fRec45[l20] = 0.0;
229 for (int l21 = 0; (l21 < 2); l21 = (l21 + 1)) fRec44[l21] = 0.0;
230 for (int l22 = 0; (l22 < 2); l22 = (l22 + 1)) fRec50[l22] = 0.0;
231 for (int l23 = 0; (l23 < 3); l23 = (l23 + 1)) fRec37[l23] = 0.0;
232 for (int l24 = 0; (l24 < 2); l24 = (l24 + 1)) fRec36[l24] = 0.0;
233 for (int l25 = 0; (l25 < 2); l25 = (l25 + 1)) fRec35[l25] = 0.0;
234 for (int l26 = 0; (l26 < 3); l26 = (l26 + 1)) fRec34[l26] = 0.0;
235 for (int l27 = 0; (l27 < 2); l27 = (l27 + 1)) fVec4[l27] = 0.0;
236 for (int l28 = 0; (l28 < 2); l28 = (l28 + 1)) fRec51[l28] = 0.0;
237 for (int l29 = 0; (l29 < 2); l29 = (l29 + 1)) fRec33[l29] = 0.0;
238 for (int l30 = 0; (l30 < 2); l30 = (l30 + 1)) fRec32[l30] = 0.0;
239 for (int l31 = 0; (l31 < 2); l31 = (l31 + 1)) fRec52[l31] = 0.0;
240 for (int l32 = 0; (l32 < 3); l32 = (l32 + 1)) fRec25[l32] = 0.0;
241 for (int l33 = 0; (l33 < 2); l33 = (l33 + 1)) fRec24[l33] = 0.0;
242 for (int l34 = 0; (l34 < 3); l34 = (l34 + 1)) fRec23[l34] = 0.0;
243 for (int l35 = 0; (l35 < 2); l35 = (l35 + 1)) fVec5[l35] = 0.0;
244 for (int l36 = 0; (l36 < 2); l36 = (l36 + 1)) fRec53[l36] = 0.0;
245 for (int l37 = 0; (l37 < 2); l37 = (l37 + 1)) fRec22[l37] = 0.0;
246 for (int l38 = 0; (l38 < 2); l38 = (l38 + 1)) fRec21[l38] = 0.0;
247 for (int l39 = 0; (l39 < 2); l39 = (l39 + 1)) fRec54[l39] = 0.0;
248 for (int l40 = 0; (l40 < 2); l40 = (l40 + 1)) fRec55[l40] = 0.0;
249 for (int l41 = 0; (l41 < 2); l41 = (l41 + 1)) fRec56[l41] = 0.0;
250 for (int l42 = 0; (l42 < 32768); l42 = (l42 + 1)) fVec6[l42] = 0.0;
251 for (int l43 = 0; (l43 < 2); l43 = (l43 + 1)) fRec58[l43] = 0.0;
252 for (int l44 = 0; (l44 < 2); l44 = (l44 + 1)) fRec57[l44] = 0.0;
253 for (int l45 = 0; (l45 < 3); l45 = (l45 + 1)) fRec20[l45] = 0.0;
254 for (int l46 = 0; (l46 < 2); l46 = (l46 + 1)) fVec7[l46] = 0.0;
255 for (int l47 = 0; (l47 < 2); l47 = (l47 + 1)) fRec19[l47] = 0.0;
256 for (int l48 = 0; (l48 < 2); l48 = (l48 + 1)) fRec18[l48] = 0.0;
257 for (int l49 = 0; (l49 < 3); l49 = (l49 + 1)) fRec17[l49] = 0.0;
258 for (int l50 = 0; (l50 < 2); l50 = (l50 + 1)) fVec8[l50] = 0.0;
259 for (int l51 = 0; (l51 < 2); l51 = (l51 + 1)) fRec16[l51] = 0.0;
260 for (int l52 = 0; (l52 < 3); l52 = (l52 + 1)) fRec15[l52] = 0.0;
261 for (int l53 = 0; (l53 < 3); l53 = (l53 + 1)) fRec14[l53] = 0.0;
262 for (int l54 = 0; (l54 < 2); l54 = (l54 + 1)) fRec59[l54] = 0.0;
263 for (int l55 = 0; (l55 < 2); l55 = (l55 + 1)) fRec63[l55] = 0.0;
264 for (int l56 = 0; (l56 < 3); l56 = (l56 + 1)) fRec62[l56] = 0.0;
265 for (int l57 = 0; (l57 < 3); l57 = (l57 + 1)) fRec61[l57] = 0.0;
266 for (int l58 = 0; (l58 < 3); l58 = (l58 + 1)) fRec60[l58] = 0.0;
267 for (int l59 = 0; (l59 < 2); l59 = (l59 + 1)) fRec67[l59] = 0.0;
268 for (int l60 = 0; (l60 < 3); l60 = (l60 + 1)) fRec66[l60] = 0.0;
269 for (int l61 = 0; (l61 < 2); l61 = (l61 + 1)) fVec9[l61] = 0.0;
270 for (int l62 = 0; (l62 < 2); l62 = (l62 + 1)) fRec65[l62] = 0.0;
271 for (int l63 = 0; (l63 < 3); l63 = (l63 + 1)) fRec64[l63] = 0.0;
272 for (int l64 = 0; (l64 < 2); l64 = (l64 + 1)) fRec69[l64] = 0.0;
273 for (int l65 = 0; (l65 < 3); l65 = (l65 + 1)) fRec68[l65] = 0.0;
274 for (int l66 = 0; (l66 < 2); l66 = (l66 + 1)) fVec10[l66] = 0.0;
275 for (int l67 = 0; (l67 < 2); l67 = (l67 + 1)) fRec13[l67] = 0.0;
276 for (int l68 = 0; (l68 < 2); l68 = (l68 + 1)) fVec11[l68] = 0.0;
277 for (int l69 = 0; (l69 < 2); l69 = (l69 + 1)) fRec12[l69] = 0.0;
278 for (int l70 = 0; (l70 < 2); l70 = (l70 + 1)) fRec70[l70] = 0.0;
279 for (int l71 = 0; (l71 < 2); l71 = (l71 + 1)) fVec12[l71] = 0.0;
280 for (int l72 = 0; (l72 < 2); l72 = (l72 + 1)) fRec11[l72] = 0.0;
281 for (int l73 = 0; (l73 < 3); l73 = (l73 + 1)) fRec10[l73] = 0.0;
282 for (int l74 = 0; (l74 < 2); l74 = (l74 + 1)) fVec13[l74] = 0.0;
283 for (int l75 = 0; (l75 < 2); l75 = (l75 + 1)) fRec71[l75] = 0.0;
284 for (int l76 = 0; (l76 < 2); l76 = (l76 + 1)) fRec9[l76] = 0.0;
285 for (int l77 = 0; (l77 < 2); l77 = (l77 + 1)) fRec8[l77] = 0.0;
286 for (int l78 = 0; (l78 < 2); l78 = (l78 + 1)) fRec72[l78] = 0.0;
287 for (int l79 = 0; (l79 < 2); l79 = (l79 + 1)) fVec14[l79] = 0.0;
288 for (int l80 = 0; (l80 < 2); l80 = (l80 + 1)) fRec75[l80] = 0.0;
289 for (int l81 = 0; (l81 < 2); l81 = (l81 + 1)) fRec74[l81] = 0.0;
290 for (int l82 = 0; (l82 < 2); l82 = (l82 + 1)) fRec73[l82] = 0.0;
291 for (int l83 = 0; (l83 < 2); l83 = (l83 + 1)) fRec76[l83] = 0.0;
292 for (int l84 = 0; (l84 < 2); l84 = (l84 + 1)) fRec6[l84] = 0.0;
293 for (int l85 = 0; (l85 < 2); l85 = (l85 + 1)) fRec4[l85] = 0.0;
294 for (int l86 = 0; (l86 < 2); l86 = (l86 + 1)) fRec2[l86] = 0.0;
295 for (int l87 = 0; (l87 < 2); l87 = (l87 + 1)) fRec0[l87] = 0.0;
296 }
297
clear_state_f_static(PluginDef * p)298 void Dsp::clear_state_f_static(PluginDef *p)
299 {
300 static_cast<Dsp*>(p)->clear_state_f();
301 }
302
init(unsigned int RsamplingFreq)303 inline void Dsp::init(unsigned int RsamplingFreq)
304 {
305 sample_rate = 96000;
306 smp.setup(RsamplingFreq, sample_rate);
307 fSampleRate = sample_rate;
308 double fConst0 = std::min<double>(192000.0, std::max<double>(1.0, double(fSampleRate)));
309 double fConst1 = std::tan((97.389372261283583 / fConst0));
310 double fConst2 = (1.0 / fConst1);
311 double fConst3 = (fConst2 + 1.0);
312 fConst4 = (1.0 / (fConst1 * fConst3));
313 double fConst5 = (1.0 / std::tan((20517.741620594938 / fConst0)));
314 fConst6 = (1.0 / (fConst5 + 1.0));
315 fConst7 = (1.0 - fConst5);
316 double fConst8 = std::tan((3769.9111843077517 / fConst0));
317 double fConst9 = (1.0 / fConst8);
318 fConst10 = (1.0 / (((fConst9 + 1.0000000000000004) / fConst8) + 1.0));
319 double fConst11 = mydsp_faustpower2_f(fConst8);
320 fConst12 = (1.0 / fConst11);
321 double fConst13 = std::tan((10053.096491487338 / fConst0));
322 fConst14 = (1.0 / fConst13);
323 fConst15 = (1.0 / (((fConst14 + 1.0000000000000004) / fConst13) + 1.0));
324 double fConst16 = (fConst9 + 1.0);
325 fConst17 = (1.0 / (fConst8 * fConst16));
326 double fConst18 = (fConst14 + 1.0);
327 fConst19 = (1.0 / fConst18);
328 fConst20 = (1.0 - fConst14);
329 double fConst21 = std::tan((47123.889803846898 / fConst0));
330 double fConst22 = (1.0 / fConst21);
331 fConst23 = (1.0 / (((fConst22 + 1.4142135623730949) / fConst21) + 1.0));
332 double fConst24 = (1.0 / std::tan((609.46897479641984 / fConst0)));
333 fConst25 = (1.0 / (fConst24 + 1.0));
334 fConst26 = (1.0 - fConst24);
335 fConst27 = (0.0 - fConst4);
336 fConst28 = ((1.0 - fConst2) / fConst3);
337 double fConst29 = (3.1415926535897931 / fConst0);
338 fConst30 = (1.0 / (fConst29 + 1.0));
339 fConst31 = (1.0 - fConst29);
340 double fConst32 = (1.0 / std::tan((414.69023027385271 / fConst0)));
341 fConst33 = (1.0 / (fConst32 + 1.0));
342 fConst34 = (1.0 - fConst32);
343 double fConst35 = (1.0 / std::tan((270.1769682087222 / fConst0)));
344 fConst36 = (1.0 / (fConst35 + 1.0));
345 fConst37 = (1.0 - fConst35);
346 fConst38 = (0.009000000000000008 / fConst0);
347 iConst39 = int(std::min<double>(65536.0, std::max<double>(0.0, (0.1111111111111111 * fConst0))));
348 fConst40 = (((fConst22 + -1.4142135623730949) / fConst21) + 1.0);
349 fConst41 = (2.0 * (1.0 - (1.0 / mydsp_faustpower2_f(fConst21))));
350 fConst42 = (((fConst14 + -1.0000000000000004) / fConst13) + 1.0);
351 double fConst43 = mydsp_faustpower2_f(fConst13);
352 fConst44 = (1.0 / fConst43);
353 fConst45 = (2.0 * (1.0 - fConst44));
354 fConst46 = (0.0 - fConst17);
355 fConst47 = (1.0 - fConst9);
356 fConst48 = (fConst47 / fConst16);
357 fConst49 = (((fConst9 + -1.0000000000000004) / fConst8) + 1.0);
358 fConst50 = (2.0 * (1.0 - fConst12));
359 fConst51 = (0.0 - (2.0 / fConst11));
360 double fConst52 = std::tan((942.47779607693792 / fConst0));
361 double fConst53 = (1.0 / fConst52);
362 double fConst54 = (fConst53 + 1.0);
363 fConst55 = (1.0 / ((fConst54 / fConst52) + 1.0));
364 fConst56 = (1.0 - fConst53);
365 fConst57 = (1.0 - (fConst56 / fConst52));
366 double fConst58 = mydsp_faustpower2_f(fConst52);
367 fConst59 = (1.0 / fConst58);
368 fConst60 = (2.0 * (1.0 - fConst59));
369 fConst61 = (0.0 - (1.0 / (fConst13 * fConst18)));
370 fConst62 = (0.0 - (2.0 / fConst43));
371 fConst63 = (1.0 / ((fConst16 / fConst8) + 1.0));
372 fConst64 = (1.0 - (fConst47 / fConst8));
373 fConst65 = (1.0 / (((fConst53 + 1.0000000000000004) / fConst52) + 1.0));
374 fConst66 = (1.0 / (fConst52 * fConst54));
375 fConst67 = (1.0 / fConst16);
376 fConst68 = (0.0 - fConst66);
377 fConst69 = (fConst56 / fConst54);
378 fConst70 = (((fConst53 + -1.0000000000000004) / fConst52) + 1.0);
379 fConst71 = (0.0 - (2.0 / fConst58));
380 fConst72 = (1.0 / fConst54);
381 IOTA = 0;
382 clear_state_f();
383 }
384
init_static(unsigned int sample_rate,PluginDef * p)385 void Dsp::init_static(unsigned int sample_rate, PluginDef *p)
386 {
387 static_cast<Dsp*>(p)->init(sample_rate);
388 }
389
compute(int count,FAUSTFLOAT * input0,FAUSTFLOAT * output0)390 void always_inline Dsp::compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0)
391 {
392 #define fCheckbox0 (*fCheckbox0_)
393 #define fCheckbox1 (*fCheckbox1_)
394 #define fVslider0 (*fVslider0_)
395 #define fVslider1 (*fVslider1_)
396 #define fVslider2 (*fVslider2_)
397 #define fVslider3 (*fVslider3_)
398 FAUSTFLOAT buf[smp.max_out_count(count)];
399 int ReCount = smp.up(count, input0, buf);
400 int iSlow0 = int(double(fCheckbox0));
401 int iSlow1 = int(double(fCheckbox1));
402 double fSlow2 = (0.0010000000000000009 * std::pow(10.0, (0.050000000000000003 * double(fVslider0))));
403 double fSlow3 = (1.0000000000000009e-05 * double(fVslider1));
404 double fSlow4 = (0.0010000000000000009 * double(fVslider2));
405 double fSlow5 = (0.0010000000000000009 * std::pow(10.0, (0.050000000000000003 * double(fVslider3))));
406 for (int i0 = 0; (i0 < ReCount); i0 = (i0 + 1)) {
407 fRec29[0] = ((0.93028479253239138 * (fRec25[1] + fRec25[2])) - (0.86056958506478287 * fRec29[1]));
408 fRec28[0] = (fRec29[0] - ((1.8405051250752198 * fRec28[1]) + (0.86129424393186271 * fRec28[2])));
409 double fTemp0 = (0.92544984225177063 * (fRec28[0] + fRec28[2]));
410 double fTemp1 = (1.8508996845035413 * fRec28[1]);
411 double fTemp2 = ((fTemp1 + fTemp0) / (double(Ranode(int(TUBE_TABLE_6DJ8_250k), double(fRec27[1]))) + 100000.0));
412 fVec0[0] = fTemp2;
413 fRec30[0] = (fConst25 * ((820.0 * (fTemp2 + fVec0[1])) - (fConst26 * fRec30[1])));
414 fRec27[0] = (double(Ftube(int(TUBE_TABLE_6DJ8_250k), double(((fTemp0 + (fRec30[0] + fTemp1)) + -0.79704299999999995)))) + -32.799634146341475);
415 fRec26[0] = ((0.050000000000000003 * ((fConst4 * fRec27[0]) + (fConst27 * fRec27[1]))) - (fConst28 * fRec26[1]));
416 fRec31[0] = (fConst30 * ((fConst31 * fRec31[1]) + (0.050000000000000003 * (fRec27[0] - fRec27[1]))));
417 fRec41[0] = ((0.93028479253239138 * (fRec37[1] + fRec37[2])) - (0.86056958506478287 * fRec41[1]));
418 fRec40[0] = (fRec41[0] - ((1.8405051250752198 * fRec40[1]) + (0.86129424393186271 * fRec40[2])));
419 double fTemp3 = (0.92544984225177063 * (fRec40[0] + fRec40[2]));
420 double fTemp4 = (1.8508996845035413 * fRec40[1]);
421 double fTemp5 = ((fTemp4 + fTemp3) / (double(Ranode(int(TUBE_TABLE_6DJ8_250k), double(fRec39[1]))) + 100000.0));
422 fVec1[0] = fTemp5;
423 fRec42[0] = (fConst33 * ((1500.0 * (fTemp5 + fVec1[1])) - (fConst34 * fRec42[1])));
424 fRec39[0] = (double(Ftube(int(TUBE_TABLE_6DJ8_250k), double(((fTemp3 + (fRec42[0] + fTemp4)) + -1.271609)))) + -45.226066666666668);
425 fRec38[0] = ((0.050000000000000003 * ((fConst4 * fRec39[0]) + (fConst27 * fRec39[1]))) - (fConst28 * fRec38[1]));
426 fRec43[0] = (fConst30 * ((fConst31 * fRec43[1]) + (0.050000000000000003 * (fRec39[0] - fRec39[1]))));
427 fRec48[0] = (fSlow2 + (0.999 * fRec48[1]));
428 double fTemp6 = (double(buf[i0]) * fRec48[0]);
429 fVec2[0] = fTemp6;
430 fRec47[0] = ((0.93028479253239138 * (fTemp6 + fVec2[1])) - (0.86056958506478287 * fRec47[1]));
431 fRec46[0] = (fRec47[0] - ((1.8405051250752198 * fRec46[1]) + (0.86129424393186271 * fRec46[2])));
432 double fTemp7 = (0.92544984225177063 * (fRec46[0] + fRec46[2]));
433 double fTemp8 = (1.8508996845035413 * fRec46[1]);
434 double fTemp9 = ((fTemp8 + fTemp7) / (double(Ranode(int(TUBE_TABLE_6DJ8_68k), double(fRec45[1]))) + 100000.0));
435 fVec3[0] = fTemp9;
436 fRec49[0] = (fConst36 * ((2700.0 * (fTemp9 + fVec3[1])) - (fConst37 * fRec49[1])));
437 fRec45[0] = (double(Ftube(int(TUBE_TABLE_6DJ8_68k), double(((fTemp7 + (fRec49[0] + fTemp8)) + -1.8639460000000001)))) + -60.964962962962957);
438 fRec44[0] = ((0.050000000000000003 * ((fConst4 * fRec45[0]) + (fConst27 * fRec45[1]))) - (fConst28 * fRec44[1]));
439 fRec50[0] = (fConst30 * ((fConst31 * fRec50[1]) + (0.050000000000000003 * (fRec45[0] - fRec45[1]))));
440 fRec37[0] = ((0.59999999999999998 * (iSlow1 ? fRec43[0] : fRec38[0])) + (iSlow1 ? fRec50[0] : fRec44[0]));
441 fRec36[0] = (0.0 - (fConst6 * ((fConst7 * fRec36[1]) - (fRec37[0] + fRec37[1]))));
442 fRec35[0] = ((0.93028479253239138 * (fRec36[0] + fRec36[1])) - (0.86056958506478287 * fRec35[1]));
443 fRec34[0] = (fRec35[0] - ((1.8405051250752198 * fRec34[1]) + (0.86129424393186271 * fRec34[2])));
444 double fTemp10 = (0.92544984225177063 * (fRec34[0] + fRec34[2]));
445 double fTemp11 = (1.8508996845035413 * fRec34[1]);
446 double fTemp12 = ((fTemp11 + fTemp10) / (double(Ranode(int(TUBE_TABLE_6DJ8_250k), double(fRec33[1]))) + 100000.0));
447 fVec4[0] = fTemp12;
448 fRec51[0] = (fConst33 * ((1500.0 * (fTemp12 + fVec4[1])) - (fConst34 * fRec51[1])));
449 fRec33[0] = (double(Ftube(int(TUBE_TABLE_6DJ8_250k), double(((fTemp10 + (fRec51[0] + fTemp11)) + -1.271609)))) + -45.226066666666668);
450 fRec32[0] = ((0.050000000000000003 * ((fConst4 * fRec33[0]) + (fConst27 * fRec33[1]))) - (fConst28 * fRec32[1]));
451 fRec52[0] = (fConst30 * ((fConst31 * fRec52[1]) + (0.050000000000000003 * (fRec33[0] - fRec33[1]))));
452 fRec25[0] = ((0.59999999999999998 * (iSlow1 ? fRec31[0] : fRec26[0])) + (iSlow1 ? fRec52[0] : fRec32[0]));
453 fRec24[0] = ((0.93028479253239138 * (fRec25[0] + fRec25[1])) - (0.86056958506478287 * fRec24[1]));
454 fRec23[0] = (fRec24[0] - ((1.8405051250752198 * fRec23[1]) + (0.86129424393186271 * fRec23[2])));
455 double fTemp13 = (0.92544984225177063 * (fRec23[0] + fRec23[2]));
456 double fTemp14 = (1.8508996845035413 * fRec23[1]);
457 double fTemp15 = ((fTemp14 + fTemp13) / (double(Ranode(int(TUBE_TABLE_6DJ8_250k), double(fRec22[1]))) + 100000.0));
458 fVec5[0] = fTemp15;
459 fRec53[0] = (fConst25 * ((820.0 * (fTemp15 + fVec5[1])) - (fConst26 * fRec53[1])));
460 fRec22[0] = (double(Ftube(int(TUBE_TABLE_6DJ8_250k), double(((fTemp13 + (fRec53[0] + fTemp14)) + -0.79704299999999995)))) + -32.799634146341475);
461 fRec21[0] = ((0.050000000000000003 * ((fConst4 * fRec22[0]) + (fConst27 * fRec22[1]))) - (fConst28 * fRec21[1]));
462 fRec54[0] = (fConst30 * ((fConst31 * fRec54[1]) + (0.050000000000000003 * (fRec22[0] - fRec22[1]))));
463 double fTemp16 = (iSlow1 ? fRec54[0] : fRec21[0]);
464 fRec55[0] = (fSlow3 + (0.999 * fRec55[1]));
465 double fTemp17 = (fTemp16 * fRec55[0]);
466 double fTemp18 = std::fabs(fTemp17);
467 fRec56[0] = ((0.99990000000000001 * fRec56[1]) + (9.9999999999988987e-05 * fTemp18));
468 double fTemp19 = std::max<double>(fRec56[0], fTemp18);
469 fVec6[(IOTA & 32767)] = fTemp19;
470 fRec58[0] = ((fTemp19 + fRec58[1]) - fVec6[((IOTA - iConst39) & 32767)]);
471 fRec57[0] = ((0.999 * fRec57[1]) + (fConst38 * fRec58[0]));
472 double fTemp20 = std::max<double>(-1.0, std::min<double>(-0.01, (fTemp19 + (-1.0 - (1.02 * fRec57[0])))));
473 double fTemp21 = (fTemp17 - fTemp20);
474 double fTemp22 = (40.100000000000001 * fTemp21);
475 double fTemp23 = std::max<double>(-600.0, fTemp22);
476 double fThen5 = (fTemp23 / (1.0 - std::exp((-1.0 * fTemp23))));
477 double fElse5 = (0.0 - (fTemp23 * std::exp(fTemp23)));
478 double fThen6 = ((fTemp21 * ((134.00083333333336 * fTemp21) + 20.050000000000001)) + 1.0);
479 double fElse6 = ((fTemp23 < -50.0) ? fElse5 : fThen5);
480 double fTemp24 = (0.0 - (40.100000000000001 * fTemp20));
481 double fTemp25 = std::max<double>(-600.0, fTemp24);
482 double fThen7 = (fTemp25 / (1.0 - std::exp((-1.0 * fTemp25))));
483 double fElse7 = (0.0 - (fTemp25 * std::exp(fTemp25)));
484 double fThen8 = ((fTemp24 * ((0.083333333333333329 * fTemp24) + 0.5)) + 1.0);
485 double fElse8 = ((fTemp25 < -50.0) ? fElse7 : fThen7);
486 double fTemp26 = (((std::fabs(fTemp22) > 0.0001) ? fElse6 : fThen6) - ((std::fabs(fTemp24) > 0.0001) ? fElse8 : fThen8));
487 fRec20[0] = ((0.024937655860349125 * fTemp26) - (fConst23 * ((fConst40 * fRec20[2]) + (fConst41 * fRec20[1]))));
488 double fTemp27 = (fRec20[2] + (fRec20[0] + (2.0 * fRec20[1])));
489 fVec7[0] = fTemp27;
490 fRec19[0] = ((fConst23 * ((fConst4 * fTemp27) + (fConst27 * fVec7[1]))) - (fConst28 * fRec19[1]));
491 fRec18[0] = (0.0 - (fConst19 * ((fConst20 * fRec18[1]) - (fRec19[0] + fRec19[1]))));
492 fRec17[0] = (fRec18[0] - (fConst15 * ((fConst42 * fRec17[2]) + (fConst45 * fRec17[1]))));
493 double fTemp28 = (fRec17[2] + (fRec17[0] + (2.0 * fRec17[1])));
494 fVec8[0] = fTemp28;
495 fRec16[0] = ((fConst15 * ((fConst17 * fTemp28) + (fConst46 * fVec8[1]))) - (fConst48 * fRec16[1]));
496 fRec15[0] = (fRec16[0] - (fConst10 * ((fConst49 * fRec15[2]) + (fConst50 * fRec15[1]))));
497 double fTemp29 = (fConst60 * fRec14[1]);
498 fRec14[0] = ((fConst10 * (((fConst12 * fRec15[0]) + (fConst51 * fRec15[1])) + (fConst12 * fRec15[2]))) - (fConst55 * ((fConst57 * fRec14[2]) + fTemp29)));
499 fRec59[0] = (fSlow4 + (0.999 * fRec59[1]));
500 double fTemp30 = std::max<double>(-1.0, std::min<double>(1.0, ((fRec14[2] + (fConst55 * (fTemp29 + (fConst57 * fRec14[0])))) * std::pow(10.0, (1.2 * fRec59[0])))));
501 fRec63[0] = ((fConst61 * fRec19[1]) - (fConst19 * ((fConst20 * fRec63[1]) - (fConst14 * fRec19[0]))));
502 fRec62[0] = (fRec63[0] - (fConst15 * ((fConst42 * fRec62[2]) + (fConst45 * fRec62[1]))));
503 double fTemp31 = (fConst50 * fRec61[1]);
504 fRec61[0] = ((fConst15 * (((fConst44 * fRec62[0]) + (fConst62 * fRec62[1])) + (fConst44 * fRec62[2]))) - (fConst63 * ((fConst64 * fRec61[2]) + fTemp31)));
505 double fTemp32 = (fConst60 * fRec60[1]);
506 fRec60[0] = ((fRec61[2] + (fConst63 * (fTemp31 + (fConst64 * fRec61[0])))) - (fConst55 * ((fConst57 * fRec60[2]) + fTemp32)));
507 double fTemp33 = std::max<double>(-1.0, std::min<double>(1.0, ((fRec60[2] + (fConst55 * (fTemp32 + (fConst57 * fRec60[0])))) * std::pow(10.0, (0.80000000000000004 * fRec59[0])))));
508 fRec67[0] = (0.0 - (fConst67 * ((fConst47 * fRec67[1]) - (fConst15 * (fTemp28 + fVec8[1])))));
509 fRec66[0] = (fRec67[0] - (fConst10 * ((fConst49 * fRec66[2]) + (fConst50 * fRec66[1]))));
510 double fTemp34 = (fRec66[2] + (fRec66[0] + (2.0 * fRec66[1])));
511 fVec9[0] = fTemp34;
512 fRec65[0] = ((fConst10 * ((fConst66 * fTemp34) + (fConst68 * fVec9[1]))) - (fConst69 * fRec65[1]));
513 fRec64[0] = (fRec65[0] - (fConst65 * ((fConst70 * fRec64[2]) + (fConst60 * fRec64[1]))));
514 double fTemp35 = std::max<double>(-1.0, std::min<double>(1.0, (fConst65 * ((((fConst59 * fRec64[0]) + (fConst71 * fRec64[1])) + (fConst59 * fRec64[2])) * std::pow(10.0, (2.0 * fRec59[0]))))));
515 fRec69[0] = (0.0 - (fConst72 * ((fConst56 * fRec69[1]) - (fConst10 * (fTemp34 + fVec9[1])))));
516 fRec68[0] = (fRec69[0] - (fConst65 * ((fConst70 * fRec68[2]) + (fConst60 * fRec68[1]))));
517 double fTemp36 = std::max<double>(-1.0, std::min<double>(1.0, (fConst65 * ((fRec68[2] + (fRec68[0] + (2.0 * fRec68[1]))) * std::pow(10.0, (0.90000000000000002 * fRec59[0]))))));
518 double fTemp37 = (((1.333521432 * (fTemp30 * (1.0 - (0.33333333333333331 * mydsp_faustpower2_f(fTemp30))))) + (1.584893192 * ((fTemp33 * (1.0 - (0.33333333333333331 * mydsp_faustpower2_f(fTemp33)))) + (fTemp35 * (1.0 - (0.33333333333333331 * mydsp_faustpower2_f(fTemp35))))))) + (1.2589412 * (fTemp36 * (1.0 - (0.33333333333333331 * mydsp_faustpower2_f(fTemp36))))));
519 fVec10[0] = fTemp37;
520 fRec13[0] = (0.0 - (fConst6 * ((fConst7 * fRec13[1]) - (fTemp37 + fVec10[1]))));
521 double fTemp38 = (2.0 * (fRec59[0] + -0.5));
522 double fTemp39 = (fTemp16 * (1.0 - fRec55[0]));
523 double fTemp40 = ((fRec13[0] * (1.0 - std::max<double>(0.0, (-1.0 * fTemp38)))) + ((fTemp39 * ((1.25 * (fRec59[0] * ((4.0 * (1.0 - std::fabs(fTemp39))) + -1.0))) + 1.0)) + (0.024937655860349125 * (fTemp26 * (1.0 - std::max<double>(0.0, fTemp38))))));
524 fVec11[0] = fTemp40;
525 fRec12[0] = (0.0 - (fConst6 * ((fConst7 * fRec12[1]) - (fTemp40 + fVec11[1]))));
526 fRec70[0] = (fSlow5 + (0.999 * fRec70[1]));
527 double fTemp41 = (fRec12[0] * fRec70[0]);
528 fVec12[0] = fTemp41;
529 fRec11[0] = ((0.93028479253239138 * (fTemp41 + fVec12[1])) - (0.86056958506478287 * fRec11[1]));
530 fRec10[0] = (fRec11[0] - ((1.8405051250752198 * fRec10[1]) + (0.86129424393186271 * fRec10[2])));
531 double fTemp42 = (0.92544984225177063 * (fRec10[0] + fRec10[2]));
532 double fTemp43 = (1.8508996845035413 * fRec10[1]);
533 double fTemp44 = (fTemp43 + fTemp42);
534 double fTemp45 = (fTemp44 / (double(Ranode(int(TUBE_TABLE_6V6_250k), double(fRec9[1]))) + 100000.0));
535 fVec13[0] = fTemp45;
536 fRec71[0] = (fConst6 * ((410.0 * (fTemp45 + fVec13[1])) - (fConst7 * fRec71[1])));
537 fRec9[0] = (double(Ftube(int(TUBE_TABLE_6V6_250k), double(((fTemp42 + (fRec71[0] + fTemp43)) + -0.57272100000000004)))) + -110.3119512195122);
538 fRec8[0] = ((0.025000000000000001 * ((fConst4 * fRec9[0]) + (fConst27 * fRec9[1]))) - (fConst28 * fRec8[1]));
539 fRec72[0] = (fConst30 * ((fConst31 * fRec72[1]) + (0.025000000000000001 * (fRec9[0] - fRec9[1]))));
540 double fTemp46 = (fTemp44 / (double(Ranode(int(TUBE_TABLE_6V6_68k), double(fRec74[1]))) + 100000.0));
541 fVec14[0] = fTemp46;
542 fRec75[0] = (fConst6 * ((410.0 * (fTemp46 + fVec14[1])) - (fConst7 * fRec75[1])));
543 fRec74[0] = (double(Ftube(int(TUBE_TABLE_6V6_68k), double(((fTemp42 + (fRec75[0] + fTemp43)) + -0.58127399999999996)))) + -108.22585365853661);
544 fRec73[0] = ((0.025000000000000001 * ((fConst4 * fRec74[0]) + (fConst27 * fRec74[1]))) - (fConst28 * fRec73[1]));
545 fRec76[0] = (fConst30 * ((fConst31 * fRec76[1]) + (0.025000000000000001 * (fRec74[0] - fRec74[1]))));
546 double fTemp47 = (std::min<double>(0.69999999999999996, (iSlow0 ? fRec72[0] : fRec8[0])) + std::max<double>(-0.75, (iSlow0 ? fRec76[0] : fRec73[0])));
547 double fTemp48 = (0.5 * fRec0[1]);
548 double fTemp49 = (0.40000000000000002 * fRec2[1]);
549 double fTemp50 = (fTemp48 + ((0.29999999999999999 * fRec4[1]) + fTemp49));
550 double fTemp51 = ((fTemp47 + (0.20000000000000001 * fRec6[1])) - fTemp50);
551 fRec6[0] = fTemp51;
552 double fRec7 = (0.0 - (0.20000000000000001 * fTemp51));
553 fRec4[0] = (fRec7 + fRec6[1]);
554 double fRec5 = (0.29999999999999999 * (fTemp47 - fTemp50));
555 fRec2[0] = (fRec5 + fRec4[1]);
556 double fRec3 = (0.40000000000000002 * (fTemp47 - (fTemp49 + fTemp48)));
557 fRec0[0] = (fRec3 + fRec2[1]);
558 double fRec1 = (0.5 * (fTemp47 - fTemp48));
559 buf[i0] = FAUSTFLOAT((fRec1 + fRec0[1]));
560 fRec29[1] = fRec29[0];
561 fRec28[2] = fRec28[1];
562 fRec28[1] = fRec28[0];
563 fVec0[1] = fVec0[0];
564 fRec30[1] = fRec30[0];
565 fRec27[1] = fRec27[0];
566 fRec26[1] = fRec26[0];
567 fRec31[1] = fRec31[0];
568 fRec41[1] = fRec41[0];
569 fRec40[2] = fRec40[1];
570 fRec40[1] = fRec40[0];
571 fVec1[1] = fVec1[0];
572 fRec42[1] = fRec42[0];
573 fRec39[1] = fRec39[0];
574 fRec38[1] = fRec38[0];
575 fRec43[1] = fRec43[0];
576 fRec48[1] = fRec48[0];
577 fVec2[1] = fVec2[0];
578 fRec47[1] = fRec47[0];
579 fRec46[2] = fRec46[1];
580 fRec46[1] = fRec46[0];
581 fVec3[1] = fVec3[0];
582 fRec49[1] = fRec49[0];
583 fRec45[1] = fRec45[0];
584 fRec44[1] = fRec44[0];
585 fRec50[1] = fRec50[0];
586 fRec37[2] = fRec37[1];
587 fRec37[1] = fRec37[0];
588 fRec36[1] = fRec36[0];
589 fRec35[1] = fRec35[0];
590 fRec34[2] = fRec34[1];
591 fRec34[1] = fRec34[0];
592 fVec4[1] = fVec4[0];
593 fRec51[1] = fRec51[0];
594 fRec33[1] = fRec33[0];
595 fRec32[1] = fRec32[0];
596 fRec52[1] = fRec52[0];
597 fRec25[2] = fRec25[1];
598 fRec25[1] = fRec25[0];
599 fRec24[1] = fRec24[0];
600 fRec23[2] = fRec23[1];
601 fRec23[1] = fRec23[0];
602 fVec5[1] = fVec5[0];
603 fRec53[1] = fRec53[0];
604 fRec22[1] = fRec22[0];
605 fRec21[1] = fRec21[0];
606 fRec54[1] = fRec54[0];
607 fRec55[1] = fRec55[0];
608 fRec56[1] = fRec56[0];
609 IOTA = (IOTA + 1);
610 fRec58[1] = fRec58[0];
611 fRec57[1] = fRec57[0];
612 fRec20[2] = fRec20[1];
613 fRec20[1] = fRec20[0];
614 fVec7[1] = fVec7[0];
615 fRec19[1] = fRec19[0];
616 fRec18[1] = fRec18[0];
617 fRec17[2] = fRec17[1];
618 fRec17[1] = fRec17[0];
619 fVec8[1] = fVec8[0];
620 fRec16[1] = fRec16[0];
621 fRec15[2] = fRec15[1];
622 fRec15[1] = fRec15[0];
623 fRec14[2] = fRec14[1];
624 fRec14[1] = fRec14[0];
625 fRec59[1] = fRec59[0];
626 fRec63[1] = fRec63[0];
627 fRec62[2] = fRec62[1];
628 fRec62[1] = fRec62[0];
629 fRec61[2] = fRec61[1];
630 fRec61[1] = fRec61[0];
631 fRec60[2] = fRec60[1];
632 fRec60[1] = fRec60[0];
633 fRec67[1] = fRec67[0];
634 fRec66[2] = fRec66[1];
635 fRec66[1] = fRec66[0];
636 fVec9[1] = fVec9[0];
637 fRec65[1] = fRec65[0];
638 fRec64[2] = fRec64[1];
639 fRec64[1] = fRec64[0];
640 fRec69[1] = fRec69[0];
641 fRec68[2] = fRec68[1];
642 fRec68[1] = fRec68[0];
643 fVec10[1] = fVec10[0];
644 fRec13[1] = fRec13[0];
645 fVec11[1] = fVec11[0];
646 fRec12[1] = fRec12[0];
647 fRec70[1] = fRec70[0];
648 fVec12[1] = fVec12[0];
649 fRec11[1] = fRec11[0];
650 fRec10[2] = fRec10[1];
651 fRec10[1] = fRec10[0];
652 fVec13[1] = fVec13[0];
653 fRec71[1] = fRec71[0];
654 fRec9[1] = fRec9[0];
655 fRec8[1] = fRec8[0];
656 fRec72[1] = fRec72[0];
657 fVec14[1] = fVec14[0];
658 fRec75[1] = fRec75[0];
659 fRec74[1] = fRec74[0];
660 fRec73[1] = fRec73[0];
661 fRec76[1] = fRec76[0];
662 fRec6[1] = fRec6[0];
663 fRec4[1] = fRec4[0];
664 fRec2[1] = fRec2[0];
665 fRec0[1] = fRec0[0];
666 }
667 smp.down(buf, output0);
668 #undef fCheckbox0
669 #undef fCheckbox1
670 #undef fVslider0
671 #undef fVslider1
672 #undef fVslider2
673 #undef fVslider3
674 }
675
compute_static(int count,FAUSTFLOAT * input0,FAUSTFLOAT * output0,PluginDef * p)676 void __rt_func Dsp::compute_static(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0, PluginDef *p)
677 {
678 static_cast<Dsp*>(p)->compute(count, input0, output0);
679 }
680
register_par(const ParamReg & reg)681 int Dsp::register_par(const ParamReg& reg)
682 {
683 fVslider2_ = reg.registerFloatVar("gxdistortion.drive","","SA","",&fVslider2, 0.34999999999999998, 0.0, 1.0, 0.01, 0);
684 fVslider1_ = reg.registerFloatVar("gxdistortion.wet_dry","","SA","",&fVslider1, 100.0, 0.0, 100.0, 1.0, 0);
685 fCheckbox1_ = reg.registerFloatVar("amp.highgain","","BA",N_("Allow frequencies below 31Hz"),&fCheckbox1, 0.0, 0.0, 1.0, 1.0, 0);
686 fVslider0_ = reg.registerFloatVar("amp2.stage1.Pregain","","SA","",&fVslider0, -6.0, -20.0, 20.0, 0.10000000000000001, 0);
687 fCheckbox0_ = reg.registerFloatVar("amp.highgain","","BA",N_("Allow frequencies below 31Hz"),&fCheckbox0, 0.0, 0.0, 1.0, 1.0, 0);
688 fVslider3_ = reg.registerFloatVar("amp2.stage2.gain1","","SA","",&fVslider3, -6.0, -20.0, 20.0, 0.10000000000000001, 0);
689 return 0;
690 }
691
register_params_static(const ParamReg & reg)692 int Dsp::register_params_static(const ParamReg& reg)
693 {
694 return static_cast<Dsp*>(reg.plugin)->register_par(reg);
695 }
696
plugin()697 PluginDef *plugin() {
698 return new Dsp();
699 }
700
del_instance(PluginDef * p)701 void Dsp::del_instance(PluginDef *p)
702 {
703 delete static_cast<Dsp*>(p);
704 }
705
706 } // end namespace gxamp6
707