aboutsummaryrefslogtreecommitdiff
path: root/chordGuess.pd
diff options
context:
space:
mode:
Diffstat (limited to 'chordGuess.pd')
-rw-r--r--chordGuess.pd92
1 files changed, 92 insertions, 0 deletions
diff --git a/chordGuess.pd b/chordGuess.pd
new file mode 100644
index 0000000..1894caf
--- /dev/null
+++ b/chordGuess.pd
@@ -0,0 +1,92 @@
+#N canvas 489 38 525 783 10;
+#X obj 105 84 inlet stream of midi notes;
+#X obj 135 278 route 0;
+#X obj 105 226 t b l;
+#X msg 135 253 \$3 \$1 \$2;
+#X msg 179 303 \$2 \$3;
+#X msg 135 327 remove \$1;
+#X msg 84 329 dump;
+#X obj 105 168 poly 24;
+#X msg 135 454;
+#X msg 38 369 set;
+#X obj 135 400 % 12;
+#X msg 135 424 add2 \$1;
+#X obj 105 200 pack f f f;
+#X text 208 252 velocity \, index \, note;
+#X text 227 299 index \, note;
+#X text 190 199 voice \, note \, velocity;
+#X msg 178 135 61 80;
+#X msg 168 107 61 0;
+#X msg 44 102 62 34;
+#X msg 45 129 62 0;
+#X obj 433 91 inlet clear;
+#X msg 433 117 clear;
+#X msg 135 703;
+#X msg 248 668 add2 \$1;
+#X msg 211 593 -1;
+#X obj 211 623 change;
+#X obj 135 552 t b l b;
+#X obj 211 645 sel -1;
+#X obj 26 287 t b b b;
+#X obj 135 482 t l b;
+#X text 244 593 resets the change;
+#X text 172 704 uniques notes;
+#X obj 135 795 outlet;
+#X msg 35 730;
+#X text 101 728 There is still a little delay where we get "none" but
+there is actually a set of notes being processed. It happens on every
+chord. This should be ignored by some way.;
+#X obj 307 781 cnv 15 200 35 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 319 798 MUZAQ - GNU Public License;
+#X text 316 783 (c) 2006 Alexandre Quessy;
+#X obj 433 144 t b a a;
+#X text 171 455 all notes on \, in one octave;
+#X obj 135 378 cyclone/coll;
+#C restore;
+#X obj 135 526 zexy/sort;
+#X obj 154 574 zexy/drip;
+#X connect 0 0 7 0;
+#X connect 1 0 5 0;
+#X connect 1 1 4 0;
+#X connect 2 0 28 0;
+#X connect 2 1 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 40 0;
+#X connect 5 0 40 0;
+#X connect 6 0 40 0;
+#X connect 7 0 12 0;
+#X connect 7 1 12 1;
+#X connect 7 2 12 2;
+#X connect 8 0 29 0;
+#X connect 9 0 8 0;
+#X connect 9 0 22 0;
+#X connect 9 0 33 0;
+#X connect 10 0 11 0;
+#X connect 11 0 8 0;
+#X connect 12 0 2 0;
+#X connect 16 0 7 0;
+#X connect 17 0 7 0;
+#X connect 18 0 7 0;
+#X connect 19 0 7 0;
+#X connect 20 0 21 0;
+#X connect 21 0 38 0;
+#X connect 22 0 32 0;
+#X connect 23 0 22 0;
+#X connect 24 0 25 0;
+#X connect 25 0 27 0;
+#X connect 26 0 22 0;
+#X connect 26 1 42 0;
+#X connect 27 1 23 0;
+#X connect 28 0 8 0;
+#X connect 28 1 6 0;
+#X connect 28 2 9 0;
+#X connect 29 0 41 0;
+#X connect 29 1 24 0;
+#X connect 33 0 32 0;
+#X connect 38 0 9 0;
+#X connect 38 1 40 0;
+#X connect 38 2 7 0;
+#X connect 40 0 10 0;
+#X connect 41 0 26 0;
+#X connect 42 0 25 0;