aboutsummaryrefslogtreecommitdiff
path: root/nusmuk-audio/examples/analog_synth_emulation.pd
blob: eefd0157e0a503d33eeeb50d2e7aa49dc0f53abe (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
#N canvas 333 22 523 667 10;
#X obj 66 468 *~ 0.1;
#X obj 67 496 dac~;
#X obj 65 126 vsl 15 128 -20 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 5200 1;
#X obj 65 283 line~;
#X msg 65 261 \$1 20;
#X obj 134 476 oscillo~;
#X obj 66 324 ../saw~;
#X obj 66 345 ../distortion~;
#X obj 67 434 ../distortion~;
#N canvas 520 123 368 628 coef_lpf_biquad 0;
#X obj 50 32 inlet;
#X obj 211 31 inlet;
#X text 92 34 f;
#X text 256 31 Q;
#X obj 117 137 samplerate~;
#X obj 117 114 loadbang;
#X obj 174 115 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 50 170 /;
#X obj 50 369 cos;
#X obj 199 296 sin;
#X obj 211 116 * 2;
#X obj 50 564 outlet;
#X obj 288 504 + 1;
#X obj 139 501 / 2;
#X obj 94 505 -;
#X msg 99 463 1 \$1;
#X msg 139 458 1 \$1;
#X obj 184 480 -;
#X obj 229 501 / 2;
#X msg 229 460 1 \$1;
#X obj 50 487 * -2;
#X obj 139 480 -;
#X msg 184 458 1 \$1;
#X obj 229 481 -;
#X obj 199 350 t f f;
#X obj 50 269 t f f;
#X obj 50 539 /;
#X obj 94 540 /;
#X obj 139 540 /;
#X obj 184 539 /;
#X obj 229 540 /;
#X obj 139 564 outlet;
#X obj 94 564 outlet;
#X obj 184 564 outlet;
#X obj 229 564 outlet;
#X obj 50 246 f;
#X obj 211 185 t b f;
#X obj 211 95 + 0.707;
#X obj 211 74 max 0;
#X obj 50 73 max 0;
#X obj 50 394 t f f b;
#X obj 50 115 * 3.14159;
#X obj 67 206 min 3.14;
#X obj 238 295 sinh;
#X obj 199 325 * 0.767;
#X msg 211 140 1 \$1;
#X obj 211 162 /;
#X obj 50 143 * 2;
#X obj 50 95 min 21000;
#X connect 0 0 39 0;
#X connect 1 0 38 0;
#X connect 4 0 7 1;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 35 0;
#X connect 8 0 40 0;
#X connect 9 0 44 0;
#X connect 10 0 45 0;
#X connect 12 0 26 1;
#X connect 12 0 27 1;
#X connect 12 0 28 1;
#X connect 12 0 29 1;
#X connect 12 0 30 1;
#X connect 13 0 28 0;
#X connect 14 0 27 0;
#X connect 15 0 14 0;
#X connect 16 0 21 0;
#X connect 17 0 29 0;
#X connect 18 0 30 0;
#X connect 19 0 23 0;
#X connect 20 0 26 0;
#X connect 21 0 13 0;
#X connect 22 0 17 0;
#X connect 23 0 18 0;
#X connect 24 0 15 0;
#X connect 24 1 12 0;
#X connect 25 0 8 0;
#X connect 25 1 9 0;
#X connect 26 0 11 0;
#X connect 27 0 32 0;
#X connect 28 0 31 0;
#X connect 29 0 33 0;
#X connect 30 0 34 0;
#X connect 35 0 25 0;
#X connect 36 0 35 0;
#X connect 36 1 43 0;
#X connect 37 0 10 0;
#X connect 38 0 37 0;
#X connect 39 0 48 0;
#X connect 40 0 20 0;
#X connect 40 1 16 0;
#X connect 40 1 22 0;
#X connect 40 1 19 0;
#X connect 40 2 14 0;
#X connect 41 0 47 0;
#X connect 42 0 35 0;
#X connect 43 0 44 1;
#X connect 44 0 24 0;
#X connect 45 0 46 0;
#X connect 46 0 36 0;
#X connect 47 0 7 0;
#X connect 48 0 41 0;
#X restore 244 253 pd coef_lpf_biquad;
#X obj 244 277 pack f f f f f;
#X obj 244 231 mtof;
#X floatatom 369 229 5 0 0 0 - - -;
#X obj 244 303 t a;
#N canvas 0 0 450 300 5_line~ 0;
#X obj 80 123 line~;
#X obj 79 147 outlet~;
#X obj 80 71 inlet;
#X obj 136 123 line~;
#X obj 135 147 outlet~;
#X obj 136 73 inlet;
#X obj 193 123 line~;
#X obj 192 147 outlet~;
#X obj 193 73 inlet;
#X obj 247 123 line~;
#X obj 246 147 outlet~;
#X obj 247 73 inlet;
#X obj 304 123 line~;
#X obj 303 147 outlet~;
#X obj 304 73 inlet;
#X msg 80 97 \$1 5;
#X msg 135 98 \$1 5;
#X msg 193 96 \$1 5;
#X msg 247 99 \$1 5;
#X msg 303 99 \$1 5;
#X connect 0 0 1 0;
#X connect 2 0 15 0;
#X connect 3 0 4 0;
#X connect 5 0 16 0;
#X connect 6 0 7 0;
#X connect 8 0 17 0;
#X connect 9 0 10 0;
#X connect 11 0 18 0;
#X connect 12 0 13 0;
#X connect 14 0 19 0;
#X connect 15 0 0 0;
#X connect 16 0 3 0;
#X connect 17 0 6 0;
#X connect 18 0 9 0;
#X connect 19 0 12 0;
#X restore 244 344 pd 5_line~;
#X obj 244 323 unpack f f f f f;
#X obj 66 388 bq~ ---------;
#X obj 244 96 vsl 15 128 -20 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 8200 1;
#X obj 101 -39 metro 222;
#X obj 101 93 pack f f;
#X obj 101 -16 t b b;
#X obj 154 25 random 222;
#X obj 232 25 random 222;
#X obj 101 -58 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 179 71 pack f f;
#X obj 179 93 line;
#X obj 66 304 mtof~;
#X floatatom 132 323 5 0 0 0 - - -;
#X floatatom 114 415 5 0 0 0 - - -;
#X obj 359 38 random 222;
#X obj 306 104 pack f f;
#X obj 306 126 line;
#X obj 306 62 random 100;
#X obj 306 83 / 10;
#X obj 101 72 + 22;
#X obj 179 49 random 99;
#X obj 101 49 random 44;
#X obj 135 455 *~ 0.5;
#X connect 0 0 1 0;
#X connect 0 0 1 1;
#X connect 2 0 4 0;
#X connect 3 0 26 0;
#X connect 4 0 3 0;
#X connect 6 0 7 0;
#X connect 7 0 16 0;
#X connect 8 0 0 0;
#X connect 8 0 37 0;
#X connect 9 0 10 0;
#X connect 9 1 10 1;
#X connect 9 2 10 2;
#X connect 9 3 10 3;
#X connect 9 4 10 4;
#X connect 10 0 13 0;
#X connect 11 0 9 0;
#X connect 12 0 9 1;
#X connect 13 0 15 0;
#X connect 14 0 16 1;
#X connect 14 1 16 2;
#X connect 14 2 16 3;
#X connect 14 3 16 4;
#X connect 14 4 16 5;
#X connect 15 0 14 0;
#X connect 15 1 14 1;
#X connect 15 2 14 2;
#X connect 15 3 14 3;
#X connect 15 4 14 4;
#X connect 16 0 8 0;
#X connect 17 0 11 0;
#X connect 18 0 20 0;
#X connect 19 0 3 0;
#X connect 20 0 32 0;
#X connect 20 0 35 0;
#X connect 20 0 36 0;
#X connect 20 1 21 0;
#X connect 20 1 22 0;
#X connect 20 1 29 0;
#X connect 21 0 19 1;
#X connect 22 0 24 1;
#X connect 23 0 18 0;
#X connect 24 0 25 0;
#X connect 25 0 11 0;
#X connect 26 0 6 0;
#X connect 27 0 7 1;
#X connect 28 0 8 1;
#X connect 29 0 30 1;
#X connect 30 0 31 0;
#X connect 31 0 9 1;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 0 19 0;
#X connect 35 0 24 0;
#X connect 36 0 34 0;
#X connect 37 0 5 0;