Compare commits

...

3 Commits

Author SHA1 Message Date
Gordon JC Pearce b70ab64dc1 maximum key range 2025-08-19 00:15:51 +01:00
Gordon JC Pearce 750b43f6c5 better decoupling, working envelope 2025-08-19 00:08:16 +01:00
Gordon JC Pearce d054c99eb1 filter changes, add rest of parameters 2025-08-18 22:38:04 +01:00
7 changed files with 158 additions and 52 deletions

View File

@ -17,6 +17,7 @@
*/
#include "assigner.hpp"
#include "generator.hpp"
//#define DEBUG
@ -57,10 +58,9 @@ void Assigner::handleMidi(MidiEvent *ev) {
break;
case 0xb0:
switch (ev->data[1]) {
// handle the following
// maybe handle the following
// CC 1 - modwheel
// CC 64 - sustain
// possibly JU-06 CC values
default:
break;
}
@ -95,8 +95,6 @@ void Assigner::noteOff(uint8_t note) {
voiceTbl[NUM_VOICES - 1] = v;
noteTbl[v] |= 0x80;
voices[v].stopNote();
}
void Assigner::noteOn(uint8_t note) {
@ -136,10 +134,12 @@ void Assigner::noteOn(uint8_t note) {
break;
}
}
// printf("at end, l=%d e=%d\n", l,e);
noteTbl[v] = note;
voices[v].startNote(note, 48000);
// limit highest note to C7, one octave above the Solina's maximum range
while(note>96) note -= 12;
voices[v].startNote(note);
d_debug("send voice on %3d to voice %d", note, v);
}

View File

@ -27,12 +27,12 @@ class Assigner {
public:
Assigner(Voice *v);
void handleMidi(MidiEvent *ev);
uint8_t noteTbl[NUM_VOICES]; // note played by voice
private:
void noteOn(uint8_t note); // incoming note on (or off, if velocity = 0)
void noteOff(uint8_t note); // incoming note off
uint8_t voiceTbl[NUM_VOICES]; // voices in order of use
uint8_t noteTbl[NUM_VOICES]; // note played by voice
Voice *voices;

View File

@ -24,16 +24,16 @@
#include "DistrhoPluginInfo.h"
Generator::Generator(uint32_t bufferSize) {
// some unit-local globals
float sampleRate = 0;
float envTc[2];
Generator::Generator(uint32_t bufferSize, double xSampleRate) {
sampleRate = xSampleRate;
output = new float[bufferSize];
}
Generator::~Generator() {
delete output;
}
void Generator::setupGenerator(double sampleRate) {
// create the phase increments for each semitone
for (uint8_t i = 0; i < 12; i++) {
phase[i] = 0;
@ -43,7 +43,11 @@ void Generator::setupGenerator(double sampleRate) {
}
}
void Generator::runBlock(uint8_t *noteTable, uint32_t frames) {
Generator::~Generator() {
delete output;
}
void Generator::runBlock(uint32_t frames) {
Voice *v;
uint32_t i;
uint8_t k, p, key, n1, n2, d;
@ -57,11 +61,9 @@ void Generator::runBlock(uint8_t *noteTable, uint32_t frames) {
}
for (k = 0; k < NUM_VOICES; k++) {
key = noteTable[k] & 0x7f;
n1 = key % 12, n2 = (key / 12 - 3);
v = &voices[k];
d = (phase[n1] & (0x40000000 >> n2)) != 0;
d = (phase[v->semi] & (0x40000000 >> v->oct)) != 0;
n = d ? 0.25 : -0.25;
v->vc34 = ((n - v->vc34) * v->c34) + v->vc34;
n -= v->vc34;
@ -69,50 +71,52 @@ void Generator::runBlock(uint8_t *noteTable, uint32_t frames) {
v->vc78 = ((n - v->vc78) * v->c78) + v->vc78;
v->vc107 = ((v->vc78 - v->vc107) * v->c107) + v->vc107;
d = (phase[n1] & (0x80000000 >> n2)) != 0;
d = (phase[v->semi] & (0x80000000 >> v->oct)) != 0;
n = d ? 0.25 : -0.25;
v->vc33 = ((n - v->vc33) * v->c33) + v->vc33;
n -= v->vc33;
n *= d ? 1 : 0;
v->vc22 = ((n - v->vc22) * v->c22) + v->vc22;
v->vc31 = ((v->vc31 - v->vc31) * v->c31) + v->vc31;
v->vc31 = ((v->vc22 - v->vc31) * v->c31) + v->vc31;
v->vca = ((v->gate - v->vca) * v->vcatc) + v->vca;
v->vca = ((v->gate - v->vca) * envTc[v->vcatc]) + v->vca;
float v4 = (v->vc78 - v->vc107);
float v8 = (v->vc22 - v->vc31);
output[i] += (v4 + v8) * v->vca; //((noteTable[k]&0x80)?0:1);
output[i] += 0.25 * (v4 + v8) * v->vca;
}
}
}
void Voice::startNote(uint8_t key, double sampleRate) {
void Voice::startNote(uint8_t key) {
// start a new note
// violin and viola filter params
float fc = 88.4 * powf(2, 0.083334 * (key - 24));
c34 = 1 - exp(-6.283 * fc / sampleRate);
c33 = 1 - exp(-6.283 * fc /2 / sampleRate);
c33 = 1 - exp(-6.283 * fc / 2 / sampleRate);
// violin register
fc = 4000 * powf(2, 0.06 * (key - 24));
fc = 4000 + 65.8 * powf(2, 0.08 * (key - 24));
c78 = 1 - exp(-6.283 * fc / sampleRate);
c107 = 1 - exp(-6.283 * 154.0 / sampleRate);
// viola register
fc = 6000 * powf(2, 0.07 * (key - 24));
fc = 3000 + 65.8 * powf(2, 0.07 * (key - 24));
c22 = 1 - exp(-6.283 * fc / sampleRate);
c31 = 1 - exp(-6.283 * 54.0 / sampleRate);
c31 = 1 - exp(-6.283 * 150.0 / sampleRate);
gate = 1;
vcatc = 0.0001;
vcatc = 0;
semi = key % 12, oct = (key / 12 - 3);
}
void Voice::stopNote() {
gate = 0;
vcatc = 0.000033;
vcatc = 1;
}
void Generator::setEnvelope(float attack, float sustain) {
envTc[0] = ((96* powf(100, -attack))/sampleRate);
envTc[1] = ((48* powf(100, -sustain))/sampleRate);
}

View File

@ -29,7 +29,7 @@ class Voice {
friend Generator;
public:
void startNote(uint8_t key, double sampleRate);
void startNote(uint8_t key);
void stopNote();
private:
@ -40,15 +40,16 @@ class Voice {
float c33 = 0, vc33 = 0;
float c78 = 0, vc78 = 0;
float c107 = 0, vc107 = 0;
float vca = 0, vcatc = 0, gate = 0;
float vca = 0, gate = 0;
uint8_t vcatc;
};
class Generator {
public:
Generator(uint32_t bufferSize);
Generator(uint32_t bufferSize, double xSampleRate);
~Generator();
void setupGenerator(double sampleRate);
void runBlock(uint8_t *noteTable, uint32_t frames);
void setEnvelope(float attack, float sustain);
void runBlock(uint32_t frames);
Voice voices[NUM_VOICES];
float *output;

View File

@ -21,6 +21,20 @@
void Sonnenlicht::initParameter(uint32_t index, Parameter& parameter) {
// define all the different control input parameters
switch (index) {
case pContraBass:
parameter.hints = kParameterIsAutomatable | kParameterIsBoolean;
parameter.name = "Contrabass";
parameter.symbol = "s_contra";
parameter.ranges.def = 1;
break;
case pCello:
parameter.hints = kParameterIsAutomatable | kParameterIsBoolean;
parameter.name = "Cello";
parameter.symbol = "s_cello";
parameter.ranges.def = 0;
break;
case pViola:
parameter.hints = kParameterIsAutomatable | kParameterIsBoolean;
parameter.name = "Viola";
@ -35,6 +49,26 @@ void Sonnenlicht::initParameter(uint32_t index, Parameter& parameter) {
parameter.ranges.def = 1;
break;
case pTrumpet:
parameter.hints = kParameterIsAutomatable | kParameterIsBoolean;
parameter.name = "Trumpet";
parameter.symbol = "s_trumpet";
parameter.ranges.def = 0;
break;
case pHorn:
parameter.hints = kParameterIsAutomatable | kParameterIsBoolean;
parameter.name = "Horn";
parameter.symbol = "s_horn";
parameter.ranges.def = 0;
break;
case pChorale:
parameter.hints = kParameterIsAutomatable | kParameterIsBoolean;
parameter.name = "Chorale";
parameter.symbol = "s_chorale";
parameter.ranges.def = 1;
break;
case pBassVolume:
parameter.hints = kParameterIsAutomatable;
parameter.name = "Bass Volume";
@ -43,19 +77,54 @@ void Sonnenlicht::initParameter(uint32_t index, Parameter& parameter) {
parameter.ranges.max = 1.0f;
parameter.ranges.def = 0.7f;
break;
case pAttack:
parameter.hints = kParameterIsAutomatable;
parameter.name = "Attack";
parameter.symbol = "s_attack";
parameter.ranges.min = 0.0f;
parameter.ranges.max = 1.0f;
parameter.ranges.def = 0.7f;
break;
case pSustain:
parameter.hints = kParameterIsAutomatable;
parameter.name = "Sustain";
parameter.symbol = "s_sustain";
parameter.ranges.min = 0.0f;
parameter.ranges.max = 1.0f;
parameter.ranges.def = 0.7f;
break;
}
}
void Sonnenlicht::setParameterValue(uint32_t index, float value) {
switch (index) {
case pViola:
viola = value;
prog.viola = value;
break;
case pViolin:
violin = value;
prog.violin = value;
break;
case pBassVolume:
bassVolume = value;
prog.bassVolume = value;
break;
case pAttack:
prog.attack = value;
genny->setEnvelope(prog.attack, prog.sustain);
break;
case pSustain:
prog.sustain = value;
genny->setEnvelope(prog.attack, prog.sustain);
//printf("pSustain: value=%f p.a %f p.s %f\n", value, prog.attack, prog.sustain);
break;
case pChorale:
prog.enableChorus = (bool)value;
break;
default:
break;
}
@ -67,14 +136,26 @@ void Sonnenlicht::setParameterValue(uint32_t index, float value) {
float Sonnenlicht::getParameterValue(uint32_t index) const {
switch (index) {
case pViola:
return viola;
return prog.viola;
case pViolin:
return prog.violin;
case pAttack:
return prog.attack;
case pSustain:
return prog.sustain;
case pBassVolume:
return bassVolume;
return prog.bassVolume;
case pChorale:
return (float)prog.enableChorus;
default:
return 0;
}
// if we fall all the way through...
return 2;
return 0;
}

View File

@ -21,9 +21,8 @@
START_NAMESPACE_DISTRHO
Sonnenlicht::Sonnenlicht() : Plugin(kParameterCount, 0, 0), fSampleRate(getSampleRate()) {
genny = new Generator(getBufferSize());
genny->setupGenerator(fSampleRate);
genny = new Generator(getBufferSize(), fSampleRate);
assigner = new Assigner(genny->voices);
chorus = new Chorus(getBufferSize(), fSampleRate);
@ -55,9 +54,15 @@ void Sonnenlicht::run(const float**, float** outputs, uint32_t frames,
assigner->handleMidi((MidiEvent*)&ev[i]);
}
genny->runBlock(assigner->noteTbl, frames);
genny->runBlock(frames);
if (prog.enableChorus) {
chorus->run(genny->output, outputs, frames);
} else {
memcpy(outputs[0], genny->output, frames * sizeof(float));
memcpy(outputs[1], genny->output, frames * sizeof(float));
}
}
Plugin* createPlugin() { return new Sonnenlicht(); }

View File

@ -26,12 +26,26 @@
START_NAMESPACE_DISTRHO
class Program {
public:
float viola = 0, violin = 0, bassVolume = 0;
float attack, sustain;
bool enableChorus;
};
class Sonnenlicht : public Plugin {
public:
enum Parameters {
pContraBass,
pCello,
pBassVolume,
pAttack,
pSustain,
pViola,
pViolin,
pBassVolume,
pTrumpet,
pHorn,
pChorale,
kParameterCount
};
@ -63,8 +77,9 @@ class Sonnenlicht : public Plugin {
const MidiEvent *midiEvents, uint32_t midiEventCount) override;
private:
float viola = 0, violin = 0, bassVolume = 0;
double fSampleRate;
Program prog;
Assigner *assigner;
Generator *genny;
Chorus *chorus;