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
|
#N canvas 396 84 839 834 10;
#X obj 52 15 loadbang;
#X obj 314 524 print msd;
#X obj 633 647 gemwin;
#X msg 633 625 0 \, destroy;
#X obj 553 709 gemhead;
#X obj 553 732 world_light;
#X msg 633 562 reset \, create \, lighting 1 \, 1;
#X obj 53 499 msd2D --------------------------------;
#X text 309 594 WITH GEM;
#X text 465 563 1 CREATE WINDOW -->;
#X text 464 626 3 AND DESTROY IT! -->;
#X text 464 594 2 DRAG THE STRUCTURE WITH THE MOUSE;
#X obj 118 11 cnv 15 520 275 empty empty empty 20 12 0 14 -262131 -66577
0;
#X obj 43 291 cnv 15 595 80 empty empty empty 20 12 0 14 -261689 -66577
0;
#X obj 44 374 cnv 15 595 120 empty empty empty 20 12 0 14 -262131 -66577
0;
#X obj 47 556 cnv 15 400 200 empty empty empty 20 12 0 14 -261689 -66577
0;
#X obj 135 261 t a;
#X obj 135 20 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
-1;
#X msg 207 71 reset;
#X text 173 21 reset;
#X obj 135 42 t b b b b b;
#X msg 135 226 link souple \$1 \$2 \$3 \$4 \$5;
#X msg 153 181 Xmax 100 \, Xmin 0 \, Ymax 100 \, Ymin 0;
#X text 413 87 CREATION : 3 MASSES \, 2 LINKS;
#X msg 135 205 0 1 10 2.5 0.5 \, 1 2 5 0.5 0.9;
#X obj 53 300 gemhead;
#X obj 53 323 t b;
#X msg 53 345 bang \, get massesPos \, get linksPos;
#X text 292 313 COMPUTE AND GET ALL MASSES AND LINKS POSITIONS;
#X msg 85 383 setD souple 0.01;
#X msg 216 384 setK souple 1;
#X msg 85 403 setD souple 1;
#X msg 216 404 setK souple 2;
#X text 367 442 ADD FORCE ON ALL MOBILE MASSES;
#X text 351 396 SET RIGIDITY AND VISCOSITY OF LINKS;
#X msg 82 442 forceX mob 100;
#X msg 208 443 forceY mob 100;
#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 127 57 unpack f f;
#X obj 125 136 t b f;
#X connect 0 0 10 0;
#X connect 1 0 2 0;
#X connect 3 0 4 0;
#X connect 4 0 11 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 3 0;
#X connect 10 1 5 0;
#X connect 11 0 9 0;
#X connect 11 1 1 1;
#X restore 134 591 pd massrender;
#X obj 53 562 route linksPos massesPos;
#X text 261 572 DISPLAY MASSES AND LINKS;
#N canvas 731 296 450 300 gemmouse 0;
#X obj 189 77 gemmouse;
#X obj 189 184 pack f f;
#X obj 189 218 spigot;
#X obj 103 244 outlet;
#X obj 189 131 - 0;
#X obj 216 131 + 100;
#X obj 189 108 / 5;
#X obj 216 108 / -5;
#X obj 79 51 inlet;
#X obj 140 75 inlet;
#X obj 141 120 l;
#X obj 109 98 t b;
#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 10 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 11 0;
#X connect 9 0 10 1;
#X connect 10 0 3 0;
#X connect 11 0 10 0;
#X restore 53 674 pd gemmouse;
#X obj 53 653 gemhead;
#X msg 53 695 posX fix \$1;
#X msg 53 716 posY fix \$2;
#X text 204 677 SET FIXED MASS TO MOUSE POSITION;
#X msg 171 134 mass mob 1 \$1 \$2 \$3;
#X msg 171 113 100 50 90 \, 100 40 10;
#N canvas 0 0 450 300 linkrender 0;
#X obj 127 22 inlet;
#X obj 127 86 / 12.5;
#X obj 127 109 - 4;
#X obj 187 87 / 12.5;
#X obj 187 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 f;
#X obj 241 86 / 12.5;
#X obj 241 109 - 4;
#X obj 308 87 / 12.5;
#X obj 308 110 - 4;
#X obj 48 222 curve 2;
#X obj 155 189 pack f f 0;
#X obj 241 190 pack f f 0;
#X connect 0 0 9 0;
#X connect 1 0 2 0;
#X connect 2 0 8 0;
#X connect 3 0 4 0;
#X connect 4 0 15 1;
#X connect 5 0 7 1;
#X connect 6 0 14 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 8 1 15 0;
#X connect 9 0 1 0;
#X connect 9 1 3 0;
#X connect 9 2 10 0;
#X connect 9 3 12 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 15 0 14 1;
#X connect 16 0 14 2;
#X restore 53 613 pd linkrender;
#X msg 153 160 50 50;
#X msg 189 91 mass fix 0 100 50 50;
#X connect 0 0 20 0;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 6 0 2 0;
#X connect 7 0 38 0;
#X connect 7 1 1 0;
#X connect 16 0 7 0;
#X connect 17 0 20 0;
#X connect 18 0 16 0;
#X connect 20 0 24 0;
#X connect 20 1 48 0;
#X connect 20 1 22 0;
#X connect 20 2 46 0;
#X connect 20 3 49 0;
#X connect 20 4 18 0;
#X connect 21 0 16 0;
#X connect 22 0 16 0;
#X connect 24 0 21 0;
#X connect 25 0 26 0;
#X connect 26 0 27 0;
#X connect 27 0 7 0;
#X connect 29 0 7 0;
#X connect 30 0 7 0;
#X connect 31 0 7 0;
#X connect 32 0 7 0;
#X connect 35 0 7 0;
#X connect 36 0 7 0;
#X connect 38 0 47 0;
#X connect 38 1 37 0;
#X connect 38 2 1 0;
#X connect 40 0 42 0;
#X connect 40 0 43 0;
#X connect 41 0 40 0;
#X connect 42 0 7 0;
#X connect 43 0 7 0;
#X connect 45 0 16 0;
#X connect 46 0 45 0;
#X connect 48 0 40 1;
#X connect 49 0 16 0;
|