blob: 02ea2e1a8c982efa47e4012d6cc0f434fb295216 (
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
172
173
174
175
176
177
178
|
#N canvas 0 37 876 567 10;
#N canvas 217 33 719 609 fft-analysis 0;
#X obj 213 68 *~;
#X obj 261 23 inlet~;
#X obj 213 91 rfft~;
#X obj 46 403 *~;
#X obj 76 66 *~;
#X obj 113 1 inlet~;
#X obj 61 34 tabreceive~ hanning;
#X obj 78 91 rfft~;
#X obj 77 541 outlet~;
#X obj 81 170 rec2pol~;
#X obj 128 127 *~;
#X obj 88 127 *~;
#X obj 248 118 *~;
#X obj 213 118 *~;
#X obj 97 379 rifft~;
#X obj 170 333 pol2rec~;
#X obj 159 222 *~;
#X obj 191 160 rec2pol~;
#X obj 221 259 *~ 0.02;
#X obj 221 286 *~ 1.4;
#X obj 502 311 block~ 1024 4;
#X obj 141 474 *~ 0.05;
#X text 251 439 noisegate arguments: threshold \, fadein time \, fadeout time;
#X obj 112 441 noisegate~ 80 100 200;
#X obj 302 74 sig~ 0.0097;
#X obj 130 88 sig~ 0.001;
#X connect 0 0 2 0;
#X connect 1 0 0 1;
#X connect 2 0 13 0;
#X connect 2 1 12 0;
#X connect 3 0 23 0;
#X connect 4 0 7 0;
#X connect 5 0 4 1;
#X connect 6 0 4 0;
#X connect 6 0 0 0;
#X connect 6 0 3 0;
#X connect 7 0 11 0;
#X connect 7 1 10 0;
#X connect 9 0 15 0;
#X connect 9 1 16 0;
#X connect 10 0 9 1;
#X connect 11 0 9 0;
#X connect 12 0 17 1;
#X connect 13 0 17 0;
#X connect 14 0 3 1;
#X connect 15 0 14 0;
#X connect 15 1 14 1;
#X connect 16 0 19 0;
#X connect 17 1 16 1;
#X connect 17 1 18 0;
#X connect 18 0 19 0;
#X connect 19 0 15 1;
#X connect 23 0 8 0;
#X connect 23 0 21 0;
#X connect 24 0 12 1;
#X connect 24 0 13 1;
#X connect 25 0 11 1;
#X connect 25 0 10 1;
#X restore 326 407 pd fft-analysis;
#X obj 326 431 *~;
#X obj 474 448 line~;
#X floatatom 680 49 0 0 0;
#N canvas 194 37 397 591 output 0;
#X obj 62 191 t b;
#X obj 62 144 f;
#X obj 62 96 inlet;
#X text 67 76 mute;
#X obj 62 215 f;
#X msg 127 230 0;
#X msg 62 120 bang;
#X obj 62 167 moses 1;
#X obj 127 207 t b f;
#X obj 91 417 outlet;
#X msg 91 393 set \$1;
#X obj 175 154 moses 1;
#X obj 212 419 dbtorms;
#X obj 212 443 pack 0 100;
#X obj 175 130 r master-lvl;
#X obj 91 360 r master-lvl;
#X obj 78 269 s master-lvl;
#X obj 212 467 s master-amp;
#X connect 0 0 4 0;
#X connect 1 0 7 0;
#X connect 2 0 6 0;
#X connect 4 0 16 0;
#X connect 5 0 16 0;
#X connect 6 0 1 0;
#X connect 7 0 0 0;
#X connect 7 1 8 0;
#X connect 8 0 5 0;
#X connect 10 0 9 0;
#X connect 11 1 4 1;
#X connect 12 0 13 0;
#X connect 13 0 17 0;
#X connect 14 0 1 1;
#X connect 14 0 11 0;
#X connect 15 0 10 0;
#X connect 15 0 12 0;
#X restore 680 26 pd output;
#X msg 680 2 mute;
#X text 717 43 MASTER;
#X text 717 57 LEVEL;
#X obj 680 74 s master-lvl;
#X obj 472 421 r master-amp;
#N canvas 275 71 767 761 hanning-window 0;
#X obj 92 206 phasor~;
#X obj 92 234 cos~;
#X obj 23 328 tabwrite~ hanning;
#X obj 30 252 -~;
#X obj 30 218 sig~ 1;
#X msg 37 180 0;
#X text 141 13 CALCULATE HANNING;
#X text 141 27 WINDOW TABLE;
#X graph graph1 0 -1 1024 1 275 581 675 281;
#X array hanning 1024 float;
#X pop;
#X msg 275 547 \; hanning resize 1024;
#X obj 93 131 / 1024;
#X obj 93 171 sig~;
#X text 175 148 sample rate / window size;
#X msg 23 144 bang;
#X obj 66 269 sig~ 0.5;
#X obj 49 300 *~;
#X obj 67 96 samplerate~;
#X obj 25 23 r window-size;
#X obj 25 53 t b f;
#X connect 0 0 1 0;
#X connect 1 0 3 1;
#X connect 3 0 15 0;
#X connect 4 0 3 0;
#X connect 5 0 0 1;
#X connect 10 0 11 0;
#X connect 11 0 0 0;
#X connect 13 0 2 0;
#X connect 13 0 5 0;
#X connect 14 0 15 1;
#X connect 15 0 2 0;
#X connect 16 0 10 0;
#X connect 17 0 18 0;
#X connect 18 0 16 0;
#X connect 18 0 13 0;
#X connect 18 1 10 1;
#X restore 675 143 pd hanning-window;
#X msg 393 66 \; window-size 1024 \; pd dsp 1;
#X text 434 370 filter;
#X text 436 385 input;
#X obj 326 254 phasor~ 220;
#X floatatom 358 151 4 0 0;
#X obj 341 185 mtof;
#X obj 351 293 noise~;
#X obj 351 317 *~ 0.12;
#X obj 201 247 adc~;
#X obj 393 12 loadbang;
#X msg 295 80 36;
#X text 13 81 Example using rec2pol & pol2rec;
#X text 84 245 talk into this:;
#X text 401 150 adjust pitch;
#X text 654 419 IM 2001;
#X obj 322 468 dac~;
#X connect 0 0 1 0;
#X connect 1 0 26 0;
#X connect 1 0 26 1;
#X connect 2 0 1 1;
#X connect 3 0 8 0;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 9 0 2 0;
#X connect 14 0 0 0;
#X connect 15 0 16 0;
#X connect 16 0 14 0;
#X connect 17 0 18 0;
#X connect 18 0 0 0;
#X connect 19 0 0 1;
#X connect 20 0 11 0;
#X connect 20 0 21 0;
#X connect 21 0 15 0;
|
