aboutsummaryrefslogtreecommitdiff
path: root/msd3D/05_msd3Dvline.pd
blob: 930058913882158cbcf39076f0511faf949c6e10 (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
#N canvas 499 155 796 654 10;
#X obj 32 13 loadbang;
#X obj 457 430 gemwin;
#X msg 457 408 0 \, destroy;
#X obj 288 577 gemhead;
#X obj 288 599 world_light;
#X obj 146 205 t a;
#X obj 146 16 bng 20 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
-1;
#X msg 204 68 reset;
#X obj 33 179 gemhead;
#X msg 204 88 symbol reset;
#X obj 33 497 msd3D --------------------------------;
#X text 156 412 Ambient force;
#X obj 146 42 t b b b b;
#X msg 296 393 forceZ filet \$1;
#X obj 444 207 tgl 20 0 empty empty empty 0 -6 0 8 -262131 -1 -1 1
1;
#X obj 444 258 f;
#X obj 444 234 metro 65;
#X msg 326 468 setD fil 1;
#X msg 457 327 reset \, dimen 800 800 \, create \, lighting 1 \, 1
;
#X obj 421 221 vsl 15 128 -1 1 0 0 empty empty empty 0 -8 0 8 -262131
-1 -1 11000 1;
#X obj 206 315 sin;
#X obj 206 335 *;
#X obj 206 255 counter 0 360;
#X obj 206 204 tgl 20 0 empty empty empty 0 -6 0 8 -262131 -1 -1 1
1;
#X obj 206 275 / 3.6;
#X obj 206 295 * 6.28319;
#X obj 206 232 metro 35;
#N canvas 0 0 504 533 getmmasses 0;
#X obj 154 46 inlet;
#X obj 175 226 outlet;
#X obj 157 85 t b b;
#X obj 264 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 174 165 f 0;
#X obj 175 197 + 1;
#X obj 130 128 repeat 30;
#X msg 229 140 209;
#X connect 0 0 2 0;
#X connect 2 0 6 0;
#X connect 2 1 7 0;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 5 0 4 1;
#X connect 5 0 1 0;
#X connect 6 0 4 0;
#X connect 7 0 4 1;
#X restore 33 359 pd getmmasses;
#N canvas 224 164 901 724 synthese 0;
#X obj 232 66 inlet;
#X obj 232 176 pack f f f f;
#X obj 231 316 partiel;
#N canvas 582 426 450 300 drone 0;
#X obj 178 51 inlet;
#X obj 197 241 outlet~;
#X obj 178 95 abs;
#X obj 302 189 line~;
#X obj 262 193 *~;
#X obj 178 142 t b;
#X obj 260 137 osc~ 2000;
#X msg 178 166 0 5;
#X obj 267 99 t b;
#X msg 302 166 0.02 5;
#X msg 178 72 \$2;
#X floatatom 257 48 10 0 0 0 - - -;
#X msg 257 19 \$3;
#X obj 178 117 moses 0.15;
#X connect 0 0 10 0;
#X connect 0 0 12 0;
#X connect 2 0 13 0;
#X connect 3 0 4 1;
#X connect 4 0 1 0;
#X connect 5 0 7 0;
#X connect 6 0 4 0;
#X connect 7 0 3 0;
#X connect 8 0 9 0;
#X connect 9 0 3 0;
#X connect 10 0 2 0;
#X connect 12 0 11 0;
#X connect 13 0 5 0;
#X connect 13 1 8 0;
#X restore 627 480 pd drone;
#X obj 232 154 t f f;
#X msg 143 113 reset;
#X obj 87 64 loadbang;
#X obj 173 49 r resban;
#X obj 232 110 t b f;
#X obj 521 498 hip~ 20;
#X obj 401 501 hip~ 20;
#X obj 443 563 dac~;
#X obj 232 132 counter 0 29;
#X obj 235 254 route 0 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;
#X obj 232 88 unpack f f f f;
#X obj 288 385 partiel;
#X obj 250 339 partiel;
#X obj 269 362 partiel;
#X obj 307 315 partiel;
#X obj 326 338 partiel;
#X obj 345 361 partiel;
#X obj 364 384 partiel;
#X obj 383 315 partiel;
#X obj 402 338 partiel;
#X obj 421 361 partiel;
#X obj 440 384 partiel;
#X obj 459 315 partiel;
#X obj 478 338 partiel;
#X obj 497 361 partiel;
#X obj 516 384 partiel;
#X obj 535 315 partiel;
#X obj 554 338 partiel;
#X obj 573 361 partiel;
#X obj 592 384 partiel;
#X obj 593 314 partiel;
#X obj 612 337 partiel;
#X obj 631 360 partiel;
#X obj 650 383 partiel;
#X obj 651 314 partiel;
#X obj 670 337 partiel;
#X obj 689 360 partiel;
#X obj 708 383 partiel;
#X obj 710 313 partiel;
#X obj 729 336 partiel;
#X connect 0 0 14 0;
#X connect 1 0 13 0;
#X connect 2 0 9 0;
#X connect 3 0 10 0;
#X connect 3 0 9 0;
#X connect 4 0 1 0;
#X connect 5 0 12 0;
#X connect 6 0 5 0;
#X connect 7 0 5 0;
#X connect 8 0 12 0;
#X connect 8 1 1 1;
#X connect 9 0 11 1;
#X connect 10 0 11 0;
#X connect 12 0 4 0;
#X connect 13 0 2 0;
#X connect 13 1 16 0;
#X connect 13 2 17 0;
#X connect 13 3 15 0;
#X connect 13 4 18 0;
#X connect 13 5 19 0;
#X connect 13 6 20 0;
#X connect 13 7 21 0;
#X connect 13 8 22 0;
#X connect 13 9 23 0;
#X connect 13 10 24 0;
#X connect 13 11 25 0;
#X connect 13 12 26 0;
#X connect 13 13 27 0;
#X connect 13 14 28 0;
#X connect 13 15 29 0;
#X connect 13 16 30 0;
#X connect 13 17 31 0;
#X connect 13 18 32 0;
#X connect 13 19 33 0;
#X connect 13 20 34 0;
#X connect 13 21 35 0;
#X connect 13 22 36 0;
#X connect 13 23 37 0;
#X connect 13 24 38 0;
#X connect 13 25 39 0;
#X connect 13 26 40 0;
#X connect 13 27 41 0;
#X connect 13 28 42 0;
#X connect 13 29 43 0;
#X connect 14 1 8 0;
#X connect 14 2 1 2;
#X connect 14 3 1 3;
#X connect 15 0 10 0;
#X connect 16 0 10 0;
#X connect 17 0 9 0;
#X connect 18 0 9 0;
#X connect 19 0 10 0;
#X connect 20 0 9 0;
#X connect 21 0 10 0;
#X connect 22 0 9 0;
#X connect 23 0 10 0;
#X connect 24 0 9 0;
#X connect 25 0 10 0;
#X connect 26 0 9 0;
#X connect 27 0 10 0;
#X connect 28 0 9 0;
#X connect 29 0 10 0;
#X connect 30 0 9 0;
#X connect 31 0 10 0;
#X connect 32 0 9 0;
#X connect 33 0 10 0;
#X connect 34 0 9 0;
#X connect 35 0 10 0;
#X connect 36 0 9 0;
#X connect 37 0 10 0;
#X connect 38 0 9 0;
#X connect 39 0 10 0;
#X connect 40 0 9 0;
#X connect 41 0 10 0;
#X connect 42 0 9 0;
#X connect 43 0 10 0;
#X restore 33 572 pd synthese;
#X obj 183 219 vsl 15 128 0 30 0 0 empty empty empty 0 -8 0 8 -262131
-1 -1 10100 1;
#N canvas 571 334 938 386 massrender 0;
#X obj 286 2 inlet;
#X obj 35 134 gemhead;
#X obj 44 192 any;
#X obj 306 144 pack f f f f;
#X obj 306 99 % 30;
#X obj 55 227 route 0 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;
#X obj 306 119 sel 0;
#X obj 44 288 curve16 ---------------------------------------------
;
#X obj 306 74 unpack f f f f;
#X connect 0 0 8 0;
#X connect 1 0 2 1;
#X connect 2 0 7 0;
#X connect 3 0 5 0;
#X connect 4 0 6 0;
#X connect 4 0 3 0;
#X connect 5 0 7 1;
#X connect 5 1 7 2;
#X connect 5 2 7 3;
#X connect 5 3 7 4;
#X connect 5 4 7 5;
#X connect 5 5 7 6;
#X connect 5 6 7 7;
#X connect 5 7 7 8;
#X connect 5 8 7 9;
#X connect 5 9 7 10;
#X connect 5 10 7 11;
#X connect 5 11 7 12;
#X connect 5 12 7 13;
#X connect 5 13 7 14;
#X connect 5 14 7 15;
#X connect 5 15 7 16;
#X connect 5 16 7 17;
#X connect 5 17 7 18;
#X connect 5 18 7 19;
#X connect 5 19 7 20;
#X connect 5 20 7 21;
#X connect 5 21 7 22;
#X connect 5 22 7 23;
#X connect 5 23 7 24;
#X connect 5 24 7 25;
#X connect 5 25 7 26;
#X connect 5 26 7 27;
#X connect 5 27 7 28;
#X connect 5 28 7 29;
#X connect 5 29 7 30;
#X connect 6 0 2 0;
#X connect 8 0 4 0;
#X connect 8 1 3 1;
#X connect 8 2 3 2;
#X connect 8 3 3 3;
#X restore 135 573 pd massrender;
#X msg 165 140 setFixed 0 \, setFixed 29 \, setFixed 420 \, setFixed
449;
#X text 459 114 Filet abstraction : x0 y0 stepx stepy ny nx;
#X text 483 206 <-- Add constant force;
#X text 240 204 <-- Add sinus force;
#X text 136 360 Get middles masses;
#X obj 457 348 t b;
#X text 179 18 Reset;
#X obj 184 115 filet -3.2 -3.2 0.22068 0.45714 15 30;
#X msg 327 449 setK fil 20;
#X obj 146 92 s resban;
#X msg 425 449 setK fil 10;
#X msg 425 468 setD fil 2.5;
#X text 528 458 Change physical parameters of links;
#X msg 457 388 view 0 0 5 0 0 0 1 0 0;
#X text 624 390 <-- Zoom in;
#X msg 33 412 forceZ filet 0;
#X msg 33 379 get massesPos \$1;
#X msg 146 173 Xmax 4 \, Xmin -4 \, Ymax 4 \, Ymin -4 \, Zmax 9 \,
Zmin -6;
#X msg 457 369 view 0 0 11 0 0 0 1 0 0;
#X msg 33 443 get massesPos;
#X obj 33 539 route massesPosNo massesPos;
#X obj 33 257 t b b;
#X connect 0 0 12 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 5 0 10 0;
#X connect 6 0 12 0;
#X connect 7 0 5 0;
#X connect 8 0 52 0;
#X connect 9 0 38 1;
#X connect 10 0 51 0;
#X connect 12 0 48 0;
#X connect 12 0 40 0;
#X connect 12 1 31 0;
#X connect 12 2 38 0;
#X connect 12 3 7 0;
#X connect 12 3 9 0;
#X connect 13 0 10 0;
#X connect 14 0 16 0;
#X connect 15 0 13 0;
#X connect 16 0 15 0;
#X connect 17 0 10 0;
#X connect 18 0 1 0;
#X connect 18 0 36 0;
#X connect 19 0 15 1;
#X connect 20 0 21 0;
#X connect 21 0 13 0;
#X connect 22 0 24 0;
#X connect 23 0 26 0;
#X connect 24 0 25 0;
#X connect 25 0 20 0;
#X connect 26 0 22 0;
#X connect 27 0 47 0;
#X connect 29 0 21 1;
#X connect 31 0 5 0;
#X connect 36 0 49 0;
#X connect 38 0 5 0;
#X connect 39 0 10 0;
#X connect 41 0 10 0;
#X connect 42 0 10 0;
#X connect 44 0 1 0;
#X connect 46 0 10 0;
#X connect 47 0 10 0;
#X connect 48 0 5 0;
#X connect 49 0 1 0;
#X connect 50 0 10 0;
#X connect 51 0 28 0;
#X connect 51 1 30 0;
#X connect 52 0 10 0;
#X connect 52 0 27 0;
#X connect 52 0 50 0;
#X connect 52 0 46 0;
#X connect 52 1 27 0;
#X connect 52 1 10 0;