Simple delay line, noninterpolating

Based on work by James McCartney in SuperCollider.

max_delay && *plugin_data->max_delay > 0) minsize = sample_rate * *plugin_data->max_delay; else if (plugin_data->delay_time) minsize = sample_rate * *plugin_data->delay_time; else minsize = sample_rate; /* 1 second default */ size = 1; while (size < minsize) size <<= 1; /* calloc sets the buffer to zero. */ buffer = calloc(size, sizeof(LADSPA_Data)); if (buffer) buffer_mask = size - 1; else buffer_mask = 0; write_phase = 0; ]]> buffer); ]]> last_delay_time = delay_time; plugin_data->delay_samples = delay_samples = CALC_DELAY (delay_time); } if (delay_time == last_delay_time) { long read_phase = write_phase - (long)delay_samples; LADSPA_Data *readptr = buffer + (read_phase & buffer_mask); LADSPA_Data *writeptr = buffer + (write_phase & buffer_mask); LADSPA_Data *lastptr = buffer + buffer_mask + 1; long remain = sample_count; while (remain) { long read_space = lastptr - readptr; long write_space = lastptr - writeptr; long to_process = MIN (MIN (read_space, remain), write_space); if (to_process == 0) return; // buffer not allocated. remain -= to_process; for (i=0; ilast_delay_time = delay_time; plugin_data->delay_samples = delay_samples; } plugin_data->write_phase = write_phase; ]]> Input Output Max Delay (s)

Maximum delay. Used to set the delay buffer size upon activation. Cannot be modulated. Note that if you do not connect to this port before activation, it will default to 1 second.

Delay Time (s) Simple delay line, linear interpolation

Based on work by James McCartney in SuperCollider.

max_delay && *plugin_data->max_delay > 0) minsize = sample_rate * *plugin_data->max_delay; else if (plugin_data->delay_time) minsize = sample_rate * *plugin_data->delay_time; else minsize = sample_rate; /* 1 second default */ size = 1; while (size < minsize) size <<= 1; /* calloc sets the buffer to zero. */ buffer = calloc(size, sizeof(LADSPA_Data)); if (buffer) buffer_mask = size - 1; else buffer_mask = 0; write_phase = 0; ]]> buffer); ]]> last_delay_time = delay_time; plugin_data->delay_samples = delay_samples = CALC_DELAY (delay_time); } if (delay_time == last_delay_time) { long idelay_samples = (long)delay_samples; LADSPA_Data frac = delay_samples - idelay_samples; for (i=0; ilast_delay_time = delay_time; plugin_data->delay_samples = delay_samples; } plugin_data->write_phase = write_phase; ]]> Input Output Max Delay (s)

Maximum delay. Used to set the delay buffer size upon activation. Cannot be modulated. Note that if you do not connect to this port before activation, it will default to 1 second.

Delay Time (s) Simple delay line, cubic spline interpolation

Based on work by James McCartney in SuperCollider.

max_delay && *plugin_data->max_delay > 0) minsize = sample_rate * *plugin_data->max_delay; else if (plugin_data->delay_time) minsize = sample_rate * *plugin_data->delay_time; else minsize = sample_rate; /* 1 second default */ size = 1; while (size < minsize) size <<= 1; /* calloc sets the buffer to zero. */ buffer = calloc(size, sizeof(LADSPA_Data)); if (buffer) buffer_mask = size - 1; else buffer_mask = 0; write_phase = 0; ]]> buffer); ]]> last_delay_time = delay_time; plugin_data->delay_samples = delay_samples = CALC_DELAY (delay_time); } if (delay_time == last_delay_time) { long idelay_samples = (long)delay_samples; LADSPA_Data frac = delay_samples - idelay_samples; for (i=0; ilast_delay_time = delay_time; plugin_data->delay_samples = delay_samples; } plugin_data->write_phase = write_phase; ]]> Input Output Max Delay (s)

Maximum delay. Used to set the delay buffer size upon activation. Cannot be modulated. Note that if you do not connect to this port before activation, it will default to 1 second.

Delay Time (s)