aboutsummaryrefslogtreecommitdiff
path: root/msd2D/02_msd2Dadd.pd
blob: ab91f09d5ede1f82dc9dc2eb678c41b71459166e (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
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
#N canvas 572 22 720 780 10;
#X obj 137 211 t a;
#X obj 137 39 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 195 86 reset;
#X obj 52 15 loadbang;
#X obj 313 571 print msd;
#X obj 52 549 msd2D --------------------------------;
#X msg 448 219 0 \, destroy;
#X obj 539 576 gemhead;
#X obj 539 599 world_light;
#N canvas 177 95 954 737 synthese 0;
#X obj 267 9 inlet;
#X msg -35 224 \$1 50;
#X obj -35 246 line~;
#X obj -75 250 *~;
#X msg 60 224 \$1 50;
#X obj 60 246 line~;
#X obj 20 250 *~;
#X msg 153 226 \$1 50;
#X obj 153 248 line~;
#X obj 113 252 *~;
#X msg 245 224 \$1 50;
#X obj 245 246 line~;
#X obj 205 250 *~;
#X obj 62 298 dac~;
#X msg 346 227 \$1 50;
#X obj 346 249 line~;
#X obj 306 253 *~;
#X msg 441 227 \$1 50;
#X obj 441 249 line~;
#X obj 401 253 *~;
#X msg 534 229 \$1 50;
#X obj 534 251 line~;
#X obj 494 255 *~;
#X msg 626 227 \$1 50;
#X obj 626 249 line~;
#X obj 586 253 *~;
#X obj 443 301 dac~;
#X obj -77 194 osc~ 55;
#X obj 19 194 osc~ 110;
#X obj 204 195 osc~ 222;
#X obj -13 128 unpack f f;
#X obj 176 134 unpack f f;
#X obj 362 131 unpack f f;
#X obj 553 138 unpack f f;
#X msg -45 428 \$1 50;
#X obj -45 450 line~;
#X obj -85 454 *~;
#X msg 50 428 \$1 50;
#X obj 50 450 line~;
#X obj 10 454 *~;
#X msg 143 430 \$1 50;
#X obj 143 452 line~;
#X obj 103 456 *~;
#X msg 235 428 \$1 50;
#X obj 235 450 line~;
#X obj 195 454 *~;
#X obj 52 502 dac~;
#X msg 336 431 \$1 50;
#X obj 336 453 line~;
#X obj 296 457 *~;
#X msg 431 431 \$1 50;
#X obj 431 453 line~;
#X obj 391 457 *~;
#X msg 524 433 \$1 50;
#X obj 524 455 line~;
#X obj 484 459 *~;
#X msg 616 431 \$1 50;
#X obj 616 453 line~;
#X obj 576 457 *~;
#X obj 433 505 dac~;
#X obj 483 403 osc~ 1113;
#X obj 575 401 osc~ 2229;
#X obj -15 343 unpack f f;
#X obj 166 338 unpack f f;
#X obj 352 335 unpack f f;
#X obj 543 342 unpack f f;
#X obj 112 196 osc~ 165;
#X obj 305 197 osc~ 267;
#X obj 400 197 osc~ 311;
#X obj 268 44 route 1 5 9 13 17 21 25 29;
#X obj 493 199 osc~ 366;
#X obj 585 197 osc~ 421;
#X obj -87 398 osc~ 444;
#X obj 9 398 osc~ 554;
#X obj 102 400 osc~ 664;
#X obj 194 398 osc~ 776;
#X obj 295 401 osc~ 888;
#X obj 390 401 osc~ 1000;
#X obj -75 368 / 20;
#X obj 52 374 / 20;
#X obj 144 376 / 20;
#X obj 240 374 / 50;
#X obj 307 371 / 50;
#X obj 434 377 / 50;
#X obj 524 379 / 100;
#X obj 621 377 / 100;
#X obj 631 173 / 100;
#X obj 532 176 / 100;
#X obj 444 174 / 50;
#X obj 317 167 / 50;
#X obj 250 170 / 50;
#X obj 153 172 / 20;
#X obj 61 171 / 20;
#X obj -64 164 / 20;
#X connect 0 0 69 0;
#X connect 1 0 2 0;
#X connect 2 0 3 1;
#X connect 3 0 13 0;
#X connect 4 0 5 0;
#X connect 5 0 6 1;
#X connect 6 0 13 0;
#X connect 6 0 13 1;
#X connect 7 0 8 0;
#X connect 8 0 9 1;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 11 0;
#X connect 11 0 12 1;
#X connect 12 0 13 1;
#X connect 14 0 15 0;
#X connect 15 0 16 1;
#X connect 16 0 26 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 26 0;
#X connect 19 0 26 1;
#X connect 20 0 21 0;
#X connect 21 0 22 1;
#X connect 22 0 26 0;
#X connect 22 0 26 1;
#X connect 23 0 24 0;
#X connect 24 0 25 1;
#X connect 25 0 26 1;
#X connect 27 0 3 0;
#X connect 28 0 6 0;
#X connect 29 0 12 0;
#X connect 30 0 93 0;
#X connect 30 1 92 0;
#X connect 31 0 91 0;
#X connect 31 1 90 0;
#X connect 32 0 89 0;
#X connect 32 1 88 0;
#X connect 33 0 87 0;
#X connect 33 1 86 0;
#X connect 34 0 35 0;
#X connect 35 0 36 1;
#X connect 36 0 46 0;
#X connect 37 0 38 0;
#X connect 38 0 39 1;
#X connect 39 0 46 0;
#X connect 39 0 46 1;
#X connect 40 0 41 0;
#X connect 41 0 42 1;
#X connect 42 0 46 0;
#X connect 42 0 46 1;
#X connect 43 0 44 0;
#X connect 44 0 45 1;
#X connect 45 0 46 1;
#X connect 47 0 48 0;
#X connect 48 0 49 1;
#X connect 49 0 59 0;
#X connect 50 0 51 0;
#X connect 51 0 52 1;
#X connect 52 0 59 0;
#X connect 52 0 59 1;
#X connect 53 0 54 0;
#X connect 54 0 55 1;
#X connect 55 0 59 0;
#X connect 55 0 59 1;
#X connect 56 0 57 0;
#X connect 57 0 58 1;
#X connect 58 0 59 1;
#X connect 60 0 55 0;
#X connect 61 0 58 0;
#X connect 62 0 78 0;
#X connect 62 1 79 0;
#X connect 63 0 80 0;
#X connect 63 1 81 0;
#X connect 64 0 82 0;
#X connect 64 1 83 0;
#X connect 65 0 84 0;
#X connect 65 1 85 0;
#X connect 66 0 9 0;
#X connect 67 0 16 0;
#X connect 68 0 19 0;
#X connect 69 0 30 0;
#X connect 69 1 31 0;
#X connect 69 2 32 0;
#X connect 69 3 33 0;
#X connect 69 4 62 0;
#X connect 69 5 63 0;
#X connect 69 6 64 0;
#X connect 69 7 65 0;
#X connect 70 0 22 0;
#X connect 71 0 25 0;
#X connect 72 0 36 0;
#X connect 73 0 39 0;
#X connect 74 0 42 0;
#X connect 75 0 45 0;
#X connect 76 0 49 0;
#X connect 77 0 52 0;
#X connect 78 0 34 0;
#X connect 79 0 37 0;
#X connect 80 0 40 0;
#X connect 81 0 43 0;
#X connect 82 0 47 0;
#X connect 83 0 50 0;
#X connect 84 0 53 0;
#X connect 85 0 56 0;
#X connect 86 0 23 0;
#X connect 87 0 20 0;
#X connect 88 0 17 0;
#X connect 89 0 14 0;
#X connect 90 0 10 0;
#X connect 91 0 7 0;
#X connect 92 0 4 0;
#X connect 93 0 1 0;
#X restore 230 645 pd synthese;
#X obj 374 461 gemhead;
#X msg 156 145 Xmax 100 \, Xmin 0 \, Ymax 100 \, Ymin 0;
#X msg 448 196 reset \, create \, lighting 1 \, 1;
#X obj 52 399 t b;
#N canvas 643 123 617 602 massrender 0;
#X obj 127 22 inlet;
#X obj 62 267 translateXYZ;
#X obj 166 123 / 12.5;
#X obj 166 146 - 4;
#X obj 231 124 / 12.5;
#X obj 231 147 - 4;
#X obj 62 241 separator;
#X obj 127 57 unpack f f f;
#X msg 128 194 \$1;
#X obj 62 314 sphere 0.1;
#X obj 62 219 colorRGB 1 1 1;
#X obj 128 174 / 29;
#X obj 127 85 t b f;
#X obj 62 135 gemhead 45;
#X obj 62 63 loadbang;
#X msg 62 93 0;
#X connect 0 0 7 0;
#X connect 1 0 9 0;
#X connect 2 0 3 0;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X connect 5 0 1 2;
#X connect 6 0 1 0;
#X connect 7 0 12 0;
#X connect 7 1 2 0;
#X connect 7 2 4 0;
#X connect 8 0 10 2;
#X connect 8 0 10 3;
#X connect 10 0 6 0;
#X connect 11 0 8 0;
#X connect 12 0 13 0;
#X connect 12 1 11 0;
#X connect 13 0 10 0;
#X connect 14 0 15 0;
#X connect 15 0 13 0;
#X restore 141 623 pd massrender;
#N canvas 284 227 595 566 linkrender 0;
#X obj 261 87 inlet;
#X obj 261 179 / 12.5;
#X obj 261 202 - 4;
#X obj 315 180 / 12.5;
#X obj 315 203 - 4;
#X obj 189 288 separator;
#X obj 261 226 t b f;
#X obj 189 331 curve 2;
#X obj 375 183 / 12.5;
#X obj 375 206 - 4;
#X obj 429 184 / 12.5;
#X obj 429 207 - 4;
#X obj 291 256 pack f f;
#X msg 291 279 \$1 \$2 0;
#X obj 375 255 pack f f;
#X msg 375 278 \$1 \$2 0;
#X obj 261 131 unpack f f f f f;
#X obj 189 310 colorRGB 1 1 1;
#X obj 189 262 gemhead 45;
#X obj 189 180 loadbang;
#X msg 189 229 0;
#X connect 0 0 16 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 4 0 12 1;
#X connect 5 0 17 0;
#X connect 6 0 18 0;
#X connect 6 1 12 0;
#X connect 8 0 9 0;
#X connect 9 0 14 0;
#X connect 10 0 11 0;
#X connect 11 0 14 1;
#X connect 12 0 13 0;
#X connect 13 0 7 1;
#X connect 14 0 15 0;
#X connect 15 0 7 2;
#X connect 16 1 1 0;
#X connect 16 2 3 0;
#X connect 16 3 8 0;
#X connect 16 4 10 0;
#X connect 17 0 7 0;
#X connect 18 0 5 0;
#X connect 19 0 20 0;
#X connect 20 0 18 0;
#X restore 52 644 pd linkrender;
#X obj 52 359 gemhead;
#X obj 448 240 gemwin;
#X text 175 41 Reset;
#X text 281 106 Random positions and masses;
#X text 304 195 1 Create window -->;
#X text 225 464 Add force;
#X msg 446 268 \; pd dsp 1;
#X text 320 274 2 SET DSP ON -->;
#N canvas 311 224 413 534 gemmouse2 0;
#X obj 114 29 gemmouse;
#X obj 96 266 outlet;
#X obj 114 83 - 0;
#X obj 165 97 + 100;
#X obj 114 60 / 5;
#X obj 165 74 / -5;
#X obj 32 81 t b;
#X obj 32 37 inlet;
#X obj 96 177 f;
#X obj 96 206 pack 0 0 0;
#X connect 0 0 4 0;
#X connect 0 1 5 0;
#X connect 0 2 9 2;
#X connect 2 0 8 1;
#X connect 3 0 9 1;
#X connect 4 0 2 0;
#X connect 5 0 3 0;
#X connect 6 0 8 0;
#X connect 7 0 6 0;
#X connect 8 0 9 0;
#X connect 9 0 1 0;
#X restore 374 483 pd gemmouse2;
#X msg 374 506 grabMass \$1 \$2 \$3;
#X obj 52 594 route linksPos massesPos massesSpeedsNo;
#X msg 52 420 bang \, get massesPos \, get linksPos \, get massesSpeeds
1 5 9 13 17 21 25 29;
#X text 130 679 Move red masses for bass and white ones for high tones...
;
#N canvas 557 309 487 357 masses 0;
#X msg 245 215 mass mob 1 \$1 \$2 \$3;
#X obj 417 165 random 100;
#X msg 417 145 seed 1;
#X obj 342 165 random 100;
#X obj 239 146 random 100;
#X msg 342 144 seed 2;
#X msg 239 126 seed 3;
#X obj 239 166 + 100;
#X obj 245 194 pack f f f;
#X obj 42 14 inlet;
#X obj 246 283 outlet;
#X obj 268 47 loadbang;
#X text 284 101 M;
#X text 356 106 X;
#X text 437 106 Y;
#X obj 223 68 t b b;
#X obj 42 45 until;
#X obj 42 78 f;
#X obj 72 78 + 1;
#X obj 72 100 mod 30;
#X obj 90 45 sel 0;
#X connect 0 0 10 0;
#X connect 1 0 8 2;
#X connect 2 0 1 0;
#X connect 3 0 8 1;
#X connect 4 0 7 0;
#X connect 5 0 3 0;
#X connect 6 0 4 0;
#X connect 7 0 8 0;
#X connect 8 0 0 0;
#X connect 9 0 16 0;
#X connect 11 0 6 0;
#X connect 11 0 5 0;
#X connect 11 0 2 0;
#X connect 15 0 4 0;
#X connect 15 1 3 0;
#X connect 15 1 1 0;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 17 0 15 0;
#X connect 18 0 19 0;
#X connect 19 0 17 1;
#X connect 19 0 20 0;
#X connect 20 0 16 1;
#X restore 175 113 pd masses;
#N canvas 0 22 450 300 links 0;
#X obj 136 72 t b;
#X obj 136 116 + 1;
#X obj 130 191 f;
#X obj 92 171 t f b;
#X obj 91 211 pack f f;
#X msg 91 233 link souple \$1 \$2 10 0.5;
#X obj 136 23 inlet;
#X obj 91 260 outlet;
#X obj 136 48 until;
#X obj 202 112 sel 0;
#X obj 184 154 mod 29;
#X obj 136 93 f 0;
#X connect 0 0 11 0;
#X connect 1 0 10 0;
#X connect 1 0 2 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 6 0 8 0;
#X connect 8 0 0 0;
#X connect 9 0 8 1;
#X connect 10 0 9 0;
#X connect 10 0 11 1;
#X connect 11 0 1 0;
#X connect 11 0 3 0;
#X restore 137 176 pd links;
#X obj 137 62 t b b b b;
#X text 491 431 Get a few masses speeds;
#X msg 94 458 forceX mob 100;
#X msg 95 484 forceX mob -100;
#X connect 0 0 5 0;
#X connect 1 0 31 0;
#X connect 2 0 0 0;
#X connect 3 0 31 0;
#X connect 5 0 26 0;
#X connect 5 1 4 0;
#X connect 6 0 17 0;
#X connect 7 0 8 0;
#X connect 10 0 24 0;
#X connect 11 0 0 0;
#X connect 12 0 17 0;
#X connect 13 0 27 0;
#X connect 16 0 13 0;
#X connect 24 0 25 0;
#X connect 25 0 5 0;
#X connect 26 0 15 0;
#X connect 26 1 14 0;
#X connect 26 2 9 0;
#X connect 27 0 5 0;
#X connect 29 0 0 0;
#X connect 30 0 0 0;
#X connect 31 0 30 0;
#X connect 31 1 11 0;
#X connect 31 2 29 0;
#X connect 31 3 2 0;
#X connect 33 0 5 0;
#X connect 34 0 5 0;