Rx3/drmr2
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make midi base note a control

Browse Source
This commit is contained in:
Nick Lanham 2012-02-14 15:39:53 +01:00
parent f109726bd7
commit d76a3fcee4
4 changed files with 130 additions and 73 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
drmr.c
View File

@ -126,6 +126,8 @@ connect_port(LV2_Handle instance,
case DRMR_KITNUM: case DRMR_KITNUM:
if(data) drmr->kitReq = (float*)data; if(data) drmr->kitReq = (float*)data;
break; break;
case DRMR_BASENOTE:
if (data) drmr->baseNote = (float*)data;
default: default:
break; break;
} }
@ -169,10 +171,11 @@ static inline void layer_to_sample(drmr_sample *sample, float gain) {
#define DB_CO(g) ((g) > GAIN_MIN ? powf(10.0f, (g) * 0.05f) : 0.0f) #define DB_CO(g) ((g) > GAIN_MIN ? powf(10.0f, (g) * 0.05f) : 0.0f)
static void run(LV2_Handle instance, uint32_t n_samples) { static void run(LV2_Handle instance, uint32_t n_samples) {
int i,kitInt; int i,kitInt,baseNote;
DrMr* drmr = (DrMr*)instance; DrMr* drmr = (DrMr*)instance;
kitInt = (int)floorf(*(drmr->kitReq)); kitInt = (int)floorf(*(drmr->kitReq));
baseNote = (int)floorf(*(drmr->baseNote));
if (kitInt != drmr->curKit) // requested a new kit if (kitInt != drmr->curKit) // requested a new kit
pthread_cond_signal(&drmr->load_cond); pthread_cond_signal(&drmr->load_cond);
@ -190,7 +193,7 @@ static void run(LV2_Handle instance, uint32_t n_samples) {
break; break;
case 9: { case 9: {
uint8_t nn = data[1]; uint8_t nn = data[1];
nn-=60; // middle c is our root note (setting?) nn-=baseNote;
// need to mutex this to avoid getting the samples array // need to mutex this to avoid getting the samples array
// changed after the check that the midi-note is valid // changed after the check that the midi-note is valid
pthread_mutex_lock(&drmr->load_mutex); pthread_mutex_lock(&drmr->load_mutex);

2
drmr.h
View File

@ -70,6 +70,7 @@ typedef enum {
DRMR_LEFT, DRMR_LEFT,
DRMR_RIGHT, DRMR_RIGHT,
DRMR_KITNUM, DRMR_KITNUM,
DRMR_BASENOTE,
DRMR_GAIN_ONE, DRMR_GAIN_ONE,
DRMR_GAIN_TWO, DRMR_GAIN_TWO,
DRMR_GAIN_THREE, DRMR_GAIN_THREE,
@ -147,6 +148,7 @@ typedef struct {
float** gains; float** gains;
float** pans; float** pans;
float* kitReq; float* kitReq;
float* baseNote;
double rate; double rate;
// URIs // URIs

142
drmr.ttl
View File

@ -44,14 +44,26 @@
lv2:symbol "kit_num"; lv2:symbol "kit_num";
lv2:name "Kit Index"; lv2:name "Kit Index";
lv2:minimum 0; lv2:minimum 0;
lv2:maximum 50; lv2:maximum 200;
lv2:default 0; lv2:default 0;
lv2:portProperty lv2:integer; lv2:portProperty lv2:integer;
], ],
[
a lv2:ControlPort, lv2:InputPort;
lv2:index 4;
lv2:symbol "base_note";
lv2:name "Midi Base Note";
lv2:minimum 21;
lv2:maximum 107;
lv2:default 36;
lv2:portProperty lv2:integer;
],
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 4; lv2:index 5;
lv2:symbol "gain_one"; lv2:symbol "gain_one";
lv2:name "Sample One Gain"; lv2:name "Sample One Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -65,7 +77,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 5; lv2:index 6;
lv2:symbol "gain_two"; lv2:symbol "gain_two";
lv2:name "Sample Two Gain"; lv2:name "Sample Two Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -79,7 +91,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 6; lv2:index 7;
lv2:symbol "gain_three"; lv2:symbol "gain_three";
lv2:name "Sample Three Gain"; lv2:name "Sample Three Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -93,7 +105,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 7; lv2:index 8;
lv2:symbol "gain_four"; lv2:symbol "gain_four";
lv2:name "Sample Four Gain"; lv2:name "Sample Four Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -107,7 +119,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 8; lv2:index 9;
lv2:symbol "gain_five"; lv2:symbol "gain_five";
lv2:name "Sample Five Gain"; lv2:name "Sample Five Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -121,7 +133,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 9; lv2:index 10;
lv2:symbol "gain_six"; lv2:symbol "gain_six";
lv2:name "Sample Six Gain"; lv2:name "Sample Six Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -135,7 +147,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 10; lv2:index 11;
lv2:symbol "gain_seven"; lv2:symbol "gain_seven";
lv2:name "Sample Seven Gain"; lv2:name "Sample Seven Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -149,7 +161,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 11; lv2:index 12;
lv2:symbol "gain_eight"; lv2:symbol "gain_eight";
lv2:name "Sample Eight Gain"; lv2:name "Sample Eight Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -163,7 +175,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 12; lv2:index 13;
lv2:symbol "gain_nine"; lv2:symbol "gain_nine";
lv2:name "Sample Nine Gain"; lv2:name "Sample Nine Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -177,7 +189,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 13; lv2:index 14;
lv2:symbol "gain_ten"; lv2:symbol "gain_ten";
lv2:name "Sample Ten Gain"; lv2:name "Sample Ten Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -191,7 +203,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 14; lv2:index 15;
lv2:symbol "gain_eleven"; lv2:symbol "gain_eleven";
lv2:name "Sample Eleven Gain"; lv2:name "Sample Eleven Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -205,7 +217,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 15; lv2:index 16;
lv2:symbol "gain_twelve"; lv2:symbol "gain_twelve";
lv2:name "Sample Twelve Gain"; lv2:name "Sample Twelve Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -219,7 +231,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 16; lv2:index 17;
lv2:symbol "gain_thirteen"; lv2:symbol "gain_thirteen";
lv2:name "Sample Thirteen Gain"; lv2:name "Sample Thirteen Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -233,7 +245,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 17; lv2:index 18;
lv2:symbol "gain_fourteen"; lv2:symbol "gain_fourteen";
lv2:name "Sample Fourteen Gain"; lv2:name "Sample Fourteen Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -247,7 +259,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 18; lv2:index 19;
lv2:symbol "gain_fifteen"; lv2:symbol "gain_fifteen";
lv2:name "Sample Fifteen Gain"; lv2:name "Sample Fifteen Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -261,7 +273,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 19; lv2:index 20;
lv2:symbol "gain_sixteen"; lv2:symbol "gain_sixteen";
lv2:name "Sample Sixteen Gain"; lv2:name "Sample Sixteen Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -275,7 +287,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 20; lv2:index 21;
lv2:symbol "gain_seventeen"; lv2:symbol "gain_seventeen";
lv2:name "Sample Seventeen Gain"; lv2:name "Sample Seventeen Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -290,7 +302,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 21; lv2:index 22;
lv2:symbol "gain_eighteen"; lv2:symbol "gain_eighteen";
lv2:name "Sample Eighteen Gain"; lv2:name "Sample Eighteen Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -304,7 +316,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 22; lv2:index 23;
lv2:symbol "gain_nineteen"; lv2:symbol "gain_nineteen";
lv2:name "Sample Nineteen Gain"; lv2:name "Sample Nineteen Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -318,7 +330,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 23; lv2:index 24;
lv2:symbol "gain_twenty"; lv2:symbol "gain_twenty";
lv2:name "Sample Twenty Gain"; lv2:name "Sample Twenty Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -332,7 +344,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 24; lv2:index 25;
lv2:symbol "gain_twentyone"; lv2:symbol "gain_twentyone";
lv2:name "Sample Twenty One Gain"; lv2:name "Sample Twenty One Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -346,7 +358,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 25; lv2:index 26;
lv2:symbol "gain_twentytwo"; lv2:symbol "gain_twentytwo";
lv2:name "Sample Twenty Two Gain"; lv2:name "Sample Twenty Two Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -360,7 +372,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 26; lv2:index 27;
lv2:symbol "gain_twentythree"; lv2:symbol "gain_twentythree";
lv2:name "Sample Twenty Three Gain"; lv2:name "Sample Twenty Three Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -374,7 +386,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 27; lv2:index 28;
lv2:symbol "gain_twentyfour"; lv2:symbol "gain_twentyfour";
lv2:name "Sample Twenty Four Gain"; lv2:name "Sample Twenty Four Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -388,7 +400,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 28; lv2:index 29;
lv2:symbol "gain_twentyfive"; lv2:symbol "gain_twentyfive";
lv2:name "Sample Twenty Five Gain"; lv2:name "Sample Twenty Five Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -402,7 +414,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 29; lv2:index 30;
lv2:symbol "gain_twentysix"; lv2:symbol "gain_twentysix";
lv2:name "Sample Twenty Six Gain"; lv2:name "Sample Twenty Six Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -416,7 +428,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 30; lv2:index 31;
lv2:symbol "gain_twentyseven"; lv2:symbol "gain_twentyseven";
lv2:name "Sample Twenty Seven Gain"; lv2:name "Sample Twenty Seven Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -430,7 +442,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 31; lv2:index 32;
lv2:symbol "gain_twentyeight"; lv2:symbol "gain_twentyeight";
lv2:name "Sample Twenty Eight Gain"; lv2:name "Sample Twenty Eight Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -444,7 +456,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 32; lv2:index 33;
lv2:symbol "gain_twentynine"; lv2:symbol "gain_twentynine";
lv2:name "Sample Twenty Nine Gain"; lv2:name "Sample Twenty Nine Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -458,7 +470,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 33; lv2:index 34;
lv2:symbol "gain_thirty"; lv2:symbol "gain_thirty";
lv2:name "Sample Thirty Gain"; lv2:name "Sample Thirty Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -472,7 +484,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 34; lv2:index 35;
lv2:symbol "gain_thirtyone"; lv2:symbol "gain_thirtyone";
lv2:name "Sample Thirty One Gain"; lv2:name "Sample Thirty One Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -486,7 +498,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 35; lv2:index 36;
lv2:symbol "gain_thirtytwo"; lv2:symbol "gain_thirtytwo";
lv2:name "Sample Thirty Two Gain"; lv2:name "Sample Thirty Two Gain";
lv2:minimum -60.0; lv2:minimum -60.0;
@ -500,7 +512,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 36; lv2:index 37;
lv2:symbol "pan_one"; lv2:symbol "pan_one";
lv2:name "Sample One Pan"; lv2:name "Sample One Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -510,7 +522,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 37; lv2:index 38;
lv2:symbol "pan_two"; lv2:symbol "pan_two";
lv2:name "Sample Two Pan"; lv2:name "Sample Two Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -520,7 +532,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 38; lv2:index 39;
lv2:symbol "pan_three"; lv2:symbol "pan_three";
lv2:name "Sample Three Pan"; lv2:name "Sample Three Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -530,7 +542,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 39; lv2:index 40;
lv2:symbol "pan_four"; lv2:symbol "pan_four";
lv2:name "Sample Four Pan"; lv2:name "Sample Four Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -540,7 +552,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 40; lv2:index 41;
lv2:symbol "pan_five"; lv2:symbol "pan_five";
lv2:name "Sample Five Pan"; lv2:name "Sample Five Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -550,7 +562,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 41; lv2:index 42;
lv2:symbol "pan_six"; lv2:symbol "pan_six";
lv2:name "Sample Six Pan"; lv2:name "Sample Six Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -560,7 +572,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 42; lv2:index 43;
lv2:symbol "pan_seven"; lv2:symbol "pan_seven";
lv2:name "Sample Seven Pan"; lv2:name "Sample Seven Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -570,7 +582,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 43; lv2:index 44;
lv2:symbol "pan_eight"; lv2:symbol "pan_eight";
lv2:name "Sample Eight Pan"; lv2:name "Sample Eight Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -580,7 +592,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 44; lv2:index 45;
lv2:symbol "pan_nine"; lv2:symbol "pan_nine";
lv2:name "Sample Nine Pan"; lv2:name "Sample Nine Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -590,7 +602,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 45; lv2:index 46;
lv2:symbol "pan_ten"; lv2:symbol "pan_ten";
lv2:name "Sample Ten Pan"; lv2:name "Sample Ten Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -600,7 +612,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 46; lv2:index 47;
lv2:symbol "pan_eleven"; lv2:symbol "pan_eleven";
lv2:name "Sample Eleven Pan"; lv2:name "Sample Eleven Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -610,7 +622,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 47; lv2:index 48;
lv2:symbol "pan_twelve"; lv2:symbol "pan_twelve";
lv2:name "Sample Twelve Pan"; lv2:name "Sample Twelve Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -620,7 +632,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 48; lv2:index 49;
lv2:symbol "pan_thirteen"; lv2:symbol "pan_thirteen";
lv2:name "Sample Thirteen Pan"; lv2:name "Sample Thirteen Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -630,7 +642,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 49; lv2:index 50;
lv2:symbol "pan_fourteen"; lv2:symbol "pan_fourteen";
lv2:name "Sample Fourteen Pan"; lv2:name "Sample Fourteen Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -640,7 +652,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 50; lv2:index 51;
lv2:symbol "pan_fifteen"; lv2:symbol "pan_fifteen";
lv2:name "Sample Fifteen Pan"; lv2:name "Sample Fifteen Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -650,7 +662,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 51; lv2:index 52;
lv2:symbol "pan_sixteen"; lv2:symbol "pan_sixteen";
lv2:name "Sample Sixteen Pan"; lv2:name "Sample Sixteen Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -660,7 +672,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 52; lv2:index 53;
lv2:symbol "pan_seventeen"; lv2:symbol "pan_seventeen";
lv2:name "Sample Seventeen Pan"; lv2:name "Sample Seventeen Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -675,7 +687,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 53; lv2:index 54;
lv2:symbol "pan_eighteen"; lv2:symbol "pan_eighteen";
lv2:name "Sample Eighteen Pan"; lv2:name "Sample Eighteen Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -689,7 +701,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 54; lv2:index 55;
lv2:symbol "pan_nineteen"; lv2:symbol "pan_nineteen";
lv2:name "Sample Nineteen Pan"; lv2:name "Sample Nineteen Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -703,7 +715,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 55; lv2:index 56;
lv2:symbol "pan_twenty"; lv2:symbol "pan_twenty";
lv2:name "Sample Twenty Pan"; lv2:name "Sample Twenty Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -717,7 +729,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 56; lv2:index 57;
lv2:symbol "pan_twentyone"; lv2:symbol "pan_twentyone";
lv2:name "Sample Twenty One Pan"; lv2:name "Sample Twenty One Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -731,7 +743,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 57; lv2:index 58;
lv2:symbol "pan_twentytwo"; lv2:symbol "pan_twentytwo";
lv2:name "Sample Twenty Two Pan"; lv2:name "Sample Twenty Two Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -745,7 +757,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 58; lv2:index 59;
lv2:symbol "pan_twentythree"; lv2:symbol "pan_twentythree";
lv2:name "Sample Twenty Three Pan"; lv2:name "Sample Twenty Three Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -759,7 +771,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 59; lv2:index 60;
lv2:symbol "pan_twentyfour"; lv2:symbol "pan_twentyfour";
lv2:name "Sample Twenty Four Pan"; lv2:name "Sample Twenty Four Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -773,7 +785,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 60; lv2:index 61;
lv2:symbol "pan_twentyfive"; lv2:symbol "pan_twentyfive";
lv2:name "Sample Twenty Five Pan"; lv2:name "Sample Twenty Five Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -787,7 +799,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 61; lv2:index 62;
lv2:symbol "pan_twentysix"; lv2:symbol "pan_twentysix";
lv2:name "Sample Twenty Six Pan"; lv2:name "Sample Twenty Six Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -801,7 +813,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 62; lv2:index 63;
lv2:symbol "pan_twentyseven"; lv2:symbol "pan_twentyseven";
lv2:name "Sample Twenty Seven Pan"; lv2:name "Sample Twenty Seven Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -815,7 +827,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 63; lv2:index 64;
lv2:symbol "pan_twentyeight"; lv2:symbol "pan_twentyeight";
lv2:name "Sample Twenty Eight Pan"; lv2:name "Sample Twenty Eight Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -829,7 +841,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 64; lv2:index 65;
lv2:symbol "pan_twentynine"; lv2:symbol "pan_twentynine";
lv2:name "Sample Twenty Nine Pan"; lv2:name "Sample Twenty Nine Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -843,7 +855,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 65; lv2:index 66;
lv2:symbol "pan_thirty"; lv2:symbol "pan_thirty";
lv2:name "Sample Thirty Pan"; lv2:name "Sample Thirty Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -857,7 +869,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 66; lv2:index 67;
lv2:symbol "pan_thirtyone"; lv2:symbol "pan_thirtyone";
lv2:name "Sample Thirty One Pan"; lv2:name "Sample Thirty One Pan";
lv2:minimum -1.0; lv2:minimum -1.0;
@ -871,7 +883,7 @@
[ [
a lv2:ControlPort, lv2:InputPort; a lv2:ControlPort, lv2:InputPort;
lv2:index 67; lv2:index 68;
lv2:symbol "pan_thirtytwo"; lv2:symbol "pan_thirtytwo";
lv2:name "Sample Thirty Two Pan"; lv2:name "Sample Thirty Two Pan";
lv2:minimum -1.0; lv2:minimum -1.0;

52
drmr_ui.c
View File

@ -31,6 +31,7 @@ typedef struct {
GtkWidget *drmr_widget; GtkWidget *drmr_widget;
GtkTable *sample_table; GtkTable *sample_table;
GtkComboBox *kit_combo; GtkComboBox *kit_combo;
GtkLabel *base_label;
GtkListStore *kit_store; GtkListStore *kit_store;
GtkWidget** gain_sliders; GtkWidget** gain_sliders;
GtkWidget** pan_sliders; GtkWidget** pan_sliders;
@ -122,7 +123,7 @@ static void fill_sample_table(DrMrUi* ui, int samples, GtkWidget** gain_sliders,
} }
} }
void kit_combobox_changed(GtkComboBox* box, gpointer data) { static void kit_combobox_changed(GtkComboBox* box, gpointer data) {
DrMrUi* ui = (DrMrUi*)data; DrMrUi* ui = (DrMrUi*)data;
gint new_kit = gtk_combo_box_get_active (GTK_COMBO_BOX(box)); gint new_kit = gtk_combo_box_get_active (GTK_COMBO_BOX(box));
float fkit = (float)new_kit; float fkit = (float)new_kit;
@ -130,6 +131,28 @@ void kit_combobox_changed(GtkComboBox* box, gpointer data) {
ui->write(ui->controller,DRMR_KITNUM,4,0,&fkit); ui->write(ui->controller,DRMR_KITNUM,4,0,&fkit);
} }
static const char* nstrs = "C C#D D#E F F#G G#A A#B ";
static char baseLabelBuf[32];
static void setBaseLabel(int noteIdx) {
int oct = (noteIdx/12)-1;
int nmt = (noteIdx%12)*2;
snprintf(baseLabelBuf,32,"Midi Base Note <b>(%c%c%i)</b>:",
nstrs[nmt],nstrs[nmt+1],oct);
}
static void base_changed(GtkSpinButton *base_spin, gpointer data) {
DrMrUi* ui = (DrMrUi*)data;
float base = (float)gtk_spin_button_get_value(base_spin);
if (base >= 21.0f && base <= 107.0f) {
setBaseLabel((int)base);
ui->write(ui->controller,DRMR_BASENOTE,4,0,&base);
gtk_label_set_markup(ui->base_label,baseLabelBuf);
}
else
fprintf(stderr,"Base spin got out of range: %f\n",base);
}
static void fill_kit_combo(GtkComboBox* combo, kits* kits) { static void fill_kit_combo(GtkComboBox* combo, kits* kits) {
int i; int i;
GtkTreeIter iter; GtkTreeIter iter;
@ -142,15 +165,16 @@ static void fill_kit_combo(GtkComboBox* combo, kits* kits) {
static void build_drmr_ui(DrMrUi* ui) { static void build_drmr_ui(DrMrUi* ui) {
GtkWidget *drmr_ui_widget; GtkWidget *drmr_ui_widget;
GtkWidget *kit_hbox, *kit_combo_box, *kit_label; GtkWidget *opts_hbox, *kit_combo_box, *kit_label, *base_label, *base_spin;
GtkCellRenderer *cell_rend; GtkCellRenderer *cell_rend;
GtkAdjustment *base_adj;
drmr_ui_widget = gtk_vbox_new(false,0); drmr_ui_widget = gtk_vbox_new(false,0);
g_object_set(drmr_ui_widget,"border-width",6,NULL); g_object_set(drmr_ui_widget,"border-width",6,NULL);
ui->kit_store = gtk_list_store_new(1,G_TYPE_STRING); ui->kit_store = gtk_list_store_new(1,G_TYPE_STRING);
kit_hbox = gtk_hbox_new(false,0); opts_hbox = gtk_hbox_new(false,0);
kit_combo_box = gtk_combo_box_new_with_model(GTK_TREE_MODEL(ui->kit_store)); kit_combo_box = gtk_combo_box_new_with_model(GTK_TREE_MODEL(ui->kit_store));
kit_label = gtk_label_new("Kit:"); kit_label = gtk_label_new("Kit:");
@ -158,19 +182,35 @@ static void build_drmr_ui(DrMrUi* ui) {
gtk_cell_layout_pack_start(GTK_CELL_LAYOUT(kit_combo_box), cell_rend, true); gtk_cell_layout_pack_start(GTK_CELL_LAYOUT(kit_combo_box), cell_rend, true);
gtk_cell_layout_set_attributes(GTK_CELL_LAYOUT(kit_combo_box), cell_rend,"text",0,NULL); gtk_cell_layout_set_attributes(GTK_CELL_LAYOUT(kit_combo_box), cell_rend,"text",0,NULL);
gtk_box_pack_start(GTK_BOX(kit_hbox),kit_label, base_label = gtk_label_new("Midi Base Note <b>(C 2)</b>:");
gtk_label_set_use_markup(GTK_LABEL(base_label),true);
base_adj = GTK_ADJUSTMENT
(gtk_adjustment_new(36.0, // val
21.0,107.0, // min/max
1.0, // step
5.0,5.0)); // page adj/size
base_spin = gtk_spin_button_new(base_adj, 1.0, 0);
gtk_box_pack_start(GTK_BOX(opts_hbox),kit_label,
false,false,15); false,false,15);
gtk_box_pack_start(GTK_BOX(kit_hbox),kit_combo_box, gtk_box_pack_start(GTK_BOX(opts_hbox),kit_combo_box,
true,true,0); true,true,0);
gtk_box_pack_start(GTK_BOX(drmr_ui_widget),kit_hbox, gtk_box_pack_start(GTK_BOX(opts_hbox),base_label,
false,false,15);
gtk_box_pack_start(GTK_BOX(opts_hbox),base_spin,
true,true,0);
gtk_box_pack_start(GTK_BOX(drmr_ui_widget),opts_hbox,
false,false,5); false,false,5);
ui->drmr_widget = drmr_ui_widget; ui->drmr_widget = drmr_ui_widget;
ui->sample_table = NULL; ui->sample_table = NULL;
ui->kit_combo = GTK_COMBO_BOX(kit_combo_box); ui->kit_combo = GTK_COMBO_BOX(kit_combo_box);
ui->base_label = GTK_LABEL(base_label);
g_signal_connect(G_OBJECT(kit_combo_box),"changed",G_CALLBACK(kit_combobox_changed),ui); g_signal_connect(G_OBJECT(kit_combo_box),"changed",G_CALLBACK(kit_combobox_changed),ui);
g_signal_connect(G_OBJECT(base_spin),"value-changed",G_CALLBACK(base_changed),ui);
gtk_widget_show_all(drmr_ui_widget); gtk_widget_show_all(drmr_ui_widget);
} }