#N canvas 0 58 955 720 10;
#X floatatom 115 320 5 0 16 0 - - -;
#X floatatom 115 418 5 0 0 0 - - -;
#X obj 115 443 mtof;
#X obj 115 544 osc~;
#X obj 115 597 dac~;
#X obj 115 290 + 1;
#X obj 115 238 metro 500;
#X obj 115 264 float;
#X msg 46 247 0;
#X floatatom 166 202 5 0 0 0 - - -;
#X obj 46 286 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 115 209 tgl 15 0 empty go empty 0 -6 0 8 -262144 -1 -1 0 1;
#N canvas 0 22 458 308 graph2 0;
#X array array7 40 float 3;
#A 0 72.1429 72.1429 70.4286 66.1429 63.5715 68.7143 78.1429 89.2857
58.4287 61.8572 64.4286 71.2858 75.5715 64.4286 60.1429 61.8572 59.2858
37.8573 43.0002 48.143 63.5715 73 67.0001 54.143 56.7144 61.4287 66.1429
72.1429 84.1429 37.0002 43.8573 49.0001 54.143 61.8572 67.0001 61.8572
61.8572 60.1429 57.5715 68.7143;
#X coords 0 120 40 0 200 140 1;
#X restore 409 -23 graph;
#X obj 115 347 tabread array7;
#X floatatom 241 418 5 0 0 0 - - -;
#X obj 241 443 mtof;
#X obj 241 544 osc~;
#X obj 241 597 dac~;
#X obj 241 347 tabread array8;
#N canvas 0 22 470 320 graph2 0;
#X array array8 40 float 3;
#A 0 63.5714 63.5714 65.2857 68.7143 76.4285 37.0001 40.4287 43.8572
47.2858 54.1429 59.2857 51.5715 52.8572 54.1429 59.2857 50.7143 55.8572
58.4286 58.4286 59.2857 60.1429 64 67.8571 75.5714 77.2857 58.4286
63.5714 67 68.7143 70.4286 71.2857 69.5714 63.5714 57.5715 58.4286
66.1429 57.5715 68.7143 59.2857 57.5715;
#X coords 0 120 40 0 200 140 1;
#X restore 649 -23 graph;
#N canvas 0 22 462 312 graph2 0;
#X array array10 25 float 1;
#A 0 77.2857 63.5714 65.2857 68.7143 76.4285 37.0001 40.4287 43.8572
47.2858 54.1429 59.2857 51.5715 52.8572 54.1429 59.2857 50.7143 55.8572
58.4286 58.4286 59.2857 60.1429 64 67.8571 75.5714 57.5715;
#X coords 0 120 24 0 200 140 1;
#X restore 649 155 graph;
#X obj 293 432 pipe 1;
#N canvas 0 22 458 308 graph2 0;
#X array array9 25 float 1;
#A 0 89.2857 70.4286 66.1429 63.5715 68.7143 78.1429 89.2857 58.4287
61.8572 64.4286 71.2858 75.5715 64.4286 60.1429 61.8572 59.2858 37.8573
43.0002 48.143 63.5715 73 67.0001 54.143 56.7144 68.7143;
#X coords 0 120 24 0 200 140 1;
#X restore 412 153 graph;
#X floatatom 476 334 5 0 0 0 - num1 -;
#X floatatom 563 334 5 0 0 0 - - -;
#X obj 176 432 s num1;
#X obj 293 452 s num2;
#X obj 476 380 tabwrite array9;
#X obj 476 352 spigot;
#X obj 563 353 spigot;
#X obj 525 337 tgl 15 0 empty record empty 0 -6 0 10 -262144 -1 -1
0 1;
#X obj 610 338 tgl 15 0 empty record empty 0 -6 0 10 -262144 -1 -1
0 1;
#X floatatom 685 334 5 0 0 0 - num2 -;
#X floatatom 772 334 5 0 0 0 - - -;
#X obj 685 352 spigot;
#X obj 772 353 spigot;
#X obj 734 337 tgl 15 0 empty record empty 0 -6 0 10 -262144 -1 -1
0 1;
#X obj 819 338 tgl 15 0 empty record empty 0 -6 0 10 -262144 -1 -1
0 1;
#X obj 684 380 tabwrite array10;
#X obj 249 7 tgl 80 0 record empty empty 0 -6 0 10 -204786 -4160 -1
0 1;
#X text 257 -14 - RECORD -;
#N canvas 617 397 462 312 midi 0;
#X obj 153 67 inlet;
#X obj 153 107 makenote 80 500;
#X obj 153 147 noteout;
#X obj 164 34 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
-66577 -261234 -1 0 256;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 2 1;
#X connect 3 0 2 2;
#X coords 0 -1 1 1 85 30 1 150 20;
#X restore 127 381 pd midi;
#N canvas 617 397 462 312 midi 0;
#X obj 153 67 inlet;
#X obj 153 107 makenote 80 500;
#X obj 153 147 noteout;
#X obj 164 34 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
-66577 -261234 -1 0 256;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 2 1;
#X connect 3 0 2 2;
#X coords 0 -1 1 1 85 30 1 150 20;
#X restore 337 393 pd midi;
#X obj 241 376 pipe;
#X obj 179 238 s tempo;
#X obj 359 335 r tempo;
#X obj 241 570 *~;
#X obj 115 570 *~;
#X obj 373 555 hsl 128 15 0 1 0 0 empty empty empty -2 -6 0 10 -204786
-1 -1 0 1;
#X obj 83 160 loadbang;
#X obj 358 359 / 2;
#X obj 73 7 tgl 80 0 go empty empty 0 -6 0 10 -204800 -258113 -1 0
1;
#X text 94 -14 - GO -;
#X text 66 113 (Set MIDI out channel #'s for note output!!);
#X obj 46 221 select 41;
#X msg 83 184 250;
#X obj 115 521 line;
#X obj 241 522 line;
#X obj 241 498 pack f 100;
#X obj 115 499 pack f 100;
#X obj 172 476 r tempo;
#X obj 298 475 r tempo;
#X obj 613 618 soundfiler;
#X obj 743 513 openpanel;
#X obj 611 513 savepanel;
#X obj 611 491 bng 15 250 50 0 empty empty empty 0 -6 0 10 -262144
-1 -1;
#X obj 743 491 bng 15 250 50 0 empty empty empty 0 -6 0 10 -262144
-1 -1;
#X text 609 458 Write and read arrays from/to text files;
#X msg 611 537 \; array7 write \$1;
#X msg 743 537 \; array8 read \$1;
#X connect 0 0 13 0;
#X connect 0 0 18 0;
#X connect 0 0 24 0;
#X connect 0 0 33 0;
#X connect 1 0 2 0;
#X connect 1 0 25 0;
#X connect 2 0 59 0;
#X connect 3 0 47 0;
#X connect 5 0 7 1;
#X connect 5 0 0 0;
#X connect 5 0 54 0;
#X connect 6 0 7 0;
#X connect 7 0 5 0;
#X connect 8 0 10 0;
#X connect 8 0 7 0;
#X connect 9 0 6 1;
#X connect 9 0 44 0;
#X connect 11 0 6 0;
#X connect 13 0 1 0;
#X connect 13 0 41 0;
#X connect 14 0 15 0;
#X connect 14 0 21 0;
#X connect 15 0 58 0;
#X connect 16 0 46 0;
#X connect 18 0 43 0;
#X connect 21 0 26 0;
#X connect 23 0 28 0;
#X connect 24 0 29 0;
#X connect 28 0 27 0;
#X connect 29 0 27 1;
#X connect 30 0 28 1;
#X connect 31 0 29 1;
#X connect 32 0 34 0;
#X connect 33 0 35 0;
#X connect 34 0 38 0;
#X connect 35 0 38 1;
#X connect 36 0 34 1;
#X connect 37 0 35 1;
#X connect 43 0 42 0;
#X connect 43 0 14 0;
#X connect 45 0 50 0;
#X connect 46 0 17 1;
#X connect 47 0 4 0;
#X connect 48 0 47 1;
#X connect 48 0 46 1;
#X connect 49 0 55 0;
#X connect 50 0 43 1;
#X connect 54 0 8 0;
#X connect 55 0 9 0;
#X connect 56 0 3 0;
#X connect 57 0 16 0;
#X connect 58 0 57 0;
#X connect 59 0 56 0;
#X connect 60 0 59 1;
#X connect 61 0 58 1;
#X connect 63 0 69 0;
#X connect 64 0 68 0;
#X connect 65 0 64 0;
#X connect 66 0 63 0;