aboutsummaryrefslogtreecommitdiff
path: root/pd/doc/7.stuff/synth/1.poly.synth.pd
blob: a92a0815ec6704afeb41cd0c538082a0c1fb2a6f (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
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
#N canvas 232 162 657 719 12;
#X floatatom 424 666 0 0 100 0 - - -;
#N canvas 269 205 698 344 output 0;
#X obj 388 156 t b;
#X obj 388 105 f;
#X obj 388 54 inlet;
#X obj 388 181 f;
#X msg 482 174 0;
#X msg 388 79 bang;
#X obj 388 130 moses 1;
#X obj 482 149 t b f;
#X obj 444 111 moses 1;
#X obj 91 148 dbtorms;
#X obj 444 86 r master-lvl;
#X obj 91 48 r master-lvl;
#X obj 388 207 s master-lvl;
#X obj 28 169 inlet~;
#X obj 213 195 inlet;
#X obj 229 218 s master-lvl;
#X msg 101 72 set \$1;
#X obj 101 98 outlet;
#X msg 213 241 \; pd dsp 1;
#X obj 91 201 line~;
#X obj 31 219 *~;
#X obj 31 247 dac~;
#X obj 91 173 pack 0 50;
#X text 17 149 audio in;
#X obj 28 194 hip~ 1;
#X connect 0 0 3 0;
#X connect 1 0 6 0;
#X connect 2 0 5 0;
#X connect 3 0 12 0;
#X connect 4 0 12 0;
#X connect 5 0 1 0;
#X connect 6 0 0 0;
#X connect 6 1 7 0;
#X connect 7 0 4 0;
#X connect 8 1 3 1;
#X connect 9 0 22 0;
#X connect 10 0 1 1;
#X connect 10 0 8 0;
#X connect 11 0 9 0;
#X connect 11 0 16 0;
#X connect 13 0 24 0;
#X connect 14 0 15 0;
#X connect 14 0 18 0;
#X connect 16 0 17 0;
#X connect 19 0 20 1;
#X connect 20 0 21 0;
#X connect 20 0 21 1;
#X connect 22 0 19 0;
#X connect 24 0 20 0;
#X restore 386 690 pd output;
#X msg 462 666 MUTE;
#X obj 16 382 unpack;
#X obj 16 299 notein;
#X obj 16 327 pack;
#X obj 329 213 numset amp x;
#X obj 329 242 numset aa x;
#X obj 329 329 numset ar x;
#X obj 329 271 numset ad x;
#X obj 329 300 numset as x;
#N canvas 248 85 884 761 synth 0;
#X obj 114 588 synthvoice;
#X obj 114 561 synthvoice;
#X obj 114 534 synthvoice;
#X obj 114 507 synthvoice;
#X obj 114 480 synthvoice;
#X obj 114 453 synthvoice;
#X obj 114 426 synthvoice;
#X obj 114 399 synthvoice;
#X obj 40 91 t b f;
#X obj 22 185 f;
#X obj 44 130 + 1;
#X obj 44 158 mod 1e+06;
#X obj 317 670 outlet~;
#X obj 45 24 r syn-note;
#X obj 454 25 r syn-noteon;
#X text 445 652 todo: field to stamp note for later messages;
#X obj 22 212 + 1e+06;
#X obj 55 239 makenote;
#X obj 109 309 moses 1e+06;
#X obj 26 352 r all-off;
#X msg 26 377 stop;
#X obj 196 368 route 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16;
#X obj 317 644 synthvoice;
#X obj 317 617 synthvoice;
#X obj 317 590 synthvoice;
#X obj 317 563 synthvoice;
#X obj 317 536 synthvoice;
#X obj 317 509 synthvoice;
#X obj 317 482 synthvoice;
#X obj 317 455 synthvoice;
#X obj 55 279 poly 16 1;
#X obj 45 54 unpack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
#X obj 455 51 unpack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
#X obj 196 339 pack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
#X connect 0 0 29 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 7 0 6 0;
#X connect 8 0 9 0;
#X connect 8 1 33 2;
#X connect 9 0 10 0;
#X connect 9 0 16 0;
#X connect 10 0 11 0;
#X connect 11 0 9 1;
#X connect 13 0 31 0;
#X connect 14 0 32 0;
#X connect 16 0 17 0;
#X connect 17 0 30 0;
#X connect 17 1 30 1;
#X connect 18 0 33 2;
#X connect 19 0 20 0;
#X connect 20 0 30 0;
#X connect 21 0 7 1;
#X connect 21 1 6 1;
#X connect 21 2 5 1;
#X connect 21 3 4 1;
#X connect 21 4 3 1;
#X connect 21 5 2 1;
#X connect 21 6 1 1;
#X connect 21 7 0 1;
#X connect 21 8 29 1;
#X connect 21 9 28 1;
#X connect 21 10 27 1;
#X connect 21 11 26 1;
#X connect 21 12 25 1;
#X connect 21 13 24 1;
#X connect 21 14 23 1;
#X connect 21 15 22 1;
#X connect 22 0 12 0;
#X connect 23 0 22 0;
#X connect 24 0 23 0;
#X connect 25 0 24 0;
#X connect 26 0 25 0;
#X connect 27 0 26 0;
#X connect 28 0 27 0;
#X connect 29 0 28 0;
#X connect 30 0 33 0;
#X connect 30 1 18 0;
#X connect 30 2 33 1;
#X connect 31 0 8 0;
#X connect 31 1 17 1;
#X connect 31 2 17 2;
#X connect 31 3 33 3;
#X connect 31 4 33 4;
#X connect 31 5 33 5;
#X connect 31 6 33 6;
#X connect 31 7 33 7;
#X connect 31 8 33 8;
#X connect 31 9 33 9;
#X connect 31 10 33 10;
#X connect 31 11 33 11;
#X connect 31 12 33 12;
#X connect 31 13 33 13;
#X connect 31 14 33 14;
#X connect 31 15 33 15;
#X connect 31 16 33 16;
#X connect 32 0 30 0;
#X connect 32 1 30 1;
#X connect 32 2 33 3;
#X connect 32 3 33 4;
#X connect 32 4 33 5;
#X connect 32 5 33 6;
#X connect 32 6 33 7;
#X connect 32 7 33 8;
#X connect 32 8 33 9;
#X connect 32 9 33 10;
#X connect 32 10 33 11;
#X connect 32 11 33 12;
#X connect 32 12 33 13;
#X connect 32 13 33 14;
#X connect 32 14 33 15;
#X connect 32 15 33 16;
#X connect 33 0 21 0;
#X restore 386 640 pd synth;
#X obj 24 351 r syn-midinoteon;
#X obj 16 649 s syn-noteon;
#N canvas 0 0 690 415 tables 0;
#X msg 107 49 bang;
#X obj 107 78 t b b;
#X obj 159 142 f;
#X obj 197 142 + 1;
#X msg 181 115 0;
#X obj 107 107 until;
#X obj 161 177 t f f;
#X obj 109 210 mtof;
#X obj 90 177 sel 129;
#X obj 109 237 tabwrite mtof;
#X text 48 15 patch to regenerate the mtof table;
#N canvas 0 0 450 300 graph2 0;
#X array mtof 130 float 1;
#A 0 8.1758 8.66196 9.17702 9.72272 10.3009 10.9134 11.5623 12.2499
12.9783 13.75 14.5676 15.4339 16.3516 17.3239 18.354 19.4454 20.6017
21.8268 23.1247 24.4997 25.9565 27.5 29.1352 30.8677 32.7032 34.6478
36.7081 38.8909 41.2034 43.6535 46.2493 48.9994 51.9131 55 58.2705
61.7354 65.4064 69.2957 73.4162 77.7817 82.4069 87.3071 92.4986 97.9989
103.826 110 116.541 123.471 130.813 138.591 146.832 155.563 164.814
174.614 184.997 195.998 207.652 220 233.082 246.942 261.626 277.183
293.665 311.127 329.628 349.228 369.994 391.995 415.305 440 466.164
493.883 523.251 554.365 587.33 622.254 659.255 698.456 739.989 783.991
830.609 880 932.328 987.767 1046.5 1108.73 1174.66 1244.51 1318.51
1396.91 1479.98 1567.98 1661.22 1760 1864.66 1975.53 2093 2217.46 2349.32
2489.02 2637.02 2793.83 2959.96 3135.96 3322.44 3520 3729.31 3951.07
4186.01 4434.92 4698.64 4978.03 5274.04 5587.65 5919.91 6271.93 6644.88
7040 7458.62 7902.13 8372.02 8869.84 9397.27 9956.06 10548.1 11175.3
11839.8 12543.9 13289.8 14080;
#X coords 0 12000 130 0 200 100 1;
#X restore 381 116 graph;
#X text 391 224 ------ 130 samples ------;
#X text 590 209 0;
#X text 592 109 12000;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 2 0 6 0;
#X connect 2 0 8 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 6 1 9 1;
#X connect 7 0 9 0;
#X connect 8 0 5 1;
#X restore 186 132 pd tables;
#X obj 25 117 metro 500;
#X floatatom 67 178 5 0 0 0 - - -;
#X obj 25 203 makenote 64 250;
#X obj 27 229 pack;
#X obj 27 253 s syn-midinoteon;
#X obj 25 98 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 329 358 numset fil x;
#X obj 329 387 numset fb x;
#X obj 329 416 numset fa x;
#X obj 329 445 numset fd x;
#X obj 329 474 numset fs x;
#X obj 329 503 numset fr x;
#X obj 329 532 numset q x;
#X floatatom 101 96 5 0 0 0 - - -;
#X floatatom 155 176 5 0 0 0 - - -;
#X floatatom 115 149 5 0 0 0 - - -;
#X obj 25 178 + 24;
#X obj 25 149 random 48;
#X obj 329 15 preset preset1 x;
#X obj 329 62 preset preset2 x;
#X obj 329 108 preset preset3 x;
#X obj 329 155 preset preset4 x;
#X obj 330 561 numset 2nd x;
#X obj 16 626 pack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
#X text 451 219 amplitude;
#X text 440 246 amp attack time;
#X text 445 279 amp decay time;
#X text 448 305 amp sustain level (%);
#X text 448 331 amp release time;
#X text 454 362 filter sweep;
#X text 445 392 filter base pitch;
#X text 444 424 filter attack time;
#X text 444 450 filter decay time;
#X text 448 480 filter sustain;
#X text 448 507 filter release time;
#X text 453 535 q;
#X text 450 566 2nd osc detune;
#X text 444 596 2nd osc amp (%);
#X text 508 666 OUTPUT LEVEL;
#X text 41 14 polyphonic synth with;
#X text 40 37 voice presets;
#X text 21 74 random-note tester;
#X obj 330 590 numset 2pc x;
#X connect 0 0 1 1;
#X connect 1 0 0 0;
#X connect 2 0 1 2;
#X connect 3 0 38 0;
#X connect 3 1 38 1;
#X connect 4 0 5 0;
#X connect 4 1 5 1;
#X connect 5 0 3 0;
#X connect 6 0 38 2;
#X connect 7 0 38 3;
#X connect 8 0 38 6;
#X connect 9 0 38 4;
#X connect 10 0 38 5;
#X connect 11 0 1 0;
#X connect 12 0 3 0;
#X connect 15 0 32 0;
#X connect 16 0 31 1;
#X connect 17 0 18 0;
#X connect 17 1 18 1;
#X connect 18 0 19 0;
#X connect 20 0 15 0;
#X connect 21 0 38 7;
#X connect 22 0 38 8;
#X connect 23 0 38 9;
#X connect 24 0 38 10;
#X connect 25 0 38 11;
#X connect 26 0 38 12;
#X connect 27 0 38 13;
#X connect 28 0 15 1;
#X connect 29 0 17 2;
#X connect 30 0 32 1;
#X connect 31 0 17 0;
#X connect 32 0 31 0;
#X connect 37 0 38 14;
#X connect 38 0 13 0;
#X connect 57 0 38 15;