1
// Reverb model implementation
3
// Written by Jezar at Dreampoint, June 2000
4
// http://www.dreampoint.co.uk
5
// This code is public domain
7
#include "revmodel.hpp"
11
// Tie the components to their buffers
12
combL[0].setbuffer(bufcombL1,combtuningL1);
13
combR[0].setbuffer(bufcombR1,combtuningR1);
14
combL[1].setbuffer(bufcombL2,combtuningL2);
15
combR[1].setbuffer(bufcombR2,combtuningR2);
16
combL[2].setbuffer(bufcombL3,combtuningL3);
17
combR[2].setbuffer(bufcombR3,combtuningR3);
18
combL[3].setbuffer(bufcombL4,combtuningL4);
19
combR[3].setbuffer(bufcombR4,combtuningR4);
20
combL[4].setbuffer(bufcombL5,combtuningL5);
21
combR[4].setbuffer(bufcombR5,combtuningR5);
22
combL[5].setbuffer(bufcombL6,combtuningL6);
23
combR[5].setbuffer(bufcombR6,combtuningR6);
24
combL[6].setbuffer(bufcombL7,combtuningL7);
25
combR[6].setbuffer(bufcombR7,combtuningR7);
26
combL[7].setbuffer(bufcombL8,combtuningL8);
27
combR[7].setbuffer(bufcombR8,combtuningR8);
28
allpassL[0].setbuffer(bufallpassL1,allpasstuningL1);
29
allpassR[0].setbuffer(bufallpassR1,allpasstuningR1);
30
allpassL[1].setbuffer(bufallpassL2,allpasstuningL2);
31
allpassR[1].setbuffer(bufallpassR2,allpasstuningR2);
32
allpassL[2].setbuffer(bufallpassL3,allpasstuningL3);
33
allpassR[2].setbuffer(bufallpassR3,allpasstuningR3);
34
allpassL[3].setbuffer(bufallpassL4,allpasstuningL4);
35
allpassR[3].setbuffer(bufallpassR4,allpasstuningR4);
38
allpassL[0].setfeedback(0.5f);
39
allpassR[0].setfeedback(0.5f);
40
allpassL[1].setfeedback(0.5f);
41
allpassR[1].setfeedback(0.5f);
42
allpassL[2].setfeedback(0.5f);
43
allpassR[2].setfeedback(0.5f);
44
allpassL[3].setfeedback(0.5f);
45
allpassR[3].setfeedback(0.5f);
47
setroomsize(initialroom);
50
setwidth(initialwidth);
53
// Buffer will be full of rubbish - so we MUST mute them
61
if (getmode() >= freezemode)
64
for (i=0;i<numcombs;i++)
69
for (i=0;i<numallpasses;i++)
76
void revmodel::processreplace(float *inputL, float *inputR, float *outputL, float *outputR, long numsamples, int skip)
78
float outL,outR,input;
80
while(numsamples-- > 0)
84
input = (*inputL + *inputR) * gain;
86
// Accumulate comb filters in parallel
87
for(i=0; i<numcombs; i++)
89
outL += combL[i].process(input);
90
outR += combR[i].process(input);
93
// Feed through allpasses in series
94
for(i=0; i<numallpasses; i++)
96
outL = allpassL[i].process(outL);
97
outR = allpassR[i].process(outR);
100
// Calculate output REPLACING anything already there
101
*outputL = outL*wet1 + outR*wet2 + *inputL*dry;
102
*outputR = outR*wet1 + outL*wet2 + *inputR*dry;
104
// Increment sample pointers, allowing for interleave (if any)
112
void revmodel::processmix(float *inputL, float *inputR, float *outputL, float *outputR, long numsamples, int skip)
114
float outL,outR,input;
116
while(numsamples-- > 0)
121
input = (*inputL + *inputR) * gain;
123
// Accumulate comb filters in parallel
124
for(i=0; i<numcombs; i++)
126
outL += combL[i].process(input);
127
outR += combR[i].process(input);
130
// Feed through allpasses in series
131
for(i=0; i<numallpasses; i++)
133
outL = allpassL[i].process(outL);
134
outR = allpassR[i].process(outR);
137
// Calculate output MIXING with anything already there
138
*outputL += outL*wet1 + outR*wet2 + *inputL*dry;
139
*outputR += outR*wet1 + outL*wet2 + *inputR*dry;
141
// Increment sample pointers, allowing for interleave (if any)
149
void revmodel::update()
151
// Recalculate internal values after parameter change
155
wet1 = wet*(width/2 + 0.5f);
156
wet2 = wet*((1-width)/2);
158
if (mode >= freezemode)
166
roomsize1 = roomsize;
171
for(i=0; i<numcombs; i++)
173
combL[i].setfeedback(roomsize1);
174
combR[i].setfeedback(roomsize1);
177
for(i=0; i<numcombs; i++)
179
combL[i].setdamp(damp1);
180
combR[i].setdamp(damp1);
184
// The following get/set functions are not inlined, because
185
// speed is never an issue when calling them, and also
186
// because as you develop the reverb model, you may
187
// wish to take dynamic action when they are called.
189
void revmodel::setroomsize(float value)
191
roomsize = (value*scaleroom) + offsetroom;
195
float revmodel::getroomsize()
197
return (roomsize-offsetroom)/scaleroom;
200
void revmodel::setdamp(float value)
202
damp = value*scaledamp;
206
float revmodel::getdamp()
208
return damp/scaledamp;
211
void revmodel::setwet(float value)
213
wet = value*scalewet;
217
float revmodel::getwet()
222
void revmodel::setdry(float value)
224
dry = value*scaledry;
227
float revmodel::getdry()
232
void revmodel::setwidth(float value)
238
float revmodel::getwidth()
243
void revmodel::setmode(float value)
249
float revmodel::getmode()
251
if (mode >= freezemode)