1 files changed, 74 insertions, 0 deletions
diff --git a/Patches/09 example-sonogram.pd b/Patches/09 example-sonogram.pd
new file mode 100644
index 0000000..5c99688
--- /dev/null
+++ b/Patches/09 example-sonogram.pd
@@ -0,0 +1,74 @@
+#N canvas 308 -3 605 676 12;
+#X obj 13 40 fs.main;
+#X msg 13 13 6001;
+#X msg 64 12 reset;
+#X obj 330 486 fs.sonogram;
+#X msg 488 452 bang;
+#X obj 488 419 fps 0;
+#X floatatom 488 392 5 0 0;
+#X msg 488 364 5;
+#N canvas 0 0 608 408 play 0;
+#X graph graph2 0 -1 114739 1 70 171 270 31;
+#X array music 114740 float 0;
+#X pop;
+#X msg 341 137 read -resize \$1 music;
+#X obj 341 168 soundfiler;
+#X obj 333 70 inlet;
+#X obj 341 103 symbol;
+#X obj 193 242 phasor~ 1;
+#X obj 203 290 *~;
+#X obj 209 359 outlet~;
+#X obj 203 320 tabread4~ music;
+#X floatatom 193 213 5 0 0;
+#X obj 92 214 osc~ 0.01;
+#X obj 92 239 avg~;
+#X connect 1 0 2 0;
+#X connect 2 0 6 1;
+#X connect 3 0 4 0;
+#X connect 4 0 1 0;
+#X connect 5 0 6 0;
+#X connect 6 0 8 0;
+#X connect 8 0 7 0;
+#X connect 9 0 5 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 0;
+#X restore 330 349 pd play;
+#X msg 248 48 c:/fsrel/framestein/extract.wav;
+#X obj 251 480 dac~;
+#X msg 364 558 200x128 \, display 200x512;
+#X floatatom 355 427 5 0 0;
+#X obj 263 450 *~ 0.2;
+#X text 348 403 amplify display;
+#X obj 295 529 fs.framed example-sonogram 20+120;
+#X msg 370 587 setbits 246;
+#X msg 358 100 \; pd dsp 1;
+#X obj 116 13 loadbang;
+#X text 441 110 must be on ..;
+#X text 453 332 start drawing;
+#X text 242 23 correct path and click ..;
+#X text 28 617 NOTE: fs.sonogram writes temporary files to your c:/.
+;
+#X text 77 636 modify fs.sonogram.pd for a proper temporary path.;
+#X obj 330 451 *~ 4;
+#X obj 479 592 init;
+#X connect 1 0 0 0;
+#X connect 1 0 2 0;
+#X connect 2 0 0 1;
+#X connect 3 0 15 0;
+#X connect 4 0 3 1;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 7 0 6 0;
+#X connect 8 0 13 0;
+#X connect 8 0 24 0;
+#X connect 9 0 8 0;
+#X connect 11 0 15 0;
+#X connect 12 0 24 1;
+#X connect 13 0 10 0;
+#X connect 13 0 10 0;
+#X connect 13 0 10 1;
+#X connect 16 0 15 0;
+#X connect 18 0 2 0;
+#X connect 24 0 3 0;
+#X connect 25 0 11 0;
+#X connect 25 0 16 0;