blob: 1b5d0c95f3f8332b51faee6e1a9db3f8bed8843d (
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
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
|
#N canvas 635 121 774 681 12;
#X floatatom 41 42 9 0 0 0 - - -;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array99 11 float 0;
#X coords 0 1 10 -1 250 200 1;
#X restore 436 180 graph;
#X obj 437 48 loadbang;
#X floatatom 41 -1 5 0 135 0 - - -;
#X obj 41 19 mtof;
#X floatatom 77 307 0 0 0 0 - - -;
#N canvas 159 26 706 447 output 0;
#X obj 414 196 t b;
#X obj 414 134 f;
#X obj 414 73 inlet;
#X text 421 36 mute;
#X obj 414 227 f;
#X msg 521 218 0;
#X msg 414 104 bang;
#X obj 414 166 moses 1;
#X obj 521 187 t b f;
#X obj 486 143 moses 1;
#X obj 102 181 dbtorms;
#X obj 486 113 r master-lvl;
#X obj 102 52 r master-lvl;
#X obj 414 257 s master-lvl;
#X obj 26 222 inlet~;
#X obj 244 50 inlet;
#X text 244 22 level;
#X obj 244 122 s master-lvl;
#X msg 118 80 set \$1;
#X obj 118 109 outlet;
#X msg 262 78 \; pd dsp 1;
#X obj 102 238 line~;
#X obj 26 259 *~;
#X obj 26 295 dac~;
#X obj 102 210 pack 0 50;
#X text 24 195 audio;
#X text 114 135 show level;
#X connect 0 0 4 0;
#X connect 1 0 7 0;
#X connect 2 0 6 0;
#X connect 4 0 13 0;
#X connect 5 0 13 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 9 1 4 1;
#X connect 10 0 24 0;
#X connect 11 0 1 1;
#X connect 11 0 9 0;
#X connect 12 0 10 0;
#X connect 12 0 18 0;
#X connect 14 0 22 0;
#X connect 15 0 17 0;
#X connect 15 0 20 0;
#X connect 18 0 19 0;
#X connect 21 0 22 1;
#X connect 22 0 23 0;
#X connect 22 0 23 1;
#X connect 24 0 21 0;
#X restore 43 333 pd output;
#X msg 113 307 MUTE;
#X obj 179 230 *~;
#X msg 356 42 \$1 30;
#X obj 359 19 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 12700 1;
#X obj 357 89 -~ 1;
#X obj 356 113 *~ -1;
#X obj 356 66 line~;
#X obj 43 231 *~;
#X msg 294 67 0;
#X msg 437 75 \; array99 resize 11 \; array99 0 0 0 -0.5 -0.5 1 -1
0.5 -1 0 0 0 \; pd dsp 1 \;;
#X text 40 395 tabosc4c~ is a drop in remplacement for tabosc4~ \,
but offer a 4 points cubic interpolation with tengent continuity. So
\, in some case \, quality is better than the standart interpolation
;
#X obj 179 122 tabosc4~ array99;
#X obj 157 498 oscillo~;
#X text 279 17 tabosc4~;
#X text 498 18 tabosc4aa~;
#N canvas 607 39 645 763 osc~ 0;
#X obj 12 133 pack~;
#X obj 14 7 inlet~;
#X text 269 6 change block size;
#X msg 77 379 0;
#X obj 47 403 f;
#X obj 63 428 + 1;
#X obj 17 379 t a b;
#X obj 16 245 gemhead;
#X text 72 7 audio input;
#X obj 13 29 rfft~;
#X obj 13 51 *~;
#X obj 53 53 *~;
#X obj 173 6 block~ 4096 4;
#X obj 12 75 /~ 4096;
#X obj 12 95 log~;
#X obj 12 114 *~ 0.05;
#X obj 12 152 list prepend 0;
#X obj 12 173 s \$0-fft;
#X obj 172 26 table \$0-fft 2048;
#X obj 172 46 table \$0-fft-lop 2048;
#X obj 401 13 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 401 31 t b b;
#X obj 400 71 until;
#X msg 401 52 2048;
#X msg 443 74 0;
#X obj 400 96 f;
#X obj 415 119 + 1;
#X obj 400 163 tabread \$0-fft;
#X obj 494 163 tabread \$0-fft-lop;
#X obj 400 213 +;
#X obj 400 256 tabwrite \$0-fft-lop;
#X obj 400 138 t f f f;
#X obj 424 7 bang~;
#X obj 400 235 / 8;
#X obj 495 187 * 7;
#X obj 77 494 tabread \$0-fft-lop;
#X obj 30 589 loadbang;
#X obj 47 451 t f f;
#X obj 98 591 l;
#X msg 30 611 res 3;
#X obj 22 224 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 97 560 t l b;
#X obj 18 659 curve 2;
#X obj 46 519 pack f f f;
#X floatatom 36 296 5 0 0 0 - - -;
#X floatatom 78 297 5 0 0 0 - - -;
#X obj 17 334 t a b;
#X floatatom 72 250 5 0 0 0 - - -;
#X floatatom 114 251 5 0 0 0 - - -;
#X obj 17 358 repeat 2048;
#X obj 14 277 translateXYZ -4 0 0;
#X obj 47 471 log;
#X obj 17 314 scaleXYZ 1.04 6 0;
#X connect 0 0 16 0;
#X connect 1 0 9 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 37 0;
#X connect 5 0 4 1;
#X connect 6 0 42 0;
#X connect 6 1 4 0;
#X connect 7 0 50 0;
#X connect 9 0 10 0;
#X connect 9 0 10 1;
#X connect 9 1 11 0;
#X connect 9 1 11 1;
#X connect 10 0 13 0;
#X connect 11 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 0 0;
#X connect 16 0 17 0;
#X connect 20 0 21 0;
#X connect 21 0 23 0;
#X connect 21 1 24 0;
#X connect 22 0 25 0;
#X connect 23 0 22 0;
#X connect 24 0 25 1;
#X connect 25 0 26 0;
#X connect 25 0 31 0;
#X connect 26 0 25 1;
#X connect 27 0 29 0;
#X connect 28 0 34 0;
#X connect 29 0 33 0;
#X connect 31 0 27 0;
#X connect 31 1 28 0;
#X connect 31 2 30 1;
#X connect 32 0 21 0;
#X connect 33 0 30 0;
#X connect 34 0 29 1;
#X connect 35 0 43 1;
#X connect 36 0 39 0;
#X connect 37 0 51 0;
#X connect 37 1 35 0;
#X connect 38 0 42 2;
#X connect 39 0 42 0;
#X connect 40 0 7 0;
#X connect 41 0 38 1;
#X connect 41 1 38 0;
#X connect 43 0 41 0;
#X connect 43 0 42 1;
#X connect 44 0 52 1;
#X connect 45 0 52 2;
#X connect 46 0 49 0;
#X connect 46 1 3 0;
#X connect 47 0 50 1;
#X connect 48 0 50 2;
#X connect 49 0 6 0;
#X connect 50 0 52 0;
#X connect 51 0 43 0;
#X connect 52 0 46 0;
#X restore 205 288 pd osc~;
#X msg 305 230 reset \, create \, 1;
#X msg 311 252 0 \, destroy;
#X msg 41 60 \$1 100;
#X obj 41 83 line~;
#X obj 42 123 tabosc4aa~ array99;
#X obj 305 274 gemwin 20;
#X floatatom 106 4 5 0 0 0 - - -;
#X connect 0 0 25 0;
#X connect 2 0 16 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 6 1;
#X connect 6 0 5 0;
#X connect 7 0 6 2;
#X connect 8 0 6 0;
#X connect 8 0 19 0;
#X connect 8 0 22 0;
#X connect 9 0 13 0;
#X connect 10 0 9 0;
#X connect 11 0 12 0;
#X connect 12 0 8 1;
#X connect 13 0 11 0;
#X connect 13 0 14 1;
#X connect 14 0 6 0;
#X connect 14 0 19 0;
#X connect 14 0 22 0;
#X connect 15 0 18 1;
#X connect 15 0 27 1;
#X connect 18 0 8 0;
#X connect 23 0 28 0;
#X connect 24 0 28 0;
#X connect 25 0 26 0;
#X connect 26 0 18 0;
#X connect 26 0 27 0;
#X connect 27 0 14 0;
#X connect 29 0 4 0;
|
