-
Notifications
You must be signed in to change notification settings - Fork 0
/
bop.casio.pd
342 lines (342 loc) · 9.98 KB
/
bop.casio.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
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
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
#N canvas 0 23 1676 1005 10;
#X obj 640 100 inlet~ left;
#X obj 900 100 inlet~ right;
#X obj 1030 100 inlet note;
#X obj 1200 100 inlet ctl;
#X obj 640 200 outlet~ left;
#X obj 900 200 outlet~ right;
#X obj 1040 160 outlet note;
#X obj 1200 270 outlet ctl;
#X obj 400 350 savestate, f 11;
#X text 490 350 👈 bangs when parent is saved;
#X obj 400 60 r save-state-\$0;
#X obj 460 380 s save-state-\$0;
#X obj 1030 650 pack 0 0 0;
#X obj 1030 730 route 1 2 3 4, f 132;
#X obj 730 130 hip~ 5;
#X obj 730 155 clip~ -1 1;
#X obj 100 120 cnv 15 210 20 empty empty empty 7 7 0 14 #94c4ec #fcfcfc
0;
#X text 1820 860 comment;
#X obj 70 730 int;
#X obj 70 750 t f f;
#X obj 70 710 r from-wave-1-\$0;
#X obj 70 890 s to-wave-1-\$0;
#X obj 1280 250 s to-wave-1-\$0;
#X obj 440 640 s to-wave-1-\$0;
#N canvas 159 357 451 305 wave-name-maker 0;
#X obj 70 -110 i;
#X obj 70 -70 t b f, f 21;
#X obj 69 -144 inlet;
#X obj 70 110 outlet;
#X msg 70 -40 saw square pulse sinepulse halfpulse res-saw res-triangle
res-trapezoid, f 39;
#X obj 70 80 symbol;
#X obj 70 20 list split;
#X msg 70 50 \$1;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 1 6 1;
#X connect 2 0 0 0;
#X connect 4 0 6 0;
#X connect 5 0 3 0;
#X connect 6 1 7 0;
#X connect 7 0 5 0;
#X restore 90 790 pd wave-name-maker;
#X obj 110 150 hsl 185 15 0 7 0 1 from-wave-1-\$0 to-wave-1-\$0 wave-1:0(saw)
5 5 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 230 730 int;
#X obj 230 890 s to-wave-2-\$0;
#X obj 230 710 r from-wave-2-\$0;
#X obj 410 380 t b l;
#X obj 460 620 s to-wave-2-\$0;
#X obj 400 170 f;
#X obj 110 170 hsl 185 15 0 7 0 1 from-wave-2-\$0 to-wave-2-\$0 wave-2:3(sinepulse)
5 5 0 10 #fcfcfc #000000 #000000 9500 1;
#X msg 930 470 stop;
#X obj 110 190 hsl 185 15 0 1 0 1 from-filter-\$0 to-filter-\$0 filter:0.179348
5 5 0 10 #fcfcfc #000000 #000000 3300 1;
#X obj 90 1090 s to-filter-\$0;
#X obj 90 1020 r from-filter-\$0;
#X obj 480 600 s to-filter-\$0;
#X obj 450 120 r from-filter-\$0;
#X obj 1280 160 route wave-1 wave-2 filter, f 36;
#X obj 1330 210 s to-filter-\$0;
#X obj 210 1020 r from-attack-\$0;
#X obj 320 1020 r from-peak-\$0;
#X obj 420 1020 r from-decay-\$0;
#X obj 530 1020 r from-sustain-\$0;
#X obj 650 1020 r from-release-\$0;
#X obj 760 1020 r from-curve-\$0;
#X obj 760 1090 s to-curve-\$0;
#X obj 650 1090 s to-release-\$0;
#X obj 530 1090 s to-sustain-\$0;
#X obj 420 1090 s to-decay-\$0;
#X obj 320 1090 s to-peak-\$0;
#X obj 210 1090 s to-attack-\$0;
#X obj 1620 300 s to-curve-\$0;
#X obj 1560 320 s to-release-\$0;
#X obj 1510 340 s to-sustain-\$0;
#X obj 1480 360 s to-decay-\$0;
#X obj 1450 380 s to-peak-\$0;
#X obj 1430 400 s to-attack-\$0;
#X obj 580 480 s to-curve-\$0;
#X obj 560 500 s to-release-\$0;
#X obj 540 520 s to-sustain-\$0;
#X obj 530 540 s to-decay-\$0;
#X obj 510 560 s to-peak-\$0;
#X obj 490 580 s to-attack-\$0;
#X obj 460 140 r from-attack-\$0;
#X obj 470 160 r from-peak-\$0;
#X obj 480 180 r from-decay-\$0;
#X obj 490 200 r from-sustain-\$0;
#X obj 500 220 r from-release-\$0;
#X obj 520 240 r from-curve-\$0;
#X obj 110 240 hsl 185 15 0.01 1 1 1 from-attack-\$0 to-attack-\$0
attack:0.0340886 5 5 0 10 #fcfcfc #000000 #000000 4900 1;
#X obj 110 260 hsl 185 15 0 1 0 1 from-peak-\$0 to-peak-\$0 peak:1
5 5 0 10 #fcfcfc #000000 #000000 18400 1;
#X obj 110 280 hsl 185 15 0 1 0 1 from-decay-\$0 to-decay-\$0 decay:0.891304
5 5 0 10 #fcfcfc #000000 #000000 16400 1;
#X obj 110 300 hsl 185 15 0 1 0 1 from-sustain-\$0 to-sustain-\$0 sustain:0
5 5 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 110 320 hsl 185 15 0 1 0 1 from-release-\$0 to-release-\$0 release:0
5 5 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 110 340 hsl 185 15 0 1 0 0 from-curve-\$0 to-curve-\$0 curve:0
5 5 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 1030 690 \$1 \$1 \$2 \$3;
#X obj 110 210 hsl 185 15 0 1 0 1 from-spread-\$0 to-spread-\$0 spread:0
5 5 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 870 1020 r from-spread-\$0;
#X obj 870 1090 s to-spread-\$0;
#X obj 600 460 s to-spread-\$0;
#X obj 540 260 r from-spread-\$0;
#X obj 1670 280 s to-spread-\$0;
#X obj 730 60 catch~ instrument-left-\$0;
#X obj 800 80 catch~ instrument-right-\$0;
#X obj 800 130 hip~ 5;
#X obj 800 155 clip~ -1 1;
#X obj 1030 880 throw~ instrument-left-\$0;
#X obj 1040 850 throw~ instrument-right-\$0;
#X obj 1230 880 throw~ instrument-left-\$0;
#X obj 1240 850 throw~ instrument-right-\$0;
#X obj 1430 880 throw~ instrument-left-\$0;
#X obj 1440 850 throw~ instrument-right-\$0;
#X obj 1620 880 throw~ instrument-left-\$0;
#X obj 1630 850 throw~ instrument-right-\$0;
#X obj 1040 790 r from-spread-\$0;
#X obj 1240 790 r from-spread-\$0;
#X obj 1445 793 r from-spread-\$0;
#X obj 1631 791 r from-spread-\$0;
#X obj 410 80 r from-wave-1-\$0;
#X obj 440 100 r from-wave-2-\$0;
#X obj 1300 230 s to-wave-2-\$0;
#X obj 1030 610 poly 4 1, f 10;
#X obj 1040 550 sel 0;
#X obj 1030 580 cyclone/flush;
#X obj 110 130 tgl 15 1 from-pedal-\$0 to-pedal-\$0 pedal 20 5 0 10
#fcfcfc #000000 #000000 0 1;
#X obj 400 310 pack f f f f f f f f f f f;
#X obj 440 410 unpack f f f f f f f f f f f;
#N canvas 166 225 451 301 sustain 0;
#X obj 90 170 stripnote;
#X obj 90 190 pack;
#X obj 160 80 + 1;
#X obj 160 30 inlet;
#X obj 90 30 inlet;
#X obj 10 250 outlet;
#X obj 10 130 cyclone/gate 2;
#X connect 0 0 1 0;
#X connect 0 1 1 1;
#X connect 1 0 5 0;
#X connect 2 0 6 0;
#X connect 3 0 2 0;
#X connect 4 0 6 1;
#X connect 6 0 5 0;
#X connect 6 1 0 0;
#X restore 1030 250 pd sustain;
#X obj 550 280 r from-pedal-\$0;
#X obj 610 440 s to-pedal-\$0;
#X obj 1050 210 r from-pedal-\$0;
#X obj 1440 210 route attack peak decay sustain release curve spread
pedal, f 54;
#X obj 1700 260 s to-pedal-\$0;
#X obj 1030 820 sub.bop.util.spread -1;
#X obj 1230 820 sub.bop.util.spread -0.5;
#X obj 1430 820 sub.bop.util.spread 0.5;
#X obj 1620 820 sub.bop.util.spread 1;
#X obj 1030 760 sub.bop.casio.voice \$0;
#X obj 1230 760 sub.bop.casio.voice \$0;
#X obj 1430 760 sub.bop.casio.voice \$0;
#X obj 1620 760 sub.bop.casio.voice \$0;
#X obj 70 830 pack f s;
#X msg 70 860 label wave-1:\$1(\$2);
#X obj 230 750 t f f;
#N canvas 159 357 451 305 wave-name-maker 0;
#X obj 70 -110 i;
#X obj 70 -70 t b f, f 21;
#X obj 69 -144 inlet;
#X obj 70 110 outlet;
#X msg 70 -40 saw square pulse sinepulse halfpulse res-saw res-triangle
res-trapezoid, f 39;
#X obj 70 80 symbol;
#X obj 70 20 list split;
#X msg 70 50 \$1;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 1 6 1;
#X connect 2 0 0 0;
#X connect 4 0 6 0;
#X connect 5 0 3 0;
#X connect 6 1 7 0;
#X connect 7 0 5 0;
#X restore 260 790 pd wave-name-maker;
#X obj 230 830 pack f s;
#X msg 230 860 label wave-2:\$1(\$2);
#X text 1480 1180 comment;
#X msg 90 1050 label filter:\$1;
#X msg 210 1050 label attack:\$1;
#X msg 320 1050 label peak:\$1;
#X msg 420 1050 label decay:\$1;
#X msg 530 1050 label sustain:\$1;
#X msg 650 1050 label release:\$1;
#X msg 760 1050 label curve:\$1;
#X msg 870 1050 label spread:\$1;
#X obj 930 440 sel 0;
#X obj 930 410 r from-pedal-\$0;
#X obj 1813 30 loadbang;
#X obj 1813 120 s \$0-scope-id;
#X obj 1813 60 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 1813 90 iemguts/canvasdollarzero 1;
#X text 1838 59 get \$0 of parent patch to localise messaging;
#X obj 1811 144 r \$0-scope-id;
#X obj 1813 180 print scope-id;
#X obj 1057 406 r bop-time;
#X obj 1060 485 route;
#X obj 1081 439 r \$0-scope-id;
#X obj 1060 510 route play;
#X connect 0 0 4 0;
#X connect 1 0 5 0;
#X connect 2 0 6 0;
#X connect 2 0 109 0;
#X connect 3 0 7 0;
#X connect 3 0 39 0;
#X connect 8 0 29 0;
#X connect 8 1 11 0;
#X connect 10 0 31 0;
#X connect 12 0 77 0;
#X connect 13 0 119 0;
#X connect 13 1 120 0;
#X connect 13 2 121 0;
#X connect 13 3 122 0;
#X connect 14 0 15 0;
#X connect 15 0 4 0;
#X connect 18 0 19 0;
#X connect 19 0 123 0;
#X connect 19 1 24 0;
#X connect 20 0 18 0;
#X connect 24 0 123 1;
#X connect 26 0 125 0;
#X connect 28 0 26 0;
#X connect 29 1 108 0;
#X connect 31 0 107 0;
#X connect 33 0 103 0;
#X connect 36 0 130 0;
#X connect 38 0 107 2;
#X connect 39 0 22 0;
#X connect 39 1 102 0;
#X connect 39 2 40 0;
#X connect 39 3 113 0;
#X connect 41 0 131 0;
#X connect 42 0 132 0;
#X connect 43 0 133 0;
#X connect 44 0 134 0;
#X connect 45 0 135 0;
#X connect 46 0 136 0;
#X connect 65 0 107 3;
#X connect 66 0 107 4;
#X connect 67 0 107 5;
#X connect 68 0 107 6;
#X connect 69 0 107 7;
#X connect 70 0 107 8;
#X connect 77 0 13 0;
#X connect 79 0 137 0;
#X connect 82 0 107 9;
#X connect 84 0 14 0;
#X connect 85 0 86 0;
#X connect 86 0 87 0;
#X connect 87 0 5 0;
#X connect 96 0 115 1;
#X connect 97 0 116 1;
#X connect 98 0 117 1;
#X connect 99 0 118 1;
#X connect 100 0 31 1;
#X connect 101 0 107 1;
#X connect 103 0 12 0;
#X connect 103 1 12 1;
#X connect 103 2 12 2;
#X connect 104 0 105 0;
#X connect 105 0 103 0;
#X connect 105 1 103 1;
#X connect 107 0 8 0;
#X connect 108 0 23 0;
#X connect 108 1 30 0;
#X connect 108 2 37 0;
#X connect 108 3 64 0;
#X connect 108 4 63 0;
#X connect 108 5 62 0;
#X connect 108 6 61 0;
#X connect 108 7 60 0;
#X connect 108 8 59 0;
#X connect 108 9 81 0;
#X connect 108 10 111 0;
#X connect 109 0 105 0;
#X connect 110 0 107 10;
#X connect 112 0 109 1;
#X connect 113 0 58 0;
#X connect 113 1 57 0;
#X connect 113 2 56 0;
#X connect 113 3 55 0;
#X connect 113 4 54 0;
#X connect 113 5 53 0;
#X connect 113 6 83 0;
#X connect 113 7 114 0;
#X connect 115 0 88 0;
#X connect 115 1 89 0;
#X connect 116 0 90 0;
#X connect 116 1 91 0;
#X connect 117 0 92 0;
#X connect 117 1 93 0;
#X connect 118 0 94 0;
#X connect 118 1 95 0;
#X connect 119 0 115 0;
#X connect 120 0 116 0;
#X connect 121 0 117 0;
#X connect 122 0 118 0;
#X connect 123 0 124 0;
#X connect 124 0 21 0;
#X connect 125 0 127 0;
#X connect 125 1 126 0;
#X connect 126 0 127 1;
#X connect 127 0 128 0;
#X connect 128 0 27 0;
#X connect 130 0 35 0;
#X connect 131 0 52 0;
#X connect 132 0 51 0;
#X connect 133 0 50 0;
#X connect 134 0 49 0;
#X connect 135 0 48 0;
#X connect 136 0 47 0;
#X connect 137 0 80 0;
#X connect 138 0 33 0;
#X connect 139 0 138 0;
#X connect 140 0 142 0;
#X connect 142 0 143 0;
#X connect 143 0 141 0;
#X connect 145 0 146 0;
#X connect 147 0 148 0;
#X connect 148 0 150 0;
#X connect 149 0 148 1;
#X connect 150 0 104 0;
#X coords 0 -1 1 1 210 270 1 100 100;