Mira,
-------- Original Message --------
Subject: Re: Audio trigger with MIDI out
From: Jaromír Mikeš <mira.mikes@xxxxxxxxx>
To: linux-audio-user@xxxxxxxxxxxxxxxxxxxx
Date: 16/03/2011 17:18
2011/3/16 Lorenzo Sutton<lsutton@xxxxxxxxx>:
Pd (Pure Data) can do all this and much more, but one would have to create a
specific patch (not to difficult for the example you outline).
If I understand correctly you want to trigger a MIDI note when the
(filtered) audio input goes beyond a certain threshold? In this case I can
make a simple patch for you (and then maybe you can play with it and I'll be
happy to assist ;)
Lorenzo.
Hi Lorenzo,
If this not bother you I will be happy if you send me a such PD patch.
The attached patch should get you going.
All other Pd-related suggestions from the list also apply ;)
Lorenzo
regards
mira
_______________________________________________
Linux-audio-user mailing list
Linux-audio-user@xxxxxxxxxxxxxxxxxxxx
http://lists.linuxaudio.org/listinfo/linux-audio-user
#N canvas 369 205 817 462 10;
#X obj 321 -27 cnv 15 220 206 empty empty empty 20 12 0 14 -262130
-66577 0;
#X obj 95 -23 adc~;
#N canvas 9 81 514 427 vu~ 0;
#X obj 103 101 cnv 15 39 127 empty empty empty 20 12 0 14 -128992 -66577
0;
#X obj 71 1 inlet~ left;
#X obj 147 0 inlet~ right;
#X obj 71 21 env~;
#X obj 147 20 env~;
#X obj 71 81 - 96;
#X obj 147 80 - 96;
#X obj 125 106 vu 12 120 empty empty -1 -8 0 10 -1 -1 0 0;
#X obj 107 106 vu 12 120 empty empty -1 -8 0 10 -1 -1 0 0;
#X obj 80 300 f;
#X obj 43 300 sel 1;
#X obj 43 240 + 96;
#X obj 80 322 - 96;
#X msg 328 186 0;
#X obj 43 279 > 0;
#X obj 43 259 t f f;
#X obj 157 300 f;
#X obj 120 300 sel 1;
#X obj 120 240 + 96;
#X obj 157 322 - 96;
#X obj 120 279 > 0;
#X obj 120 259 t f f;
#X obj 157 365 line;
#X obj 80 367 line;
#X obj 71 61 line;
#X obj 147 58 line;
#X obj 328 88 loadbang;
#X msg 328 113 1;
#X msg 71 41 \$1 20;
#X msg 149 38 \$1 20;
#X obj 328 161 metro 750;
#X msg 157 343 \$1 80;
#X msg 82 345 \$1 80;
#X obj 215 52 outlet;
#X obj -6 48 outlet;
#X connect 1 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 28 0;
#X connect 3 0 34 0;
#X connect 4 0 29 0;
#X connect 4 0 33 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 7 0 18 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 9 0 14 1;
#X connect 10 0 9 0;
#X connect 11 0 15 0;
#X connect 12 0 32 0;
#X connect 13 0 14 1;
#X connect 13 0 20 1;
#X connect 14 0 10 0;
#X connect 15 0 14 0;
#X connect 15 1 9 1;
#X connect 16 0 19 0;
#X connect 16 0 20 1;
#X connect 17 0 16 0;
#X connect 18 0 21 0;
#X connect 19 0 31 0;
#X connect 20 0 17 0;
#X connect 21 0 20 0;
#X connect 21 1 16 1;
#X connect 22 0 7 1;
#X connect 23 0 8 1;
#X connect 24 0 5 0;
#X connect 25 0 6 0;
#X connect 26 0 27 0;
#X connect 27 0 30 0;
#X connect 28 0 24 0;
#X connect 29 0 25 0;
#X connect 30 0 13 0;
#X connect 31 0 22 0;
#X connect 32 0 23 0;
#X coords 0 -1 1 1 44 130 2 100 100;
#X restore 16 8 pd vu~;
#X obj 95 102 bng 20 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X text 116 100 trigger;
#X obj 236 107 bng 20 250 50 0 empty empty empty 17 7 0 10 -261234
-1 -1;
#X text 257 105 rest;
#N canvas 9 81 526 514 controls 1;
#X obj 106 117 hsl 120 20 0 1 0 0 thresh thresh threshold_(0.0-1.0)
-2 -8 0 10 -261682 -1 -1 8370 1;
#X obj 106 160 hsl 120 20 0 1000 0 0 debtime debtime trigger_debounce_time_(ms)
-2 -8 0 10 -204786 -1 -1 8490 1;
#X obj 231 117 nbx 4 20 0 1 0 0 thresh thresh empty 0 -8 0 14 -261682
-1 -1 0.703361 256;
#X obj 231 160 nbx 4 20 0 1000 0 0 debtime debtime empty 0 -8 0 14
-204786 -1 -1 713.445 256;
#X obj 131 296 r thresh;
#X obj 131 380 pack f f f f;
#X obj 105 202 hsl 120 20 0 1 0 0 r_thresh r_thresh rest_thresh -2
-8 0 10 -204800 -1 -1 0 1;
#X obj 230 202 nbx 4 20 0 1 0 0 r_thresh r_thresh empty 0 -8 0 14 -204800
-1 -1 0 256;
#X obj 151 318 r debtime;
#X obj 48 49 loadbang;
#X msg 66 140 100;
#X obj 152 339 t b f;
#X obj 220 339 t b f;
#X obj 107 247 hsl 120 20 0 1000 0 0 r_debtime r_debtime rest_debounce_time_(ms)
-2 -8 0 10 -203904 -1 -1 1190 1;
#X obj 232 247 nbx 4 20 0 1000 0 0 r_debtime r_debtime empty 0 -8 0
14 -203904 -1 -1 0 256;
#X obj 131 420 s to_thresh;
#X msg 57 225 100;
#X msg 61 178 0;
#X obj 218 318 r r_thresh;
#X obj 296 318 r r_debtime;
#X obj 295 339 t b f;
#X msg 63 81 0.7;
#X connect 4 0 5 0;
#X connect 5 0 15 0;
#X connect 8 0 11 0;
#X connect 9 0 21 0;
#X connect 9 0 10 0;
#X connect 9 0 17 0;
#X connect 9 0 16 0;
#X connect 10 0 3 0;
#X connect 10 0 1 0;
#X connect 11 0 5 0;
#X connect 11 1 5 1;
#X connect 12 0 5 0;
#X connect 12 1 5 2;
#X connect 16 0 13 0;
#X connect 17 0 6 0;
#X connect 18 0 12 0;
#X connect 19 0 20 0;
#X connect 20 0 5 0;
#X connect 20 1 5 3;
#X connect 21 0 0 0;
#X connect 21 0 2 0;
#X coords 0 -1 1 1 220 180 2 100 100;
#X restore 321 0 pd controls;
#X obj 95 73 threshold~;
#X obj 152 23 r to_thresh;
#X msg 152 45 set \$1 \$2 \$3 \$4;
#X text 373 -27 THRESHOLD CONTROL;
#X obj 193 -62 tgl 30 0 empty empty empty 17 7 0 10 -204786 -1 -1 0
1;
#X msg 193 -19 \; pd dsp \$1;
#X text 232 -57 dsp on/off;
#X floatatom 182 248 5 0 50000 0 - - -;
#X text 218 245 note duration (ms);
#X floatatom 146 298 5 0 0 0 - - -;
#X text 184 297 MIDI channel (1-16);
#X obj 95 319 noteout 1;
#X obj 95 273 makenote 60 500;
#X floatatom 138 226 5 0 50000 0 - - -;
#X text 176 225 note velocity (0 - 127);
#X floatatom 116 155 5 0 0 0 - - -;
#X obj 95 178 f 60;
#X text 154 154 MIDI note (0 - 127);
#X floatatom -3 146 5 0 0 0 - - -;
#X floatatom 44 145 5 0 0 0 - - -;
#X connect 1 0 2 0;
#X connect 1 0 8 0;
#X connect 1 1 2 1;
#X connect 2 0 26 0;
#X connect 2 1 27 0;
#X connect 3 0 24 0;
#X connect 8 0 3 0;
#X connect 8 1 5 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 12 0 13 0;
#X connect 15 0 20 2;
#X connect 17 0 19 2;
#X connect 20 0 19 0;
#X connect 20 1 19 1;
#X connect 21 0 20 1;
#X connect 23 0 24 1;
#X connect 24 0 20 0;
_______________________________________________
Linux-audio-user mailing list
Linux-audio-user@xxxxxxxxxxxxxxxxxxxx
http://lists.linuxaudio.org/listinfo/linux-audio-user
