diff options
author | Juha Vehviläinen <jusu@users.sourceforge.net> | 2002-07-06 17:50:18 +0000 |
---|---|---|
committer | Juha Vehviläinen <jusu@users.sourceforge.net> | 2002-07-06 17:50:18 +0000 |
commit | 4d64e4cd434426234a5c313c151cd79b6afc299e (patch) | |
tree | 5c23dd6acc65b869741d3bb9d33912d74bb7407d /Patches/fs.sonogram.pd |
*** empty log message ***svn2git-root
svn path=/trunk/Framestein/; revision=27
Diffstat (limited to 'Patches/fs.sonogram.pd')
-rw-r--r-- | Patches/fs.sonogram.pd | 63 |
1 files changed, 63 insertions, 0 deletions
diff --git a/Patches/fs.sonogram.pd b/Patches/fs.sonogram.pd new file mode 100644 index 0000000..543e91e --- /dev/null +++ b/Patches/fs.sonogram.pd @@ -0,0 +1,63 @@ +#N canvas 143 280 484 334 12; +#X msg 188 80 bang; +#X obj 28 47 inlet~; +#X text 86 48 sound data; +#X obj 188 48 inlet; +#X text 243 49 bang to get sonogram; +#X obj 70 225 outlet; +#X text 134 224 to fs.frame; +#N canvas 211 133 544 441 writesono 0; +#X obj 46 48 inlet~; +#X obj 144 50 inlet; +#X obj 46 78 rfft~; +#X obj 46 111 *~; +#X obj 77 111 *~; +#X obj 46 141 sqrt~; +#X obj 382 17 block~ 1024 1; +#X obj 218 309 table \$0spectrum; +#X obj 46 187 tabwrite~ \$0spectrum; +#X obj 67 359 outlet; +#X obj 144 92 t b b b; +#X msg 99 308 sonogram \$1; +#X obj 218 241 symbol; +#X msg 301 51 bang; +#X obj 301 24 reset; +#X obj 99 241 symbol; +#X obj 301 106 makefilename c:/%s; +#X obj 301 77 symbol \$0sono; +#X msg 317 363 resize 128; +#X obj 366 333 reset; +#X msg 317 389 bounds 0 0 128 500; +#X msg 218 276 write \$1; +#X text 365 130 maybe c:/temp/?; +#X obj 291 276 s \$0spectrum; +#X connect 0 0 2 0; +#X connect 1 0 10 0; +#X connect 2 0 3 0; +#X connect 2 0 3 1; +#X connect 2 1 4 0; +#X connect 2 1 4 1; +#X connect 3 0 5 0; +#X connect 4 0 5 0; +#X connect 5 0 8 0; +#X connect 10 0 15 0; +#X connect 10 1 12 0; +#X connect 10 2 8 0; +#X connect 11 0 9 0; +#X connect 12 0 21 0; +#X connect 13 0 17 0; +#X connect 14 0 13 0; +#X connect 15 0 11 0; +#X connect 16 0 12 1; +#X connect 16 0 15 1; +#X connect 17 0 16 0; +#X connect 18 0 23 0; +#X connect 19 0 18 0; +#X connect 19 0 20 0; +#X connect 20 0 23 0; +#X connect 21 0 23 0; +#X restore 78 151 pd writesono; +#X connect 0 0 7 1; +#X connect 1 0 7 0; +#X connect 3 0 0 0; +#X connect 7 0 5 0; |