@@ -79,6 +79,7 @@ ifeq ($(HAVE_OPENGL),true) | |||||
OBJS += \ | OBJS += \ | ||||
distrho-3bandeq.cpp.o \ | distrho-3bandeq.cpp.o \ | ||||
distrho-3bandsplitter.cpp.o \ | distrho-3bandsplitter.cpp.o \ | ||||
distrho-nekobi.cpp.o \ | |||||
distrho-pingpongpan.cpp.o \ | distrho-pingpongpan.cpp.o \ | ||||
distrho-stereoenhancer.cpp.o | distrho-stereoenhancer.cpp.o | ||||
endif | endif | ||||
@@ -171,6 +172,9 @@ distrho-3bandeq.cpp.o: distrho-3bandeq.cpp 3bandeq/*.cpp 3bandeq/*.h 3bandeq/*.h | |||||
distrho-3bandsplitter.cpp.o: distrho-3bandsplitter.cpp 3bandsplitter/*.cpp 3bandsplitter/*.h 3bandsplitter/*.hpp distrho/DistrhoPluginCarla.cpp $(CXXDEPS) | distrho-3bandsplitter.cpp.o: distrho-3bandsplitter.cpp 3bandsplitter/*.cpp 3bandsplitter/*.h 3bandsplitter/*.hpp distrho/DistrhoPluginCarla.cpp $(CXXDEPS) | ||||
$(CXX) $< $(GL_CXX_FLAGS) -I3bandsplitter -DDISTRHO_NAMESPACE=DISTRHO_3BandSplitter -c -o $@ | $(CXX) $< $(GL_CXX_FLAGS) -I3bandsplitter -DDISTRHO_NAMESPACE=DISTRHO_3BandSplitter -c -o $@ | ||||
distrho-nekobi.cpp.o: distrho-nekobi.cpp nekobi/*.cpp nekobi/*.h nekobi/*.hpp nekobi/nekobee-src/*.c nekobi/nekobee-src/*.h distrho/DistrhoPluginCarla.cpp $(CXXDEPS) | |||||
$(CXX) $< $(GL_CXX_FLAGS) -Inekobi -DDISTRHO_NAMESPACE=DISTRHO_Nekobi -c -o $@ | |||||
distrho-pingpongpan.cpp.o: distrho-pingpongpan.cpp pingpongpan/*.cpp pingpongpan/*.h pingpongpan/*.hpp distrho/DistrhoPluginCarla.cpp $(CXXDEPS) | distrho-pingpongpan.cpp.o: distrho-pingpongpan.cpp pingpongpan/*.cpp pingpongpan/*.h pingpongpan/*.hpp distrho/DistrhoPluginCarla.cpp $(CXXDEPS) | ||||
$(CXX) $< $(GL_CXX_FLAGS) -Ipingpongpan -DDISTRHO_NAMESPACE=DISTRHO_PingPongPan -c -o $@ | $(CXX) $< $(GL_CXX_FLAGS) -Ipingpongpan -DDISTRHO_NAMESPACE=DISTRHO_PingPongPan -c -o $@ | ||||
@@ -0,0 +1,58 @@ | |||||
/* | |||||
* Carla Native Plugins | |||||
* Copyright (C) 2012-2013 Filipe Coelho <falktx@falktx.com> | |||||
* | |||||
* 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 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. | |||||
* | |||||
* For a full copy of the GNU General Public License see the GPL.txt file | |||||
*/ | |||||
#include "CarlaNative.hpp" | |||||
// Plugin Code | |||||
#include "nekobi/DistrhoArtworkNekobi.cpp" | |||||
#include "nekobi/DistrhoPluginNekobi.cpp" | |||||
#include "nekobi/DistrhoUINekobi.cpp" | |||||
// Carla DISTRHO Plugin | |||||
#include "distrho/DistrhoPluginCarla.cpp" | |||||
START_NAMESPACE_DISTRHO | |||||
// ----------------------------------------------------------------------- | |||||
static const PluginDescriptor nekobiDesc = { | |||||
/* category */ PLUGIN_CATEGORY_EQ, | |||||
/* hints */ static_cast<PluginHints>(PLUGIN_IS_RTSAFE|PLUGIN_IS_SYNTH|PLUGIN_HAS_GUI), | |||||
/* audioIns */ DISTRHO_PLUGIN_NUM_INPUTS, | |||||
/* audioOuts */ DISTRHO_PLUGIN_NUM_OUTPUTS, | |||||
/* midiIns */ 1, | |||||
/* midiOuts */ 0, | |||||
/* paramIns */ DistrhoPluginNekobi::paramCount, | |||||
/* paramOuts */ 0, | |||||
/* name */ DISTRHO_PLUGIN_NAME, | |||||
/* label */ "Nekobi", | |||||
/* maker */ "falkTX", | |||||
/* copyright */ "GPL v2+", | |||||
PluginDescriptorFILL(PluginCarla) | |||||
}; | |||||
END_NAMESPACE_DISTRHO | |||||
// ----------------------------------------------------------------------- | |||||
void carla_register_native_plugin_Nekobi() | |||||
{ | |||||
USE_NAMESPACE_DISTRHO | |||||
carla_register_native_plugin(&nekobiDesc); | |||||
} | |||||
// ----------------------------------------------------------------------- |
@@ -378,10 +378,10 @@ protected: | |||||
const ::MidiEvent* const midiEvent = &midiEvents[i]; | const ::MidiEvent* const midiEvent = &midiEvents[i]; | ||||
MidiEvent* const realMidiEvent = &fRealMidiEvents[i]; | MidiEvent* const realMidiEvent = &fRealMidiEvents[i]; | ||||
realMidiEvent->buffer[0] = midiEvent->data[0]; | |||||
realMidiEvent->buffer[1] = midiEvent->data[1]; | |||||
realMidiEvent->buffer[2] = midiEvent->data[2]; | |||||
realMidiEvent->frame = midiEvent->time; | |||||
realMidiEvent->frame = midiEvent->time; | |||||
realMidiEvent->size = midiEvent->size; | |||||
carla_copy<uint8_t>(realMidiEvent->buf, midiEvent->data, midiEvent->size); | |||||
} | } | ||||
fPlugin.run(inBuffer, outBuffer, frames, i, fRealMidiEvents); | fPlugin.run(inBuffer, outBuffer, frames, i, fRealMidiEvents); | ||||
@@ -0,0 +1,75 @@ | |||||
/* (Auto-generated binary data file). */ | |||||
#ifndef BINARY_DISTRHOARTWORKNEKOBI_HPP | |||||
#define BINARY_DISTRHOARTWORKNEKOBI_HPP | |||||
namespace DistrhoArtworkNekobi | |||||
{ | |||||
extern const char* backgroundData; | |||||
const unsigned int backgroundDataSize = 206064; | |||||
const unsigned int backgroundWidth = 636; | |||||
const unsigned int backgroundHeight = 108; | |||||
extern const char* claw1Data; | |||||
const unsigned int claw1DataSize = 4096; | |||||
const unsigned int claw1Width = 32; | |||||
const unsigned int claw1Height = 32; | |||||
extern const char* claw2Data; | |||||
const unsigned int claw2DataSize = 4096; | |||||
const unsigned int claw2Width = 32; | |||||
const unsigned int claw2Height = 32; | |||||
extern const char* knobData; | |||||
const unsigned int knobDataSize = 288444; | |||||
const unsigned int knobWidth = 43; | |||||
const unsigned int knobHeight = 1677; | |||||
extern const char* run1Data; | |||||
const unsigned int run1DataSize = 4096; | |||||
const unsigned int run1Width = 32; | |||||
const unsigned int run1Height = 32; | |||||
extern const char* run2Data; | |||||
const unsigned int run2DataSize = 4096; | |||||
const unsigned int run2Width = 32; | |||||
const unsigned int run2Height = 32; | |||||
extern const char* run3Data; | |||||
const unsigned int run3DataSize = 4096; | |||||
const unsigned int run3Width = 32; | |||||
const unsigned int run3Height = 32; | |||||
extern const char* run4Data; | |||||
const unsigned int run4DataSize = 4096; | |||||
const unsigned int run4Width = 32; | |||||
const unsigned int run4Height = 32; | |||||
extern const char* scratch1Data; | |||||
const unsigned int scratch1DataSize = 4096; | |||||
const unsigned int scratch1Width = 32; | |||||
const unsigned int scratch1Height = 32; | |||||
extern const char* scratch2Data; | |||||
const unsigned int scratch2DataSize = 4096; | |||||
const unsigned int scratch2Width = 32; | |||||
const unsigned int scratch2Height = 32; | |||||
extern const char* sitData; | |||||
const unsigned int sitDataSize = 4096; | |||||
const unsigned int sitWidth = 32; | |||||
const unsigned int sitHeight = 32; | |||||
extern const char* sliderData; | |||||
const unsigned int sliderDataSize = 4624; | |||||
const unsigned int sliderWidth = 34; | |||||
const unsigned int sliderHeight = 34; | |||||
extern const char* tailData; | |||||
const unsigned int tailDataSize = 4096; | |||||
const unsigned int tailWidth = 32; | |||||
const unsigned int tailHeight = 32; | |||||
} | |||||
#endif // BINARY_DISTRHOARTWORKNEKOBI_HPP | |||||
@@ -0,0 +1,37 @@ | |||||
/* | |||||
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others. | |||||
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com> | |||||
* | |||||
* 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 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. | |||||
* | |||||
* For a full copy of the GNU General Public License see the GPL.txt file | |||||
*/ | |||||
#ifndef __DISTRHO_PLUGIN_INFO_H__ | |||||
#define __DISTRHO_PLUGIN_INFO_H__ | |||||
#define DISTRHO_PLUGIN_NAME "Nekobi" | |||||
#define DISTRHO_PLUGIN_HAS_UI 1 | |||||
#define DISTRHO_PLUGIN_IS_SYNTH 1 | |||||
#define DISTRHO_PLUGIN_NUM_INPUTS 0 | |||||
#define DISTRHO_PLUGIN_NUM_OUTPUTS 1 | |||||
#define DISTRHO_PLUGIN_WANT_LATENCY 0 | |||||
#define DISTRHO_PLUGIN_WANT_PROGRAMS 1 | |||||
#define DISTRHO_PLUGIN_WANT_STATE 0 | |||||
#define DISTRHO_PLUGIN_URI "http://distrho.sf.net/plugins/Nekobi" | |||||
#define DISTRHO_UI_OPENGL | |||||
#endif // __DISTRHO_PLUGIN_INFO_H__ |
@@ -0,0 +1,422 @@ | |||||
/* | |||||
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others. | |||||
* Copyright (C) 2004 Sean Bolton and others | |||||
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com> | |||||
* | |||||
* 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 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. | |||||
* | |||||
* For a full copy of the GNU General Public License see the GPL.txt file | |||||
*/ | |||||
#include "DistrhoPluginNekobi.hpp" | |||||
#include "CarlaUtils.hpp" | |||||
extern "C" { | |||||
#include "nekobee-src/nekobee_synth.c" | |||||
#include "nekobee-src/nekobee_voice.c" | |||||
#include "nekobee-src/nekobee_voice_render.c" | |||||
#include "nekobee-src/minblep_tables.c" | |||||
/* ---- mutual exclusion ---- */ | |||||
bool dssp_voicelist_mutex_trylock(nekobee_synth_t* synth) | |||||
{ | |||||
/* Attempt the mutex lock */ | |||||
if (pthread_mutex_trylock(&synth->voicelist_mutex) != 0) | |||||
{ | |||||
synth->voicelist_mutex_grab_failed = 1; | |||||
return false; | |||||
} | |||||
/* Clean up if a previous mutex grab failed */ | |||||
if (synth->voicelist_mutex_grab_failed) | |||||
{ | |||||
nekobee_synth_all_voices_off(synth); | |||||
synth->voicelist_mutex_grab_failed = 0; | |||||
} | |||||
return true; | |||||
} | |||||
bool dssp_voicelist_mutex_lock(nekobee_synth_t* synth) | |||||
{ | |||||
return (pthread_mutex_lock(&synth->voicelist_mutex) == 0); | |||||
} | |||||
bool dssp_voicelist_mutex_unlock(nekobee_synth_t *synth) | |||||
{ | |||||
return (pthread_mutex_unlock(&synth->voicelist_mutex) == 0); | |||||
} | |||||
/* | |||||
* nekobee_handle_raw_event | |||||
*/ | |||||
void nekobee_handle_raw_event(nekobee_synth_t* synth, uint8_t size, const uint8_t* data) | |||||
{ | |||||
if (size != 3) | |||||
return; | |||||
switch (data[0] & 0xf0) | |||||
{ | |||||
case 0x80: | |||||
nekobee_synth_note_off(synth, data[1], data[2]); | |||||
break; | |||||
case 0x90: | |||||
if (data[2] > 0) | |||||
nekobee_synth_note_on(synth, data[1], data[2]); | |||||
else | |||||
nekobee_synth_note_off(synth, data[1], 64); /* shouldn't happen, but... */ | |||||
break; | |||||
case 0xB0: | |||||
nekobee_synth_control_change(synth, data[1], data[2]); | |||||
break; | |||||
default: | |||||
break; | |||||
} | |||||
} | |||||
} /* extern "C" */ | |||||
START_NAMESPACE_DISTRHO | |||||
// ------------------------------------------------- | |||||
DistrhoPluginNekobi::DistrhoPluginNekobi() | |||||
: Plugin(paramCount, 1, 0) // 1 program, 0 states | |||||
{ | |||||
nekobee_init_tables(); | |||||
// init synth | |||||
fSynth = new nekobee_synth_t; | |||||
fSynth->sample_rate = d_sampleRate(); | |||||
fSynth->deltat = 1.0f / (float)d_sampleRate(); | |||||
fSynth->nugget_remains = 0; | |||||
fSynth->note_id = 0; | |||||
fSynth->polyphony = XSYNTH_DEFAULT_POLYPHONY; | |||||
fSynth->voices = XSYNTH_DEFAULT_POLYPHONY; | |||||
fSynth->monophonic = XSYNTH_MONO_MODE_ONCE; | |||||
fSynth->glide = 0; | |||||
fSynth->last_noteon_pitch = 0.0f; | |||||
fSynth->vcf_accent = 0.0f; | |||||
fSynth->vca_accent = 0.0f; | |||||
for (int i=0; i<8; ++i) | |||||
fSynth->held_keys[i] = -1; | |||||
fSynth->voice = nekobee_voice_new(); | |||||
fSynth->voicelist_mutex_grab_failed = 0; | |||||
pthread_mutex_init(&fSynth->voicelist_mutex, NULL); | |||||
fSynth->channel_pressure = 0; | |||||
fSynth->pitch_wheel_sensitivity = 0; | |||||
fSynth->pitch_wheel = 0; | |||||
for (int i=0; i<128; ++i) | |||||
{ | |||||
fSynth->key_pressure[i] = 0; | |||||
fSynth->cc[i] = 0; | |||||
} | |||||
fSynth->cc[7] = 127; // full volume | |||||
fSynth->mod_wheel = 1.0f; | |||||
fSynth->pitch_bend = 1.0f; | |||||
fSynth->cc_volume = 1.0f; | |||||
// set default values | |||||
d_setProgram(0); | |||||
// reset | |||||
d_deactivate(); | |||||
} | |||||
DistrhoPluginNekobi::~DistrhoPluginNekobi() | |||||
{ | |||||
free(fSynth->voice); | |||||
delete fSynth; | |||||
} | |||||
// ------------------------------------------------- | |||||
// Init | |||||
void DistrhoPluginNekobi::d_initParameter(uint32_t index, Parameter& parameter) | |||||
{ | |||||
switch (index) | |||||
{ | |||||
case paramWaveform: | |||||
parameter.hints = PARAMETER_IS_AUTOMABLE|PARAMETER_IS_BOOLEAN; | |||||
parameter.name = "Waveform"; | |||||
parameter.symbol = "waveform"; | |||||
parameter.ranges.def = 0.0f; | |||||
parameter.ranges.min = 0.0f; | |||||
parameter.ranges.max = 1.0f; | |||||
break; | |||||
case paramTuning: | |||||
parameter.hints = PARAMETER_IS_AUTOMABLE; // was 0.5 <-> 2.0, log | |||||
parameter.name = "Tuning"; | |||||
parameter.symbol = "tuning"; | |||||
parameter.ranges.def = 0.0f; | |||||
parameter.ranges.min = -12.0f; | |||||
parameter.ranges.max = 12.0f; | |||||
break; | |||||
case paramCutoff: | |||||
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x2.5 | |||||
parameter.name = "Cutoff"; | |||||
parameter.symbol = "cutoff"; | |||||
parameter.unit = "%"; | |||||
parameter.ranges.def = 25.0f; | |||||
parameter.ranges.min = 0.0f; | |||||
parameter.ranges.max = 100.0f; | |||||
break; | |||||
case paramResonance: | |||||
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x100 | |||||
parameter.name = "VCF Resonance"; | |||||
parameter.symbol = "resonance"; | |||||
parameter.unit = "%"; | |||||
parameter.ranges.def = 25.0f; | |||||
parameter.ranges.min = 0.0f; | |||||
parameter.ranges.max = 95.0f; | |||||
break; | |||||
case paramEnvMod: | |||||
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x100 | |||||
parameter.name = "Env Mod"; | |||||
parameter.symbol = "env_mod"; | |||||
parameter.unit = "%"; | |||||
parameter.ranges.def = 50.0f; | |||||
parameter.ranges.min = 0.0f; | |||||
parameter.ranges.max = 100.0f; | |||||
break; | |||||
case paramDecay: | |||||
parameter.hints = PARAMETER_IS_AUTOMABLE; // was 0.000009 <-> 0.0005, log | |||||
parameter.name = "Decay"; | |||||
parameter.symbol = "decay"; | |||||
parameter.unit = "%"; | |||||
parameter.ranges.def = 75.0f; | |||||
parameter.ranges.min = 0.0f; | |||||
parameter.ranges.max = 100.0f; | |||||
break; | |||||
case paramAccent: | |||||
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x100 | |||||
parameter.name = "Accent"; | |||||
parameter.symbol = "accent"; | |||||
parameter.unit = "%"; | |||||
parameter.ranges.def = 25.0f; | |||||
parameter.ranges.min = 0.0f; | |||||
parameter.ranges.max = 100.0f; | |||||
break; | |||||
case paramVolume: | |||||
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x100 | |||||
parameter.name = "Volume"; | |||||
parameter.symbol = "volume"; | |||||
parameter.unit = "%"; | |||||
parameter.ranges.def = 75.0f; | |||||
parameter.ranges.min = 0.0f; | |||||
parameter.ranges.max = 100.0f; | |||||
break; | |||||
} | |||||
} | |||||
void DistrhoPluginNekobi::d_initProgramName(uint32_t index, d_string& programName) | |||||
{ | |||||
if (index != 0) | |||||
return; | |||||
programName = "Default"; | |||||
} | |||||
// ------------------------------------------------- | |||||
// Internal data | |||||
float DistrhoPluginNekobi::d_parameterValue(uint32_t index) | |||||
{ | |||||
switch (index) | |||||
{ | |||||
case paramWaveform: | |||||
return fParams.waveform; | |||||
case paramTuning: | |||||
return fParams.tuning; | |||||
case paramCutoff: | |||||
return fParams.cutoff; | |||||
case paramResonance: | |||||
return fParams.resonance; | |||||
case paramEnvMod: | |||||
return fParams.envMod; | |||||
case paramDecay: | |||||
return fParams.decay; | |||||
case paramAccent: | |||||
return fParams.accent; | |||||
case paramVolume: | |||||
return fParams.volume; | |||||
} | |||||
return 0.0f; | |||||
} | |||||
void DistrhoPluginNekobi::d_setParameterValue(uint32_t index, float value) | |||||
{ | |||||
switch (index) | |||||
{ | |||||
case paramWaveform: | |||||
fParams.waveform = value; | |||||
fSynth->waveform = value; | |||||
CARLA_SAFE_ASSERT_INT2(fSynth->waveform == 0.0f || fSynth->waveform == 1.0f, fSynth->waveform, value); | |||||
break; | |||||
case paramTuning: | |||||
fParams.tuning = value; | |||||
fSynth->tuning = (value+12.0f)/24.0f * 1.5 + 0.5f; // FIXME: log? | |||||
CARLA_SAFE_ASSERT_INT2(fSynth->tuning >= 0.5f && fSynth->tuning <= 2.0f, fSynth->tuning, value); | |||||
break; | |||||
case paramCutoff: | |||||
fParams.cutoff = value; | |||||
fSynth->cutoff = value/2.5f; | |||||
CARLA_SAFE_ASSERT_INT2(fSynth->cutoff >= 0.0f && fSynth->cutoff <= 40.0f, fSynth->cutoff, value); | |||||
break; | |||||
case paramResonance: | |||||
fParams.resonance = value; | |||||
fSynth->resonance = value/100.0f; | |||||
CARLA_SAFE_ASSERT_INT2(fSynth->resonance >= 0.0f && fSynth->resonance <= 0.95f, fSynth->resonance, value); | |||||
break; | |||||
case paramEnvMod: | |||||
fParams.envMod = value; | |||||
fSynth->envmod = value/100.0f; | |||||
CARLA_SAFE_ASSERT_INT2(fSynth->envmod >= 0.0f && fSynth->envmod <= 1.0f, fSynth->envmod, value); | |||||
break; | |||||
case paramDecay: | |||||
fParams.decay = value; | |||||
fSynth->decay = value/100.0f * 0.000491f + 0.000009f; // FIXME: log? | |||||
CARLA_SAFE_ASSERT_INT2(fSynth->decay >= 0.000009f && fSynth->decay <= 0.0005f, fSynth->decay, value); | |||||
break; | |||||
case paramAccent: | |||||
fParams.accent = value; | |||||
fSynth->accent = value/100.0f; | |||||
CARLA_SAFE_ASSERT_INT2(fSynth->accent >= 0.0f && fSynth->accent <= 1.0f, fSynth->accent, value); | |||||
break; | |||||
case paramVolume: | |||||
fParams.volume = value; | |||||
fSynth->volume = value/100.0f; | |||||
CARLA_SAFE_ASSERT_INT2(fSynth->volume >= 0.0f && fSynth->volume <= 1.0f, fSynth->volume, value); | |||||
break; | |||||
} | |||||
} | |||||
void DistrhoPluginNekobi::d_setProgram(uint32_t index) | |||||
{ | |||||
if (index != 0) | |||||
return; | |||||
// Default values | |||||
fParams.waveform = 0.0f; | |||||
fParams.tuning = 0.0f; | |||||
fParams.cutoff = 25.0f; | |||||
fParams.resonance = 25.0f; | |||||
fParams.envMod = 50.0f; | |||||
fParams.decay = 75.0f; | |||||
fParams.accent = 25.0f; | |||||
fParams.volume = 75.0f; | |||||
// Internal stuff | |||||
fSynth->waveform = 0.0f; | |||||
fSynth->tuning = 1.0f; | |||||
fSynth->cutoff = 5.0f; | |||||
fSynth->resonance = 0.8f; | |||||
fSynth->envmod = 0.3f; | |||||
fSynth->decay = 0.0002f; | |||||
fSynth->accent = 0.3f; | |||||
fSynth->volume = 0.75f; | |||||
} | |||||
// ------------------------------------------------- | |||||
// Process | |||||
void DistrhoPluginNekobi::d_activate() | |||||
{ | |||||
fSynth->nugget_remains = 0; | |||||
fSynth->note_id = 0; | |||||
if (fSynth->voice != nullptr) | |||||
nekobee_synth_all_voices_off(fSynth); | |||||
} | |||||
void DistrhoPluginNekobi::d_deactivate() | |||||
{ | |||||
if (fSynth->voice != nullptr) | |||||
nekobee_synth_all_voices_off(fSynth); | |||||
} | |||||
void DistrhoPluginNekobi::d_run(float**, float** outputs, uint32_t frames, uint32_t midiEventCount, const MidiEvent* midiEvents) | |||||
{ | |||||
uint32_t framesDone = 0; | |||||
uint32_t curEventIndex = 0; | |||||
uint32_t burstSize; | |||||
float* out = outputs[0]; | |||||
if (fSynth->voice == nullptr || ! dssp_voicelist_mutex_trylock(fSynth)) | |||||
{ | |||||
for (uint32_t i=0; i < frames; ++i) | |||||
*out++ = 0.0f; | |||||
return; | |||||
} | |||||
while (framesDone < frames) | |||||
{ | |||||
if (fSynth->nugget_remains == 0) | |||||
fSynth->nugget_remains = XSYNTH_NUGGET_SIZE; | |||||
/* process any ready events */ | |||||
while (curEventIndex < midiEventCount && framesDone == midiEvents[curEventIndex].frame) | |||||
{ | |||||
nekobee_handle_raw_event(fSynth, midiEvents[curEventIndex].size, midiEvents[curEventIndex].buf); | |||||
curEventIndex++; | |||||
} | |||||
/* calculate the sample count (burstSize) for the next nekobee_voice_render() call to be the smallest of: | |||||
* - control calculation quantization size (XSYNTH_NUGGET_SIZE, in samples) | |||||
* - the number of samples remaining in an already-begun nugget (synth->nugget_remains) | |||||
* - the number of samples until the next event is ready | |||||
* - the number of samples left in this run | |||||
*/ | |||||
burstSize = XSYNTH_NUGGET_SIZE; | |||||
/* we're still in the middle of a nugget, so reduce the burst size | |||||
* to end when the nugget ends */ | |||||
if (fSynth->nugget_remains < burstSize) | |||||
burstSize = fSynth->nugget_remains; | |||||
/* reduce burst size to end when next event is ready */ | |||||
if (curEventIndex < midiEventCount && midiEvents[curEventIndex].frame - framesDone < burstSize) | |||||
burstSize = midiEvents[curEventIndex].frame - framesDone; | |||||
/* reduce burst size to end at end of this run */ | |||||
if (frames - framesDone < burstSize) | |||||
burstSize = frames - framesDone; | |||||
/* render the burst */ | |||||
nekobee_synth_render_voices(fSynth, out + framesDone, burstSize, (burstSize == fSynth->nugget_remains)); | |||||
framesDone += burstSize; | |||||
fSynth->nugget_remains -= burstSize; | |||||
} | |||||
dssp_voicelist_mutex_unlock(fSynth); | |||||
} | |||||
// ------------------------------------------------- | |||||
Plugin* createPlugin() | |||||
{ | |||||
return new DistrhoPluginNekobi(); | |||||
} | |||||
// ------------------------------------------------- | |||||
END_NAMESPACE_DISTRHO |
@@ -0,0 +1,117 @@ | |||||
/* | |||||
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others. | |||||
* Copyright (C) 2004 Sean Bolton and others | |||||
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com> | |||||
* | |||||
* 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 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. | |||||
* | |||||
* For a full copy of the GNU General Public License see the GPL.txt file | |||||
*/ | |||||
#ifndef __DISTRHO_PLUGIN_3BANDEQ_HPP__ | |||||
#define __DISTRHO_PLUGIN_3BANDEQ_HPP__ | |||||
#include "DistrhoPlugin.hpp" | |||||
extern "C" { | |||||
#include "nekobee-src/nekobee_types.h" | |||||
} | |||||
START_NAMESPACE_DISTRHO | |||||
class DistrhoPluginNekobi : public Plugin | |||||
{ | |||||
public: | |||||
enum Parameters | |||||
{ | |||||
paramWaveform = 0, | |||||
paramTuning, | |||||
paramCutoff, | |||||
paramResonance, | |||||
paramEnvMod, | |||||
paramDecay, | |||||
paramAccent, | |||||
paramVolume, | |||||
paramCount | |||||
}; | |||||
DistrhoPluginNekobi(); | |||||
~DistrhoPluginNekobi(); | |||||
protected: | |||||
// --------------------------------------------- | |||||
// Information | |||||
const char* d_label() const | |||||
{ | |||||
return "Nekobi"; | |||||
} | |||||
const char* d_maker() const | |||||
{ | |||||
return "DISTRHO"; | |||||
} | |||||
const char* d_license() const | |||||
{ | |||||
return "GPL v2+"; | |||||
} | |||||
uint32_t d_version() const | |||||
{ | |||||
return 0x1000; | |||||
} | |||||
long d_uniqueId() const | |||||
{ | |||||
return d_cconst('D', 'N', 'e', 'k'); | |||||
} | |||||
// --------------------------------------------- | |||||
// Init | |||||
void d_initParameter(uint32_t index, Parameter& parameter); | |||||
void d_initProgramName(uint32_t index, d_string& programName); | |||||
// --------------------------------------------- | |||||
// Internal data | |||||
float d_parameterValue(uint32_t index); | |||||
void d_setParameterValue(uint32_t index, float value); | |||||
void d_setProgram(uint32_t index); | |||||
// --------------------------------------------- | |||||
// Process | |||||
void d_activate(); | |||||
void d_deactivate(); | |||||
void d_run(float** inputs, float** outputs, uint32_t frames, uint32_t midiEventCount, const MidiEvent* midiEvents); | |||||
// --------------------------------------------- | |||||
private: | |||||
struct ParamValues { | |||||
float waveform; | |||||
float tuning; | |||||
float cutoff; | |||||
float resonance; | |||||
float envMod; | |||||
float decay; | |||||
float accent; | |||||
float volume; | |||||
} fParams; | |||||
nekobee_synth_t* fSynth; | |||||
}; | |||||
END_NAMESPACE_DISTRHO | |||||
#endif // __DISTRHO_PLUGIN_3BANDEQ_HPP__ |
@@ -0,0 +1,279 @@ | |||||
/* | |||||
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others. | |||||
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com> | |||||
* | |||||
* 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 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. | |||||
* | |||||
* For a full copy of the GNU General Public License see the GPL.txt file | |||||
*/ | |||||
#include "DistrhoUINekobi.hpp" | |||||
#include "dgl/ImageAboutWindow.hpp" | |||||
START_NAMESPACE_DISTRHO | |||||
// ------------------------------------------------- | |||||
DistrhoUINekobi::DistrhoUINekobi() | |||||
: OpenGLUI() | |||||
{ | |||||
Window* win = getParent(); | |||||
fNeko.setTimerSpeed(4); | |||||
// background | |||||
fImgBackground = Image(DistrhoArtworkNekobi::backgroundData, DistrhoArtworkNekobi::backgroundWidth, DistrhoArtworkNekobi::backgroundHeight, GL_BGR); | |||||
// slider | |||||
Image sliderImage(DistrhoArtworkNekobi::sliderData, DistrhoArtworkNekobi::sliderWidth, DistrhoArtworkNekobi::sliderHeight); | |||||
fSliderWaveform = new ImageSlider(win, sliderImage); | |||||
fSliderWaveform->setStartPos(135, 39); | |||||
fSliderWaveform->setEndPos(135, 65); | |||||
fSliderWaveform->setRange(0.0f, 1.0f); | |||||
fSliderWaveform->setValue(0.0f); | |||||
fSliderWaveform->setCallback(this); | |||||
// knobs | |||||
Image knobImage(DistrhoArtworkNekobi::knobData, DistrhoArtworkNekobi::knobWidth, DistrhoArtworkNekobi::knobHeight); | |||||
// knob Tuning | |||||
fKnobTuning = new ImageKnob(win, knobImage); | |||||
fKnobTuning->setPos(44, 46); | |||||
fKnobTuning->setRange(-12.0f, 12.0f); | |||||
fKnobTuning->setValue(0.0f); | |||||
fKnobTuning->setCallback(this); | |||||
// knob Cutoff | |||||
fKnobCutoff = new ImageKnob(win, knobImage); | |||||
fKnobCutoff->setPos(187, 46); | |||||
fKnobCutoff->setRange(0.0f, 100.0f); | |||||
fKnobCutoff->setValue(25.0f); | |||||
fKnobCutoff->setCallback(this); | |||||
// knob Resonance | |||||
fKnobResonance = new ImageKnob(win, knobImage); | |||||
fKnobResonance->setPos(260, 46); | |||||
fKnobResonance->setRange(0.0f, 95.0f); | |||||
fKnobResonance->setValue(25.0f); | |||||
fKnobResonance->setCallback(this); | |||||
// knob Env Mod | |||||
fKnobEnvMod = new ImageKnob(win, knobImage); | |||||
fKnobEnvMod->setPos(332, 46); | |||||
fKnobEnvMod->setRange(0.0f, 100.0f); | |||||
fKnobEnvMod->setValue(50.0f); | |||||
fKnobEnvMod->setCallback(this); | |||||
// knob Decay | |||||
fKnobDecay = new ImageKnob(win, knobImage); | |||||
fKnobDecay->setPos(404, 46); | |||||
fKnobDecay->setRange(0.0f, 100.0f); | |||||
fKnobDecay->setValue(75.0f); | |||||
fKnobDecay->setCallback(this); | |||||
// knob Accent | |||||
fKnobAccent = new ImageKnob(win, knobImage); | |||||
fKnobAccent->setPos(476, 46); | |||||
fKnobAccent->setRange(0.0f, 100.0f); | |||||
fKnobAccent->setValue(25.0f); | |||||
fKnobAccent->setCallback(this); | |||||
// knob Volume | |||||
fKnobVolume = new ImageKnob(win, knobImage); | |||||
fKnobVolume->setPos(548, 46); | |||||
fKnobVolume->setRange(0.0f, 100.0f); | |||||
fKnobVolume->setValue(75.0f); | |||||
fKnobVolume->setCallback(this); | |||||
} | |||||
DistrhoUINekobi::~DistrhoUINekobi() | |||||
{ | |||||
delete fSliderWaveform; | |||||
delete fKnobTuning; | |||||
delete fKnobCutoff; | |||||
delete fKnobResonance; | |||||
delete fKnobEnvMod; | |||||
delete fKnobDecay; | |||||
delete fKnobAccent; | |||||
delete fKnobVolume; | |||||
} | |||||
// ------------------------------------------------- | |||||
// DSP Callbacks | |||||
void DistrhoUINekobi::d_parameterChanged(uint32_t index, float value) | |||||
{ | |||||
switch (index) | |||||
{ | |||||
case DistrhoPluginNekobi::paramTuning: | |||||
fKnobTuning->setValue(value); | |||||
break; | |||||
case DistrhoPluginNekobi::paramWaveform: | |||||
fSliderWaveform->setValue(value); | |||||
break; | |||||
case DistrhoPluginNekobi::paramCutoff: | |||||
fKnobCutoff->setValue(value); | |||||
break; | |||||
case DistrhoPluginNekobi::paramResonance: | |||||
fKnobResonance->setValue(value); | |||||
break; | |||||
case DistrhoPluginNekobi::paramEnvMod: | |||||
fKnobEnvMod->setValue(value); | |||||
break; | |||||
case DistrhoPluginNekobi::paramDecay: | |||||
fKnobDecay->setValue(value); | |||||
break; | |||||
case DistrhoPluginNekobi::paramAccent: | |||||
fKnobAccent->setValue(value); | |||||
break; | |||||
case DistrhoPluginNekobi::paramVolume: | |||||
fKnobVolume->setValue(value); | |||||
break; | |||||
} | |||||
} | |||||
void DistrhoUINekobi::d_programChanged(uint32_t index) | |||||
{ | |||||
if (index != 0) | |||||
return; | |||||
// Default values | |||||
fSliderWaveform->setValue(0.0f); | |||||
fKnobTuning->setValue(0.0f); | |||||
fKnobCutoff->setValue(25.0f); | |||||
fKnobResonance->setValue(25.0f); | |||||
fKnobEnvMod->setValue(50.0f); | |||||
fKnobDecay->setValue(75.0f); | |||||
fKnobAccent->setValue(25.0f); | |||||
fKnobVolume->setValue(50.0f); | |||||
} | |||||
void DistrhoUINekobi::d_noteReceived(bool onOff, uint8_t, uint8_t note, uint8_t) | |||||
{ | |||||
return; | |||||
(void)onOff; | |||||
(void)note; | |||||
} | |||||
// --------------------------------------------- | |||||
// UI Callbacks | |||||
void DistrhoUINekobi::d_uiIdle() | |||||
{ | |||||
if (fNeko.idle()) | |||||
repaint(); | |||||
} | |||||
// ------------------------------------------------- | |||||
// Widget Callbacks | |||||
void DistrhoUINekobi::imageButtonClicked(ImageButton* button, int) | |||||
{ | |||||
(void)button; | |||||
} | |||||
void DistrhoUINekobi::imageKnobDragStarted(ImageKnob* knob) | |||||
{ | |||||
if (knob == fKnobTuning) | |||||
d_editParameter(DistrhoPluginNekobi::paramTuning, true); | |||||
else if (knob == fKnobCutoff) | |||||
d_editParameter(DistrhoPluginNekobi::paramCutoff, true); | |||||
else if (knob == fKnobResonance) | |||||
d_editParameter(DistrhoPluginNekobi::paramResonance, true); | |||||
else if (knob == fKnobEnvMod) | |||||
d_editParameter(DistrhoPluginNekobi::paramEnvMod, true); | |||||
else if (knob == fKnobDecay) | |||||
d_editParameter(DistrhoPluginNekobi::paramDecay, true); | |||||
else if (knob == fKnobAccent) | |||||
d_editParameter(DistrhoPluginNekobi::paramAccent, true); | |||||
else if (knob == fKnobVolume) | |||||
d_editParameter(DistrhoPluginNekobi::paramVolume, true); | |||||
} | |||||
void DistrhoUINekobi::imageKnobDragFinished(ImageKnob* knob) | |||||
{ | |||||
if (knob == fKnobTuning) | |||||
d_editParameter(DistrhoPluginNekobi::paramTuning, false); | |||||
else if (knob == fKnobCutoff) | |||||
d_editParameter(DistrhoPluginNekobi::paramCutoff, false); | |||||
else if (knob == fKnobResonance) | |||||
d_editParameter(DistrhoPluginNekobi::paramResonance, false); | |||||
else if (knob == fKnobEnvMod) | |||||
d_editParameter(DistrhoPluginNekobi::paramEnvMod, false); | |||||
else if (knob == fKnobDecay) | |||||
d_editParameter(DistrhoPluginNekobi::paramDecay, false); | |||||
else if (knob == fKnobAccent) | |||||
d_editParameter(DistrhoPluginNekobi::paramAccent, false); | |||||
else if (knob == fKnobVolume) | |||||
d_editParameter(DistrhoPluginNekobi::paramVolume, false); | |||||
} | |||||
void DistrhoUINekobi::imageKnobValueChanged(ImageKnob* knob, float value) | |||||
{ | |||||
if (knob == fKnobTuning) | |||||
d_setParameterValue(DistrhoPluginNekobi::paramTuning, value); | |||||
else if (knob == fKnobCutoff) | |||||
d_setParameterValue(DistrhoPluginNekobi::paramCutoff, value); | |||||
else if (knob == fKnobResonance) | |||||
d_setParameterValue(DistrhoPluginNekobi::paramResonance, value); | |||||
else if (knob == fKnobEnvMod) | |||||
d_setParameterValue(DistrhoPluginNekobi::paramEnvMod, value); | |||||
else if (knob == fKnobDecay) | |||||
d_setParameterValue(DistrhoPluginNekobi::paramDecay, value); | |||||
else if (knob == fKnobAccent) | |||||
d_setParameterValue(DistrhoPluginNekobi::paramAccent, value); | |||||
else if (knob == fKnobVolume) | |||||
d_setParameterValue(DistrhoPluginNekobi::paramVolume, value); | |||||
} | |||||
void DistrhoUINekobi::imageSliderDragStarted(ImageSlider* slider) | |||||
{ | |||||
if (slider != fSliderWaveform) | |||||
return; | |||||
d_editParameter(DistrhoPluginNekobi::paramWaveform, true); | |||||
} | |||||
void DistrhoUINekobi::imageSliderDragFinished(ImageSlider* slider) | |||||
{ | |||||
if (slider != fSliderWaveform) | |||||
return; | |||||
d_editParameter(DistrhoPluginNekobi::paramWaveform, false); | |||||
} | |||||
void DistrhoUINekobi::imageSliderValueChanged(ImageSlider* slider, float value) | |||||
{ | |||||
if (slider != fSliderWaveform) | |||||
return; | |||||
d_setParameterValue(DistrhoPluginNekobi::paramWaveform, value); | |||||
} | |||||
void DistrhoUINekobi::onDisplay() | |||||
{ | |||||
fImgBackground.draw(); | |||||
fNeko.draw(); | |||||
} | |||||
// ------------------------------------------------- | |||||
UI* createUI() | |||||
{ | |||||
return new DistrhoUINekobi(); | |||||
} | |||||
// ------------------------------------------------- | |||||
END_NAMESPACE_DISTRHO |
@@ -0,0 +1,101 @@ | |||||
/* | |||||
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others. | |||||
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com> | |||||
* | |||||
* 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 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. | |||||
* | |||||
* For a full copy of the GNU General Public License see the GPL.txt file | |||||
*/ | |||||
#ifndef __DISTRHO_UI_3BANDEQ_HPP__ | |||||
#define __DISTRHO_UI_3BANDEQ_HPP__ | |||||
#include "DistrhoUIOpenGL.hpp" | |||||
#include "dgl/ImageButton.hpp" | |||||
#include "dgl/ImageKnob.hpp" | |||||
#include "dgl/ImageSlider.hpp" | |||||
#include "DistrhoArtworkNekobi.hpp" | |||||
#include "DistrhoPluginNekobi.hpp" | |||||
#include "NekoWidget.hpp" | |||||
START_NAMESPACE_DISTRHO | |||||
// ------------------------------------------------- | |||||
class DistrhoUINekobi : public OpenGLUI, | |||||
public ImageButton::Callback, | |||||
public ImageKnob::Callback, | |||||
public ImageSlider::Callback | |||||
{ | |||||
public: | |||||
DistrhoUINekobi(); | |||||
~DistrhoUINekobi() override; | |||||
protected: | |||||
// --------------------------------------------- | |||||
// Information | |||||
unsigned int d_width() const override | |||||
{ | |||||
return DistrhoArtworkNekobi::backgroundWidth; | |||||
} | |||||
unsigned int d_height() const override | |||||
{ | |||||
return DistrhoArtworkNekobi::backgroundHeight; | |||||
} | |||||
// --------------------------------------------- | |||||
// DSP Callbacks | |||||
void d_parameterChanged(uint32_t index, float value) override; | |||||
void d_programChanged(uint32_t index) override; | |||||
void d_noteReceived(bool onOff, uint8_t channel, uint8_t note, uint8_t velocity) override; | |||||
// --------------------------------------------- | |||||
// UI Callbacks | |||||
void d_uiIdle() override; | |||||
// --------------------------------------------- | |||||
// Widget Callbacks | |||||
void imageButtonClicked(ImageButton* button, int) override; | |||||
void imageKnobDragStarted(ImageKnob* knob) override; | |||||
void imageKnobDragFinished(ImageKnob* knob) override; | |||||
void imageKnobValueChanged(ImageKnob* knob, float value) override; | |||||
void imageSliderDragStarted(ImageSlider* slider) override; | |||||
void imageSliderDragFinished(ImageSlider* slider) override; | |||||
void imageSliderValueChanged(ImageSlider* slider, float value) override; | |||||
void onDisplay() override; | |||||
private: | |||||
Image fImgBackground; | |||||
NekoWidget fNeko; | |||||
ImageKnob* fKnobTuning; | |||||
ImageKnob* fKnobCutoff; | |||||
ImageKnob* fKnobResonance; | |||||
ImageKnob* fKnobEnvMod; | |||||
ImageKnob* fKnobDecay; | |||||
ImageKnob* fKnobAccent; | |||||
ImageKnob* fKnobVolume; | |||||
ImageSlider* fSliderWaveform; | |||||
}; | |||||
// ------------------------------------------------- | |||||
END_NAMESPACE_DISTRHO | |||||
#endif // __DISTRHO_UI_3BANDEQ_HPP__ |
@@ -0,0 +1,191 @@ | |||||
/* | |||||
* Carla Tests | |||||
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com> | |||||
* | |||||
* 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 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. | |||||
* | |||||
* For a full copy of the GNU General Public License see the GPL.txt file | |||||
*/ | |||||
#include "dgl/Image.hpp" | |||||
#include "dgl/Widget.hpp" | |||||
#include <cstdlib> // rand | |||||
#include "DistrhoArtworkNekobi.hpp" | |||||
USE_NAMESPACE_DGL; | |||||
class NekoWidget | |||||
{ | |||||
public: | |||||
NekoWidget() | |||||
: fPos(0), | |||||
fTimer(0), | |||||
fTimerSpeed(20), | |||||
fCurAction(kActionNone), | |||||
fCurImage(&fImages.sit) | |||||
{ | |||||
// load images | |||||
{ | |||||
using namespace DistrhoArtworkNekobi; | |||||
#define JOIN(a, b) a ## b | |||||
#define LOAD_IMAGE(NAME) fImages.NAME.loadFromMemory(JOIN(NAME, Data), JOIN(NAME, Width), JOIN(NAME, Height)); | |||||
LOAD_IMAGE(sit) | |||||
LOAD_IMAGE(tail) | |||||
LOAD_IMAGE(claw1) | |||||
LOAD_IMAGE(claw2) | |||||
LOAD_IMAGE(scratch1) | |||||
LOAD_IMAGE(scratch2) | |||||
LOAD_IMAGE(run1) | |||||
LOAD_IMAGE(run2) | |||||
LOAD_IMAGE(run3) | |||||
LOAD_IMAGE(run4) | |||||
#undef JOIN | |||||
#undef LOAD_IMAGE | |||||
} | |||||
} | |||||
void draw() | |||||
{ | |||||
int x = fPos+110; | |||||
int y = -2; | |||||
if (fCurImage == &fImages.claw1 || fCurImage == &fImages.claw2) | |||||
{ | |||||
x += 2; | |||||
y += 12; | |||||
} | |||||
fCurImage->draw(x, y); | |||||
} | |||||
// returns true if needs repaint | |||||
bool idle() | |||||
{ | |||||
if (++fTimer % fTimerSpeed != 0) // target is 20ms | |||||
return false; | |||||
if (fTimer == fTimerSpeed*9) | |||||
{ | |||||
if (fCurAction == kActionNone) | |||||
fCurAction = static_cast<Action>(rand() % kActionCount); | |||||
else | |||||
fCurAction = kActionNone; | |||||
fTimer = 0; | |||||
} | |||||
switch (fCurAction) | |||||
{ | |||||
case kActionNone: | |||||
if (fCurImage == &fImages.sit) | |||||
fCurImage = &fImages.tail; | |||||
else | |||||
fCurImage = &fImages.sit; | |||||
break; | |||||
case kActionClaw: | |||||
if (fCurImage == &fImages.claw1) | |||||
fCurImage = &fImages.claw2; | |||||
else | |||||
fCurImage = &fImages.claw1; | |||||
break; | |||||
case kActionScratch: | |||||
if (fCurImage == &fImages.scratch1) | |||||
fCurImage = &fImages.scratch2; | |||||
else | |||||
fCurImage = &fImages.scratch1; | |||||
break; | |||||
case kActionRunRight: | |||||
if (fTimer == 0 && fPos > 20*9) | |||||
{ | |||||
// run the other way | |||||
--fTimer; | |||||
fCurAction = kActionRunLeft; | |||||
idle(); | |||||
break; | |||||
} | |||||
fPos += 20; | |||||
if (fCurImage == &fImages.run1) | |||||
fCurImage = &fImages.run2; | |||||
else | |||||
fCurImage = &fImages.run1; | |||||
break; | |||||
case kActionRunLeft: | |||||
if (fTimer == 0 && fPos < 20*9) | |||||
{ | |||||
// run the other way | |||||
--fTimer; | |||||
fCurAction = kActionRunRight; | |||||
idle(); | |||||
break; | |||||
} | |||||
fPos -= 20; | |||||
if (fCurImage == &fImages.run3) | |||||
fCurImage = &fImages.run4; | |||||
else | |||||
fCurImage = &fImages.run3; | |||||
break; | |||||
case kActionCount: | |||||
break; | |||||
} | |||||
return true; | |||||
} | |||||
void setTimerSpeed(int speed) | |||||
{ | |||||
fTimer = 0; | |||||
fTimerSpeed = speed; | |||||
} | |||||
private: | |||||
enum Action { | |||||
kActionNone, // bounce tail | |||||
kActionClaw, | |||||
kActionScratch, | |||||
kActionRunRight, | |||||
kActionRunLeft, | |||||
kActionCount | |||||
}; | |||||
struct Images { | |||||
Image sit; | |||||
Image tail; | |||||
Image claw1; | |||||
Image claw2; | |||||
Image scratch1; | |||||
Image scratch2; | |||||
Image run1; | |||||
Image run2; | |||||
Image run3; | |||||
Image run4; | |||||
} fImages; | |||||
int fPos; | |||||
int fTimer; | |||||
int fTimerSpeed; | |||||
Action fCurAction; | |||||
Image* fCurImage; | |||||
}; |
@@ -0,0 +1,77 @@ | |||||
/* nekobee DSSI software synthesizer plugin | |||||
* | |||||
* Copyright (C) 2004 Sean Bolton and others. | |||||
* | |||||
* Portions of this file may have come from Chris Cannam and Steve | |||||
* Harris's public domain DSSI example code. | |||||
* | |||||
* 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. | |||||
*/ | |||||
#ifndef _XSYNTH_H | |||||
#define _XSYNTH_H | |||||
/* ==== debugging ==== */ | |||||
/* XSYNTH_DEBUG bits */ | |||||
#define XDB_DSSI 1 /* DSSI interface */ | |||||
#define XDB_AUDIO 2 /* audio output */ | |||||
#define XDB_NOTE 4 /* note on/off, voice allocation */ | |||||
#define XDB_DATA 8 /* plugin patchbank handling */ | |||||
#define GDB_MAIN 16 /* GUI main program flow */ | |||||
#define GDB_OSC 32 /* GUI OSC handling */ | |||||
#define GDB_IO 64 /* GUI patch file input/output */ | |||||
#define GDB_GUI 128 /* GUI GUI callbacks, updating, etc. */ | |||||
/* If you want debug information, define XSYNTH_DEBUG to the XDB_* bits you're | |||||
* interested in getting debug information about, bitwise-ORed together. | |||||
* Otherwise, leave it undefined. */ | |||||
// #define XSYNTH_DEBUG (1+8+16+32+64) | |||||
//#define XSYNTH_DEBUG GDB_GUI + GDB_OSC | |||||
// #define XSYNTH_DEBUG XDB_DSSI | |||||
#ifdef XSYNTH_DEBUG | |||||
#include <stdio.h> | |||||
#define XSYNTH_DEBUG_INIT(x) | |||||
#define XDB_MESSAGE(type, fmt...) { if (XSYNTH_DEBUG & type) fprintf(stderr, "nekobee-dssi.so" fmt); } | |||||
#define GDB_MESSAGE(type, fmt...) { if (XSYNTH_DEBUG & type) fprintf(stderr, "nekobee_gtk" fmt); } | |||||
// -FIX-: | |||||
// #include "message_buffer.h" | |||||
// #define XSYNTH_DEBUG_INIT(x) mb_init(x) | |||||
// #define XDB_MESSAGE(type, fmt...) { \- | |||||
// if (XSYNTH_DEBUG & type) { \- | |||||
// char _m[256]; \- | |||||
// snprintf(_m, 255, fmt); \- | |||||
// add_message(_m); \- | |||||
// } \- | |||||
// } | |||||
#else /* !XSYNTH_DEBUG */ | |||||
#define XDB_MESSAGE(type, fmt...) | |||||
#define GDB_MESSAGE(type, fmt...) | |||||
#define XSYNTH_DEBUG_INIT(x) | |||||
#endif /* XSYNTH_DEBUG */ | |||||
/* ==== end of debugging ==== */ | |||||
#define XSYNTH_MAX_POLYPHONY 1 | |||||
#define XSYNTH_DEFAULT_POLYPHONY 1 | |||||
#endif /* _XSYNTH_H */ |
@@ -0,0 +1,236 @@ | |||||
/* nekobee DSSI software synthesizer plugin | |||||
* | |||||
* Copyright (C) 2004 Sean Bolton and others. | |||||
* | |||||
* Portions of this file may have come from Steve Brookes' | |||||
* nekobee, copyright (C) 1999 S. J. Brookes. | |||||
* Portions of this file may have come from Peter Hanappe's | |||||
* Fluidsynth, copyright (C) 2003 Peter Hanappe and others. | |||||
* Portions of this file may have come from Chris Cannam and Steve | |||||
* Harris's public domain DSSI example code. | |||||
* | |||||
* 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. | |||||
*/ | |||||
#include <stdlib.h> | |||||
#include <stdio.h> | |||||
#include <string.h> | |||||
#include <math.h> | |||||
#include <pthread.h> | |||||
#include "nekobee.h" | |||||
#include "nekobee_synth.h" | |||||
#include "nekobee_voice.h" | |||||
/* | |||||
* nekobee_synth_all_voices_off | |||||
* | |||||
* stop processing all notes immediately | |||||
*/ | |||||
void | |||||
nekobee_synth_all_voices_off(nekobee_synth_t *synth) | |||||
{ | |||||
int i; | |||||
nekobee_voice_t *voice; | |||||
for (i = 0; i < synth->voices; i++) { | |||||
//voice = synth->voice[i]; | |||||
voice = synth->voice; | |||||
if (_PLAYING(voice)) { | |||||
nekobee_voice_off(voice); | |||||
} | |||||
} | |||||
for (i = 0; i < 8; i++) synth->held_keys[i] = -1; | |||||
} | |||||
/* | |||||
* nekobee_synth_note_off | |||||
* | |||||
* handle a note off message | |||||
*/ | |||||
void | |||||
nekobee_synth_note_off(nekobee_synth_t *synth, unsigned char key, unsigned char rvelocity) | |||||
{ | |||||
int i, count = 0; | |||||
nekobee_voice_t *voice; | |||||
for (i = 0; i < synth->voices; i++) { | |||||
voice = synth->voice; | |||||
if (_PLAYING(voice)) { | |||||
XDB_MESSAGE(XDB_NOTE, " nekobee_synth_note_off: key %d rvel %d voice %d note id %d\n", key, rvelocity, i, voice->note_id); | |||||
nekobee_voice_note_off(synth, voice, key, 64); | |||||
count++; | |||||
} | |||||
} | |||||
if (!count) | |||||
nekobee_voice_remove_held_key(synth, key); | |||||
return; | |||||
(void)rvelocity; | |||||
} | |||||
/* | |||||
* nekobee_synth_all_notes_off | |||||
* | |||||
* put all notes into the released state | |||||
*/ | |||||
void | |||||
nekobee_synth_all_notes_off(nekobee_synth_t* synth) | |||||
{ | |||||
int i; | |||||
nekobee_voice_t *voice; | |||||
/* reset the sustain controller */ | |||||
synth->cc[MIDI_CTL_SUSTAIN] = 0; | |||||
for (i = 0; i < synth->voices; i++) { | |||||
//voice = synth->voice[i]; | |||||
voice = synth->voice; | |||||
if (_ON(voice) || _SUSTAINED(voice)) { | |||||
nekobee_voice_release_note(synth, voice); | |||||
} | |||||
} | |||||
} | |||||
/* | |||||
* nekobee_synth_note_on | |||||
*/ | |||||
void | |||||
nekobee_synth_note_on(nekobee_synth_t *synth, unsigned char key, unsigned char velocity) | |||||
{ | |||||
nekobee_voice_t* voice; | |||||
voice = synth->voice; | |||||
if (_PLAYING(synth->voice)) { | |||||
XDB_MESSAGE(XDB_NOTE, " nekobee_synth_note_on: retriggering mono voice on new key %d\n", key); | |||||
} | |||||
voice->note_id = synth->note_id++; | |||||
nekobee_voice_note_on(synth, voice, key, velocity); | |||||
} | |||||
/* | |||||
* nekobee_synth_update_volume | |||||
*/ | |||||
void | |||||
nekobee_synth_update_volume(nekobee_synth_t* synth) | |||||
{ | |||||
synth->cc_volume = (float)(synth->cc[MIDI_CTL_MSB_MAIN_VOLUME] * 128 + | |||||
synth->cc[MIDI_CTL_LSB_MAIN_VOLUME]) / 16256.0f; | |||||
if (synth->cc_volume > 1.0f) | |||||
synth->cc_volume = 1.0f; | |||||
/* don't need to check if any playing voices need updating, because it's global */ | |||||
} | |||||
/* | |||||
* nekobee_synth_control_change | |||||
*/ | |||||
void | |||||
nekobee_synth_control_change(nekobee_synth_t *synth, unsigned int param, signed int value) | |||||
{ | |||||
synth->cc[param] = value; | |||||
switch (param) { | |||||
case MIDI_CTL_MSB_MAIN_VOLUME: | |||||
case MIDI_CTL_LSB_MAIN_VOLUME: | |||||
nekobee_synth_update_volume(synth); | |||||
break; | |||||
case MIDI_CTL_ALL_SOUNDS_OFF: | |||||
nekobee_synth_all_voices_off(synth); | |||||
break; | |||||
case MIDI_CTL_RESET_CONTROLLERS: | |||||
nekobee_synth_init_controls(synth); | |||||
break; | |||||
case MIDI_CTL_ALL_NOTES_OFF: | |||||
nekobee_synth_all_notes_off(synth); | |||||
break; | |||||
/* what others should we respond to? */ | |||||
/* these we ignore (let the host handle): | |||||
* BANK_SELECT_MSB | |||||
* BANK_SELECT_LSB | |||||
* DATA_ENTRY_MSB | |||||
* NRPN_MSB | |||||
* NRPN_LSB | |||||
* RPN_MSB | |||||
* RPN_LSB | |||||
* -FIX- no! we need RPN (0, 0) Pitch Bend Sensitivity! | |||||
*/ | |||||
} | |||||
} | |||||
/* | |||||
* nekobee_synth_init_controls | |||||
*/ | |||||
void | |||||
nekobee_synth_init_controls(nekobee_synth_t *synth) | |||||
{ | |||||
int i; | |||||
for (i = 0; i < 128; i++) { | |||||
synth->cc[i] = 0; | |||||
} | |||||
synth->cc[7] = 127; /* full volume */ | |||||
nekobee_synth_update_volume(synth); | |||||
} | |||||
/* | |||||
* nekobee_synth_render_voices | |||||
*/ | |||||
void | |||||
nekobee_synth_render_voices(nekobee_synth_t *synth, float *out, unsigned long sample_count, | |||||
int do_control_update) | |||||
{ | |||||
unsigned long i; | |||||
float res, wow; | |||||
/* clear the buffer */ | |||||
for (i = 0; i < sample_count; i++) | |||||
out[i] = 0.0f; | |||||
// we can do anything that must be updated all the time here | |||||
// this is called even when a voice isn't playing | |||||
// approximate a log scale | |||||
res = 1-synth->resonance; | |||||
wow = res*res; | |||||
wow = wow/10.0f; | |||||
// as the resonance is increased, "wow" slows down the accent attack | |||||
if ((synth->voice->velocity>90) && (synth->vcf_accent < synth->voice->vcf_eg)) { | |||||
synth->vcf_accent=(0.985-wow)*synth->vcf_accent+(0.015+wow)*synth->voice->vcf_eg; | |||||
} else { | |||||
synth->vcf_accent=(0.985-wow)*synth->vcf_accent; // or just decay | |||||
} | |||||
if (synth->voice->velocity>90) { | |||||
synth->vca_accent=0.95*synth->vca_accent+0.05; // ramp up accent on with a time constant | |||||
} else { | |||||
synth->vca_accent=0.95*synth->vca_accent; // accent off with time constant | |||||
} | |||||
#if defined(XSYNTH_DEBUG) && (XSYNTH_DEBUG & XDB_AUDIO) | |||||
out[0] += 0.10f; /* add a 'buzz' to output so there's something audible even when quiescent */ | |||||
#endif /* defined(XSYNTH_DEBUG) && (XSYNTH_DEBUG & XDB_AUDIO) */ | |||||
if (_PLAYING(synth->voice)) { | |||||
nekobee_voice_render(synth, synth->voice, out, sample_count, do_control_update); | |||||
} | |||||
} |
@@ -0,0 +1,132 @@ | |||||
/* nekobee DSSI software synthesizer plugin | |||||
* | |||||
* Copyright (C) 2004 Sean Bolton and others. | |||||
* | |||||
* Portions of this file may have come from Peter Hanappe's | |||||
* Fluidsynth, copyright (C) 2003 Peter Hanappe and others. | |||||
* Portions of this file may have come from alsa-lib, copyright | |||||
* and licensed under the LGPL v2.1. | |||||
* | |||||
* 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. | |||||
*/ | |||||
#ifndef _XSYNTH_SYNTH_H | |||||
#define _XSYNTH_SYNTH_H | |||||
#include <pthread.h> | |||||
#include "nekobee.h" | |||||
#include "nekobee_types.h" | |||||
#define XSYNTH_MONO_MODE_OFF 0 | |||||
#define XSYNTH_MONO_MODE_ON 1 | |||||
#define XSYNTH_MONO_MODE_ONCE 2 | |||||
#define XSYNTH_MONO_MODE_BOTH 3 | |||||
#define XSYNTH_GLIDE_MODE_LEGATO 0 | |||||
#define XSYNTH_GLIDE_MODE_INITIAL 1 | |||||
#define XSYNTH_GLIDE_MODE_ALWAYS 2 | |||||
#define XSYNTH_GLIDE_MODE_LEFTOVER 3 | |||||
#define XSYNTH_GLIDE_MODE_OFF 4 | |||||
/* | |||||
* nekobee_synth_t | |||||
*/ | |||||
struct _nekobee_synth_t { | |||||
/* output */ | |||||
unsigned long sample_rate; | |||||
float deltat; /* 1 / sample_rate */ | |||||
unsigned long nugget_remains; | |||||
/* voice tracking and data */ | |||||
unsigned int note_id; /* incremented for every new note, used for voice-stealing prioritization */ | |||||
int polyphony; /* requested polyphony, must be <= XSYNTH_MAX_POLYPHONY */ | |||||
int voices; /* current polyphony, either requested polyphony above or 1 while in monophonic mode */ | |||||
int monophonic; /* true if operating in monophonic mode */ | |||||
int glide; /* current glide mode */ | |||||
float last_noteon_pitch; /* glide start pitch for non-legato modes */ | |||||
signed char held_keys[8]; /* for monophonic key tracking, an array of note-ons, most recently received first */ | |||||
float vcf_accent; /* used to emulate the circuit that sweeps the vcf at full resonance */ | |||||
float vca_accent; /* used to smooth the accent pulse, removing the click */ | |||||
//nekobee_voice_t *voice[XSYNTH_MAX_POLYPHONY]; | |||||
nekobee_voice_t *voice; | |||||
pthread_mutex_t voicelist_mutex; | |||||
int voicelist_mutex_grab_failed; | |||||
/* current non-paramter-mapped controller values */ | |||||
unsigned char key_pressure[128]; | |||||
unsigned char cc[128]; /* controller values */ | |||||
unsigned char channel_pressure; | |||||
unsigned char pitch_wheel_sensitivity; /* in semitones */ | |||||
int pitch_wheel; /* range is -8192 - 8191 */ | |||||
/* translated controller values */ | |||||
float mod_wheel; /* filter cutoff multiplier, off = 1.0, full on = 0.0 */ | |||||
float pitch_bend; /* frequency multiplier, product of wheel setting and sensitivity, center = 1.0 */ | |||||
float cc_volume; /* volume multiplier, 0.0 to 1.0 */ | |||||
/* patch parameters */ | |||||
float tuning; | |||||
float waveform; | |||||
float cutoff; | |||||
float resonance; | |||||
float envmod; | |||||
float decay; | |||||
float accent; | |||||
float volume; | |||||
}; | |||||
void nekobee_synth_all_voices_off(nekobee_synth_t *synth); | |||||
void nekobee_synth_note_off(nekobee_synth_t *synth, unsigned char key, | |||||
unsigned char rvelocity); | |||||
void nekobee_synth_all_notes_off(nekobee_synth_t *synth); | |||||
void nekobee_synth_note_on(nekobee_synth_t *synth, unsigned char key, | |||||
unsigned char velocity); | |||||
void nekobee_synth_control_change(nekobee_synth_t *synth, unsigned int param, | |||||
signed int value); | |||||
void nekobee_synth_init_controls(nekobee_synth_t *synth); | |||||
void nekobee_synth_render_voices(nekobee_synth_t *synth, float *out, | |||||
unsigned long sample_count, | |||||
int do_control_update); | |||||
/* these come right out of alsa/asoundef.h */ | |||||
#define MIDI_CTL_MSB_MODWHEEL 0x01 /**< Modulation */ | |||||
#define MIDI_CTL_MSB_PORTAMENTO_TIME 0x05 /**< Portamento time */ | |||||
#define MIDI_CTL_MSB_MAIN_VOLUME 0x07 /**< Main volume */ | |||||
#define MIDI_CTL_MSB_BALANCE 0x08 /**< Balance */ | |||||
#define MIDI_CTL_LSB_MODWHEEL 0x21 /**< Modulation */ | |||||
#define MIDI_CTL_LSB_PORTAMENTO_TIME 0x25 /**< Portamento time */ | |||||
#define MIDI_CTL_LSB_MAIN_VOLUME 0x27 /**< Main volume */ | |||||
#define MIDI_CTL_LSB_BALANCE 0x28 /**< Balance */ | |||||
#define MIDI_CTL_SUSTAIN 0x40 /**< Sustain pedal */ | |||||
// nekobee defines | |||||
#define MIDI_CTL_TUNING 0x4b // impossible | |||||
#define MIDI_CTL_WAVEFORM 0x46 // select waveform | |||||
#define MIDI_CTL_CUTOFF 0x4a // VCF Cutoff | |||||
#define MIDI_CTL_RESONANCE 0x47 // VCF Resonance | |||||
#define MIDI_CTL_ENVMOD 0x01 // cheat and use modwheel | |||||
#define MIDI_CTL_DECAY 0x48 // Decay time (well release really) | |||||
#define MIDI_CTL_ACCENT 0x4c // impossible | |||||
#define MIDI_CTL_ALL_SOUNDS_OFF 0x78 /**< All sounds off */ | |||||
#define MIDI_CTL_RESET_CONTROLLERS 0x79 /**< Reset Controllers */ | |||||
#define MIDI_CTL_ALL_NOTES_OFF 0x7b /**< All notes off */ | |||||
#define XSYNTH_SYNTH_SUSTAINED(_s) ((_s)->cc[MIDI_CTL_SUSTAIN] >= 64) | |||||
#endif /* _XSYNTH_SYNTH_H */ |
@@ -0,0 +1,30 @@ | |||||
/* nekobee DSSI software synthesizer plugin | |||||
* | |||||
* Copyright (C) 2004 Sean Bolton and others. | |||||
* | |||||
* 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 library; if not, write to the Free | |||||
* Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, | |||||
* MA 02111-1307, USA. | |||||
*/ | |||||
#ifndef _XSYNTH_TYPES_H | |||||
#define _XSYNTH_TYPES_H | |||||
#include <stddef.h> | |||||
typedef struct _nekobee_synth_t nekobee_synth_t; | |||||
typedef struct _nekobee_voice_t nekobee_voice_t; | |||||
typedef struct _nekobee_patch_t nekobee_patch_t; | |||||
#endif /* _XSYNTH_TYPES_H */ |
@@ -0,0 +1,256 @@ | |||||
/* nekobee DSSI software synthesizer plugin | |||||
* | |||||
* Copyright (C) 2004 Sean Bolton and others. | |||||
* | |||||
* Portions of this file may have come from Steve Brookes' | |||||
* nekobee, copyright (C) 1999 S. J. Brookes. | |||||
* Portions of this file may have come from Peter Hanappe's | |||||
* Fluidsynth, copyright (C) 2003 Peter Hanappe and others. | |||||
* | |||||
* 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. | |||||
*/ | |||||
#define _BSD_SOURCE 1 | |||||
#define _SVID_SOURCE 1 | |||||
#define _ISOC99_SOURCE 1 | |||||
#include <stdlib.h> | |||||
#include "nekobee_types.h" | |||||
#include "nekobee.h" | |||||
#include "nekobee_synth.h" | |||||
#include "nekobee_voice.h" | |||||
/* | |||||
* nekobee_voice_new | |||||
*/ | |||||
nekobee_voice_t * | |||||
nekobee_voice_new() | |||||
{ | |||||
nekobee_voice_t *voice; | |||||
voice = (nekobee_voice_t *)calloc(sizeof(nekobee_voice_t), 1); | |||||
if (voice) { | |||||
voice->status = XSYNTH_VOICE_OFF; | |||||
} | |||||
return voice; | |||||
} | |||||
/* | |||||
* nekobee_voice_note_on | |||||
*/ | |||||
void | |||||
nekobee_voice_note_on(nekobee_synth_t *synth, nekobee_voice_t *voice, | |||||
unsigned char key, unsigned char velocity) | |||||
{ | |||||
int i; | |||||
voice->key = key; | |||||
voice->velocity = velocity; | |||||
if (!synth->monophonic || !(_ON(voice) || _SUSTAINED(voice))) { | |||||
// brand-new voice, or monophonic voice in release phase; set everything up | |||||
XDB_MESSAGE(XDB_NOTE, " nekobee_voice_note_on in polyphonic/new section: key %d, mono %d, old status %d\n", key, synth->monophonic, voice->status); | |||||
voice->target_pitch = nekobee_pitch[key]; | |||||
if (synth->held_keys[0] >= 0) { | |||||
voice->prev_pitch = nekobee_pitch[synth->held_keys[0]]; | |||||
} else { | |||||
voice->prev_pitch = voice->target_pitch; | |||||
} | |||||
if (!_PLAYING(voice)) { | |||||
voice->lfo_pos = 0.0f; | |||||
voice->vca_eg = 0.0f; | |||||
voice->vcf_eg = 0.0f; | |||||
voice->delay1 = 0.0f; | |||||
voice->delay2 = 0.0f; | |||||
voice->delay3 = 0.0f; | |||||
voice->delay4 = 0.0f; | |||||
voice->c5 = 0.0f; | |||||
voice->osc_index = 0; | |||||
voice->osc1.last_waveform = -1; | |||||
voice->osc1.pos = 0.0f; | |||||
} | |||||
voice->vca_eg_phase = 0; | |||||
voice->vcf_eg_phase = 0; | |||||
// nekobee_voice_update_pressure_mod(synth, voice); | |||||
} else { | |||||
/* synth is monophonic, and we're modifying a playing voice */ | |||||
XDB_MESSAGE(XDB_NOTE, " nekobee_voice_note_on in monophonic section: old key %d => new key %d\n", synth->held_keys[0], key); | |||||
/* set new pitch */ | |||||
voice->target_pitch = nekobee_pitch[key]; | |||||
if (synth->glide == XSYNTH_GLIDE_MODE_INITIAL || | |||||
synth->glide == XSYNTH_GLIDE_MODE_OFF) | |||||
voice->prev_pitch = voice->target_pitch; | |||||
/* if in 'on' or 'both' modes, and key has changed, then re-trigger EGs */ | |||||
if ((synth->monophonic == XSYNTH_MONO_MODE_ON || | |||||
synth->monophonic == XSYNTH_MONO_MODE_BOTH) && | |||||
(synth->held_keys[0] < 0 || synth->held_keys[0] != key)) { | |||||
voice->vca_eg_phase = 0; | |||||
voice->vcf_eg_phase = 0; | |||||
} | |||||
/* all other variables stay what they are */ | |||||
} | |||||
synth->last_noteon_pitch = voice->target_pitch; | |||||
/* add new key to the list of held keys */ | |||||
/* check if new key is already in the list; if so, move it to the | |||||
* top of the list, otherwise shift the other keys down and add it | |||||
* to the top of the list. */ | |||||
for (i = 0; i < 7; i++) { | |||||
if (synth->held_keys[i] == key) | |||||
break; | |||||
} | |||||
for (; i > 0; i--) { | |||||
synth->held_keys[i] = synth->held_keys[i - 1]; | |||||
} | |||||
synth->held_keys[0] = key; | |||||
if (!_PLAYING(voice)) { | |||||
nekobee_voice_start_voice(voice); | |||||
} else if (!_ON(voice)) { /* must be XSYNTH_VOICE_SUSTAINED or XSYNTH_VOICE_RELEASED */ | |||||
voice->status = XSYNTH_VOICE_ON; | |||||
} | |||||
} | |||||
/* | |||||
* nekobee_voice_set_release_phase | |||||
*/ | |||||
static inline void | |||||
nekobee_voice_set_release_phase(nekobee_voice_t *voice) | |||||
{ | |||||
voice->vca_eg_phase = 2; | |||||
voice->vcf_eg_phase = 2; | |||||
} | |||||
/* | |||||
* nekobee_voice_remove_held_key | |||||
*/ | |||||
inline void | |||||
nekobee_voice_remove_held_key(nekobee_synth_t *synth, unsigned char key) | |||||
{ | |||||
int i; | |||||
/* check if this key is in list of held keys; if so, remove it and | |||||
* shift the other keys up */ | |||||
for (i = 7; i >= 0; i--) { | |||||
if (synth->held_keys[i] == key) | |||||
break; | |||||
} | |||||
if (i >= 0) { | |||||
for (; i < 7; i++) { | |||||
synth->held_keys[i] = synth->held_keys[i + 1]; | |||||
} | |||||
synth->held_keys[7] = -1; | |||||
} | |||||
} | |||||
/* | |||||
* nekobee_voice_note_off | |||||
*/ | |||||
void | |||||
nekobee_voice_note_off(nekobee_synth_t *synth, nekobee_voice_t *voice, | |||||
unsigned char key, unsigned char rvelocity) | |||||
{ | |||||
unsigned char previous_top_key; | |||||
XDB_MESSAGE(XDB_NOTE, " nekobee_set_note_off: called for voice %p, key %d\n", voice, key); | |||||
/* save release velocity */ | |||||
voice->velocity = rvelocity; | |||||
previous_top_key = synth->held_keys[0]; | |||||
/* remove this key from list of held keys */ | |||||
nekobee_voice_remove_held_key(synth, key); | |||||
if (synth->held_keys[0] >= 0) { | |||||
/* still some keys held */ | |||||
if (synth->held_keys[0] != previous_top_key) { | |||||
/* most-recently-played key has changed */ | |||||
voice->key = synth->held_keys[0]; | |||||
XDB_MESSAGE(XDB_NOTE, " note-off in monophonic section: changing pitch to %d\n", voice->key); | |||||
voice->target_pitch = nekobee_pitch[voice->key]; | |||||
if (synth->glide == XSYNTH_GLIDE_MODE_INITIAL || | |||||
synth->glide == XSYNTH_GLIDE_MODE_OFF) | |||||
voice->prev_pitch = voice->target_pitch; | |||||
/* if mono mode is 'both', re-trigger EGs */ | |||||
if (synth->monophonic == XSYNTH_MONO_MODE_BOTH && !_RELEASED(voice)) { | |||||
voice->vca_eg_phase = 0; | |||||
voice->vcf_eg_phase = 0; | |||||
} | |||||
} | |||||
} else { /* no keys still held */ | |||||
if (XSYNTH_SYNTH_SUSTAINED(synth)) { | |||||
/* no more keys in list, but we're sustained */ | |||||
XDB_MESSAGE(XDB_NOTE, " note-off in monophonic section: sustained with no held keys\n"); | |||||
if (!_RELEASED(voice)) | |||||
voice->status = XSYNTH_VOICE_SUSTAINED; | |||||
} else { /* not sustained */ | |||||
/* no more keys in list, so turn off note */ | |||||
XDB_MESSAGE(XDB_NOTE, " note-off in monophonic section: turning off voice %p\n", voice); | |||||
nekobee_voice_set_release_phase(voice); | |||||
voice->status = XSYNTH_VOICE_RELEASED; | |||||
} | |||||
} | |||||
} | |||||
/* | |||||
* nekobee_voice_release_note | |||||
*/ | |||||
void | |||||
nekobee_voice_release_note(nekobee_synth_t *synth, nekobee_voice_t *voice) | |||||
{ | |||||
XDB_MESSAGE(XDB_NOTE, " nekobee_voice_release_note: turning off voice %p\n", voice); | |||||
if (_ON(voice)) { | |||||
/* dummy up a release velocity */ | |||||
voice->rvelocity = 64; | |||||
} | |||||
nekobee_voice_set_release_phase(voice); | |||||
voice->status = XSYNTH_VOICE_RELEASED; | |||||
return; | |||||
(void)synth; | |||||
} |
@@ -0,0 +1,183 @@ | |||||
/* nekobee DSSI software synthesizer plugin | |||||
* | |||||
* Copyright (C) 2004 Sean Bolton and others. | |||||
* | |||||
* Portions of this file may have come from Steve Brookes' | |||||
* nekobee, copyright (C) 1999 S. J. Brookes. | |||||
* Portions of this file may have come from Peter Hanappe's | |||||
* Fluidsynth, copyright (C) 2003 Peter Hanappe and others. | |||||
* | |||||
* 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. | |||||
*/ | |||||
#ifndef _XSYNTH_VOICE_H | |||||
#define _XSYNTH_VOICE_H | |||||
#include <string.h> | |||||
#include "nekobee_types.h" | |||||
/* maximum size of a rendering burst */ | |||||
#define XSYNTH_NUGGET_SIZE 64 | |||||
/* minBLEP constants */ | |||||
/* minBLEP table oversampling factor (must be a power of two): */ | |||||
#define MINBLEP_PHASES 64 | |||||
/* MINBLEP_PHASES minus one: */ | |||||
#define MINBLEP_PHASE_MASK 63 | |||||
/* length in samples of (truncated) step discontinuity delta: */ | |||||
#define STEP_DD_PULSE_LENGTH 72 | |||||
/* length in samples of (truncated) slope discontinuity delta: */ | |||||
#define SLOPE_DD_PULSE_LENGTH 71 | |||||
/* the longer of the two above: */ | |||||
#define LONGEST_DD_PULSE_LENGTH STEP_DD_PULSE_LENGTH | |||||
/* MINBLEP_BUFFER_LENGTH must be at least XSYNTH_NUGGET_SIZE plus | |||||
* LONGEST_DD_PULSE_LENGTH, and not less than twice LONGEST_DD_PULSE_LENGTH: */ | |||||
#define MINBLEP_BUFFER_LENGTH 512 | |||||
/* delay between start of DD pulse and the discontinuity, in samples: */ | |||||
#define DD_SAMPLE_DELAY 4 | |||||
struct _nekobee_patch_t | |||||
{ | |||||
float tuning; | |||||
unsigned char waveform; | |||||
float cutoff; | |||||
float resonance; | |||||
float envmod; | |||||
float decay; | |||||
float accent; | |||||
float volume; | |||||
}; | |||||
enum nekobee_voice_status | |||||
{ | |||||
XSYNTH_VOICE_OFF, /* silent: is not processed by render loop */ | |||||
XSYNTH_VOICE_ON, /* has not received a note off event */ | |||||
XSYNTH_VOICE_SUSTAINED, /* has received note off, but sustain controller is on */ | |||||
XSYNTH_VOICE_RELEASED /* had note off, not sustained, in final decay phase of envelopes */ | |||||
}; | |||||
struct blosc | |||||
{ | |||||
int last_waveform, /* persistent */ | |||||
waveform, /* comes from LADSPA port each cycle */ | |||||
bp_high; /* persistent */ | |||||
float pos, /* persistent */ | |||||
pw; /* comes from LADSPA port each cycle */ | |||||
}; | |||||
/* | |||||
* nekobee_voice_t | |||||
*/ | |||||
struct _nekobee_voice_t | |||||
{ | |||||
unsigned int note_id; | |||||
unsigned char status; | |||||
unsigned char key; | |||||
unsigned char velocity; | |||||
unsigned char rvelocity; /* the note-off velocity */ | |||||
/* translated controller values */ | |||||
float pressure; /* filter resonance multiplier, off = 1.0, full on = 0.0 */ | |||||
/* persistent voice state */ | |||||
float prev_pitch, | |||||
target_pitch, | |||||
lfo_pos; | |||||
struct blosc osc1; | |||||
float vca_eg, | |||||
vcf_eg, | |||||
accent_slug, | |||||
delay1, | |||||
delay2, | |||||
delay3, | |||||
delay4, | |||||
c5; | |||||
unsigned char vca_eg_phase, | |||||
vcf_eg_phase; | |||||
int osc_index; /* shared index into osc_audio */ | |||||
float osc_audio[MINBLEP_BUFFER_LENGTH]; | |||||
float freqcut_buf[XSYNTH_NUGGET_SIZE]; | |||||
float vca_buf[XSYNTH_NUGGET_SIZE]; | |||||
}; | |||||
#define _PLAYING(voice) ((voice)->status != XSYNTH_VOICE_OFF) | |||||
#define _ON(voice) ((voice)->status == XSYNTH_VOICE_ON) | |||||
#define _SUSTAINED(voice) ((voice)->status == XSYNTH_VOICE_SUSTAINED) | |||||
#define _RELEASED(voice) ((voice)->status == XSYNTH_VOICE_RELEASED) | |||||
#define _AVAILABLE(voice) ((voice)->status == XSYNTH_VOICE_OFF) | |||||
extern float nekobee_pitch[128]; | |||||
typedef struct { float value, delta; } float_value_delta; | |||||
extern float_value_delta step_dd_table[]; | |||||
extern float slope_dd_table[]; | |||||
/* nekobee_voice.c */ | |||||
nekobee_voice_t *nekobee_voice_new(); | |||||
void nekobee_voice_note_on(nekobee_synth_t *synth, | |||||
nekobee_voice_t *voice, | |||||
unsigned char key, | |||||
unsigned char velocity); | |||||
void nekobee_voice_remove_held_key(nekobee_synth_t *synth, | |||||
unsigned char key); | |||||
void nekobee_voice_note_off(nekobee_synth_t *synth, | |||||
nekobee_voice_t *voice, | |||||
unsigned char key, | |||||
unsigned char rvelocity); | |||||
void nekobee_voice_release_note(nekobee_synth_t *synth, | |||||
nekobee_voice_t *voice); | |||||
void nekobee_voice_set_ports(nekobee_synth_t *synth, | |||||
nekobee_patch_t *patch); | |||||
void nekobee_voice_update_pressure_mod(nekobee_synth_t *synth, | |||||
nekobee_voice_t *voice); | |||||
/* nekobee_voice_render.c */ | |||||
void nekobee_init_tables(void); | |||||
void nekobee_voice_render(nekobee_synth_t *synth, nekobee_voice_t *voice, | |||||
float *out, unsigned long sample_count, | |||||
int do_control_update); | |||||
/* inline functions */ | |||||
/* | |||||
* nekobee_voice_off | |||||
* | |||||
* Purpose: Turns off a voice immediately, meaning that it is not processed | |||||
* anymore by the render loop. | |||||
*/ | |||||
static inline void | |||||
nekobee_voice_off(nekobee_voice_t* voice) | |||||
{ | |||||
voice->status = XSYNTH_VOICE_OFF; | |||||
/* silence the oscillator buffer for the next use */ | |||||
memset(voice->osc_audio, 0, MINBLEP_BUFFER_LENGTH * sizeof(float)); | |||||
/* -FIX- decrement active voice count? */ | |||||
} | |||||
/* | |||||
* nekobee_voice_start_voice | |||||
*/ | |||||
static inline void | |||||
nekobee_voice_start_voice(nekobee_voice_t *voice) | |||||
{ | |||||
voice->status = XSYNTH_VOICE_ON; | |||||
/* -FIX- increment active voice count? */ | |||||
} | |||||
#endif /* _XSYNTH_VOICE_H */ |
@@ -0,0 +1,410 @@ | |||||
/* nekobee DSSI software synthesizer plugin | |||||
*/ | |||||
#define _BSD_SOURCE 1 | |||||
#define _SVID_SOURCE 1 | |||||
#define _ISOC99_SOURCE 1 | |||||
#include <math.h> | |||||
#include "nekobee.h" | |||||
#include "nekobee_synth.h" | |||||
#include "nekobee_voice.h" | |||||
#define M_2PI_F (2.0f * (float)M_PI) | |||||
#define M_PI_F (float)M_PI | |||||
#define VCF_FREQ_MAX (0.825f) /* original filters only stable to this frequency */ | |||||
static int tables_initialized = 0; | |||||
float nekobee_pitch[128]; | |||||
#define pitch_ref_note 69 | |||||
#define volume_to_amplitude_scale 128 | |||||
static float volume_to_amplitude_table[4 + volume_to_amplitude_scale + 2]; | |||||
static float velocity_to_attenuation[128]; | |||||
static float qdB_to_amplitude_table[4 + 256 + 0]; | |||||
void | |||||
nekobee_init_tables(void) | |||||
{ | |||||
int i; | |||||
float pexp; | |||||
float volume, volume_exponent; | |||||
float ol, amp; | |||||
if (tables_initialized) | |||||
return; | |||||
/* MIDI note to pitch */ | |||||
for (i = 0; i < 128; ++i) { | |||||
pexp = (float)(i - pitch_ref_note) / 12.0f; | |||||
nekobee_pitch[i] = powf(2.0f, pexp); | |||||
} | |||||
/* volume to amplitude | |||||
* | |||||
* This generates a curve which is: | |||||
* volume_to_amplitude_table[128 + 4] = 0.25 * 3.16... ~= -2dB | |||||
* volume_to_amplitude_table[64 + 4] = 0.25 * 1.0 ~= -12dB | |||||
* volume_to_amplitude_table[32 + 4] = 0.25 * 0.316... ~= -22dB | |||||
* volume_to_amplitude_table[16 + 4] = 0.25 * 0.1 ~= -32dB | |||||
* etc. | |||||
*/ | |||||
volume_exponent = 1.0f / (2.0f * log10f(2.0f)); | |||||
for (i = 0; i <= volume_to_amplitude_scale; i++) { | |||||
volume = (float)i / (float)volume_to_amplitude_scale; | |||||
volume_to_amplitude_table[i + 4] = powf(2.0f * volume, volume_exponent) / 4.0f; | |||||
} | |||||
volume_to_amplitude_table[ -1 + 4] = 0.0f; | |||||
volume_to_amplitude_table[129 + 4] = volume_to_amplitude_table[128 + 4]; | |||||
/* velocity to attenuation | |||||
* | |||||
* Creates the velocity to attenuation lookup table, for converting | |||||
* velocities [1, 127] to full-velocity-sensitivity attenuation in | |||||
* quarter decibels. Modeled after my TX-7's velocity response.*/ | |||||
velocity_to_attenuation[0] = 253.9999f; | |||||
for (i = 1; i < 127; i++) { | |||||
if (i >= 10) { | |||||
ol = (powf(((float)i / 127.0f), 0.32f) - 1.0f) * 100.0f; | |||||
amp = powf(2.0f, ol / 8.0f); | |||||
} else { | |||||
ol = (powf(((float)10 / 127.0f), 0.32f) - 1.0f) * 100.0f; | |||||
amp = powf(2.0f, ol / 8.0f) * (float)i / 10.0f; | |||||
} | |||||
velocity_to_attenuation[i] = log10f(amp) * -80.0f; | |||||
} | |||||
velocity_to_attenuation[127] = 0.0f; | |||||
/* quarter-decibel attenuation to amplitude */ | |||||
qdB_to_amplitude_table[-1 + 4] = 1.0f; | |||||
for (i = 0; i <= 255; i++) { | |||||
qdB_to_amplitude_table[i + 4] = powf(10.0f, (float)i / -80.0f); | |||||
} | |||||
tables_initialized = 1; | |||||
} | |||||
static inline float | |||||
volume(float level) | |||||
{ | |||||
unsigned char segment; | |||||
float fract; | |||||
level *= (float)volume_to_amplitude_scale; | |||||
segment = lrintf(level - 0.5f); | |||||
fract = level - (float)segment; | |||||
return volume_to_amplitude_table[segment + 4] + fract * | |||||
(volume_to_amplitude_table[segment + 5] - | |||||
volume_to_amplitude_table[segment + 4]); | |||||
} | |||||
static inline float | |||||
qdB_to_amplitude(float qdB) | |||||
{ | |||||
int i = lrintf(qdB - 0.5f); | |||||
float f = qdB - (float)i; | |||||
return qdB_to_amplitude_table[i + 4] + f * | |||||
(qdB_to_amplitude_table[i + 5] - | |||||
qdB_to_amplitude_table[i + 4]); | |||||
} | |||||
void blosc_place_step_dd(float *buffer, int index, float phase, float w, float scale){ | |||||
float r; | |||||
int i; | |||||
r = MINBLEP_PHASES * phase / w; | |||||
i = lrintf(r - 0.5f); | |||||
r -= (float)i; | |||||
i &= MINBLEP_PHASE_MASK; /* port changes can cause i to be out-of-range */ | |||||
/* This would be better than the above, but more expensive: | |||||
* while (i < 0) { | |||||
* i += MINBLEP_PHASES; | |||||
* index++; | |||||
* } | |||||
*/ | |||||
while (i < MINBLEP_PHASES * STEP_DD_PULSE_LENGTH) { | |||||
buffer[index] += scale * (step_dd_table[i].value + r * step_dd_table[i].delta); | |||||
i += MINBLEP_PHASES; | |||||
index++; | |||||
} | |||||
} | |||||
void vco(unsigned long sample_count, nekobee_voice_t *voice, struct blosc *osc, | |||||
int index, float w) | |||||
{ | |||||
unsigned long sample; | |||||
float pos = osc->pos; | |||||
float pw, gain, halfgain, out; | |||||
pw=0.46f; | |||||
gain=1.0f; | |||||
halfgain=gain*0.5f; | |||||
int bp_high = osc->bp_high; | |||||
out=(bp_high ? halfgain : -halfgain); | |||||
switch (osc->waveform) | |||||
{ | |||||
default: | |||||
case 0: { | |||||
for (sample = 0; sample < sample_count; sample++) { | |||||
pos += w; | |||||
if (bp_high) { | |||||
if (pos >= pw) { | |||||
blosc_place_step_dd(voice->osc_audio, index, pos - pw, w, -gain); | |||||
bp_high = 0; | |||||
out = -halfgain; | |||||
} | |||||
if (pos >= 1.0f) { | |||||
pos -= 1.0f; | |||||
blosc_place_step_dd(voice->osc_audio, index, pos, w, gain); | |||||
bp_high = 1; | |||||
out = halfgain; | |||||
} | |||||
} else { | |||||
if (pos >= 1.0f) { | |||||
pos -= 1.0f; | |||||
blosc_place_step_dd(voice->osc_audio, index, pos, w, gain); | |||||
bp_high = 1; | |||||
out = halfgain; | |||||
} | |||||
if (bp_high && pos >= pw) { | |||||
blosc_place_step_dd(voice->osc_audio, index, pos - pw, w, -gain); | |||||
bp_high = 0; | |||||
out = -halfgain; | |||||
} | |||||
} | |||||
voice->osc_audio[index + DD_SAMPLE_DELAY] += out; | |||||
index++; | |||||
} | |||||
osc->pos = pos; | |||||
osc->bp_high = bp_high; | |||||
break; | |||||
} | |||||
case 1: // sawtooth wave | |||||
{ | |||||
for (sample=0; sample < sample_count; sample++) { | |||||
pos += w; | |||||
if (pos >= 1.0f) { | |||||
pos -= 1.0f; | |||||
blosc_place_step_dd(voice->osc_audio, index, pos, w, gain); | |||||
} | |||||
voice->osc_audio[index + DD_SAMPLE_DELAY] += gain * (0.5f - pos); | |||||
index++; | |||||
} | |||||
break; | |||||
} | |||||
} | |||||
osc->pos=pos; | |||||
} | |||||
static inline void | |||||
vcf_4pole(nekobee_voice_t *voice, unsigned long sample_count, | |||||
float *in, float *out, float *cutoff, float qres, float *amp) | |||||
{ | |||||
unsigned long sample; | |||||
float freqcut, freqcut2, highpass, | |||||
delay1 = voice->delay1, | |||||
delay2 = voice->delay2, | |||||
delay3 = voice->delay3, | |||||
delay4 = voice->delay4; | |||||
qres = 2.0f - qres * 1.995f; | |||||
for (sample = 0; sample < sample_count; sample++) { | |||||
/* Hal Chamberlin's state variable filter */ | |||||
freqcut = cutoff[sample] * 2.0f; | |||||
freqcut2 = cutoff[sample] * 4.0f; | |||||
if (freqcut > VCF_FREQ_MAX) freqcut = VCF_FREQ_MAX; | |||||
if (freqcut2 > VCF_FREQ_MAX) freqcut2 = VCF_FREQ_MAX; | |||||
delay2 = delay2 + freqcut * delay1; /* delay2/4 = lowpass output */ | |||||
highpass = in[sample] - delay2 - qres * delay1; | |||||
delay1 = freqcut * highpass + delay1; /* delay1/3 = bandpass output */ | |||||
delay4 = delay4 + freqcut2 * delay3; | |||||
highpass = delay2 - delay4 - qres * delay3; | |||||
delay3 = freqcut2 * highpass + delay3; | |||||
/* mix filter output into output buffer */ | |||||
out[sample] += 0.1*atan(3*delay4 * amp[sample]); | |||||
} | |||||
voice->delay1 = delay1; | |||||
voice->delay2 = delay2; | |||||
voice->delay3 = delay3; | |||||
voice->delay4 = delay4; | |||||
voice->c5 = 0.0f; | |||||
} | |||||
/* | |||||
* nekobee_voice_render | |||||
* | |||||
* generate the actual sound data for this voice | |||||
*/ | |||||
void | |||||
nekobee_voice_render(nekobee_synth_t *synth, nekobee_voice_t *voice, | |||||
float *out, unsigned long sample_count, | |||||
int do_control_update) | |||||
{ | |||||
unsigned long sample; | |||||
/* state variables saved in voice */ | |||||
float lfo_pos = voice->lfo_pos, | |||||
vca_eg = voice->vca_eg, | |||||
vcf_eg = voice->vcf_eg; | |||||
unsigned char vca_eg_phase = voice->vca_eg_phase, | |||||
vcf_eg_phase = voice->vcf_eg_phase; | |||||
int osc_index = voice->osc_index; | |||||
/* temporary variables used in calculating voice */ | |||||
float fund_pitch; | |||||
float deltat = synth->deltat; | |||||
float freq, cutoff, vcf_amt; | |||||
float vcf_acc_amt; | |||||
/* set up synthesis variables from patch */ | |||||
float omega; | |||||
float vca_eg_amp = qdB_to_amplitude(velocity_to_attenuation[voice->velocity] * 0); | |||||
float vca_eg_rate_level[3], vca_eg_one_rate[3]; | |||||
float vcf_eg_amp = qdB_to_amplitude(velocity_to_attenuation[voice->velocity] * 0); | |||||
float vcf_eg_rate_level[3], vcf_eg_one_rate[3]; | |||||
float qres = synth->resonance; | |||||
float vol_out = volume(synth->volume); | |||||
float velocity = (voice->velocity); | |||||
float vcf_egdecay = synth->decay; | |||||
fund_pitch = 0.1f*voice->target_pitch +0.9 * voice->prev_pitch; /* glide */ | |||||
if (do_control_update) { | |||||
voice->prev_pitch = fund_pitch; /* save pitch for next time */ | |||||
} | |||||
fund_pitch *= 440.0f; | |||||
omega = synth->tuning * fund_pitch; | |||||
// if we have triggered ACCENT | |||||
// we need a shorter decay | |||||
// we should probably have something like this in the note on code | |||||
// that could trigger an ACCENT light | |||||
if (velocity>90) { | |||||
vcf_egdecay=.0005; | |||||
} | |||||
// VCA - In a real 303, it is set for around 2 seconds | |||||
vca_eg_rate_level[0] = 0.1f * vca_eg_amp; // instant on attack | |||||
vca_eg_one_rate[0] = 0.9f; // very fast | |||||
vca_eg_rate_level[1] = 0.0f; // sustain is zero | |||||
vca_eg_one_rate[1] = 1.0f - 0.00001f; // decay time is very slow | |||||
vca_eg_rate_level[2] = 0.0f; // decays to zero | |||||
vca_eg_one_rate[2] = 0.975f; // very fast release | |||||
// VCF - funny things go on with the accent | |||||
vcf_eg_rate_level[0] = 0.1f * vcf_eg_amp; | |||||
vcf_eg_one_rate[0] = 1-0.1f; //0.9f; | |||||
vcf_eg_rate_level[1] = 0.0f; // vcf_egdecay * *(synth->vcf_eg_sustain_level) * vcf_eg_amp; | |||||
vcf_eg_one_rate[1] = 1.0f - vcf_egdecay; | |||||
vcf_eg_rate_level[2] = 0.0f; | |||||
vcf_eg_one_rate[2] = 0.9995f; // 1.0f - *(synth->vcf_eg_release_time); | |||||
vca_eg_amp *= 0.99f; | |||||
vcf_eg_amp *= 0.99f; | |||||
freq = M_PI_F * deltat * fund_pitch * synth->mod_wheel; /* now (0 to 1) * pi */ | |||||
cutoff = 0.008f * synth->cutoff; | |||||
// 303 always has slight VCF mod | |||||
vcf_amt = 0.05f+(synth->envmod*0.75); | |||||
/* copy some things so oscillator functions can see them */ | |||||
voice->osc1.waveform = lrintf(synth->waveform); | |||||
// work out how much the accent will affect the filter | |||||
vcf_acc_amt=.333f+ (synth->resonance/1.5f); | |||||
for (sample = 0; sample < sample_count; sample++) { | |||||
vca_eg = vca_eg_rate_level[vca_eg_phase] + vca_eg_one_rate[vca_eg_phase] * vca_eg; | |||||
vcf_eg = vcf_eg_rate_level[vcf_eg_phase] + vcf_eg_one_rate[vcf_eg_phase] * vcf_eg; | |||||
voice->freqcut_buf[sample] = (cutoff + (vcf_amt * vcf_eg/2.0f) + (synth->vcf_accent * synth->accent*0.5f)); | |||||
voice->vca_buf[sample] = vca_eg * vol_out*(1.0f + synth->accent*synth->vca_accent); | |||||
if (!vca_eg_phase && vca_eg > vca_eg_amp) vca_eg_phase = 1; /* flip from attack to decay */ | |||||
if (!vcf_eg_phase && vcf_eg > vcf_eg_amp) vcf_eg_phase = 1; /* flip from attack to decay */ | |||||
} | |||||
// oscillator | |||||
vco(sample_count, voice, &voice->osc1, osc_index, deltat * omega); | |||||
// VCF and VCA | |||||
vcf_4pole(voice, sample_count, voice->osc_audio + osc_index, out, voice->freqcut_buf, qres, voice->vca_buf); | |||||
osc_index += sample_count; | |||||
if (do_control_update) { | |||||
/* do those things should be done only once per control-calculation | |||||
* interval ("nugget"), such as voice check-for-dead, pitch envelope | |||||
* calculations, volume envelope phase transition checks, etc. */ | |||||
/* check if we've decayed to nothing, turn off voice if so */ | |||||
if (vca_eg_phase == 2 && voice->vca_buf[sample_count - 1] < 6.26e-6f) { | |||||
// sound has completed its release phase (>96dB below volume '5' max) | |||||
XDB_MESSAGE(XDB_NOTE, " nekobee_voice_render check for dead: killing note id %d\n", voice->note_id); | |||||
nekobee_voice_off(voice); | |||||
return; // we're dead now, so return | |||||
} | |||||
/* already saved prev_pitch above */ | |||||
/* check oscillator audio buffer index, shift buffer if necessary */ | |||||
if (osc_index > MINBLEP_BUFFER_LENGTH - (XSYNTH_NUGGET_SIZE + LONGEST_DD_PULSE_LENGTH)) { | |||||
memcpy(voice->osc_audio, voice->osc_audio + osc_index, | |||||
LONGEST_DD_PULSE_LENGTH * sizeof (float)); | |||||
memset(voice->osc_audio + LONGEST_DD_PULSE_LENGTH, 0, | |||||
(MINBLEP_BUFFER_LENGTH - LONGEST_DD_PULSE_LENGTH) * sizeof (float)); | |||||
osc_index = 0; | |||||
} | |||||
} | |||||
/* save things for next time around */ | |||||
voice->lfo_pos = lfo_pos; | |||||
voice->vca_eg = vca_eg; | |||||
voice->vca_eg_phase = vca_eg_phase; | |||||
voice->vcf_eg = vcf_eg; | |||||
voice->vcf_eg_phase = vcf_eg_phase; | |||||
voice->osc_index = osc_index; | |||||
return; | |||||
(void)freq; | |||||
(void)vcf_acc_amt; | |||||
} |
@@ -60,6 +60,7 @@ void carla_register_all_plugins() | |||||
// DISTRHO plugins (OpenGL) | // DISTRHO plugins (OpenGL) | ||||
carla_register_native_plugin_3BandEQ(); | carla_register_native_plugin_3BandEQ(); | ||||
carla_register_native_plugin_3BandSplitter(); | carla_register_native_plugin_3BandSplitter(); | ||||
carla_register_native_plugin_Nekobi(); | |||||
carla_register_native_plugin_PingPongPan(); | carla_register_native_plugin_PingPongPan(); | ||||
carla_register_native_plugin_StereoEnhancer(); | carla_register_native_plugin_StereoEnhancer(); | ||||
#endif | #endif | ||||
@@ -69,6 +69,16 @@ struct ParameterRanges { | |||||
this->stepLarge = stepLarge; | this->stepLarge = stepLarge; | ||||
} | } | ||||
void clear() | |||||
{ | |||||
def = 0.0f; | |||||
min = 0.0f; | |||||
max = 1.0f; | |||||
step = 0.001f; | |||||
stepSmall = 0.00001f; | |||||
stepLarge = 0.01f; | |||||
} | |||||
void fixValue(float& value) const | void fixValue(float& value) const | ||||
{ | { | ||||
if (value < min) | if (value < min) | ||||
@@ -116,6 +126,15 @@ struct Parameter { | |||||
Parameter() | Parameter() | ||||
: hints(0x0) {} | : hints(0x0) {} | ||||
void clear() | |||||
{ | |||||
hints = 0x0; | |||||
name = ""; | |||||
symbol = ""; | |||||
unit = ""; | |||||
ranges.clear(); | |||||
} | |||||
}; | }; | ||||
// ------------------------------------------------- | // ------------------------------------------------- | ||||
@@ -42,7 +42,9 @@ public: | |||||
float getValue() const; | float getValue() const; | ||||
void setStartPos(const Point<int>& startPos); | void setStartPos(const Point<int>& startPos); | ||||
void setStartPos(int x, int y); | |||||
void setEndPos(const Point<int>& endPos); | void setEndPos(const Point<int>& endPos); | ||||
void setEndPos(int x, int y); | |||||
void setRange(float min, float max); | void setRange(float min, float max); | ||||
void setValue(float value, bool sendCallback = false); | void setValue(float value, bool sendCallback = false); | ||||
@@ -62,12 +62,22 @@ void ImageSlider::setStartPos(const Point<int>& startPos) | |||||
_recheckArea(); | _recheckArea(); | ||||
} | } | ||||
void ImageSlider::setStartPos(int x, int y) | |||||
{ | |||||
setStartPos(Point<int>(x, y)); | |||||
} | |||||
void ImageSlider::setEndPos(const Point<int>& endPos) | void ImageSlider::setEndPos(const Point<int>& endPos) | ||||
{ | { | ||||
fEndPos = endPos; | fEndPos = endPos; | ||||
_recheckArea(); | _recheckArea(); | ||||
} | } | ||||
void ImageSlider::setEndPos(int x, int y) | |||||
{ | |||||
setEndPos(Point<int>(x, y)); | |||||
} | |||||
void ImageSlider::setRange(float min, float max) | void ImageSlider::setRange(float min, float max) | ||||
{ | { | ||||
if (fValue < min) | if (fValue < min) | ||||
@@ -227,12 +227,11 @@ public: | |||||
// needed? | // needed? | ||||
#elif defined(DISTRHO_UI_OPENGL) | #elif defined(DISTRHO_UI_OPENGL) | ||||
glApp.idle(); | glApp.idle(); | ||||
#else | |||||
#endif | |||||
assert(kUi != nullptr); | assert(kUi != nullptr); | ||||
if (kUi != nullptr) | if (kUi != nullptr) | ||||
kUi->d_uiIdle(); | kUi->d_uiIdle(); | ||||
#endif | |||||
} | } | ||||
#if defined(DISTRHO_UI_EXTERNAL) | #if defined(DISTRHO_UI_EXTERNAL) | ||||