-
Notifications
You must be signed in to change notification settings - Fork 11
Expand file tree
/
Copy pathpp.fft-partconv-part.pd
More file actions
183 lines (183 loc) · 4.33 KB
/
pp.fft-partconv-part.pd
File metadata and controls
183 lines (183 loc) · 4.33 KB
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
172
173
174
175
176
177
178
179
180
181
182
183
#N canvas 345 220 1091 781 10;
#X obj 335 470 *~;
#X obj 290 470 *~;
#X obj 291 222 inlet~;
#X obj 331 542 rifft~;
#X obj 332 739 outlet~;
#X obj 410 471 *~;
#X obj 439 471 *~;
#X obj 290 498 -~;
#X obj 409 500 +~;
#X obj 456 389 rfft~;
#X obj 290 379 rfft~;
#X obj 290 176 s \$0-blocksize;
#X obj 394 536 r \$0-blocksize;
#X msg 394 557 1 \$1;
#X obj 394 578 /;
#X obj 330 577 *~;
#X obj 290 338 *~;
#X obj 443 179 bang~;
#X obj 306 294 tabreceive~ \$0-square;
#X obj 456 349 *~;
#N canvas 411 266 367 299 square-window 0;
#X obj 64 129 until;
#X obj 64 155 f;
#X obj 92 155 + 1;
#X obj 64 20 inlet;
#X obj 64 105 * 0.5;
#X msg 64 181 \$1 1;
#X obj 64 205 s \$0-square;
#X obj 172 114 array size \$0-square;
#X obj 127 117 f 0;
#X obj 65 252 array define \$0-square;
#X obj 64 43 t f b f b;
#X msg 183 67 const 0;
#X obj 183 90 s \$0-square;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 10 0;
#X connect 4 0 0 0;
#X connect 5 0 6 0;
#X connect 8 0 1 1;
#X connect 10 0 4 0;
#X connect 10 1 8 0;
#X connect 10 2 7 0;
#X connect 10 3 11 0;
#X connect 11 0 12 0;
#X restore 700 640 pd square-window;
#X obj 700 615 r \$0-blocksize;
#X obj 471 210 f;
#X obj 471 233 pack 0 0, f 36;
#X obj 317 153 switch~ 0;
#X obj 471 281 tabplay~ \$2-impulse;
#X obj 512 258 r \$2-set-imp;
#N canvas 0 0 450 300 through 0;
#X obj 278 75 f \$1;
#X obj 278 96 mod 2;
#X obj 278 116 == 0;
#X obj 278 139 switch~;
#X obj 140 45 inlet~;
#X obj 140 68 outlet~;
#X obj 278 20 r \$0-blocksize;
#X floatatom 239 134 5 0 0 0 - - - 0;
#X obj 278 43 t b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 7 0;
#X connect 4 0 5 0;
#X connect 6 0 8 0;
#X connect 8 0 0 0;
#X restore 331 655 pd through;
#N canvas 3 52 450 300 \$0-delay 0;
#X obj 85 54 inlet~;
#X restore 227 625 pd \$0-delay;
#N canvas 150 296 645 501 make-delay 0;
#X obj 111 237 / 44.1;
#X obj 86 93 f \$1;
#X obj 111 213 * 0.5;
#X obj 201 223 / 1000;
#X obj 204 320 i;
#X obj 204 299 + 10;
#X obj 204 395 s pd-\$0-delay;
#X obj 204 343 pack 0 \$0;
#X obj 131 447 s pd-\$0-delread;
#X obj 81 160 spigot;
#X obj 114 139 mod 2;
#X obj 111 382 pack 0 \$0;
#X obj 111 258 t f f;
#X obj 86 114 t b f;
#X obj 111 191 f;
#X obj 174 -32 r \$0-blocksize;
#X obj 203 198 samplerate~;
#X msg 204 366 obj 100 100 delwrite~ \$2-d \$1 \, connect 0 0 1 0;
#X msg 111 424 obj 100 100 delread~ \$2-d \$1 \, connect 1 0 0 0;
#X obj 174 40 spigot 1;
#X obj 174 72 t b f b;
#X obj 174 -10 t b f;
#X msg 219 16 0;
#X connect 0 0 12 0;
#X connect 1 0 13 0;
#X connect 2 0 0 0;
#X connect 3 0 0 1;
#X connect 4 0 7 0;
#X connect 5 0 4 0;
#X connect 7 0 17 0;
#X connect 9 0 14 0;
#X connect 10 0 9 1;
#X connect 11 0 18 0;
#X connect 12 0 11 0;
#X connect 12 1 5 0;
#X connect 13 0 9 0;
#X connect 13 1 10 0;
#X connect 14 0 2 0;
#X connect 15 0 21 0;
#X connect 16 0 3 0;
#X connect 17 0 6 0;
#X connect 18 0 8 0;
#X connect 19 0 20 0;
#X connect 20 0 1 0;
#X connect 20 1 14 1;
#X connect 20 2 16 0;
#X connect 21 0 22 0;
#X connect 21 1 19 0;
#X connect 22 0 19 1;
#X restore 227 646 pd make-delay;
#N canvas 3 52 450 300 \$0-delread 0;
#X obj 166 205 outlet~;
#X restore 227 678 pd \$0-delread;
#X text 605 723 \$1 clone-instance \, \$2 parrent \$0;
#X msg 317 132 set \$1 2 \, 1;
#X obj 290 106 t f f;
#X obj 290 54 route \$1;
#X obj 290 31 r \$2-clone-data;
#X obj 290 78 unpack f f f, f 66;
#X listbox 519 121 20 0 0 0 - - - 0;
#X listbox 705 120 20 0 0 0 - - - 0;
#X listbox 352 104 20 0 0 0 - - - 0;
#X connect 0 0 7 1;
#X connect 1 0 7 0;
#X connect 2 0 16 0;
#X connect 3 0 15 0;
#X connect 5 0 8 0;
#X connect 6 0 8 1;
#X connect 7 0 3 0;
#X connect 8 0 3 1;
#X connect 9 0 1 1;
#X connect 9 0 6 1;
#X connect 9 1 0 1;
#X connect 9 1 5 1;
#X connect 10 0 1 0;
#X connect 10 0 5 0;
#X connect 10 1 0 0;
#X connect 10 1 6 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 15 1;
#X connect 15 0 27 0;
#X connect 15 0 28 0;
#X connect 16 0 10 0;
#X connect 17 0 22 0;
#X connect 18 0 16 1;
#X connect 18 0 19 0;
#X connect 19 0 9 0;
#X connect 21 0 20 0;
#X connect 22 0 23 0;
#X connect 23 0 25 0;
#X connect 25 0 19 1;
#X connect 26 0 25 0;
#X connect 27 0 4 0;
#X connect 30 0 4 0;
#X connect 32 0 24 0;
#X connect 33 0 11 0;
#X connect 33 1 32 0;
#X connect 34 0 36 0;
#X connect 35 0 34 0;
#X connect 36 0 33 0;
#X connect 36 0 39 0;
#X connect 36 1 22 1;
#X connect 36 1 37 0;
#X connect 36 2 23 1;
#X connect 36 2 38 0;