Giant flange
This is a fairly normal flanger but with excessivly long delay times.
Requested by Patrick Shirkey.
To cut down the memory requirements the internal delay buffer noly has
15bits or resolution, so there is no headroom, if you feed in signals over 0dB
it will clip the output. There is code to soften the effect of the clipping,
but beware of it.
buffer);
]]>
99.0f) {
fb = 0.99f;
} else if (feedback < -99.0f) {
fb = -0.99f;
} else {
fb = feedback * 0.01f;
}
if (f_round(deldouble)) {
const float dr1 = delay1 * fs * 0.25f;
const float dr2 = delay2 * fs * 0.25f;
for (pos = 0; pos < sample_count; pos++) {
/* Write input into delay line */
buffer[buffer_pos] = f_round(input[pos] * INT_SCALE);
/* Calcuate delays */
d1 = (x1 + 1.0f) * dr1;
d2 = (y2 + 1.0f) * dr2;
d1out = buffer[(buffer_pos - f_round(d1)) & buffer_mask] * INT_SCALE_R;
d2out = buffer[(buffer_pos - f_round(d2)) & buffer_mask] * INT_SCALE_R;
/* Add feedback, must be done afterwards for case where delay = 0 */
fbs = input[pos] + (d1out + d2out) * fb;
if(fbs < CLIP && fbs > -CLIP) {
buffer[buffer_pos] = fbs * INT_SCALE;
} else if (fbs > 0.0f) {
buffer[buffer_pos] = (MAX_AMP - (CLIP_A / (CLIP_B + fbs))) *
INT_SCALE;
} else {
buffer[buffer_pos] = (MAX_AMP - (CLIP_A / (CLIP_B - fbs))) *
-INT_SCALE;
}
/* Write output */
buffer_write(output[pos], LIN_INTERP(wet, input[pos], d1out + d2out));
if (pos % 2) {
buffer_pos = (buffer_pos + 1) & buffer_mask;
}
/* Run LFOs */
x1 -= omega1 * y1;
y1 += omega1 * x1;
x2 -= omega2 * y2;
y2 += omega2 * x2;
}
} else {
const float dr1 = delay1 * fs * 0.5f;
const float dr2 = delay2 * fs * 0.5f;
for (pos = 0; pos < sample_count; pos++) {
/* Write input into delay line */
buffer[buffer_pos] = f_round(input[pos] * INT_SCALE);
/* Calcuate delays */
d1 = (x1 + 1.0f) * dr1;
d2 = (y2 + 1.0f) * dr2;
d1out = buffer[(buffer_pos - f_round(d1)) & buffer_mask] * INT_SCALE_R;
d2out = buffer[(buffer_pos - f_round(d2)) & buffer_mask] * INT_SCALE_R;
/* Add feedback, must be done afterwards for case where delay = 0 */
fbs = input[pos] + (d1out + d2out) * fb;
if(fbs < CLIP && fbs > -CLIP) {
buffer[buffer_pos] = fbs * INT_SCALE;
} else if (fbs > 0.0f) {
buffer[buffer_pos] = (MAX_AMP - (CLIP_A / (CLIP_B + fbs))) *
INT_SCALE;
} else {
buffer[buffer_pos] = (MAX_AMP - (CLIP_A / (CLIP_B - fbs))) *
-INT_SCALE;
}
/* Write output */
buffer_write(output[pos], LIN_INTERP(wet, input[pos], d1out + d2out));
buffer_pos = (buffer_pos + 1) & buffer_mask;
/* Run LFOs */
x1 -= omega1 * y1;
y1 += omega1 * x1;
x2 -= omega2 * y2;
y2 += omega2 * x2;
}
}
plugin_data->x1 = x1;
plugin_data->y1 = y1;
plugin_data->x2 = x2;
plugin_data->y2 = y2;
plugin_data->buffer_pos = buffer_pos;
]]>
Double delay
doubles the length of the delays, this will reduce the sound quality.
LFO frequency 1 (Hz)
The delay of the first LFO in seconds.
Delay 1 range (s)
The delay range of the first LFO in seconds.
LFO frequency 2 (Hz)
The delay of the second LFO in seconds.
Delay 2 range (s)
The delay range of the second LFO in seconds.
Feedback
The amount of the delays output that is mixed back into the delay.
Dry/Wet level
The ammounts of the input and effect mixed to produce the output.
Input
Output