Fixes, fixes, fixes.

master
Holger Wirtz 6 years ago
parent 617ba419ab
commit e52f897867
  1. 4
      config.h
  2. 72
      mdaEPiano.cpp
  3. 3
      mdaEPiano.h

@ -34,8 +34,9 @@
#define TEENSY_AUDIO_BOARD 1 #define TEENSY_AUDIO_BOARD 1
#define VOLUME 0.3 #define VOLUME 0.3
#define DEFAULT_MIDI_CHANNEL MIDI_CHANNEL_OMNI #define DEFAULT_MIDI_CHANNEL MIDI_CHANNEL_OMNI
#define AUDIO_MEM 4 #define AUDIO_MEM 300
#define SAMPLE_RATE 44100 #define SAMPLE_RATE 44100
#define REDUCE_LOUDNESS 0
#if !defined(__MK66FX1M0__) // check for Teensy-3.6 #if !defined(__MK66FX1M0__) // check for Teensy-3.6
#define NVOCIES 11 // No? #define NVOCIES 11 // No?
@ -85,4 +86,3 @@
#define EEPROM_MASTER_VOLUME_ADDR 2 #define EEPROM_MASTER_VOLUME_ADDR 2
#define EEPROM_VOLUME_RIGHT_ADDR 3 #define EEPROM_VOLUME_RIGHT_ADDR 3
#define EEPROM_VOLUME_LEFT_ADDR 4 #define EEPROM_VOLUME_LEFT_ADDR 4

@ -118,7 +118,6 @@ mdaEPiano::mdaEPiano() // mdaEPiano::mdaEPiano(audioMasterCallback audioMaster)
voice[v].env = 0.0f; voice[v].env = 0.0f;
voice[v].dec = 0.99f; //all notes off voice[v].dec = 0.99f; //all notes off
} }
notes[0] = EVENTS_DONE;
volume = 0.2f; volume = 0.2f;
muff = 160.0f; muff = 160.0f;
sustain = activevoices = 0; sustain = activevoices = 0;
@ -335,22 +334,15 @@ float mdaEPiano::getParameter(int32_t index) {
void mdaEPiano::process(int16_t *outputs_r, int16_t *outputs_l, int32_t sampleFrames) void mdaEPiano::process(int16_t *outputs_r, int16_t *outputs_l, int32_t sampleFrames)
{ {
int32_t event = 0, frame = 0, frames, v; int16_t v;
float x, l, r, od = overdrive; float x, l, r, od = overdrive;
int32_t i; int32_t i;
int16_t frame;
while (frame < sampleFrames) for (frame = 0; frame < sampleFrames; frame++)
{
frames = notes[event++];
if (frames > sampleFrames) frames = sampleFrames;
frames -= frame;
frame += frames;
while (--frames >= 0)
{ {
VOICE *V = voice; VOICE *V = voice;
l = r = 0.0f; l = r = 0.0f;
for (v = 0; v < activevoices; v++) for (v = 0; v < activevoices; v++)
{ {
V->frac += V->delta; //integer-based linear interpolation V->frac += V->delta; //integer-based linear interpolation
@ -362,20 +354,19 @@ void mdaEPiano::process(int16_t *outputs_r, int16_t *outputs_l, int32_t sampleFr
//x = V->env * (*(float *)&i - 3.0f); //fast int->float //x = V->env * (*(float *)&i - 3.0f); //fast int->float
//x = V->env * (float)i / 32768.0f; //x = V->env * (float)i / 32768.0f;
i = waves[V->pos] + ((V->frac * (waves[V->pos + 1] - waves[V->pos])) >> 16); i = waves[V->pos] + ((V->frac * (waves[V->pos + 1] - waves[V->pos])) >> 16);
x = V->env * (float)i / 32768.0f; //x = V->env * (float)i / 32768.0f;
V->env = V->env * V->dec; //envelope V->env = V->env * V->dec; //envelope
if (x > 0.0f) { //if(x>0.0f) { x -= od * x * x; if(x < -V->env) x = -V->env; } //+= 0.5f * x * x; } //overdrive
x -= od * x * x; //overdrive
if (x < -V->env) x = -V->env;
} //+= 0.5f * x * x; }
l += V->outl * x; //l += V->outl * x;
r += V->outr * x; //r += V->outr * x;
V++; V++;
} }
/*
tl += tfrq * (l - tl); //treble boost tl += tfrq * (l - tl); //treble boost
tr += tfrq * (r - tr); tr += tfrq * (r - tr);
r += treb * (r - tr); r += treb * (r - tr);
@ -386,10 +377,14 @@ void mdaEPiano::process(int16_t *outputs_r, int16_t *outputs_l, int32_t sampleFr
l += l * lmod * lfo1; l += l * lmod * lfo1;
r += r * rmod * lfo1; //worth making all these local variables? r += r * rmod * lfo1; //worth making all these local variables?
outputs_r[sampleFrames - frames] = static_cast<int16_t>(r * 0x8000); outputs_l[v] = int16_t(l * 0xFFFF) >> REDUCE_LOUDNESS;
outputs_l[sampleFrames - frames] = static_cast<int16_t>(l * 0x8000); outputs_r[v] = int16_t(r * 0xFFFF) >> REDUCE_LOUDNESS;
} */
outputs_l[v] = i >> REDUCE_LOUDNESS;
outputs_r[v] = i >> REDUCE_LOUDNESS;
}
/*
if (frame < sampleFrames) if (frame < sampleFrames)
{ {
if (activevoices == 0 && programs[curProgram].param[4] > 0.5f) if (activevoices == 0 && programs[curProgram].param[4] > 0.5f)
@ -397,16 +392,20 @@ void mdaEPiano::process(int16_t *outputs_r, int16_t *outputs_l, int32_t sampleFr
lfo0 = -0.7071f; //reset LFO phase - good idea? lfo0 = -0.7071f; //reset LFO phase - good idea?
lfo1 = 0.7071f; lfo1 = 0.7071f;
} }
int32_t note = notes[event++];
int32_t vel = notes[event++];
noteOn(note, vel);
}
} }
*/
if (fabs(tl) < 1.0e-10) tl = 0.0f; //anti-denormal if (fabs(tl) < 1.0e-10) tl = 0.0f; //anti-denormal
if (fabs(tr) < 1.0e-10) tr = 0.0f; if (fabs(tr) < 1.0e-10) tr = 0.0f;
for (v = 0; v < activevoices; v++) if (voice[v].env < SILENCE) voice[v] = voice[--activevoices]; for (v = 0; v < activevoices; v++) if (voice[v].env < SILENCE) voice[v] = voice[--activevoices];
notes[0] = EVENTS_DONE; //mark events buffer as done
/*
for (v = 0; v < sampleFrames; v++)
{
outputs_r[v] = int16_t(o0[v] * 0xFFFF) >> REDUCE_LOUDNESS;
outputs_l[v] = int16_t(o1[v] * 0xFFFF) >> REDUCE_LOUDNESS;
}
*/
} }
void mdaEPiano::noteOn(int32_t note, int32_t velocity) void mdaEPiano::noteOn(int32_t note, int32_t velocity)
@ -439,7 +438,7 @@ void mdaEPiano::noteOn(int32_t note, int32_t velocity)
if (note > 60) l += stretch * (float)k; //stretch if (note > 60) l += stretch * (float)k; //stretch
s = size; s = size;
//if(velocity > 40) s += (VstInt32)(sizevel * (float)(velocity - 40)); - no velocity to hardness in ePiano //if(velocity > 40) s += (int32_t)(sizevel * (float)(velocity - 40)); - no velocity to hardness in ePiano
k = 0; k = 0;
while (note > (kgrp[k].high + s)) k += 3; //find keygroup while (note > (kgrp[k].high + s)) k += 3; //find keygroup
@ -489,20 +488,15 @@ void mdaEPiano::noteOn(int32_t note, int32_t velocity)
bool mdaEPiano::processMidiMessage(uint8_t type, uint8_t data1, uint8_t data2) bool mdaEPiano::processMidiMessage(uint8_t type, uint8_t data1, uint8_t data2)
{ {
float* param = programs[curProgram].param; float* param = programs[curProgram].param;
int32_t npos = 0;
switch (type) switch (type)
{ {
case 0x80: //note off case 0x80: //note off
notes[npos++] = 0; //delta noteOn(data1 & 0x7F, 0);
notes[npos++] = data1 & 0x7F; //note
notes[npos++] = 0; //vel
break; break;
case 0x90: //note on case 0x90: //note on
notes[npos++] = 0; //delta noteOn(data1 & 0x7F, data2 & 0x7F);
notes[npos++] = data1 & 0x7F; //note
notes[npos++] = data2 & 0x7F; //vel
break; break;
case 0xB0: //controller case 0xB0: //controller
@ -527,9 +521,7 @@ bool mdaEPiano::processMidiMessage(uint8_t type, uint8_t data1, uint8_t data2)
sustain = data2 & 0x40; sustain = data2 & 0x40;
if (sustain == 0) if (sustain == 0)
{ {
notes[npos++] = 0; noteOn(SUSTAIN, 0); //end all sustained notes
notes[npos++] = SUSTAIN; //end all sustained notes
notes[npos++] = 0;
} }
break; break;
@ -551,11 +543,6 @@ bool mdaEPiano::processMidiMessage(uint8_t type, uint8_t data1, uint8_t data2)
default: break; default: break;
} }
if (npos > EVENTBUFFER)
npos -= 3; //discard events if buffer full!!
notes[npos] = EVENTS_DONE;
return (true); return (true);
} }
@ -639,4 +626,3 @@ bool mdaEPiano::processMidiMessage(uint8_t type, uint8_t data1, uint8_t data2)
return 1; return 1;
} }
*/ */

@ -4,6 +4,7 @@
#define __mdaEPiano__ #define __mdaEPiano__
#include <Audio.h> #include <Audio.h>
#include <Arduino.h>
#include <string.h> #include <string.h>
#include "config.h" #include "config.h"
@ -97,8 +98,6 @@ private:
float Fs, iFs; float Fs, iFs;
#define EVENTBUFFER 120 #define EVENTBUFFER 120
#define EVENTS_DONE 99999999
int32_t notes[EVENTBUFFER + 8]; //list of delta|note|velocity for current block
///global internal variables ///global internal variables
KGRP kgrp[34]; KGRP kgrp[34];

Loading…
Cancel
Save