1 files changed, 60 insertions, 0 deletions
diff --git a/Patches/40.The_Harmon.pd b/Patches/40.The_Harmon.pd
new file mode 100644
index 0000000..bc20773
--- /dev/null
+++ b/Patches/40.The_Harmon.pd
@@ -0,0 +1,60 @@
+#N canvas 279 9 641 655 12;
+#X floatatom 257 598 4 0 0;
+#X floatatom 297 598 4 0 0;
+#X floatatom 338 598 4 0 0;
+#X obj 257 566 unpack f f f;
+#X obj 173 528 fs.rgb;
+#N canvas 0 0 298 398 beeper 0;
+#X obj 90 56 inlet;
+#X obj 91 92 unpack f f f;
+#X obj 171 130 *;
+#X obj 123 252 osc~;
+#X obj 155 170 / 256;
+#X obj 86 132 / 256;
+#X obj 123 203 *;
+#X obj 117 322 dac~;
+#X obj 127 284 *~ 0.1;
+#X obj 85 161 * 20000;
+#X obj 196 243 / 256;
+#X obj 200 332 * 0.1;
+#X connect 0 0 1 0;
+#X connect 1 0 5 0;
+#X connect 1 0 10 0;
+#X connect 1 1 2 0;
+#X connect 1 2 2 1;
+#X connect 2 0 4 0;
+#X connect 3 0 8 0;
+#X connect 4 0 6 0;
+#X connect 5 0 9 0;
+#X connect 6 0 3 0;
+#X connect 8 0 7 0;
+#X connect 8 0 7 1;
+#X connect 9 0 6 1;
+#X connect 10 0 11 0;
+#X connect 11 0 8 1;
+#X restore 173 566 pd beeper;
+#X msg 33 410 \; pd dsp 1;
+#X msg 33 448 \; pd dsp 0;
+#X obj 173 408 init;
+#X obj 11 40 fs.main;
+#X msg 11 13 6001;
+#X msg 53 13 reset;
+#X text 32 382 Play the harmon! (scrub the image with mouse);
+#X obj 173 456 fs.framed Harmon 115+70;
+#X msg 173 432 HARMON.JPG \, mousetrack_1 \, display 390x327 \, bang
+;
+#X obj 262 482 t b l;
+#X connect 3 0 0 0;
+#X connect 3 1 1 0;
+#X connect 3 2 2 0;
+#X connect 4 0 3 0;
+#X connect 4 0 5 0;
+#X connect 8 0 14 0;
+#X connect 10 0 9 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 1;
+#X connect 13 0 4 0;
+#X connect 13 1 15 0;
+#X connect 14 0 13 0;
+#X connect 15 0 4 0;
+#X connect 15 1 4 1;