aboutsummaryrefslogtreecommitdiff
path: root/extensions/gui/ix/toxy/spectrum-demo.pd
blob: 98c5a385a91ad53a24aec75af61bfbff4ebca6da (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
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;