You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
dexed/src/dexed.cpp

75 lines
1.8 KiB

// from: http://ll-plugins.nongnu.org/lv2pftci/#A_synth
#include <lv2synth.hpp>
#include "dexed.peg"
8 years ago
#include "dexed.h"
#include "EngineMkI.h"
#include "EngineOpl.h"
8 years ago
#include "msfa/exp2.h"
#include "msfa/sin.h"
#include "msfa/freqlut.h"
8 years ago
DexedVoice::DexedVoice(double rate) : m_key(LV2::INVALID_KEY), m_rate(rate)
8 years ago
{
voice.dx7_note=new Dx7Note;
}
void DexedVoice::on(unsigned char key, unsigned char velocity)
{
voice.dx7_note->init(data, key, velocity, 11);
}
void DexedVoice::off(unsigned char velocity)
{
voice.dx7_note->keyup();
}
unsigned char DexedVoice::get_key(void) const
{
return m_key;
}
void DexedVoice::render(uint32_t from, uint32_t to)
{
if (m_key == LV2::INVALID_KEY)
return;
for (uint32_t i = from; i < to; ++i)
{
int32_t s;
//dx7_note->compute(&s, lfovalue, lfodelay, &controllers);
voice.dx7_note->compute(&s, 0, 0, NULL);
float fs=float(s)/(INT32_MAX);
p(p_lv2_audio_out_1)[i]+=fs;
}
}
//==============================================================================
8 years ago
Dexed::Dexed(double rate) : LV2::Synth<DexedVoice, Dexed>(p_n_ports, p_lv2_events_in)
{
Exp2::init();
Tanh::init();
Sin::init();
Freqlut::init(rate);
Lfo::init(rate);
PitchEnv::init(rate);
Env::init_sr(rate);
feedback_bitdepth=11;
engineType=DEXED_ENGINE_MARKI;
core=&engineMkI;
for(uint i=0;i<sizeof(init_voice);i++) {
data[i] = init_voice[i];
}
add_voices(new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate),new DexedVoice(rate)
);
add_audio_outputs(p_lv2_audio_out_1);
8 years ago
}
static int _ = Dexed::register_class(p_uri);