mirror of
https://github.com/jhbruhn/eurorack.git
synced 2025-03-15 02:55:49 +00:00
54 lines
1.6 KiB
C++
54 lines
1.6 KiB
C++
#include "processor.h"
|
|
#include "stmlib/stmlib.h"
|
|
#include "stmlib/dsp/dsp.h"
|
|
#include "stmlib/utils/dsp.h"
|
|
#include <math.h>
|
|
|
|
using namespace stereo_mix;
|
|
using namespace stmlib;
|
|
|
|
void Processor::Process(int16_t cvs[], uint16_t* outs)
|
|
{
|
|
uint32_t value_l;
|
|
uint32_t value_r;
|
|
|
|
uint16_t pan_pot = (pan_offset + 32767L);
|
|
uint16_t vol_pot = (vol_offset);
|
|
int32_t pan_cv = (cvs[0] * static_cast<int32_t>(pan_att)) >> 15; // full attenuate gives 3x amplification :)
|
|
int32_t vol_cv = (cvs[1] * static_cast<int32_t>(vol_att)) >> 15;
|
|
pan_cv = Clip16(pan_cv);
|
|
vol_cv = Clip16(vol_cv);
|
|
|
|
|
|
// calculate value for ui
|
|
int32_t lin = vol_offset + vol_cv * 3;
|
|
lin = ClipU16(lin);
|
|
lin *= !mute;
|
|
this->linear_vol = lin;
|
|
|
|
uint16_t vol_pot_exp = Interpolate124(lut_linear_to_exp, vol_pot);
|
|
uint16_t vol_pot_log = 65535 - InverseInterpolate124(lut_linear_to_exp, vol_pot);
|
|
|
|
vol_pot = Mix(vol_pot_exp, vol_pot_log, log_exp_mix_pot);
|
|
int32_t vol = vol_pot;
|
|
|
|
uint16_t vol_cv_absu16 = abs(vol_cv) << 1;
|
|
uint16_t vol_cv_exp = Interpolate124(lut_linear_to_exp, vol_cv_absu16);
|
|
uint16_t vol_cv_log = 65535 - InverseInterpolate124(lut_linear_to_exp, vol_cv_absu16);
|
|
uint32_t vol_cv_pre = Mix(vol_cv_exp, vol_cv_log, log_exp_mix_cv) * 3;
|
|
vol += vol_cv > 0 ? vol_cv_pre : -vol_cv_pre;
|
|
vol *= !mute;
|
|
|
|
vol = ClipU16(vol);
|
|
|
|
this->previous_vol = vol;
|
|
|
|
int32_t pan = pan_pot + (pan_cv * 3);
|
|
pan = ClipU16(pan);
|
|
|
|
value_l = (Interpolate124(lut_left_sin_pan, pan) * vol) >> 16;
|
|
value_r = (Interpolate124(lut_right_cos_pan, pan) * vol) >> 16;
|
|
|
|
outs[0] = value_r;
|
|
outs[1] = value_l;
|
|
}
|