diff options
Diffstat (limited to 'attic/muse2-oom/muse2/synti/vam/vam.cpp')
| -rw-r--r-- | attic/muse2-oom/muse2/synti/vam/vam.cpp | 1055 |
1 files changed, 0 insertions, 1055 deletions
diff --git a/attic/muse2-oom/muse2/synti/vam/vam.cpp b/attic/muse2-oom/muse2/synti/vam/vam.cpp deleted file mode 100644 index 6d9d181c..00000000 --- a/attic/muse2-oom/muse2/synti/vam/vam.cpp +++ /dev/null @@ -1,1055 +0,0 @@ -//========================================================= -// MusE -// Linux Music Editor -// -// Parts of this file taken from: -// The analogue oscillator from Steve Harris plugin collection. -// Werner Schweer's organ softsynth for MusE. -// The music-dsp source archive. -// -// (C) Copyright 2002 Jotsif Lindman H�nlund (jotsif@linux.nu) -// (C) Copyright 2005 Robert Jonsson (rj@spamatica.se) -// -// This program is free software; you can redistribute it and/or -// modify it under the terms of the GNU General Public License -// as published by the Free Software Foundation; either version 2 -// of the License, or (at your option) any later version. -// -// This program is distributed in the hope that it will be useful, -// but WITHOUT ANY WARRANTY; without even the implied warranty of -// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -// GNU General Public License for more details. -// -// You should have received a copy of the GNU General Public License -// along with this program; if not, write to the Free Software -// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA -// 02111-1307, USA or point your web browser to http://www.gnu.org. -//========================================================= - -#include <assert.h> -#include <cmath> -#include <stdio.h> -#include <list> - -#include "libsynti/mess.h" -#include "muse/midi.h" -#include "muse/midictrl.h" - -#include "vam.h" -#include "vamgui.h" -#include "libsynti/mono.h" - -// Denormalise floats, only actually needed for PIII and very recent PowerPC -#define DENORMALISE(fv) (((*(unsigned int*)&(fv))&0x7f800000)==0)?0.0f:(fv) - -// A fast, truncating towards 0 modulo function. ANSI C doesn't define -// which % will do, most truncate towards -inf -#define MOD(v,m) (v<0?v+m:(v>m?v-m:v)) - -// Limit values -#define LIMIT(v,l,u) (v<l?l:(v>u?u:v)) - -#define PI M_PI - -//--------------------------------------------------------- -// Oscillator -//--------------------------------------------------------- - -struct Oscillator { -float phase; -float pitchmod; -float detune; -float freq; -float pwm; -float pw; -float fm; -int waveform; -bool on; -}; - -struct LPFilter { -float out[4]; -float in[4]; -}; - -//--------------------------------------------------------- -// Envelope -//--------------------------------------------------------- - -struct EnvelopeGenerator { -static const int onStates = 2; -static const int offStates = 1; - -struct Segment { - int ticks; - double incr; -}; -Segment segment[onStates + offStates]; - -int state; -double env; -int tick; - -int attack; -int decay; -float sustain; -int release; - -EnvelopeGenerator() { - segment[0].ticks = 441; - segment[0].incr = 1.0/441.0; - segment[1].ticks = 0; - segment[1].incr = 0.0; - segment[2].ticks = 441; - segment[2].incr = -(1.0/441.0); -} - -void setSegment(int seg, int ticks, double incr) { - segment[seg].ticks = ticks; - segment[seg].incr = incr; -} - -void keyOn() { -// env = 0.0; - state = 0; - if(env) segment[state].incr = (1.0 - env) / segment[state].ticks; - else env = 0.0; - tick = segment[state].ticks; -} -void keyOff() { - state = onStates; - tick = segment[state].ticks; -} -bool isOff() { - return state == (onStates+offStates); -} -bool step() { - if(state >= onStates+offStates) - return false; - if (tick == 0) - return true; - env +=segment[state].incr; - if(env < 0.0) - env = 0.0; - --tick; - while(tick == 0) { - ++state; - if(state >= onStates+offStates) - return false; - if(state == onStates) - return true; - tick = segment[state].ticks; - } - return true; -} -}; - -//--------------------------------------------------------- -// VAM -//--------------------------------------------------------- - -class VAM : public MessMono { - static int useCount; - static const int CB_AMP_SIZE = 961; - static const int LIN2EXP_SIZE = 256; - - static double cb2amp_tab[CB_AMP_SIZE]; - static double cb2amp(double cb); - - static float lin2exp[LIN2EXP_SIZE]; - - /* Synthvariables */ - static float *sin_tbl, *tri_tbl, *saw_tbl, *squ_tbl; - bool isOn; - int pitch, channel; - float velocity; - - //int idata[NUM_CONTROLLER]; // buffer for init data - int *idata; - - EnvelopeGenerator dco1_env; - EnvelopeGenerator dco2_env; - EnvelopeGenerator filt_env; - - LPFilter dco1_filter; - LPFilter dco2_filter; - - Oscillator dco1; - Oscillator dco2; - Oscillator lfo; - - bool filt_invert, filt_keytrack; - double filt_env_mod, filt_res, filt_cutoff, keytrack_cutoff; - - int controller[NUM_CONTROLLER]; - void noteoff(int channel, int pitch); - void setController(int ctrl, int data); - float *wave_tbl(int wave); - double lowpass_filter(double cutoff, double resonance, double input, LPFilter *f); - - - VAMGui* gui; - - public: - virtual int getControllerInfo(int, const char**, int*, int*, int*, int*) const; - virtual void getInitData(int* n, const unsigned char**p) const; - virtual bool guiVisible() const; - virtual void showGui(bool); - virtual bool hasGui() const { return true; } - virtual void getGeometry(int* x, int* y, int* w, int* h) const; - virtual void setGeometry(int x, int y, int w, int h); - virtual void processMessages(); - virtual void process(float**, int, int); - virtual void note(int channel, int pitch, int velo); - virtual bool setController(int channel, int ctrl, int val); - virtual bool sysex(int, const unsigned char*); - VAM(int sr); - ~VAM(); - bool init(const char* name); -}; - -float* VAM::sin_tbl; -float* VAM::tri_tbl; -float* VAM::saw_tbl; -float* VAM::squ_tbl; -int VAM::useCount = 0; -double VAM::cb2amp_tab[VAM::CB_AMP_SIZE]; -float VAM::lin2exp[VAM::LIN2EXP_SIZE]; - - -//--------------------------------------------------------- -// VAM -//--------------------------------------------------------- - -VAM::VAM(int sr) - : MessMono() - { - idata = new int[NUM_CONTROLLER]; - setSampleRate(sr); - gui = 0; - } - -//--------------------------------------------------------- -// ~VAM -//--------------------------------------------------------- - -VAM::~VAM() - { - --useCount; - if (useCount == 0) { - delete[] sin_tbl; - delete[] tri_tbl; - delete[] saw_tbl; - delete[] squ_tbl; - } - } - -//--------------------------------------------------------- -// curTime -//--------------------------------------------------------- - -double VAM::cb2amp(double cb) - { - if(cb < 0.0) - return 1.0; - if(cb > 960.0) - return 0.0; - return cb2amp_tab[int(cb)]; - } - -double VAM::lowpass_filter(double cutoff, double resonance, double input, LPFilter *f) - { - double output; - cutoff *= 1.16; - - input -= f->out[3] * (resonance * 4.0) * (1.0 - 0.15 * cutoff * cutoff); - input *= 0.35013 * cutoff * cutoff * cutoff * cutoff; - - f->out[0] = input + 0.3 * f->in[0] + (1.0 - cutoff) * f->out[0]; // Pole 1 - f->in[0] = input; - f->out[1] = f->out[0] + 0.3 * f->in[1] + (1.0 - cutoff) * f->out[1]; // Pole 2 - f->in[1] = f->out[0]; - f->out[2] = f->out[1] + 0.3 * f->in[2] + (1.0 - cutoff) * f->out[2]; // Pole 3 - f->in[2] = f->out[1]; - f->out[3] = f->out[2] + 0.3 * f->in[3] + (1.0 - cutoff) * f->out[3]; // Pole 4 - f->in[3] = f->out[2]; - - // if(f.out[3] > 1.0) f.out[3] = 1.0; - - output = f->out[3]; - - - return output; - } - -float *VAM::wave_tbl(int wave) - { - if (wave == 0) { - return sin_tbl; - } - else if (wave == 1) { - return squ_tbl; - } - else if (wave == 2) { - return saw_tbl; - } - else if (wave == 3) { - return tri_tbl; - } - return sin_tbl; - } - -//--------------------------------------------------------- -// init -//--------------------------------------------------------- - -bool VAM::init(const char* name) - { - gui = new VAMGui; - gui->setWindowTitle(QString(name)); - gui->show(); - - if (useCount == 0) { - int i; - float tmp; - for(i = 0; i < CB_AMP_SIZE; i++) { - cb2amp_tab[i] = pow(10.0, double(i) / -300.0); - //cb2amp_tab[i] = 1.0 - i/(float)CB_AMP_SIZE; - } - for(i = 0; i < LIN2EXP_SIZE; i++) { - tmp = i/255.0; - lin2exp[i] = 1.5 * tmp * tmp * tmp - 0.69 * tmp * tmp + 0.16 * tmp; - } - int sr = sampleRate(); - /* Build up denormalised oscilator wavetables, these are sample_rate - long, costs more RAM to create them but makes freqency calcs much - cheaper, and means that interpolation isn't that neccesary, esp if - you use integer frequncies */ - - float *tmp_tbl = new float[sr]; - const int lag = sr/50; - sin_tbl = new float[sr]; - for (i = 0; i < sr; i++) { - tmp = sin(i * 2.0 * PI / sr); - sin_tbl[i] = DENORMALISE(tmp); - } - tri_tbl = new float[sr]; - for (i = 0; i < sr; i++) { - tmp = acos(cos(i * 2.0 * PI / sr)) / PI * 2.0 - 1.0; - tri_tbl[i] = DENORMALISE(tmp); - } - squ_tbl = new float[sr]; - for (i = 0; i < sr/2; i++) { - tmp_tbl[i] = -1.0f; - } - for (i = sr/2; i < sr; i++) { - tmp_tbl[i] = +1.0f; - } - tmp = -1.0f; - for (i = (sr/2)-lag; i < (sr/2)+lag; i++) { - tmp_tbl[i] = tmp; - tmp += 1.0/(lag * 2.0); - } - for (i = 0; i < sr; i++) { - squ_tbl[i] = (tmp_tbl[MOD(i-lag, sr)] + - tmp_tbl[MOD(i+lag, sr)]) * 0.5; - } - saw_tbl = new float[sr]; - for (i = 0; i < sr; i++) { - tmp = ((2.0 * i) - (float)sr) / (float)sr; - tmp_tbl[i] = DENORMALISE(tmp); - } - for (i = 0; i < sr; i++) { - saw_tbl[i] = (tmp_tbl[MOD(i-lag, sr)] + - tmp_tbl[MOD(i+lag, sr)]) * 0.5; - } - delete[] tmp_tbl; - } - - dco1_filter.out[0] = dco1_filter.out[1] = dco1_filter.out[2] = dco1_filter.out[3] = 0.0; - dco1_filter.in[0] = dco1_filter.in[1] = dco1_filter.in[2] = dco1_filter.in[3] = 0.0; - dco2_filter.out[0] = dco2_filter.out[1] = dco2_filter.out[2] = dco2_filter.out[3] = 0.0; - dco2_filter.in[0] = dco2_filter.in[1] = dco2_filter.in[2] = dco2_filter.in[3] = 0.0; - - ++useCount; - dco1.phase = 0.0; - dco2.phase = 0.0; - lfo.phase = 0.0; - - memset(controller, 0, sizeof(controller)); - - int maxval = 128*128-1; - - setController(0, DCO1_PITCHMOD, 8191); - setController(0, DCO2_PITCHMOD, 8191); - setController(0, DCO1_WAVEFORM, 1); - setController(0, DCO2_WAVEFORM, 1); - setController(0, DCO1_FM, 0); - setController(0, DCO2_FM, 0); - setController(0, DCO1_PWM, 0); - setController(0, DCO2_PWM, 0); - setController(0, DCO1_ATTACK, 0); - setController(0, DCO2_ATTACK, 0); - setController(0, DCO1_DECAY, 0); - setController(0, DCO2_DECAY, 0); - setController(0, DCO1_SUSTAIN, maxval - 255); - setController(0, DCO2_SUSTAIN, maxval - 255); - setController(0, DCO1_RELEASE, 0); - setController(0, DCO2_RELEASE, 0); - setController(0, LFO_FREQ, 0); - setController(0, LFO_WAVEFORM, 0); - setController(0, FILT_ENV_MOD, 0); - setController(0, FILT_KEYTRACK, 0); - setController(0, FILT_RES, 0); - setController(0, FILT_ATTACK, 0); - setController(0, FILT_DECAY, 0); - setController(0, FILT_SUSTAIN, maxval); - setController(0, FILT_RELEASE, 3); - setController(0, DCO2ON, 0); - setController(0, FILT_INVERT, 0); - setController(0, FILT_CUTOFF, 15000); - setController(0, DCO1_DETUNE, 8191); - setController(0, DCO2_DETUNE, 8191); - setController(0, DCO1_PW, 0); - setController(0, DCO2_PW, 0); - - isOn = false; - return false; - } - -//--------------------------------------------------------- -// processMessages -// Called from host always, even if output path is unconnected. -//--------------------------------------------------------- - -void VAM::processMessages() -{ - //Process messages from the gui - // - // get and process all pending events from the - // synthesizer GUI - // - while (gui->fifoSize()) - { - MidiPlayEvent ev = gui->readEvent(); - if (ev.type() == ME_CONTROLLER) - { - // process local? - setController(ev.dataA() & 0xfff, ev.dataB()); - sendEvent(ev); - } - else - printf("VAM::process(): unknown event\n"); - } -} - -//--------------------------------------------------------- -// process -// Called from host, ONLY if output path is connected. -//--------------------------------------------------------- - -void VAM::process(float** ports, int offset, int sampleCount) - { - /* - // - // get and process all pending events from the - // synthesizer GUI - // - while (gui->fifoSize()) { - MidiPlayEvent ev = gui->readEvent(); - if (ev.type() == ME_CONTROLLER) { - // process local? - setController(ev.dataA() & 0xfff, ev.dataB()); - sendEvent(ev); - } - else - printf("VAM::process(): unknown event\n"); - } - */ - - float* buffer = *ports + offset; - if (!isOn) - return; - - float sample, osc, lfol, *dco1_tbl, *dco2_tbl, *lfo_tbl, pw; - float cutoff; - int sr = sampleRate(); - - dco1_tbl = wave_tbl(dco1.waveform); - dco2_tbl = wave_tbl(dco2.waveform); - lfo_tbl = wave_tbl(lfo.waveform); - - cutoff = filt_keytrack ? (dco1.freq /500.0 + filt_cutoff)/2 : filt_cutoff; - cutoff = LIMIT(cutoff, 0.0, 1.0); - - for (int i = 0; i < sampleCount; i++) { - if(!(dco1_env.step() + dco2_env.step())) { - isOn = false; - break; - } - filt_env.step(); - - /* DCO 1 */ - lfol = lfo_tbl[(int)lfo.phase]; - pw = dco1.pw + dco1.pwm * lfol * 0.5; - pw = LIMIT(pw, 0.0, 1.0); - if(dco1.phase < sr/2 * ( 1.0 - pw)) - osc = dco1_tbl[int(dco1.phase / (1.0 - pw))]; - else - osc = dco1_tbl[int(dco1.phase / (1.0 + pw))]; - lfol = lfo_tbl[(int)lfo.phase]; - dco1.phase += dco1.freq + dco1.fm * lfol * 1500.0; - lfo.phase += lfo.freq * 50.0; - if(!filt_invert) - sample = lowpass_filter((cb2amp(960.0 * (1.0 - filt_env_mod * filt_env.env)) - + 1.0 - filt_env_mod) * cutoff, - filt_res, osc, &dco1_filter) * cb2amp(960.0 * (1.0 - dco1_env.env)); - else - sample = lowpass_filter((cb2amp(960.0 * (1.0 - filt_env_mod * (1.0 - filt_env.env))) - + 1.0 - filt_env_mod) * cutoff, - filt_res, osc, &dco1_filter) * cb2amp(960.0 * (1.0 - dco1_env.env)); - while(dco1.phase > sr) - dco1.phase -= sr; - while(dco1.phase < 0.0) - dco1.phase += sr; - - /* DCO 2 */ - if(dco2.on) { - pw = dco2.pw + dco2.pwm * lfol * 0.5; - pw = LIMIT(pw, 0.0, 1.0); - if(dco2.phase < sr/2 * (1 - pw)) - osc = dco2_tbl[int(dco2.phase / (1.0 - pw))]; - else - osc = dco2_tbl[int(dco2.phase / (1.0 + pw))]; - dco2.phase += dco2.freq + dco2.fm * lfol * 1500.0; - if(!filt_invert) - sample += lowpass_filter((cb2amp(960.0 * (1.0 - filt_env_mod * filt_env.env)) + 1.0 - filt_env_mod) * cutoff, - filt_res, osc, &dco2_filter) * cb2amp(960.0 * (1.0 - dco2_env.env)); - else sample += lowpass_filter((cb2amp(960.0 * (1.0 - filt_env_mod * (1.0 - filt_env.env))) + 1.0 - filt_env_mod) - * cutoff, filt_res, osc, &dco2_filter) * cb2amp(960.0 * (1.0 - dco2_env.env)); - - while (dco2.phase > sr) dco2.phase -= sr; - while (dco2.phase < 0.0) dco2.phase += sr; - } - while(lfo.phase > sr) - lfo.phase -= sr; - while(lfo.phase < 0.0) - lfo.phase += sr; - sample *= velocity * 0.5; - sample = LIMIT(sample, -1.0, 1.0); - - //if(sample > 1.0) fprintf(stderr, "oooops %f\n", sample); - buffer[i] = sample; - } - } - -//--------------------------------------------------------- -// note -//--------------------------------------------------------- - -void VAM::note(int chan, int newpitch, int velo) - { - if (velo == 0) { - noteoff(chan, newpitch); - return; - } - isOn = true; - channel = chan; - pitch = newpitch; - velocity = velo / 127.0; - dco1.freq = 8.176 * exp(float(pitch + dco1.pitchmod + dco1.detune)*log(2.0)/12.0); - dco2.freq = 8.176 * exp(float(pitch + dco2.pitchmod + dco2.detune)*log(2.0)/12.0); - keytrack_cutoff = 16.0 * dco1.freq / sampleRate(); - if(keytrack_cutoff > 1.0) keytrack_cutoff = 1.0; - dco1_env.setSegment(0, dco1_env.attack, 1.0/dco1_env.attack); - dco1_env.setSegment(1, dco1_env.decay, -((1.0-dco1_env.sustain)/dco1_env.decay)); - dco2_env.setSegment(0, dco2_env.attack, 1.0/dco2_env.attack); - dco2_env.setSegment(1, dco2_env.decay, -((1.0-dco2_env.sustain)/dco2_env.decay)); - filt_env.setSegment(0, filt_env.attack, 1.0/filt_env.attack); - filt_env.setSegment(1, filt_env.decay, -((1.0-filt_env.sustain)/filt_env.decay)); - dco1_env.keyOn(); - dco2_env.keyOn(); - filt_env.env = 0.0; - filt_env.keyOn(); - // dco1.phase = 0.0; - // dco2.phase = 0.0; - // lfo.phase = 0.0; - } - -//--------------------------------------------------------- -// noteoff -//--------------------------------------------------------- - -void VAM::noteoff(int chan, int offpitch) - { - if(isOn && (pitch == offpitch) && (channel == chan)) { - dco1_env.keyOff(); - dco2_env.keyOff(); - filt_env.keyOff(); - } - } - -int VAM::getControllerInfo(int id, const char** name, int* controller, - int* min, int* max, int* initval) const - { - return gui->getControllerInfo(id, name, controller, min, max, initval); - } - -//--------------------------------------------------------- -// setController -//--------------------------------------------------------- - -bool VAM::setController(int /*channel*/, int ctrl, int data) - { - setController(ctrl & 0xfff, data); - MidiPlayEvent ev(0, 0, channel, ME_CONTROLLER, ctrl, data); - gui->writeEvent(ev); - return false; - } - -void VAM::setController(int ctrl, int data) - { - // fprintf(stderr, "ctrl: %d data: %d\n", ctrl, data); - int maxval = 128*128-1; - double normval = double(data) / double(maxval); - switch (ctrl) { - case DCO1_PITCHMOD: - dco1.pitchmod = (data - 8191) / 341.333; - break; - case DCO1_WAVEFORM: - dco1.waveform = data; - break; - case DCO1_FM: - dco1.fm = lin2exp[int(normval * 255.0)]; - break; - case DCO1_PWM: - dco1.pwm = normval; - break; - case DCO1_ATTACK: - dco1_env.attack = int(lin2exp[int(normval * 255.0)] * 5.0 * sampleRate()) + 1; - break; - case DCO1_DECAY: - dco1_env.decay = (data * sampleRate() * 5) / maxval + 1; - break; - case DCO1_SUSTAIN: - dco1_env.sustain = normval; - break; - case DCO1_RELEASE: - dco1_env.release = int(lin2exp[int(normval * 255.0)] * 10.0 * sampleRate()) + 1; - dco1_env.setSegment(2, dco1_env.release, -(1.0/dco1_env.release)); - break; - - case DCO2_PITCHMOD: - dco2.pitchmod = (data - 8191) / 341.333; - break; - case DCO2_WAVEFORM: - dco2.waveform = data; - break; - case DCO2_FM: - dco2.fm = normval; - break; - case DCO2_PWM: - dco2.pwm = normval; - break; - case DCO2_ATTACK: - dco2_env.attack = int(lin2exp[int(normval * 255.0)] * 5.0 * sampleRate()) + 1; - break; - case DCO2_DECAY: - dco2_env.decay = (data * sampleRate() * 5) / maxval + 1; - break; - case DCO2_SUSTAIN: - dco2_env.sustain = normval; - break; - case DCO2_RELEASE: - dco2_env.release = int(lin2exp[int(normval * 255.0)] * 10.0 * sampleRate()) + 1; - dco2_env.setSegment(2, dco2_env.release, -(1.0/dco2_env.release)); - break; - case LFO_FREQ: - lfo.freq = lin2exp[int(normval * 255.0)]; - //fprintf(stderr, "%f\n", lfo.freq); - break; - case LFO_WAVEFORM: - lfo.waveform = data; - break; - case FILT_ENV_MOD: - filt_env_mod = 1.0 - lin2exp[int(255.0 - normval * 255.0)]; - break; - case FILT_KEYTRACK: - filt_keytrack = data; - break; - case FILT_RES: - filt_res = normval; - break; - case FILT_ATTACK: - //filt_env.attack = int(lin2exp[int(normval * 255.0)] * 5.0 * sampleRate()); - filt_env.attack = int(lin2exp[int(normval * 255.0)] * 5.0 * sampleRate()) + 1; - break; - case FILT_DECAY: - filt_env.decay = (data * sampleRate() * 5) / maxval + 1; - break; - case FILT_SUSTAIN: - filt_env.sustain = normval; - break; - case FILT_RELEASE: - filt_env.release = int(lin2exp[int(normval * 255.0)] * 10.0 * sampleRate()) + 1; - filt_env.setSegment(2, filt_env.release, -(1.0/filt_env.release)); - break; - case DCO2ON: - dco2.on = data; - break; - case FILT_INVERT: - filt_invert = data; - break; - case FILT_CUTOFF: - filt_cutoff = normval; - //fprintf(stderr, "%f\n", filt_cutoff); - break; - case DCO1_DETUNE: - dco1.detune = (data - 8191) / 16384.0; - break; - case DCO2_DETUNE: - dco2.detune = (data - 8191) / 16384.0; - break; - case DCO1_PW: - dco1.pw = normval; - if(dco1.pw == 1.0) - dco1.pw = 0.99; - break; - case DCO2_PW: - dco2.pw = normval; - if(dco2.pw == 1.0) dco2.pw = 0.99; - break; - default: - printf("VAM: set unknown Ctrl 0x%x to 0x%x\n", ctrl, data); - break; - } - controller[ctrl] = data; - } - -//--------------------------------------------------------- -// getInitData -//--------------------------------------------------------- - -void VAM::getInitData(int* n, const unsigned char**p) const - { - //int i;//prevent of compiler warning: unused variable - int* d = idata; - //int maxval = 128*128-1; //prevent of compiler warning: unused variable - *n = NUM_CONTROLLER * sizeof(int); - -// // setController(0, DCO1_PITCHMOD, p++); -// *d++ = int(dco1.pitchmod+8191*341.333); - *d++ = gui->getController(DCO1_PITCHMOD); - -// // setController(0, DCO2_PITCHMOD, p++); -// *d++ = int(dco2.pitchmod+8191*341.333); - *d++ = gui->getController(DCO2_PITCHMOD); - -// // setController(0, DCO1_WAVEFORM, p++); -// *d++ = dco1.waveform; - *d++ = gui->getController(DCO1_WAVEFORM); - -// // setController(0, DCO2_WAVEFORM, p++); -// *d++ = dco2.waveform; - *d++ = gui->getController(DCO2_WAVEFORM); - -// // setController(0, DCO1_FM, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs((lin2exp[i] == dco1.fm)) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(DCO1_FM); - -// -// -// // setController(0, DCO2_FM, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs((lin2exp[i] - dco2.fm)) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(DCO2_FM); - -// -// // setController(0, DCO1_PWM, p++); -// *d++ = int(dco1.pwm*double(maxval)); - *d++ = gui->getController(DCO1_PWM); - -// -// // setController(0, DCO2_PWM, p++); -// *d++ = int(dco2.pwm*double(maxval)); - *d++ = gui->getController(DCO2_PWM); - -// -// // setController(0, DCO1_ATTACK, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs(lin2exp[i] -( (dco1_env.attack-1)/5.0/sampleRate())) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(DCO1_ATTACK); -// -// // setController(0, DCO2_ATTACK, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs(lin2exp[i] -( (dco2_env.attack-1)/5.0/sampleRate())) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(DCO2_ATTACK); - -// -// // setController(0, DCO1_DECAY, p++); -// *d++ = int((dco1_env.decay-1)/sampleRate()/5 * maxval); - *d++ = gui->getController(DCO1_DECAY); - -// -// // setController(0, DCO2_DECAY, p++); -// *d++ = int((dco2_env.decay-1)/sampleRate()/5 * maxval); - *d++ = gui->getController(DCO2_DECAY); - -// -// // setController(0, DCO1_SUSTAIN, p++ ); -// *d++ = int(dco1_env.sustain*double(maxval)); - *d++ = gui->getController(DCO1_SUSTAIN); - -// -// // setController(0, DCO2_SUSTAIN, p++ ); -// *d++ = int(dco2_env.sustain*double(maxval)); - *d++ = gui->getController(DCO2_SUSTAIN); -// -// // setController(0, DCO1_RELEASE, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs(lin2exp[i] -( (dco1_env.release-1)/10.0/sampleRate())) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(DCO1_RELEASE); - -// -// // setController(0, DCO2_RELEASE, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs(lin2exp[i] -( (dco2_env.release-1)/10.0/sampleRate())) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(DCO2_RELEASE); - -// -// // setController(0, LFO_FREQ, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs((lin2exp[i] - lfo.freq)) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(LFO_FREQ); - -// -// // setController(0, LFO_WAVEFORM, p++); -// *d++ = lfo.waveform; - *d++ = gui->getController(LFO_WAVEFORM); - -// -// // setController(0, FILT_ENV_MOD, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs((lin2exp[i] - (1 - filt_env_mod))) < 0.1) -// break; -// } -// *d++ = int((255-i)/255.0*double(maxval)); - *d++ = gui->getController(FILT_ENV_MOD); - -// -// // setController(0, FILT_KEYTRACK, p++); -// *d++ = filt_keytrack; - *d++ = gui->getController(FILT_KEYTRACK); - -// -// // setController(0, FILT_RES, p++); -// *d++ = int(filt_res*double(maxval)); - *d++ = gui->getController(FILT_RES); - -// -// // setController(0, FILT_ATTACK, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs(lin2exp[i] -( (filt_env.attack-1)/5.0/sampleRate())) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(FILT_ATTACK); - -// -// // setController(0, FILT_DECAY, p++); -// *d++ = int((filt_env.decay-1)/sampleRate()*double(maxval)/5); - *d++ = gui->getController(FILT_DECAY); - -// -// // setController(0, FILT_SUSTAIN, p++); -// *d++ = int(filt_env.sustain*double(maxval)); - *d++ = gui->getController(FILT_SUSTAIN); - -// -// // setController(0, FILT_RELEASE, p++); -// for (i = 0;i<LIN2EXP_SIZE;i++) { -// if (fabs(lin2exp[i] -( (filt_env.release-1)/10.0/sampleRate())) < 0.1) -// break; -// } -// *d++ = int(i/255.0*double(maxval)); - *d++ = gui->getController(FILT_RELEASE); - -// -// // setController(0, DCO2ON, p++); -// *d++ = dco2.on; - *d++ = gui->getController(DCO2ON); - -// -// // setController(0, FILT_INVERT, p++); -// *d++ = filt_invert; - *d++ = gui->getController(FILT_INVERT); - -// -// // setController(0, FILT_CUTOFF, p++); -// *d++ = int(filt_cutoff*double(maxval)); - *d++ = gui->getController(FILT_CUTOFF); - -// -// // setController(0, DCO1_DETUNE, p++); -// *d++ = int(dco1.detune *16834 + 8191); - *d++ = gui->getController(DCO1_DETUNE); - -// -// // setController(0, DCO2_DETUNE, p++); -// *d++ = int(dco2.detune *16834 + 8191); - *d++ = gui->getController(DCO2_DETUNE); - -// -// // setController(0, DCO1_PW, p++); -// *d++ = int(dco1.pw*double(maxval)); - *d++ = gui->getController(DCO1_PW); - -// -// // setController(0, DCO2_PW, p++); -// *d++ = int(dco2.pw*double(maxval)); - *d++ = gui->getController(DCO2_PW); - - *p = (unsigned char*)idata; - } - -//--------------------------------------------------------- -// sysex -//--------------------------------------------------------- - -bool VAM::sysex(int n, const unsigned char* data) - { - n=n; // remove warning of unused variable - int *p= (int*)data; - setController(0, DCO1_PITCHMOD, *p++); - setController(0, DCO2_PITCHMOD, *p++); - setController(0, DCO1_WAVEFORM, *p++); - setController(0, DCO2_WAVEFORM, *p++); - setController(0, DCO1_FM, *p++); - setController(0, DCO2_FM, *p++); - setController(0, DCO1_PWM, *p++); - setController(0, DCO2_PWM, *p++); - setController(0, DCO1_ATTACK, *p++); - setController(0, DCO2_ATTACK, *p++); - setController(0, DCO1_DECAY, *p++); - setController(0, DCO2_DECAY, *p++); - setController(0, DCO1_SUSTAIN, *p++ ); - setController(0, DCO2_SUSTAIN, *p++ ); - setController(0, DCO1_RELEASE, *p++); - setController(0, DCO2_RELEASE, *p++); - setController(0, LFO_FREQ, *p++); - setController(0, LFO_WAVEFORM, *p++); - setController(0, FILT_ENV_MOD, *p++); - setController(0, FILT_KEYTRACK, *p++); - setController(0, FILT_RES, *p++); - setController(0, FILT_ATTACK, *p++); - setController(0, FILT_DECAY, *p++); - setController(0, FILT_SUSTAIN, *p++); - setController(0, FILT_RELEASE, *p++); - setController(0, DCO2ON, *p++); - setController(0, FILT_INVERT, *p++); - setController(0, FILT_CUTOFF, *p++); - setController(0, DCO1_DETUNE, *p++); - setController(0, DCO2_DETUNE, *p++); - setController(0, DCO1_PW, *p++); - setController(0, DCO2_PW, *p++); - - return false; - } - -//--------------------------------------------------------- -// guiVisible -//--------------------------------------------------------- - -bool VAM::guiVisible() const - { - return gui->isVisible(); - } - -//--------------------------------------------------------- -// showGui -//--------------------------------------------------------- - -void VAM::showGui(bool val) - { - gui->setVisible(val); - } - -//--------------------------------------------------------- -// getGeometry -//--------------------------------------------------------- - -void VAM::getGeometry(int* x, int* y, int* w, int* h) const - { - QPoint pos(gui->pos()); - QSize size(gui->size()); - *x = pos.x(); - *y = pos.y(); - *w = size.width(); - *h = size.height(); - } - -//--------------------------------------------------------- -// setGeometry -//--------------------------------------------------------- - -void VAM::setGeometry(int x, int y, int w, int h) - { - gui->resize(QSize(w, h)); - gui->move(QPoint(x, y)); - } - -//--------------------------------------------------------- -// inst -//--------------------------------------------------------- - -class QWidget; - -static Mess* instantiate(int sr, QWidget*, QString*, const char* name) - { - VAM* vam = new VAM(sr); - if (vam->init(name)) { - delete vam; - return 0; - } - return vam; - } - -extern "C" { - static MESS descriptor = { - "vam", - "vam soft synth", - "0.1", // version string - MESS_MAJOR_VERSION, MESS_MINOR_VERSION, - instantiate, - }; - // We must compile with -fvisibility=hidden to avoid namespace - // conflicts with global variables. - // Only visible symbol is "mess_descriptor". - // (TODO: all plugins should be compiled this way) - - __attribute__ ((visibility("default"))) - const MESS* mess_descriptor() { return &descriptor; } - } - |