From be9b6e3bc8622af69350918f3e1d4f90b333d0bb Mon Sep 17 00:00:00 2001
From: Martin Peach <mrpeach@users.sourceforge.net>
Date: Thu, 24 Aug 2006 06:56:27 +0000
Subject: Source for midifile.pd with help patch

svn path=/trunk/externals/mrpeach/; revision=5727
---
 midifile/midifile-help.pd | 173 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 173 insertions(+)
 create mode 100755 midifile/midifile-help.pd

(limited to 'midifile/midifile-help.pd')

diff --git a/midifile/midifile-help.pd b/midifile/midifile-help.pd
new file mode 100755
index 0000000..e3f882f
--- /dev/null
+++ b/midifile/midifile-help.pd
@@ -0,0 +1,173 @@
+#N canvas 364 491 466 316 12;
+#N canvas 0 0 690 635 midifile_write 0;
+#X obj 15 2 bng 45 250 50 0 empty empty choose 5 23 0 8 -62784 -260818
+-258699;
+#X text 450 563 Martin Peach \, 2005;
+#X obj 130 77 tgl 45 0 empty empty record 2 23 0 8 -258699 -241291
+-24198 0 1;
+#X floatatom 125 585 15 0 0 0 tick - -;
+#X obj 130 206 metro 2;
+#X floatatom 181 149 15 0 0 0 - - -;
+#X msg 181 123 2.005;
+#X msg 267 433 flush;
+#X obj 275 304 makenote;
+#X obj 275 334 pack f f;
+#X msg 251 237 60;
+#X msg 304 237 127;
+#X msg 358 237 100;
+#X floatatom 251 263 5 0 0 0 - - -;
+#X floatatom 304 263 5 0 0 0 - - -;
+#X floatatom 358 263 5 0 0 0 - - -;
+#X obj 275 364 list prepend 144;
+#X obj 398 325 + 144;
+#X floatatom 398 301 5 0 0 0 - - -;
+#X text 447 301 channel;
+#X text 448 323 note-on;
+#X msg 17 482 verbose \$1;
+#X text 5 437 verbosity defaults to 1;
+#X text 76 14 1: open a file for writing;
+#X text 199 89 2: start recording;
+#X text 439 239 3: input MIDI as lists;
+#X text 317 434 4: stop recording and save the file;
+#X obj 131 525 midifile;
+#X obj 15 358 savepanel;
+#X msg 185 388 240 1 2 3 4 247;
+#X text 320 388 a sysex message;
+#X obj 125 555 float;
+#X msg 15 389 write \$1;
+#X floatatom 17 456 5 0 0 0 - - -;
+#X connect 0 0 28 0;
+#X connect 2 0 4 0;
+#X connect 4 0 27 0;
+#X connect 5 0 4 1;
+#X connect 6 0 5 0;
+#X connect 7 0 27 0;
+#X connect 8 0 9 0;
+#X connect 8 1 9 1;
+#X connect 9 0 16 0;
+#X connect 10 0 13 0;
+#X connect 11 0 14 0;
+#X connect 12 0 15 0;
+#X connect 13 0 8 0;
+#X connect 14 0 8 1;
+#X connect 15 0 8 2;
+#X connect 16 0 27 0;
+#X connect 17 0 16 1;
+#X connect 18 0 17 0;
+#X connect 21 0 27 0;
+#X connect 27 1 31 1;
+#X connect 27 2 31 0;
+#X connect 28 0 32 0;
+#X connect 29 0 27 0;
+#X connect 31 0 3 0;
+#X connect 32 0 27 0;
+#X connect 33 0 21 0;
+#X restore 76 116 pd midifile_write;
+#N canvas 388 25 825 783 midifile_read 0;
+#X obj 102 332 midifile wowo;
+#X obj 102 285 bng 15 250 50 0 empty empty step 20 10 0 8 -262144 -1
+-1;
+#X obj 29 201 openpanel;
+#X obj 29 0 bng 45 250 50 0 empty empty choose 5 23 0 8 -62784 -260818
+-258699;
+#X text 525 724 Martin Peach \, 2005;
+#X obj 166 36 tgl 45 0 empty empty play 10 23 0 8 -24198 -1 -258699
+0 1;
+#X msg 308 279 rewind;
+#X text 363 278 go to start of file;
+#X floatatom 151 370 15 0 0 0 tick - -;
+#X obj 367 176 hradio 15 1 0 16 empty empty track_number 0 -6 0 8 -62784
+-241291 -1 0;
+#X msg 367 197 dump \$1;
+#X msg 308 253 68050;
+#X msg 234 129 track \$1;
+#X obj 234 80 hradio 15 1 0 16 empty empty track_number 0 -6 0 8 -62784
+-241291 -1 0;
+#X obj 166 263 metro 2;
+#X msg 241 102 -1;
+#X text 272 101 output all tracks;
+#X text 212 332 creation arguments: midi_file_name;
+#X text 305 129 output only this track;
+#X text 430 196 parse this track to main window;
+#X msg 519 279 0;
+#X floatatom 217 206 15 0 0 0 - - -;
+#X msg 217 180 2.005;
+#X text 351 252 goto tick 68050;
+#X floatatom 66 575 5 0 0 0 note - -;
+#X floatatom 121 606 5 0 0 1 velocity - -;
+#X obj 31 550 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 201 403 t b b b;
+#X obj 205 470 float;
+#X floatatom 205 492 15 0 0 0 last_tick - -;
+#X text 207 352 bangs at end of file;
+#X obj 31 423 list split 1;
+#X obj 76 545 list split 1;
+#X obj 121 627 / 127;
+#X floatatom 121 651 5 0 0 0 - - -;
+#X obj 86 695 send note_amp;
+#X obj 31 719 send midi_pitch;
+#X obj 86 672 float;
+#X obj 31 630 float;
+#X msg 105 398 144;
+#X floatatom 106 454 5 0 0 0 - - -;
+#X obj 31 478 select 144;
+#X msg 576 291 verbose \$1;
+#X text 576 247 verbosity defaults to 1;
+#X text 91 12 1: choose a MIDI file to play;
+#X text 228 43 2: start playing it;
+#X obj 297 411 print ****;
+#X obj 103 108 spigot;
+#X obj 146 82 tgl 15 0 empty empty empty 0 -6 0 8 -44926 -258699 -258699
+0 1;
+#X text 95 79 loop;
+#X msg 29 239 read \$1;
+#X floatatom 576 265 5 0 0 0 - - -;
+#X connect 0 0 31 0;
+#X connect 0 1 8 0;
+#X connect 0 2 27 0;
+#X connect 0 2 46 0;
+#X connect 1 0 0 0;
+#X connect 2 0 50 0;
+#X connect 3 0 2 0;
+#X connect 5 0 14 0;
+#X connect 6 0 0 0;
+#X connect 8 0 28 1;
+#X connect 9 0 10 0;
+#X connect 10 0 0 0;
+#X connect 11 0 0 0;
+#X connect 12 0 0 0;
+#X connect 13 0 12 0;
+#X connect 14 0 0 0;
+#X connect 15 0 12 0;
+#X connect 20 0 0 0;
+#X connect 21 0 14 1;
+#X connect 22 0 21 0;
+#X connect 24 0 38 1;
+#X connect 25 0 33 0;
+#X connect 26 0 38 0;
+#X connect 26 0 37 0;
+#X connect 27 0 47 0;
+#X connect 27 1 6 0;
+#X connect 27 2 5 0;
+#X connect 27 2 28 0;
+#X connect 28 0 29 0;
+#X connect 31 0 41 0;
+#X connect 31 1 32 0;
+#X connect 32 0 24 0;
+#X connect 32 1 25 0;
+#X connect 33 0 34 0;
+#X connect 34 0 37 1;
+#X connect 37 0 35 0;
+#X connect 38 0 36 0;
+#X connect 39 0 40 0;
+#X connect 40 0 41 1;
+#X connect 41 0 26 0;
+#X connect 42 0 0 0;
+#X connect 47 0 5 0;
+#X connect 48 0 47 1;
+#X connect 50 0 0 0;
+#X connect 51 0 42 0;
+#X restore 76 83 pd midifile_read;
+#X text 228 234 2006 Martin Peach;
+#X text 15 10 midifile reads and writes MIDI files.;
-- 
cgit v1.2.1