From 5689251b4df7456f43a0d3b357672bbd9fc3a40c Mon Sep 17 00:00:00 2001 From: carmen rocco Date: Tue, 19 Sep 2006 23:21:31 +0000 Subject: *** empty log message *** svn path=/trunk/; revision=5973 --- extensions/gui/ix/toxy/spectrum-demo.pd | 171 ++++++++++++++++++++++++++++++++ 1 file changed, 171 insertions(+) create mode 100755 extensions/gui/ix/toxy/spectrum-demo.pd (limited to 'extensions/gui/ix/toxy/spectrum-demo.pd') diff --git a/extensions/gui/ix/toxy/spectrum-demo.pd b/extensions/gui/ix/toxy/spectrum-demo.pd new file mode 100755 index 00000000..98c5a385 --- /dev/null +++ b/extensions/gui/ix/toxy/spectrum-demo.pd @@ -0,0 +1,171 @@ +#N canvas 62 98 623 209 10; +#X obj -28 29 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 +; +#X obj -115 21 loadbang; +#X obj -95 69 samplerate~; +#X obj -115 85 * 1000; +#X obj -115 69 /; +#X obj -115 101 metro 46; +#X obj 86 29 tgl 15 1 \$0loglin empty empty 0 -6 0 8 -99865 -195568 +-1 0 1; +#X obj 112 30 hsl 128 15 1 100 0 1 \$0gain empty empty -2 -6 0 8 -262144 +-1 -1 3500 1; +#X obj -28 46 widget spectrum sp1 #ca "#ffff4c" #cb "#0ebcd8" #tb 57 +#w 480 #h 160 -height 269; +#X obj -115 53 t f b; +#X text 57 30 log/lin; +#N canvas 755 38 493 259 1000sp 0; +#X obj 96 113 inlet; +#X obj 12 -13 inlet~; +#X obj 11 68 rfft~; +#X obj 5 103 *~; +#X obj 12 135 sqrt~; +#X obj 32 103 *~; +#X obj 94 27 loadbang; +#X obj 94 48 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 +; +#X obj 105 65 prepend set; +#X obj 122 47 pack 1 1 1; +#X obj 166 21 inlet; +#X obj 95 83 switch~ 512 1 1; +#X obj 36 9 tabreceive~ \$0w; +#X obj 338 1 table \$0w; +#X msg 310 112 0; +#X obj 267 130 osc~; +#X obj 267 83 samplerate~; +#X obj 267 107 / 256; +#X obj 267 152 *~ -0.5; +#X obj 267 174 +~ 0.5; +#X obj 253 41 loadbang; +#X obj 16 32 *~; +#X obj 252 203 tabwrite~ \$0w; +#X obj 338 25 pack f \$0; +#X msg 338 43 \; \$2w resize \$1; +#X obj 193 45 t b f; +#X msg 253 63 bang; +#X obj 338 101 pack f \$0; +#X obj 338 83 / 2; +#X obj 51 -14 inlet~; +#X obj 53 68 rfft~; +#X obj 47 103 *~; +#X obj 54 135 sqrt~; +#X obj 74 103 *~; +#X obj 58 32 *~; +#X obj 94 166 tabwrite~ \$0sp1; +#X obj 11 166 tabwrite~ \$0sp0; +#X msg 338 119 \; \$2sp0 resize \$1 \; \$2sp1 resize \$1; +#X obj 247 1 table \$0sp0 512; +#X obj 247 17 table \$0sp1 512; +#X connect 0 0 36 0; +#X connect 0 0 35 0; +#X connect 1 0 21 0; +#X connect 2 0 3 1; +#X connect 2 0 3 0; +#X connect 2 1 5 1; +#X connect 2 1 5 0; +#X connect 3 0 4 0; +#X connect 4 0 36 0; +#X connect 5 0 4 0; +#X connect 6 0 7 0; +#X connect 7 0 11 0; +#X connect 8 0 11 0; +#X connect 9 0 8 0; +#X connect 10 0 9 0; +#X connect 10 0 25 0; +#X connect 12 0 21 1; +#X connect 12 0 34 1; +#X connect 14 0 15 1; +#X connect 15 0 18 0; +#X connect 16 0 17 0; +#X connect 17 0 15 0; +#X connect 18 0 19 0; +#X connect 19 0 22 0; +#X connect 20 0 26 0; +#X connect 21 0 2 0; +#X connect 23 0 24 0; +#X connect 25 0 26 0; +#X connect 25 1 17 1; +#X connect 25 1 23 0; +#X connect 25 1 28 0; +#X connect 26 0 14 0; +#X connect 26 0 16 0; +#X connect 26 0 22 0; +#X connect 27 0 37 0; +#X connect 28 0 27 0; +#X connect 29 0 34 0; +#X connect 30 0 31 1; +#X connect 30 0 31 0; +#X connect 30 1 33 1; +#X connect 30 1 33 0; +#X connect 31 0 32 0; +#X connect 32 0 35 0; +#X connect 33 0 32 0; +#X connect 34 0 30 0; +#X restore -144 155 pd \$0sp; +#X msg -115 37 2048; +#X text -10 31 power; +#X obj -145 76 adc~; +#X msg 289 30 #ca \$1; +#X obj 358 30 tot .; +#X msg 353 15 query tk_chooseColor; +#X obj 387 31 makefilename "%s"; +#X obj 289 14 demux; +#X obj 338 15 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 +; +#X msg 323 30 #cb \$1; +#X floatatom 258 17 5 33 100 0 - - -; +#X msg 249 30 #tb \$1; +#X floatatom 7 1 5 30 500 0 - - -; +#X floatatom -20 1 5 64 640 0 - - -; +#X msg 94 15 #w \$1; +#X obj 22 14 spr \$0 \$0sp1 2; +#X msg 125 15 #h \$1; +#X obj -50 14 spr \$0 \$0sp0 1; +#X msg -115 5 480; +#X msg -92 5 160; +#X obj -132 132 biquad~; +#X obj -103 135 notch 4000 42; +#X obj -139 118 hsl 106 15 0 10000 0 0 empty empty empty -2 -6 0 8 +-262144 -1 -1 8600 1; +#X connect 0 0 5 0; +#X connect 1 0 12 0; +#X connect 1 0 30 0; +#X connect 1 0 31 0; +#X connect 2 0 4 1; +#X connect 3 0 5 1; +#X connect 4 0 3 0; +#X connect 5 0 11 2; +#X connect 5 0 27 0; +#X connect 5 0 29 0; +#X connect 9 0 4 0; +#X connect 9 0 11 3; +#X connect 9 1 2 0; +#X connect 12 0 9 0; +#X connect 14 0 11 0; +#X connect 14 1 32 0; +#X connect 15 0 8 0; +#X connect 16 0 18 0; +#X connect 17 0 16 0; +#X connect 18 0 19 0; +#X connect 19 0 15 0; +#X connect 19 1 21 0; +#X connect 20 0 19 1; +#X connect 21 0 8 0; +#X connect 22 0 23 0; +#X connect 23 0 8 0; +#X connect 24 0 28 0; +#X connect 24 0 29 2; +#X connect 24 0 27 2; +#X connect 25 0 26 0; +#X connect 25 0 27 1; +#X connect 25 0 29 1; +#X connect 26 0 8 0; +#X connect 27 0 8 0; +#X connect 28 0 8 0; +#X connect 29 0 8 0; +#X connect 30 0 25 0; +#X connect 31 0 24 0; +#X connect 32 0 11 1; +#X connect 33 0 32 0; +#X connect 34 0 33 0; +#X coords 0 0 2.71716e-06 4.15856e-06 535 500 0; -- cgit v1.2.1