eurorack/pure_adsr/tides.h

384 lines
8.3 KiB
C++

// Copyright 2013 Emilie Gillet.
//
// Author: Emilie Gillet (emilie.o.gillet@gmail.com)
//
// Permission is hereby granted, free of charge, to any person obtaining a copy
// of this software and associated documentation files (the "Software"), to deal
// in the Software without restriction, including without limitation the rights
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
// copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
// THE SOFTWARE.
//
// See http://creativecommons.org/licenses/MIT/ for more information.
//
// -----------------------------------------------------------------------------
//
// Multistage envelope.
#ifndef PEAKS_MODULATIONS_TIDES_H_
#define PEAKS_MODULATIONS_TIDES_H_
#include "pure_adsr/gate_processor.h"
#include "pure_adsr/hysteresis_quantizer.h"
#include "pure_adsr/multistage_envelope.h"
#include <avrlib/avrlib.h>
#include <stddef.h>
#define max(x, y) (((x) > (y)) ? (x) : (y))
namespace pure_adsr {
class Tides {
public:
Tides() {}
~Tides() {}
void Init();
void Process(const GateFlags* gate_flags, int16_t* out, size_t size);
void Configure(uint16_t* parameter, ControlMode control_mode)
{
uint16_t param = parameter[2];
uint16_t hold_high_length = 0;
uint16_t hold_low_length = 0;
if(param > 32768) {
hold_high_length = (param - 32768) >> 0;
} else {
hold_low_length = (32768 - param) >> 0;
}
set_ad_f_loop(parameter[0], parameter[1], hold_high_length, hold_low_length);
uint8_t waveform_mode = quant.Process(parameter[3] / 65536.0f, 5);
switch (waveform_mode) {
case 0:
shape_[0] = ENV_SHAPE_QUARTIC;
shape_[2] = ENV_SHAPE_EXPONENTIAL;
break;
case 1:
shape_[0] = ENV_SHAPE_QUARTIC;
shape_[2] = ENV_SHAPE_QUARTIC;
break;
case 2:
shape_[0] = ENV_SHAPE_LINEAR;
shape_[2] = ENV_SHAPE_LINEAR;
break;
case 3:
shape_[0] = ENV_SHAPE_EXPONENTIAL;
shape_[2] = ENV_SHAPE_EXPONENTIAL;
break;
case 4:
shape_[0] = ENV_SHAPE_EXPONENTIAL;
shape_[2] = ENV_SHAPE_QUARTIC;
break;
}
if (segment_ > num_segments_) {
segment_ = 0;
phase_ = 0;
value_ = 0;
}
}
inline void set_time(uint16_t segment, uint16_t time)
{
time_[segment] = time;
}
inline void set_level(uint16_t segment, int16_t level)
{
level_[segment] = level;
}
inline void set_num_segments(uint16_t num_segments)
{
num_segments_ = num_segments;
}
inline void set_sustain_point(uint16_t sustain_point)
{
sustain_point_ = sustain_point;
}
inline void set_adsr(
uint16_t attack,
uint16_t decay,
uint16_t sustain,
uint16_t release)
{
num_segments_ = 3;
sustain_point_ = 2;
level_[0] = 0;
level_[1] = 32767;
level_[2] = sustain;
level_[3] = 0;
time_[0] = attack;
time_[1] = decay;
time_[2] = release;
shape_[0] = ENV_SHAPE_QUARTIC;
shape_[1] = ENV_SHAPE_EXPONENTIAL;
shape_[2] = ENV_SHAPE_EXPONENTIAL;
loop_start_ = loop_end_ = 0;
}
inline void set_ad(uint16_t attack, uint16_t decay)
{
num_segments_ = 2;
sustain_point_ = 0;
level_[0] = 0;
level_[1] = 32767;
level_[2] = 0;
time_[0] = attack;
time_[1] = decay;
shape_[0] = ENV_SHAPE_EXPONENTIAL;
shape_[1] = ENV_SHAPE_EXPONENTIAL;
loop_start_ = loop_end_ = 0;
}
inline void set_adr(
uint16_t attack,
uint16_t decay,
uint16_t sustain,
uint16_t release)
{
num_segments_ = 3;
sustain_point_ = 0;
level_[0] = 0;
level_[1] = 32767;
level_[2] = sustain;
level_[3] = 0;
time_[0] = attack;
time_[1] = decay;
time_[2] = release;
shape_[0] = ENV_SHAPE_LINEAR;
shape_[1] = ENV_SHAPE_LINEAR;
shape_[2] = ENV_SHAPE_LINEAR;
loop_start_ = loop_end_ = 0;
}
inline void set_ar(uint16_t attack, uint16_t decay)
{
num_segments_ = 2;
sustain_point_ = 1;
level_[0] = 0;
level_[1] = 32767;
level_[2] = 0;
time_[0] = attack;
time_[1] = decay;
shape_[0] = ENV_SHAPE_LINEAR;
shape_[1] = ENV_SHAPE_LINEAR;
loop_start_ = loop_end_ = 0;
}
inline void set_adsar(
uint16_t attack,
uint16_t decay,
uint16_t sustain,
uint16_t release)
{
num_segments_ = 4;
sustain_point_ = 2;
level_[0] = 0;
level_[1] = 32767;
level_[2] = sustain;
level_[3] = 32767;
level_[4] = 0;
time_[0] = attack;
time_[1] = decay;
time_[2] = attack;
time_[3] = release;
shape_[0] = ENV_SHAPE_LINEAR;
shape_[1] = ENV_SHAPE_LINEAR;
shape_[2] = ENV_SHAPE_LINEAR;
shape_[3] = ENV_SHAPE_LINEAR;
loop_start_ = loop_end_ = 0;
}
inline void set_adar(
uint16_t attack,
uint16_t decay,
uint16_t sustain,
uint16_t release)
{
num_segments_ = 4;
sustain_point_ = 0;
level_[0] = 0;
level_[1] = 32767;
level_[2] = sustain;
level_[3] = 32767;
level_[4] = 0;
time_[0] = attack;
time_[1] = decay;
time_[2] = attack;
time_[3] = release;
shape_[0] = ENV_SHAPE_LINEAR;
shape_[1] = ENV_SHAPE_LINEAR;
shape_[2] = ENV_SHAPE_LINEAR;
shape_[3] = ENV_SHAPE_LINEAR;
loop_start_ = loop_end_ = 0;
}
inline void set_ad_loop(uint16_t attack, uint16_t decay)
{
num_segments_ = 2;
sustain_point_ = 0;
level_[0] = 0;
level_[1] = 32767;
level_[2] = 0;
time_[0] = attack;
time_[1] = decay;
shape_[0] = ENV_SHAPE_LINEAR;
shape_[1] = ENV_SHAPE_LINEAR;
loop_start_ = 0;
loop_end_ = 2;
}
inline void set_ad_f_loop(uint16_t attack, uint16_t decay, uint16_t sustain, uint16_t silence)
{
num_segments_ = 4;
sustain_point_ = 0;
level_[0] = 0;
level_[1] = 32767;
level_[2] = 32767;
level_[3] = 0;
level_[4] = 0;
time_[0] = attack;
time_[1] = sustain;
time_[2] = decay;
time_[3] = silence;
shape_[0] = ENV_SHAPE_LINEAR;
shape_[1] = ENV_SHAPE_LINEAR;
shape_[2] = ENV_SHAPE_LINEAR;
shape_[3] = ENV_SHAPE_LINEAR;
loop_start_ = 0;
loop_end_ = 4;
}
inline void set_adr_loop(
uint16_t attack,
uint16_t decay,
uint16_t sustain,
uint16_t release)
{
num_segments_ = 3;
sustain_point_ = 0;
level_[0] = 0;
level_[1] = 32767;
level_[2] = sustain;
level_[3] = 0;
time_[0] = attack;
time_[1] = decay;
time_[2] = release;
shape_[0] = ENV_SHAPE_LINEAR;
shape_[1] = ENV_SHAPE_LINEAR;
shape_[2] = ENV_SHAPE_LINEAR;
loop_start_ = 0;
loop_end_ = 3;
}
inline void set_adar_loop(
uint16_t attack,
uint16_t decay,
uint16_t sustain,
uint16_t release)
{
num_segments_ = 4;
sustain_point_ = 0;
level_[0] = 0;
level_[1] = 32767;
level_[2] = sustain;
level_[3] = 32767;
level_[4] = 0;
time_[0] = attack;
time_[1] = decay;
time_[2] = attack;
time_[3] = release;
shape_[0] = ENV_SHAPE_LINEAR;
shape_[1] = ENV_SHAPE_LINEAR;
shape_[2] = ENV_SHAPE_LINEAR;
shape_[3] = ENV_SHAPE_LINEAR;
loop_start_ = 0;
loop_end_ = 4;
}
inline void set_hard_reset(bool hard_reset)
{
hard_reset_ = hard_reset;
}
private:
int16_t level_[kMaxNumSegments];
uint16_t time_[kMaxNumSegments];
EnvelopeShape shape_[kMaxNumSegments];
int16_t segment_;
int16_t start_value_;
int16_t value_;
uint32_t phase_;
uint32_t phase_increment_;
uint16_t num_segments_;
uint16_t sustain_point_;
uint16_t loop_start_;
uint16_t loop_end_;
uint16_t smoothness_;
bool hard_reset_;
HysteresisQuantizer quant;
DISALLOW_COPY_AND_ASSIGN(Tides);
};
} // namespace peaks
#endif // PEAKS_MODULATIONS_MULTISTAGE_ENVELOPE_H_