aboutsummaryrefslogtreecommitdiff
path: root/msd2D/02_msd2Dadd.pd
blob: cf564d9de550138ea0b150ff2e3359e5e1909178 (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
#N canvas 534 65 716 776 10;
#X obj 129 376 t a;
#X obj 137 39 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 209 84 reset;
#X obj 52 15 loadbang;
#X obj 137 62 t b b b b b;
#X obj 313 605 print msd;
#X obj 52 583 msd2D --------------------------------;
#X msg 511 526 0 \, destroy;
#X obj 481 320 gemhead;
#X obj 481 343 world_light;
#X msg 191 106 mass fix 0 100 50 50;
#N canvas 177 95 946 729 synthese 0;
#X obj 268 68 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 obj -64 164 / 200;
#X obj 62 170 / 200;
#X obj 153 172 / 200;
#X obj 250 170 / 500;
#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 317 167 / 500;
#X obj 444 173 / 500;
#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 obj 631 173 / 1000;
#X obj 534 175 / 1000;
#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 obj -74 368 / 200;
#X obj 52 374 / 200;
#X obj 143 376 / 200;
#X obj 240 374 / 500;
#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 -87 398 osc~ 55;
#X obj 9 398 osc~ 110;
#X obj 102 400 osc~ 166;
#X obj 194 398 osc~ 222;
#X obj 295 401 osc~ 444;
#X obj 390 401 osc~ 890;
#X obj 483 403 osc~ 1113;
#X obj 575 401 osc~ 2229;
#X obj 307 371 / 500;
#X obj 434 377 / 500;
#X obj -23 332 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 621 377 / 1000;
#X obj 524 379 / 1000;
#X obj 112 196 osc~ 165;
#X obj 305 197 osc~ 267;
#X obj 400 197 osc~ 311;
#X obj 493 199 osc~ 444;
#X obj 585 197 osc~ 509;
#X obj 268 99 route 1 5 9 13 17 21 25 29;
#X connect 0 0 93 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 1 0;
#X connect 15 0 4 0;
#X connect 16 0 7 0;
#X connect 17 0 10 0;
#X connect 18 0 19 0;
#X connect 19 0 20 1;
#X connect 20 0 30 0;
#X connect 21 0 22 0;
#X connect 22 0 23 1;
#X connect 23 0 30 0;
#X connect 23 0 30 1;
#X connect 24 0 25 0;
#X connect 25 0 26 1;
#X connect 26 0 30 0;
#X connect 26 0 30 1;
#X connect 27 0 28 0;
#X connect 28 0 29 1;
#X connect 29 0 30 1;
#X connect 31 0 3 0;
#X connect 32 0 6 0;
#X connect 33 0 12 0;
#X connect 34 0 18 0;
#X connect 35 0 21 0;
#X connect 36 0 14 0;
#X connect 36 1 15 0;
#X connect 37 0 16 0;
#X connect 37 1 17 0;
#X connect 38 0 34 0;
#X connect 38 1 35 0;
#X connect 39 0 41 0;
#X connect 39 1 40 0;
#X connect 40 0 27 0;
#X connect 41 0 24 0;
#X connect 42 0 43 0;
#X connect 43 0 44 1;
#X connect 44 0 54 0;
#X connect 45 0 46 0;
#X connect 46 0 47 1;
#X connect 47 0 54 0;
#X connect 47 0 54 1;
#X connect 48 0 49 0;
#X connect 49 0 50 1;
#X connect 50 0 54 0;
#X connect 50 0 54 1;
#X connect 51 0 52 0;
#X connect 52 0 53 1;
#X connect 53 0 54 1;
#X connect 55 0 42 0;
#X connect 56 0 45 0;
#X connect 57 0 48 0;
#X connect 58 0 51 0;
#X connect 59 0 60 0;
#X connect 60 0 61 1;
#X connect 61 0 71 0;
#X connect 62 0 63 0;
#X connect 63 0 64 1;
#X connect 64 0 71 0;
#X connect 64 0 71 1;
#X connect 65 0 66 0;
#X connect 66 0 67 1;
#X connect 67 0 71 0;
#X connect 67 0 71 1;
#X connect 68 0 69 0;
#X connect 69 0 70 1;
#X connect 70 0 71 1;
#X connect 72 0 44 0;
#X connect 73 0 47 0;
#X connect 74 0 50 0;
#X connect 75 0 53 0;
#X connect 76 0 61 0;
#X connect 77 0 64 0;
#X connect 78 0 67 0;
#X connect 79 0 70 0;
#X connect 80 0 59 0;
#X connect 81 0 62 0;
#X connect 82 0 55 0;
#X connect 82 1 56 0;
#X connect 83 0 57 0;
#X connect 83 1 58 0;
#X connect 84 0 80 0;
#X connect 84 1 81 0;
#X connect 85 0 87 0;
#X connect 85 1 86 0;
#X connect 86 0 68 0;
#X connect 87 0 65 0;
#X connect 88 0 9 0;
#X connect 89 0 20 0;
#X connect 90 0 23 0;
#X connect 91 0 26 0;
#X connect 92 0 29 0;
#X connect 93 0 36 0;
#X connect 93 1 37 0;
#X connect 93 2 38 0;
#X connect 93 3 39 0;
#X connect 93 4 82 0;
#X connect 93 5 83 0;
#X connect 93 6 84 0;
#X connect 93 7 85 0;
#X restore 230 679 pd synthese;
#N canvas 311 224 316 299 gemmouse 0;
#X obj 114 29 gemmouse;
#X obj 114 136 pack f f;
#X obj 114 170 spigot;
#X obj 114 196 outlet;
#X obj 114 83 - 0;
#X obj 165 97 + 100;
#X obj 114 60 / 5;
#X obj 165 74 / -5;
#X obj 68 97 l;
#X obj 68 74 t b;
#X obj 36 37 inlet;
#X connect 0 0 6 0;
#X connect 0 1 7 0;
#X connect 0 2 2 1;
#X connect 1 0 2 0;
#X connect 2 0 8 1;
#X connect 4 0 1 0;
#X connect 5 0 1 1;
#X connect 6 0 4 0;
#X connect 7 0 5 0;
#X connect 8 0 3 0;
#X connect 9 0 8 0;
#X connect 10 0 9 0;
#X restore 253 493 pd gemmouse;
#X obj 253 472 gemhead;
#X msg 253 515 posX fix \$1;
#X msg 253 537 posY fix \$2;
#X msg 155 225 50 50;
#X msg 155 258 Xmax 100 \, Xmin 0 \, Ymax 100 \, Ymin 0;
#X msg 511 503 reset \, create \, lighting 1 \, 1;
#X obj 52 399 t b;
#N canvas 643 123 605 590 massrender 0;
#X obj 127 22 inlet;
#X obj 48 203 translateXYZ;
#X obj 48 229 sphere 0.1;
#X obj 127 86 / 12.5;
#X obj 127 109 - 4;
#X obj 192 87 / 12.5;
#X obj 192 110 - 4;
#X obj 64 114 gemhead;
#X obj 48 177 separator;
#X obj 48 153 any;
#X obj 125 136 t b f;
#X obj 127 57 unpack f f f;
#X connect 0 0 11 0;
#X connect 1 0 2 0;
#X connect 3 0 4 0;
#X connect 4 0 10 0;
#X connect 5 0 6 0;
#X connect 6 0 1 2;
#X connect 7 0 9 1;
#X connect 8 0 1 0;
#X connect 9 0 8 0;
#X connect 10 0 9 0;
#X connect 10 1 1 1;
#X connect 11 1 3 0;
#X connect 11 2 5 0;
#X restore 141 657 pd massrender;
#N canvas 284 227 587 558 linkrender 0;
#X obj 93 25 inlet;
#X obj 93 117 / 12.5;
#X obj 93 140 - 4;
#X obj 147 118 / 12.5;
#X obj 147 141 - 4;
#X obj 35 134 gemhead;
#X obj 44 222 separator;
#X obj 44 192 any;
#X obj 93 164 t b f;
#X obj 44 265 curve 2;
#X obj 207 121 / 12.5;
#X obj 207 144 - 4;
#X obj 261 122 / 12.5;
#X obj 261 145 - 4;
#X obj 123 194 pack f f;
#X msg 123 217 \$1 \$2 0;
#X obj 207 193 pack f f;
#X msg 207 216 \$1 \$2 0;
#X obj 93 69 unpack f f f f f;
#X connect 0 0 18 0;
#X connect 1 0 2 0;
#X connect 2 0 8 0;
#X connect 3 0 4 0;
#X connect 4 0 14 1;
#X connect 5 0 7 1;
#X connect 6 0 9 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 8 1 14 0;
#X connect 10 0 11 0;
#X connect 11 0 16 0;
#X connect 12 0 13 0;
#X connect 13 0 16 1;
#X connect 14 0 15 0;
#X connect 15 0 9 1;
#X connect 16 0 17 0;
#X connect 17 0 9 2;
#X connect 18 1 1 0;
#X connect 18 2 3 0;
#X connect 18 3 10 0;
#X connect 18 4 12 0;
#X restore 52 678 pd linkrender;
#X msg 221 231 mass mob 1 \$1 \$2 \$3;
#X obj 393 181 random 100;
#X msg 393 161 seed 1;
#X obj 318 181 random 100;
#X obj 241 163 random 100;
#X msg 318 160 seed 2;
#X msg 241 143 seed 3;
#X obj 241 183 + 100;
#X obj 221 210 pack f f f;
#X obj 79 208 t b;
#X obj 79 252 + 1;
#X obj 121 290 f;
#X obj 121 270 + 1;
#X obj 79 273 t f b;
#X msg 112 229 -1;
#X obj 79 229 f -1;
#X obj 70 317 pack f f;
#X obj 173 148 t b b b;
#X msg 129 350 link souple \$1 \$2 100 0.5 0.5;
#X obj 52 379 gemhead;
#X obj 511 547 gemwin;
#X obj 52 628 route linksPos massesPos massesSpeedsNo;
#X msg 52 499 forceX mob -200;
#X msg 52 420 bang \, get massesPos \, get linksPos \, get massesSpeeds
1 5 9 13 17 21 25 29;
#X obj 173 126 repeat 40;
#X obj 79 187 repeat 40;
#X msg 52 479 forceX mob 200;
#X text 175 41 Reset;
#X text 484 171 Random positions and masses;
#X text 370 502 1 Create window -->;
#X text 405 643 3 Drag mouse;
#X text 174 480 Add force;
#X msg 522 585 \; pd dsp 1;
#X text 396 591 2 SET DSP ON -->;
#X connect 0 0 6 0;
#X connect 1 0 4 0;
#X connect 2 0 0 0;
#X connect 3 0 4 0;
#X connect 4 0 47 0;
#X connect 4 1 16 0;
#X connect 4 1 17 0;
#X connect 4 2 46 0;
#X connect 4 3 10 0;
#X connect 4 4 2 0;
#X connect 4 4 36 0;
#X connect 4 4 28 0;
#X connect 4 4 24 0;
#X connect 4 4 27 0;
#X connect 6 0 43 0;
#X connect 6 1 5 0;
#X connect 7 0 42 0;
#X connect 8 0 9 0;
#X connect 10 0 0 0;
#X connect 12 0 14 0;
#X connect 12 0 15 0;
#X connect 13 0 12 0;
#X connect 14 0 6 0;
#X connect 15 0 6 0;
#X connect 16 0 12 0;
#X connect 17 0 0 0;
#X connect 18 0 42 0;
#X connect 19 0 45 0;
#X connect 22 0 0 0;
#X connect 23 0 30 2;
#X connect 24 0 23 0;
#X connect 25 0 30 1;
#X connect 26 0 29 0;
#X connect 27 0 25 0;
#X connect 28 0 26 0;
#X connect 29 0 30 0;
#X connect 30 0 22 0;
#X connect 31 0 37 0;
#X connect 32 0 34 0;
#X connect 32 0 35 0;
#X connect 32 0 37 1;
#X connect 33 0 38 1;
#X connect 34 0 33 1;
#X connect 35 0 38 0;
#X connect 35 1 33 0;
#X connect 36 0 37 1;
#X connect 37 0 32 0;
#X connect 38 0 40 0;
#X connect 39 0 26 0;
#X connect 39 1 25 0;
#X connect 39 2 23 0;
#X connect 40 0 0 0;
#X connect 41 0 19 0;
#X connect 43 0 21 0;
#X connect 43 1 20 0;
#X connect 43 2 11 0;
#X connect 44 0 6 0;
#X connect 45 0 6 0;
#X connect 46 0 39 0;
#X connect 47 0 31 0;
#X connect 48 0 6 0;