aboutsummaryrefslogtreecommitdiff
path: root/exemples/31_paste.pd
blob: 12f30e8861757f97942b76b6342ff15fde285634 (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
#N canvas 36 58 602 351 10;
#X obj 10 157 t b b;
#X obj 10 69 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 141 115 0 \, destroy;
#X obj 106 143 gemwin;
#X obj 9 306 s masse;
#X text 364 271 <- top border;
#X text 365 240 <- bottom border;
#N canvas 527 17 851 257 pool 0;
#X obj 400 180 aglom4 0 15;
#X obj 240 180 aglom4 -2 15;
#X obj 320 160 aglom4 -1 14;
#X obj 0 0 aglom4 -5 6;
#X obj 80 0 aglom4 -4 6;
#X obj 160 0 aglom4 -3 6;
#X obj 240 0 aglom4 -2 6;
#X obj 320 0 aglom4 -1 6;
#X obj 400 0 aglom4 0 6;
#X obj 480 0 aglom4 1 6;
#X obj 560 0 aglom4 2 6;
#X obj 640 0 aglom4 3 6;
#X obj 720 0 aglom4 4 6;
#X obj 800 0 aglom4 5 6;
#X obj 0 20 aglom4 -5 7;
#X obj 80 20 aglom4 -4 7;
#X obj 160 20 aglom4 -3 7;
#X obj 240 20 aglom4 -2 7;
#X obj 320 20 aglom4 -1 7;
#X obj 400 20 aglom4 0 7;
#X obj 480 20 aglom4 1 7;
#X obj 560 20 aglom4 2 7;
#X obj 640 20 aglom4 3 7;
#X obj 720 20 aglom4 4 7;
#X obj 800 20 aglom4 5 7;
#X obj 0 40 aglom4 -5 8;
#X obj 80 40 aglom4 -4 8;
#X obj 160 40 aglom4 -3 8;
#X obj 240 40 aglom4 -2 8;
#X obj 320 40 aglom4 -1 8;
#X obj 400 40 aglom4 0 8;
#X obj 480 40 aglom4 1 8;
#X obj 560 40 aglom4 2 8;
#X obj 640 40 aglom4 3 8;
#X obj 720 40 aglom4 4 8;
#X obj 800 40 aglom4 5 8;
#X obj 0 60 aglom4 -5 9;
#X obj 80 60 aglom4 -4 9;
#X obj 160 60 aglom4 -3 9;
#X obj 240 60 aglom4 -2 9;
#X obj 320 60 aglom4 -1 9;
#X obj 400 60 aglom4 0 9;
#X obj 480 60 aglom4 1 9;
#X obj 560 60 aglom4 2 9;
#X obj 640 60 aglom4 3 9;
#X obj 720 60 aglom4 4 9;
#X obj 800 60 aglom4 5 9;
#X obj 0 80 aglom4 -5 10;
#X obj 80 80 aglom4 -4 10;
#X obj 160 80 aglom4 -3 10;
#X obj 240 80 aglom4 -2 10;
#X obj 320 80 aglom4 -1 10;
#X obj 400 80 aglom4 0 10;
#X obj 480 80 aglom4 1 10;
#X obj 560 80 aglom4 2 10;
#X obj 640 80 aglom4 3 10;
#X obj 720 80 aglom4 4 10;
#X obj 800 80 aglom4 5 10;
#X obj 0 100 aglom4 -5 11;
#X obj 80 100 aglom4 -4 11;
#X obj 160 100 aglom4 -3 11;
#X obj 240 100 aglom4 -2 11;
#X obj 320 100 aglom4 -1 11;
#X obj 400 100 aglom4 0 11;
#X obj 480 100 aglom4 1 11;
#X obj 560 100 aglom4 2 11;
#X obj 640 100 aglom4 3 11;
#X obj 720 100 aglom4 4 11;
#X obj 800 100 aglom4 5 11;
#X obj 0 120 aglom4 -5 12;
#X obj 80 120 aglom4 -4 12;
#X obj 160 120 aglom4 -3 12;
#X obj 240 120 aglom4 -2 12;
#X obj 320 120 aglom4 -1 12;
#X obj 400 120 aglom4 0 12;
#X obj 480 120 aglom4 1 12;
#X obj 560 120 aglom4 2 12;
#X obj 640 120 aglom4 3 12;
#X obj 720 120 aglom4 4 12;
#X obj 800 120 aglom4 5 12;
#X obj 0 140 aglom4 -5 13;
#X obj 80 140 aglom4 -4 13;
#X obj 160 140 aglom4 -3 13;
#X obj 240 140 aglom4 -2 13;
#X obj 320 140 aglom4 -1 13;
#X obj 400 140 aglom4 0 13;
#X obj 480 140 aglom4 1 13;
#X obj 560 140 aglom4 2 13;
#X obj 640 140 aglom4 3 13;
#X obj 720 140 aglom4 4 13;
#X obj 800 140 aglom4 5 13;
#X obj 0 160 aglom4 -5 14;
#X obj 80 160 aglom4 -4 14;
#X obj 160 160 aglom4 -3 14;
#X obj 240 160 aglom4 -2 14;
#X obj 400 160 aglom4 0 14;
#X obj 480 160 aglom4 1 14;
#X obj 560 160 aglom4 2 14;
#X obj 640 160 aglom4 3 14;
#X obj 720 160 aglom4 4 14;
#X obj 800 160 aglom4 5 14;
#X obj 0 180 aglom4 -5 15;
#X obj 80 180 aglom4 -4 15;
#X obj 160 180 aglom4 -3 15;
#X obj 320 180 aglom4 -1 15;
#X obj 480 180 aglom4 1 15;
#X obj 560 180 aglom4 2 15;
#X obj 640 180 aglom4 3 15;
#X obj 720 180 aglom4 4 15;
#X obj 800 180 aglom4 5 15;
#X restore 393 99 pd pool;
#N canvas 860 482 327 421 creation 0;
#X obj 46 380 s pd-new;
#X msg 86 95 \; pd filename new ./ \; #N canvas \; #X pop 1 \;;
#X msg 46 350 menuclose;
#X obj 43 47 sel 0 1;
#X obj 43 29 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 61 72 t b b;
#X obj 79 299 pack f f f f;
#X obj 70 228 t f f;
#X obj 107 272 * 20;
#X obj 81 272 * 80;
#X msg 79 325 obj \$1 \$2 aglom4 \$3 \$4;
#X obj 60 183 t b f;
#X obj 171 259 + 6;
#X obj 143 263 - 5;
#X obj 61 163 ch_uzi 10;
#X obj 60 203 ch_uzi 11;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 3 1 5 0;
#X connect 4 0 3 0;
#X connect 5 0 14 0;
#X connect 5 1 1 0;
#X connect 6 0 10 0;
#X connect 7 0 9 0;
#X connect 7 1 13 0;
#X connect 8 0 6 1;
#X connect 9 0 6 0;
#X connect 10 0 0 0;
#X connect 11 0 15 0;
#X connect 11 1 8 0;
#X connect 11 1 12 0;
#X connect 12 0 6 3;
#X connect 13 0 6 2;
#X connect 14 1 11 0;
#X connect 15 1 7 0;
#X restore 393 125 pd creation pool;
#X obj 56 180 s link;
#X text 227 12 All masses interact each other;
#X text 42 66 <- begin (change the metro speed for slow computer);
#X floatatom 47 89 5 0 0 0 - - -;
#X msg 238 118 reset;
#X obj 238 140 s masse;
#N canvas 828 304 460 310 line 0;
#X obj 62 28 gemhead;
#X obj 60 82 curve 2;
#X msg 136 58 5 8 0;
#X obj 57 135 gemhead;
#X obj 55 189 curve 2;
#X msg 132 165 -5 8 0;
#X obj 162 21 loadbang;
#X msg 79 55 0.5 3 0;
#X msg 74 161 -0.5 3 0;
#X connect 0 0 1 0;
#X connect 2 0 1 2;
#X connect 3 0 4 0;
#X connect 5 0 4 2;
#X connect 6 0 7 0;
#X connect 6 0 2 0;
#X connect 6 0 8 0;
#X connect 6 0 5 0;
#X connect 7 0 1 1;
#X connect 8 0 4 1;
#X restore 393 151 pd line gem;
#X obj 91 239 iLine2D masse -3.5 -7.5 3.5 -7.5 1000 0 0 1;
#X obj 73 213 iAmbient2D masse 0 -0.0015 0 0 0.04;
#X obj 10 120 metro 10;
#X text 366 209 <- give gravity and ambient viscosity;
#X msg 106 90 reset \, view 0 0 -8 0 0 0 0 1 0 \, create \, 1;
#X obj 109 263 iSeg2D masse 0.5 3 5 8 2 0.1;
#X obj 126 284 iSeg2D masse -5 8 -0.5 3 2 0.1;
#X text 163 25 they got a viscosity link. the global comportement is
a bit like paste;
#X connect 0 0 4 0;
#X connect 0 1 9 0;
#X connect 0 1 17 0;
#X connect 0 1 21 0;
#X connect 0 1 22 0;
#X connect 1 0 18 0;
#X connect 2 0 3 0;
#X connect 12 0 18 1;
#X connect 13 0 14 0;
#X connect 18 0 0 0;
#X connect 20 0 3 0;