-
Notifications
You must be signed in to change notification settings - Fork 0
/
main.pd
259 lines (259 loc) · 6.85 KB
/
main.pd
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
#N canvas 574 71 665 571 10;
#X obj 330 341 r keysig;
#X obj 290 281 list;
#X obj 310 311 list;
#X obj 270 251 t b b b;
#X obj 250 161 t l l;
#X obj 331 161 t l l;
#X obj 277 191 print dh;
#X obj 358 191 print ph;
#X obj 433 161 t l l;
#X obj 508 161 t l l;
#X obj 506 341 r keysig;
#X obj 487 311 list;
#X obj 468 281 list;
#X obj 450 251 t b b b;
#X obj 110 191 t b b;
#X obj 460 191 print dl;
#X obj 535 191 print pl;
#N canvas 103 102 718 464 controls 0;
#X msg 327 136 0 67 69 71 72 74 76 78;
#X obj 327 106 sel 0 1 2 3 4 5 6;
#X obj 107 116 hradio 17 1 0 7 keysig_pre empty empty 0 -8 0 10 -262144
-1 -1 0;
#X msg 327 166 0 65 67 69 70 72 74 76;
#X msg 327 196 0 60 62 64 65 67 69 71;
#X msg 327 226 0 62 64 66 67 69 71 73;
#X msg 327 256 0 70 72 74 75 77 79 81;
#X msg 327 286 0 69 71 73 74 76 78 80;
#X msg 327 316 0 63 65 67 68 70 72 74;
#X obj 327 346 s keysig;
#X obj 37 76 loadbang;
#X text 109 100 G;
#X text 127 100 F;
#X text 144 100 C;
#X text 161 100 D;
#X text 176 100 Bb;
#X text 196 100 A;
#X text 210 100 Eb;
#X obj 37 116 bng 17 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 327 76 r keysig_pre;
#X obj 107 156 hradio 17 1 0 5 high_octave empty empty 0 -8 0 10 -262144
-1 -1 2;
#X text 107 140 -2;
#X text 125 140 -1;
#X text 145 140 0;
#X text 158 140 +1;
#X text 176 140 +2;
#X obj 107 196 hradio 17 1 0 5 low_octave empty empty 0 -8 0 10 -262144
-1 -1 0;
#X text 107 180 -2;
#X text 125 180 -1;
#X text 145 180 0;
#X text 158 180 +1;
#X text 176 180 +2;
#X msg 37 156 2;
#X obj 209 156 bng 17 250 50 0 regen_high empty empty 17 7 0 10 -262144
-1 -1;
#X obj 209 196 bng 17 250 50 0 regen_low empty empty 17 7 0 10 -262144
-1 -1;
#X obj 247 76 loadbang;
#X obj 247 156 bng 17 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 247 196 bng 17 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 37 196 1;
#X obj 110 236 hsl 114 17 0 0.5 0 0 master_volume empty empty -2 -8
0 10 -262144 -1 -1 4520 1;
#X msg 37 236 0.2;
#X text 105 220 quiet;
#X text 200 220 loud;
#X obj 487 76 r master_tempo_pre;
#X obj 107 276 hradio 17 1 0 7 master_tempo_pre empty empty 0 -8 0
10 -262144 -1 -1 3;
#X obj 487 106 sel 0 1 2 3 4 5 6;
#X obj 487 346 s master_tempo;
#X msg 487 226 400;
#X msg 487 196 500;
#X msg 487 256 300;
#X msg 487 166 600;
#X msg 487 286 200;
#X msg 487 136 700;
#X msg 487 316 100;
#X text 105 260 slow;
#X text 200 260 fast;
#X msg 37 276 3;
#X obj 107 316 hradio 17 1 0 2 voice_low empty empty 0 -8 0 10 -262144
-1 -1 1;
#X obj 147 316 hradio 17 1 0 2 voice_high empty empty 0 -8 0 10 -262144
-1 -1 0;
#X msg 37 316 1;
#X msg 67 316 0;
#X obj 620 136 s low_toggle;
#X obj 620 106 s high_toggle;
#X obj 620 76 loadbang;
#X connect 0 0 9 0;
#X connect 1 0 0 0;
#X connect 1 1 3 0;
#X connect 1 2 4 0;
#X connect 1 3 5 0;
#X connect 1 4 6 0;
#X connect 1 5 7 0;
#X connect 1 6 8 0;
#X connect 3 0 9 0;
#X connect 4 0 9 0;
#X connect 5 0 9 0;
#X connect 6 0 9 0;
#X connect 7 0 9 0;
#X connect 8 0 9 0;
#X connect 10 0 18 0;
#X connect 10 0 32 0;
#X connect 10 0 38 0;
#X connect 10 0 40 0;
#X connect 10 0 59 0;
#X connect 10 0 60 0;
#X connect 18 0 2 0;
#X connect 19 0 1 0;
#X connect 32 0 20 0;
#X connect 35 0 36 0;
#X connect 35 0 37 0;
#X connect 36 0 33 0;
#X connect 37 0 34 0;
#X connect 38 0 26 0;
#X connect 40 0 39 0;
#X connect 40 0 56 0;
#X connect 43 0 45 0;
#X connect 45 0 52 0;
#X connect 45 1 50 0;
#X connect 45 2 48 0;
#X connect 45 3 47 0;
#X connect 45 4 49 0;
#X connect 45 5 51 0;
#X connect 45 6 53 0;
#X connect 47 0 46 0;
#X connect 48 0 46 0;
#X connect 49 0 46 0;
#X connect 50 0 46 0;
#X connect 51 0 46 0;
#X connect 52 0 46 0;
#X connect 53 0 46 0;
#X connect 56 0 44 0;
#X connect 59 0 57 0;
#X connect 60 0 58 0;
#X connect 63 0 62 0;
#X connect 63 0 61 0;
#X coords 0 -1 1 1 133 240 2 100 100;
#X restore -40 41 pd controls;
#X obj 250 131 generator-high;
#X obj 433 131 generator-low;
#X obj 450 401 assembler-low;
#X obj 270 401 assembler-high;
#X obj 250 101 r regen_high;
#X obj 433 101 r regen_low;
#X obj 110 101 metro 5600;
#X obj 167 41 r master_tempo;
#X obj 110 41 tgl 47 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 110 161 bng 17 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 167 71 * 17;
#X obj 187 101 i;
#X obj 110 131 t b b;
#X obj 307 431 r master_volume;
#X obj 487 431 r master_volume;
#X obj 513 461 r voice_low;
#X obj 333 461 r voice_high;
#X obj 270 551 dac~;
#X obj 450 491 synthesizer;
#X obj 432 401 bng 17 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 252 401 bng 17 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 270 221 spigot;
#X obj 311 221 tgl 17 0 empty high_toggle empty 17 7 0 10 -262144 -1
-1 1 1;
#X obj 450 221 spigot;
#X obj 491 221 tgl 17 0 empty low_toggle empty 17 7 0 10 -262144 -1
-1 1 1;
#X obj 351 371 r high_octave;
#X obj 525 371 r low_octave;
#X obj 270 491 synthesizer;
#N canvas 97 235 450 300 envelope 0;
#X obj 105 124 vsl 15 128 0 0.4 0 0 envelope_a empty A 0 -9 0 10 -262144
-1 -1 0 1;
#X obj 125 124 vsl 15 128 0 0.4 0 0 envelope_d empty D 0 -9 0 10 -262144
-1 -1 0 1;
#X obj 145 124 vsl 15 128 0 0.95 0 0 envelope_s empty S 0 -9 0 10 -262144
-1 -1 0 1;
#X obj 165 124 vsl 15 128 0 0.6 0 0 envelope_r empty R 0 -9 0 10 -262144
-1 -1 0 1;
#X msg 100 33 0.2 0.1 0.8 0.4;
#X obj 100 63 unpack f f f f;
#X obj 100 3 loadbang;
#X connect 4 0 5 0;
#X connect 5 0 0 0;
#X connect 5 1 1 0;
#X connect 5 2 2 0;
#X connect 5 3 3 0;
#X connect 6 0 4 0;
#X coords 0 -1 1 1 85 160 2 100 100;
#X restore -40 352 pd envelope;
#X connect 0 0 21 3;
#X connect 1 0 21 1;
#X connect 2 0 21 2;
#X connect 3 0 21 0;
#X connect 3 1 1 0;
#X connect 3 2 2 0;
#X connect 4 0 1 1;
#X connect 4 1 6 0;
#X connect 5 0 2 1;
#X connect 5 1 7 0;
#X connect 8 0 12 1;
#X connect 8 1 15 0;
#X connect 9 0 11 1;
#X connect 9 1 16 0;
#X connect 10 0 20 3;
#X connect 11 0 20 2;
#X connect 12 0 20 1;
#X connect 13 0 20 0;
#X connect 13 1 12 0;
#X connect 13 2 11 0;
#X connect 14 0 39 0;
#X connect 14 1 41 0;
#X connect 18 0 4 0;
#X connect 18 1 5 0;
#X connect 19 0 8 0;
#X connect 19 1 9 0;
#X connect 20 0 36 0;
#X connect 20 0 37 0;
#X connect 20 1 36 1;
#X connect 20 2 36 2;
#X connect 21 0 38 0;
#X connect 21 0 45 0;
#X connect 21 1 45 1;
#X connect 21 2 45 2;
#X connect 22 0 18 0;
#X connect 23 0 19 0;
#X connect 24 0 30 0;
#X connect 25 0 28 0;
#X connect 26 0 24 0;
#X connect 27 0 14 0;
#X connect 28 0 29 1;
#X connect 29 0 24 1;
#X connect 30 0 27 0;
#X connect 30 1 29 0;
#X connect 31 0 45 3;
#X connect 32 0 36 3;
#X connect 33 0 36 5;
#X connect 34 0 45 5;
#X connect 36 0 35 0;
#X connect 36 1 35 1;
#X connect 39 0 3 0;
#X connect 40 0 39 1;
#X connect 41 0 13 0;
#X connect 42 0 41 1;
#X connect 43 0 21 4;
#X connect 44 0 20 4;
#X connect 45 0 35 0;
#X connect 45 1 35 1;