diff options
Diffstat (limited to 'gemnotes_0.2.3/translate_midi.pd')
-rwxr-xr-x | gemnotes_0.2.3/translate_midi.pd | 93 |
1 files changed, 93 insertions, 0 deletions
diff --git a/gemnotes_0.2.3/translate_midi.pd b/gemnotes_0.2.3/translate_midi.pd new file mode 100755 index 0000000..d22d619 --- /dev/null +++ b/gemnotes_0.2.3/translate_midi.pd @@ -0,0 +1,93 @@ +#N canvas 463 113 682 437 10; +#X obj 102 49 midifile; +#X obj 249 48 sel 1; +#X obj 102 149 pack f 0; +#X obj 102 320 prepend add; +#X obj 102 339 msgfile; +#X obj 214 275 print; +#X msg 200 344 print; +#X obj 271 303 savepanel; +#X msg 271 323 write \$1; +#X obj 271 265 bng 15 250 50 0 empty empty SAVE_SCORE 17 7 0 10 -262144 +-1 -1; +#X msg 249 70 clear; +#X msg 220 202 finished!; +#X obj 102 241 polytimeq; +#X obj 193 91 route 20 21; +#X obj 189 126 *; +#X floatatom 164 175 5 0 0 0 - - -; +#X msg 164 191 bpm \$1; +#X obj 102 99 route 128 144; +#X obj 131 70 route controller; +#X obj 218 110 t b f; +#X obj 210 151 change; +#X msg 289 82 set 1; +#X obj 303 58 loadbang; +#X obj 102 27 bng 15 250 50 0 empty empty OPEN_MIDI_FILE 17 7 0 10 +-262144 -1 -1; +#X obj 212 7 tgl 15 0 empty empty BEGIN_CONVERSION 17 7 0 10 -262144 +-1 -1 0 1; +#X obj 212 27 t f f; +#X obj 165 150 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#N canvas 0 22 450 300 (subpatch) 0; +#X obj 138 77 openpanel; +#X obj 132 54 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 37 105 loadbang; +#X obj 108 215 outlet; +#X obj 135 25 inlet; +#X msg 133 107 set \$1 \, bang; +#X msg 93 150 /media/sda3/Data/puredata/2010/vibra/M1_bars.txt; +#X obj 101 178 symbol; +#X connect 0 0 5 0; +#X connect 1 0 0 0; +#X connect 4 0 1 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X restore 138 170 pd; +#X obj 102 125 unpack f; +#X text 299 130 This patch (attempts) to convert standard MIDI files +to text scores for use with Gemnotes.; +#X text 301 164 The files are rarely perfect and often need a little +editing after they are generated in order to produce really beautiful +scores.; +#X connect 0 0 17 0; +#X connect 0 1 18 0; +#X connect 0 2 11 0; +#X connect 1 0 12 1; +#X connect 1 0 21 0; +#X connect 1 0 10 0; +#X connect 2 0 12 0; +#X connect 3 0 4 0; +#X connect 6 0 4 0; +#X connect 7 0 8 0; +#X connect 8 0 4 0; +#X connect 9 0 7 0; +#X connect 10 0 4 0; +#X connect 11 0 5 0; +#X connect 12 0 3 0; +#X connect 12 0 5 0; +#X connect 13 0 14 0; +#X connect 13 1 19 0; +#X connect 14 0 20 0; +#X connect 15 0 16 0; +#X connect 16 0 12 2; +#X connect 16 0 3 0; +#X connect 17 0 28 0; +#X connect 17 1 12 0; +#X connect 18 0 13 0; +#X connect 19 0 14 0; +#X connect 19 1 14 1; +#X connect 20 0 15 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 22 0 10 0; +#X connect 23 0 0 0; +#X connect 24 0 25 0; +#X connect 25 0 0 1; +#X connect 25 1 1 0; +#X connect 26 0 27 0; +#X connect 27 0 12 3; +#X connect 28 0 2 0; |