-
Notifications
You must be signed in to change notification settings - Fork 13
/
ruby_interact.pd
498 lines (498 loc) · 11.3 KB
/
ruby_interact.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
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
#N canvas 62 129 621 231 10;
#X obj 35 21 netreceive 3939;
#N canvas 474 70 450 300 synth 0;
#X obj 26 64 osc~;
#X obj 26 41 mtof;
#X obj 26 131 *~;
#X obj 67 103 vline~;
#X msg 67 80 1 30 \, 0 100 50;
#X obj 25 185 dac~;
#X obj 26 20 r let;
#X floatatom 94 45 5 0 0 0 - - -;
#X obj 26 159 *~ 0.3;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 2 0 8 0;
#X connect 3 0 2 1;
#X connect 4 0 3 0;
#X connect 6 0 1 0;
#X connect 6 0 4 0;
#X connect 6 0 7 0;
#X connect 8 0 5 0;
#X connect 8 0 5 1;
#X restore 520 62 pd synth;
#X text 38 1 tune \, letters;
#N canvas 404 36 589 420 punctuation 0;
#X obj 100 43 r stop;
#X obj 101 67 click~;
#X obj 19 156 dac~;
#X obj 161 70 click~;
#X obj 160 100 dac~;
#X obj 25 96 delwrite~ stopdel 50;
#X obj 19 122 delread~ stopdel 50;
#X obj 59 171 s~ fb;
#X obj 55 144 *~ 0.3;
#X obj 34 57 r~ fb;
#X obj 161 46 r comma;
#X obj 217 44 r exclaim;
#X obj 217 150 osc~;
#X obj 217 108 vline~;
#X obj 228 226 dac~;
#X obj 228 179 *~;
#X obj 276 135 vline~;
#X msg 276 109 1 20 \, 0 100 200;
#X msg 217 83 1000 100 \, 500 200 100;
#X obj 384 155 osc~;
#X obj 384 113 vline~;
#X obj 395 231 dac~;
#X obj 395 184 *~;
#X obj 443 140 vline~;
#X msg 443 114 1 20 \, 0 100 200;
#X obj 384 48 r question;
#X msg 385 88 500 100 \, 1000 200 100;
#X obj 163 231 noise~;
#X obj 48 274 *~;
#X obj 53 300 dac~;
#X obj 22 252 vline~;
#X msg 11 226 1 100 \, 0 100 100;
#X obj 163 256 bp~ 1000 2;
#X obj 313 395 dac~;
#X obj 312 372 *~;
#X obj 394 365 vline~;
#X msg 394 345 1 50 \, 0 100 50;
#X obj 398 269 r =;
#X obj 410 297 del 100;
#X obj 290 309 noise~;
#X obj 287 335 bp~ 2000 20;
#X obj 207 310 noise~;
#X obj 111 378 *~;
#X obj 116 404 dac~;
#X obj 85 355 vline~;
#X obj 207 335 bp~ 100 2;
#X obj 86 307 r _;
#X obj 23 204 r hash;
#X obj 228 201 *~ 0.4;
#X obj 395 207 *~ 0.3;
#X msg 74 330 2 100 \, 0 100 100;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 6 0 2 0;
#X connect 6 0 2 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X connect 9 0 5 0;
#X connect 10 0 3 0;
#X connect 11 0 18 0;
#X connect 11 0 17 0;
#X connect 12 0 15 0;
#X connect 13 0 12 0;
#X connect 15 0 48 0;
#X connect 16 0 15 1;
#X connect 17 0 16 0;
#X connect 18 0 13 0;
#X connect 19 0 22 0;
#X connect 20 0 19 0;
#X connect 22 0 49 0;
#X connect 23 0 22 1;
#X connect 24 0 23 0;
#X connect 25 0 26 0;
#X connect 25 0 24 0;
#X connect 26 0 20 0;
#X connect 27 0 32 0;
#X connect 28 0 29 0;
#X connect 28 0 29 1;
#X connect 30 0 28 0;
#X connect 31 0 30 0;
#X connect 32 0 28 1;
#X connect 34 0 33 0;
#X connect 34 0 33 1;
#X connect 35 0 34 1;
#X connect 36 0 35 0;
#X connect 37 0 36 0;
#X connect 37 0 38 0;
#X connect 38 0 36 0;
#X connect 39 0 40 0;
#X connect 40 0 34 0;
#X connect 41 0 45 0;
#X connect 42 0 43 0;
#X connect 42 0 43 1;
#X connect 44 0 42 0;
#X connect 45 0 42 1;
#X connect 46 0 50 0;
#X connect 47 0 31 0;
#X connect 48 0 14 0;
#X connect 48 0 14 1;
#X connect 49 0 21 0;
#X connect 49 0 21 1;
#X connect 50 0 44 0;
#X restore 482 2 pd punctuation;
#N canvas 264 25 750 513 brackets 0;
#X obj 148 39 r opb;
#X obj 156 71 r clb;
#X obj 65 143 vline~;
#X obj 14 169 *~;
#X obj 13 194 *~ 0.2;
#X msg 65 119 1 100 \, 0 100 200;
#X obj 9 142 osc~;
#X obj 13 216 dac~;
#X obj 10 119 vline~;
#X msg 10 72 440 \, 880 400;
#X msg 21 92 880 \, 440 400;
#X obj 332 129 vline~;
#X obj 209 215 *~;
#X obj 208 240 *~ 0.2;
#X msg 332 105 1 100 \, 0 100 200;
#X obj 208 262 dac~;
#X obj 206 107 vline~;
#X msg 206 60 440 \, 880 400;
#X msg 217 80 880 \, 440 400;
#X obj 344 27 r ops;
#X obj 352 59 r cls;
#X obj 556 158 vline~;
#X obj 505 184 *~;
#X obj 504 209 *~ 0.2;
#X msg 556 134 1 100 \, 0 100 200;
#X obj 500 157 osc~;
#X obj 504 231 dac~;
#X obj 501 88 vline~;
#X msg 501 41 440 \, 880 400;
#X msg 512 61 880 \, 440 400;
#X obj 501 135 +~;
#X obj 639 54 r opc;
#X obj 647 86 r clc;
#X obj 455 114 *~ 100;
#X obj 454 88 osc~ 5;
#X obj 205 130 osc~;
#X obj 200 162 expr~ $v1 > 0;
#X connect 0 0 9 0;
#X connect 0 0 5 0;
#X connect 1 0 10 0;
#X connect 1 0 5 0;
#X connect 2 0 3 1;
#X connect 3 0 4 0;
#X connect 4 0 7 0;
#X connect 4 0 7 1;
#X connect 5 0 2 0;
#X connect 6 0 3 0;
#X connect 8 0 6 0;
#X connect 9 0 8 0;
#X connect 10 0 8 0;
#X connect 11 0 12 1;
#X connect 12 0 13 0;
#X connect 13 0 15 0;
#X connect 13 0 15 1;
#X connect 14 0 11 0;
#X connect 16 0 35 0;
#X connect 17 0 16 0;
#X connect 18 0 16 0;
#X connect 19 0 17 0;
#X connect 19 0 14 0;
#X connect 20 0 18 0;
#X connect 20 0 14 0;
#X connect 21 0 22 1;
#X connect 22 0 23 0;
#X connect 23 0 26 0;
#X connect 23 0 26 1;
#X connect 24 0 21 0;
#X connect 25 0 22 0;
#X connect 27 0 30 1;
#X connect 28 0 27 0;
#X connect 29 0 27 0;
#X connect 30 0 25 0;
#X connect 31 0 28 0;
#X connect 31 0 24 0;
#X connect 32 0 29 0;
#X connect 32 0 24 0;
#X connect 33 0 30 0;
#X connect 34 0 33 0;
#X connect 35 0 36 0;
#X connect 36 0 12 0;
#X restore 502 42 pd brackets;
#N canvas 474 70 450 300 numbsynth 0;
#X obj 26 41 mtof;
#X obj 27 166 *~;
#X obj 198 113 vline~;
#X obj 26 212 dac~;
#X obj 27 68 phasor~;
#X obj 28 139 moog~;
#X obj 100 58 +~ 1;
#X obj 100 78 *~ 2000;
#X obj 100 99 +~ 300;
#X obj 26 19 r num;
#X obj 197 51 r num;
#X floatatom 247 59 5 0 0 0 - - -;
#X obj 100 36 osc~ 10;
#X msg 198 88 1 30 \, 0 200 100;
#X obj 27 186 *~ 0.4;
#X connect 0 0 4 0;
#X connect 1 0 14 0;
#X connect 2 0 1 1;
#X connect 4 0 5 0;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 5 1;
#X connect 9 0 0 0;
#X connect 10 0 13 0;
#X connect 10 0 11 0;
#X connect 12 0 6 0;
#X connect 13 0 2 0;
#X connect 14 0 3 0;
#X connect 14 0 3 1;
#X restore 496 84 pd numbsynth;
#N canvas 104 35 860 501 punctuation2 0;
#X obj 24 140 osc~;
#X obj 24 118 line~;
#X obj 69 140 osc~;
#X obj 69 118 line~;
#X obj 66 214 *~;
#X msg 8 63 440 \, 880 100;
#X msg 32 82 440 \, 220 100;
#X obj 65 236 dac~;
#X obj 13 28 r <;
#X obj 63 34 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 119 188 vline~;
#X msg 114 161 1 10 \, 0 200 10;
#X obj 244 136 osc~;
#X obj 244 114 line~;
#X obj 282 136 osc~;
#X obj 282 114 line~;
#X obj 310 195 *~;
#X obj 311 219 dac~;
#X obj 321 27 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 316 137 vline~;
#X msg 319 114 1 10 \, 0 200 10;
#X obj 254 30 r >;
#X msg 233 62 220 \, 440 100;
#X msg 250 85 880 \, 440 100;
#X obj 457 35 r ";
#X obj 427 167 osc~;
#X obj 427 145 line~;
#X obj 458 241 *~;
#X obj 459 265 dac~;
#X obj 464 183 vline~;
#X msg 423 110 10000 \, 5000 100;
#X obj 462 57 del 100;
#X msg 467 160 1 10 \, 0 50 10;
#X obj 36 281 r -;
#X obj 12 363 osc~;
#X obj 43 437 *~;
#X obj 44 461 dac~;
#X obj 49 379 vline~;
#X obj 150 355 osc~;
#X obj 150 333 line~;
#X obj 181 429 *~;
#X obj 182 453 dac~;
#X obj 187 371 vline~;
#X msg 190 348 1 10 \, 0 300 10;
#X obj 174 273 r +;
#X msg 147 298 50 \, 1000 300;
#X obj 288 349 osc~;
#X obj 288 327 line~;
#X obj 319 423 *~;
#X obj 320 447 dac~;
#X obj 325 365 vline~;
#X msg 329 342 1 10 \, 0 300 10;
#X obj 312 267 r /;
#X msg 285 292 440 \, 880 1000;
#X obj 660 254 r &;
#X obj 717 418 dac~;
#X obj 722 338 vline~;
#X obj 719 398 *~;
#X msg 726 315 1 10 \, 0 400 10;
#X obj 646 314 random 10000;
#X obj 644 340 osc~;
#X obj 471 356 osc~;
#X obj 471 334 line~;
#X obj 502 430 *~;
#X obj 503 454 dac~;
#X obj 508 372 vline~;
#X msg 512 349 1 10 \, 0 300 10;
#X obj 495 274 r backslash;
#X msg 468 299 880 \, 440 1000;
#X obj 66 188 *~ 0.3;
#X obj 312 174 *~ 0.3;
#X obj 461 221 *~ 0.3;
#X obj 45 417 *~ 0.3;
#X msg 9 306 1000;
#X obj 183 408 *~ 0.3;
#X obj 321 402 *~ 0.3;
#X obj 504 408 *~ 0.3;
#X obj 718 375 *~ 0.3;
#X msg 51 358 1 10 \, 0 400 10;
#X obj 649 287 bang;
#X connect 0 0 69 0;
#X connect 1 0 0 0;
#X connect 2 0 69 0;
#X connect 3 0 2 0;
#X connect 4 0 7 0;
#X connect 4 0 7 1;
#X connect 5 0 1 0;
#X connect 6 0 3 0;
#X connect 8 0 5 0;
#X connect 8 0 6 0;
#X connect 8 0 11 0;
#X connect 9 0 5 0;
#X connect 9 0 6 0;
#X connect 9 0 11 0;
#X connect 10 0 4 1;
#X connect 11 0 10 0;
#X connect 12 0 70 0;
#X connect 13 0 12 0;
#X connect 14 0 70 0;
#X connect 15 0 14 0;
#X connect 16 0 17 0;
#X connect 16 0 17 1;
#X connect 18 0 22 0;
#X connect 18 0 23 0;
#X connect 18 0 20 0;
#X connect 19 0 16 1;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 21 0 23 0;
#X connect 21 0 20 0;
#X connect 22 0 13 0;
#X connect 23 0 15 0;
#X connect 24 0 31 0;
#X connect 24 0 32 0;
#X connect 25 0 71 0;
#X connect 26 0 25 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 29 0 27 1;
#X connect 30 0 26 0;
#X connect 31 0 32 0;
#X connect 31 0 30 0;
#X connect 32 0 29 0;
#X connect 33 0 73 0;
#X connect 33 0 78 0;
#X connect 34 0 72 0;
#X connect 35 0 36 0;
#X connect 35 0 36 1;
#X connect 37 0 35 1;
#X connect 38 0 74 0;
#X connect 39 0 38 0;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 42 0 40 1;
#X connect 43 0 42 0;
#X connect 44 0 45 0;
#X connect 44 0 43 0;
#X connect 45 0 39 0;
#X connect 46 0 75 0;
#X connect 47 0 46 0;
#X connect 48 0 49 0;
#X connect 48 0 49 1;
#X connect 50 0 48 1;
#X connect 51 0 50 0;
#X connect 52 0 53 0;
#X connect 52 0 51 0;
#X connect 53 0 47 0;
#X connect 54 0 58 0;
#X connect 54 0 79 0;
#X connect 56 0 57 1;
#X connect 57 0 55 0;
#X connect 57 0 55 1;
#X connect 58 0 56 0;
#X connect 59 0 60 0;
#X connect 60 0 77 0;
#X connect 61 0 76 0;
#X connect 62 0 61 0;
#X connect 63 0 64 0;
#X connect 63 0 64 1;
#X connect 65 0 63 1;
#X connect 66 0 65 0;
#X connect 67 0 68 0;
#X connect 67 0 66 0;
#X connect 68 0 62 0;
#X connect 69 0 4 0;
#X connect 70 0 16 0;
#X connect 71 0 27 0;
#X connect 72 0 35 0;
#X connect 73 0 34 0;
#X connect 74 0 40 0;
#X connect 75 0 48 0;
#X connect 76 0 63 0;
#X connect 77 0 57 0;
#X connect 78 0 37 0;
#X connect 79 0 59 0;
#X restore 482 23 pd punctuation2;
#X obj 34 152 s let;
#X obj 79 153 s num;
#X obj 72 46 print;
#N canvas 0 0 733 336 punctuation-route 0;
#X obj 57 27 inlet;
#X obj 57 78 s stop;
#X obj 74 101 s comma;
#X obj 89 129 s ";
#X obj 106 153 s exclaim;
#X obj 122 73 s question;
#X obj 138 97 s <;
#X obj 155 118 s >;
#X obj 171 146 s <;
#X obj 187 169 s >;
#X obj 204 72 s <;
#X obj 220 95 s >;
#X obj 236 117 s hash;
#X obj 253 140 s =;
#X obj 269 164 s _;
#X obj 285 73 s <;
#X obj 301 96 s >;
#X obj 318 118 s ";
#X obj 334 145 s -;
#X obj 351 73 s +;
#X obj 367 98 s /;
#X obj 385 124 s backslash;
#X obj 57 52 route 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
20;
#X connect 0 0 22 0;
#X connect 22 0 1 0;
#X connect 22 1 2 0;
#X connect 22 2 3 0;
#X connect 22 3 4 0;
#X connect 22 4 5 0;
#X connect 22 5 6 0;
#X connect 22 6 7 0;
#X connect 22 7 8 0;
#X connect 22 8 9 0;
#X connect 22 9 10 0;
#X connect 22 10 11 0;
#X connect 22 11 12 0;
#X connect 22 12 13 0;
#X connect 22 13 14 0;
#X connect 22 14 15 0;
#X connect 22 15 16 0;
#X connect 22 16 17 0;
#X connect 22 17 18 0;
#X connect 22 18 19 0;
#X connect 22 19 20 0;
#X connect 22 20 21 0;
#X restore 125 154 pd punctuation-route;
#X obj 34 65 route letter num punct location;
#N canvas 0 0 450 300 location 0;
#X obj 59 66 inlet;
#X obj 59 109 unpack s s f f;
#X symbolatom 59 140 10 0 0 0 - - -;
#X symbolatom 86 166 10 0 0 0 - - -;
#X floatatom 113 197 5 0 0 0 - - -;
#X floatatom 140 225 5 0 0 0 - - -;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 1 2 4 0;
#X connect 1 3 5 0;
#X restore 171 125 pd location;
#X text 243 1 Text to music synthesis patch;
#X text 238 18 Andrew James Faraday - May 2012;
#X text 231 182 Note: this patch must be open for the ruby text to
music scripts to work.;
#X connect 0 0 9 0;
#X connect 0 0 11 0;
#X connect 11 0 7 0;
#X connect 11 1 8 0;
#X connect 11 2 10 0;
#X connect 11 3 12 0;