comparison examples/10-Instruments/midi-poly-synth/maxArray.pd @ 531:ddb86944e138 prerelease

cleaned up all pd examples (and removed some). added polysynth and vangelisiser to instruments examples

+#N canvas 464 23 1002 583 10;
+#X obj 224 202 max;
+#X obj 265 200 f;
+#X obj 223 229 change;
+#X obj 223 251 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 223 271 f;
+#X obj 259 323 f;
+#X obj 187 315 f;
+#X obj 268 282 t b b;
+#X obj 183 364 outlet;
+#X obj 269 379 outlet;
+#X obj 179 17 inlet;
+#X obj 225 177 tabread \$1;
+#X obj 230 88 t f f b;
+#X text 376 37 Finds a maximum value in an array;
+#X text 531 112 \$2 arrayLength;
+#X obj 292 10 inlet;
+#X text 425 146 inlets:;
+#X text 473 144 1 bang to find the maximum;
+#X text 475 157 2 arrayLength;
+#X text 407 90 creation arguments: \$1 arrayName;
+#X obj 246 38 \$2;
+#X obj 202 40 bang;
+#X obj 230 65 f;
+#X obj 224 6 loadbang;
+#X text 444 216 outlets: 1 maximum value;
+#X text 498 231 2 index of the maximum value;
+#X msg 276 141 -1e+15;
+#X obj 222 142 t f f f;
+#X floatatom 158 266 5 0 0 0 - - -, f 5;
+#X obj 332 302 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 288 253 select 127;
+#X floatatom 301 324 5 0 0 0 - - -, f 5;
+#X text 362 256 heavy does not support the second inlet of select so
+I have to hard code 127 in here;
+#X obj 223 110 countTo;
+#X connect 0 0 1 0;
+#X connect 0 0 2 0;
+#X connect 0 0 6 1;
+#X connect 0 0 28 0;
+#X connect 1 0 0 1;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 5 1;
+#X connect 4 0 31 0;
+#X connect 5 0 9 0;
+#X connect 6 0 8 0;
+#X connect 7 0 6 0;
+#X connect 7 1 5 0;
+#X connect 10 0 21 0;
+#X connect 11 0 0 0;
+#X connect 12 0 33 0;
+#X connect 12 2 26 0;
+#X connect 15 0 22 1;
+#X connect 20 0 22 1;
+#X connect 21 0 22 0;
+#X connect 22 0 12 0;
+#X connect 23 0 20 0;
+#X connect 26 0 0 1;
+#X connect 27 0 30 0;
+#X connect 27 1 11 0;
+#X connect 27 2 4 1;
+#X connect 30 0 7 0;
+#X connect 30 0 29 0;
+#X connect 33 0 27 0;