[PD] recording MIDI data

[Georg Holzmann]

Hallo!

That's a patch (_record_midi_file) by me to record MIDI-data and play it
back or store it as a MIDI-file (realized with XEQ -> so you will need a
binary of xeq too!).

Attention: the patch is "graph on parent" -> so you should open it from an
other patch!

LG
Georg



#N canvas 495 204 265 115 12;
#X text 17 17 _record_midi_file::::;
#X obj 184 67 bng 15 250 50 0 empty empty save 0 -6 0 6 -262144 -1
-1;
#X obj 20 64 bng 15 250 50 0 empty empty rec 0 -6 0 6 -262144 -1 -1
;
#X obj 70 65 bng 15 250 50 0 empty empty stop 0 -6 0 6 -262144 -1 -1
;
#X obj 128 66 bng 15 250 50 0 empty empty play 0 -6 0 6 -262144 -1
-1;
#X obj 72 189 outlet;
#N canvas 763 234 726 453 inside 0;
#X obj 122 27 inlet;
#X obj 202 27 inlet;
#X obj 278 28 inlet;
#X obj 367 28 inlet;
#X obj 31 32 inlet;
#X msg 144 318 edit;
#X msg 119 190 restop;
#X msg 144 293 readd 144 \$1 \$2 1;
#X obj 107 358 xeq_record \$0-x;
#X msg 189 319 rewind;
#X msg 47 139 record \, retrack 1-track;
#X msg 229 244 mfwrite \$1;
#X obj 229 213 savepanel;
#X msg 372 263 rewind \, flush;
#X msg 380 296 stop \, flush;
#X obj 361 331 xeq_parse \$0-x;
#X obj 361 362 outlet;
#X msg 361 232 rewind \, bang;
#X obj 202 53 t b b;
#X connect 0 0 10 0;
#X connect 1 0 18 0;
#X connect 2 0 17 0;
#X connect 3 0 12 0;
#X connect 4 0 7 0;
#X connect 5 0 8 0;
#X connect 6 0 8 0;
#X connect 7 0 8 0;
#X connect 9 0 8 0;
#X connect 10 0 8 0;
#X connect 11 0 8 0;
#X connect 12 0 11 0;
#X connect 13 0 15 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 17 0 15 0;
#X connect 18 0 13 0;
#X connect 18 1 6 0;
#X restore 72 165 pd inside;
#X obj 72 138 inlet;
#X connect 1 0 6 4;
#X connect 2 0 6 1;
#X connect 3 0 6 2;
#X connect 4 0 6 3;
#X connect 6 0 5 0;
#X connect 7 0 6 0;
#X coords 0 0 1 1 160 60 1;

-- 
NEU : GMX Internet.FreeDSL
Ab sofort DSL-Tarif ohne Grundgebühr: http://www.gmx.net/dsl