diff options
Diffstat (limited to 'spectrum~.pd')
-rw-r--r-- | spectrum~.pd | 62 |
1 files changed, 62 insertions, 0 deletions
diff --git a/spectrum~.pd b/spectrum~.pd new file mode 100644 index 0000000..2a062a9 --- /dev/null +++ b/spectrum~.pd @@ -0,0 +1,62 @@ +#N canvas 137 67 990 636 10; +#N canvas 402 150 435 334 fft 0; +#X obj 46 64 inlet~; +#X obj 46 94 rfft~; +#X obj 46 127 *~; +#X obj 77 127 *~; +#X obj 46 157 sqrt~; +#X obj 216 60 inlet; +#X obj 278 96 block~ 1024 1; +#X obj 53 204 clip~ 0 500; +#X obj 144 265 tabwrite~ \$0-fft; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 1 0 2 1; +#X connect 1 1 3 0; +#X connect 1 1 3 1; +#X connect 2 0 4 0; +#X connect 3 0 4 0; +#X connect 4 0 7 0; +#X connect 5 0 8 0; +#X connect 7 0 8 0; +#X restore 563 459 pd fft; +#X obj 121 104 inlet~; +#X obj 604 269 metro 20; +#X obj 463 395 hip~ 50; +#X obj 463 415 *~ 1; +#N canvas 0 22 450 300 (subpatch) 0; +#X array \$0-fft 128 float 0; +#X coords 0 500 127 0 128 100 1; +#X restore 202 236 graph; +#X obj 525 170 route hip enable; +#X obj 544 270 switch~; +#X obj 520 35 t b b; +#X obj 521 9 loadbang; +#X msg 547 55 enable 1; +#X msg 557 77 enable 0; +#X obj 412 275 f; +#X obj 571 192 f; +#X obj 571 215 t f f; +#X msg 569 239 set \$1; +#X obj 202 215 cnv 15 128 20 empty empty empty 20 12 0 14 -233017 -66577 +0; +#X obj 316 220 tgl 11 0 \$0dummy \$0dummy empty 0 -6 0 8 -228856 -1 +-1 1 1; +#X connect 1 0 3 0; +#X connect 2 0 0 1; +#X connect 3 0 4 0; +#X connect 4 0 0 0; +#X connect 6 0 3 1; +#X connect 6 1 13 0; +#X connect 8 1 10 0; +#X connect 9 0 8 0; +#X connect 10 0 6 0; +#X connect 11 0 6 0; +#X connect 12 0 7 0; +#X connect 12 0 2 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 1 12 0; +#X connect 15 0 17 0; +#X connect 17 0 12 0; +#X coords 0 -1 1 1 132 138 1 200 200; |