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
|
//----------------------------------------------------------
// author: "Grame"
// copyright: "(c)GRAME 2007"
// license: "BSD"
// name: "stereoecho"
// version: "1.0"
//
// Code generated with Faust 2.77.2 (https://faust.grame.fr)
//----------------------------------------------------------
/* link with */
#include <math.h>
#ifndef FAUSTFLOAT
#define FAUSTFLOAT float
#endif
#ifndef FAUSTCLASS
#define FAUSTCLASS mydsp
#endif
class mydsp : public dsp {
private:
FAUSTFLOAT fslider0;
float fConst0; // step: 14
FAUSTFLOAT fslider1;
// Recursion delay fVeeec0 is of type kMaskRingDelay
// While its definition is of type kZeroDelay
float fVeeec0[131072]; // Ring Delay
// Recursion delay fVeeec2 is of type kMaskRingDelay
// While its definition is of type kZeroDelay
float fVeeec2[131072]; // Ring Delay
int IOTA;
int fSampleRate;
public:
virtual void metadata(Meta* m) {
m->declare("author", "Grame");
m->declare("copyright", "(c)GRAME 2007");
m->declare("filename", "stereoecho.dsp");
m->declare("license", "BSD");
m->declare("math.lib/author", "GRAME");
m->declare("math.lib/copyright", "GRAME");
m->declare("math.lib/deprecated", "This library is deprecated and is not maintained anymore. It will be removed in August 2017.");
m->declare("math.lib/license", "LGPL with exception");
m->declare("math.lib/name", "Math Library");
m->declare("math.lib/version", "1.0");
m->declare("music.lib/author", "GRAME");
m->declare("music.lib/copyright", "GRAME");
m->declare("music.lib/license", "LGPL with exception");
m->declare("music.lib/name", "Music Library");
m->declare("music.lib/version", "1.0");
m->declare("name", "stereoecho");
m->declare("version", "1.0");
}
virtual int getNumInputs() { return 2; }
virtual int getNumOutputs() { return 2; }
static void classInit(int sample_rate) {
}
virtual void instanceConstants(int sample_rate) {
fSampleRate = sample_rate;
fConst0 = (0.001f * min(1.92e+05f, max(1.0f, float(fSampleRate)))); // step: 14
}
virtual void instanceResetUserInterface() {
fslider0 = 16.3f;
fslider1 = 90.9f;
}
virtual void instanceClear() {
for (int i = 0; i < 131072; i++) { fVeeec0[i] = 0; }
for (int i = 0; i < 131072; i++) { fVeeec2[i] = 0; }
IOTA = 1;
}
virtual void init(int sample_rate) {
classInit(sample_rate);
instanceInit(sample_rate);
}
virtual void instanceInit(int sample_rate) {
instanceConstants(sample_rate);
instanceResetUserInterface();
instanceClear();
}
virtual mydsp* clone() {
return new mydsp();
}
virtual int getSampleRate() {
return fSampleRate;
}
virtual void buildUserInterface(UI* ui_interface) {
ui_interface->openVerticalBox("stereo echo");
ui_interface->openVerticalBox("echo 1000");
ui_interface->addHorizontalSlider("feedback", &fslider1, 90.9f, 0.0f, 1e+02f, 0.1f);
ui_interface->addHorizontalSlider("millisecond", &fslider0, 16.3f, 0.0f, 1e+03f, 0.1f);
ui_interface->closeBox();
ui_interface->closeBox();
}
virtual void compute (int count, FAUSTFLOAT** input, FAUSTFLOAT** output) {
int iSlow0 = (((int((fConst0 * float(fslider0))) + -1) & 65535) + 1); // step: 19
float fSlow1 = (0.01f * float(fslider1)); // step: 23
int fullcount = count;
for (int index = 0; index < fullcount; index += 32) {
int count = min(32, fullcount-index);
FAUSTFLOAT* input0 = &input[0][index]; // Zone 3
FAUSTFLOAT* input1 = &input[1][index]; // Zone 3
FAUSTFLOAT* output0 = &output[0][index]; // Zone 3
FAUSTFLOAT* output1 = &output[1][index]; // Zone 3
for (int i=0; i<count; i++) {
int vIota0 = (IOTA-iSlow0)&131071;
int vIota1 = IOTA&131071;
fVeeec0[vIota1] = ((float)input0[i] + (fSlow1 * fVeeec0[vIota0]));
int vIota2 = (IOTA-0)&131071;
fVeeec2[vIota1] = ((float)input1[i] + (fSlow1 * fVeeec2[vIota0]));
output0[i] = (FAUSTFLOAT)(fVeeec0[vIota2]); // Zone Exec Code
output1[i] = (FAUSTFLOAT)(fVeeec2[vIota2]); // Zone Exec Code
// post processing
IOTA = IOTA+1;
}
}
}
};
|
