aboutsummaryrefslogtreecommitdiff
path: root/examples/08_ball2D.pd
blob: 1285bb500e117a9dc4fecbe747bafdcd4316c741 (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
#N canvas 260 95 837 614 12;
#X declare -lib Gem;
#X obj 212 146 t b b;
#X obj 212 98 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 36 384 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 62 90 0 \, destroy;
#X obj 28 118 gemwin;
#X msg 28 65 reset \, create \, 1;
#N canvas 510 193 994 722 structure 0;
#X obj 124 314 pd_lia \$0;
#X obj 213 373 pd_lia \$0;
#X obj 49 445 pd_lia \$0;
#X obj 198 502 pd_lia \$0;
#X obj 189 113 pd_lia \$0;
#X obj 69 161 pd_lia \$0;
#X obj 201 187 pd_lia \$0;
#X obj 279 598 pd_lia \$0;
#X obj 410 562 pd_lia \$0;
#X obj 580 585 pd_lia \$0;
#X obj 310 327 pd_lia \$0;
#X obj 388 330 pd_lia \$0;
#X obj 468 330 pd_lia \$0;
#X obj 338 427 pd_lia \$0;
#X obj 509 422 pd_lia \$0;
#X obj 304 26 pd_lia \$0;
#X obj 441 57 pd_lia \$0;
#X obj 347 129 pd_lia \$0;
#X obj 308 231 pd_lia \$0;
#X obj 304 280 pd_lia \$0;
#X obj 393 227 pd_lia \$0;
#X obj 475 227 pd_lia \$0;
#X obj 562 277 pd_lia \$0;
#X obj 604 358 pd_lia \$0;
#X obj 678 291 pd_lia \$0;
#X obj 604 221 pd_lia \$0;
#X obj 499 135 pd_lia \$0;
#X obj 571 43 pd_lia \$0;
#X obj 612 101 pd_lia \$0;
#X obj 749 179 pd_lia \$0;
#X obj 763 429 pd_lia \$0;
#X obj 671 510 pd_lia \$0;
#X obj 28 21 inlet;
#N canvas 0 0 450 300 lia 0;
#X obj 266 35 inlet;
#X obj 274 100 outlet;
#X obj 12 32 inlet;
#X obj 6 93 outlet;
#X obj 47 61 lia2D lia 0 10 10 0.001;
#X connect 0 0 4 1;
#X connect 2 0 4 0;
#X connect 4 0 3 0;
#X connect 4 1 1 0;
#X restore 28 52 pd lia;
#X obj 27 290 pd_masse -1 0 \$0;
#X obj 37 101 loadbang;
#X obj 554 253 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 407 274 pd_masse 0 0 \$0;
#X obj 124 43 pd_masse -0.7 0.7 \$0;
#X obj 123 558 pd_masse -0.7 -0.7 \$0;
#X obj 399 624 pd_masse 0 -1 \$0;
#X obj 436 16 pd_masse 0 1 \$0;
#X obj 680 64 pd_masse 0.7 0.7 \$0;
#X obj 766 285 pd_masse 1 0 \$0;
#X obj 748 552 pd_masse 0.7 -0.7 \$0;
#X connect 0 0 38 0;
#X connect 0 1 39 0;
#X connect 1 0 38 0;
#X connect 1 1 40 0;
#X connect 2 0 34 0;
#X connect 2 1 39 0;
#X connect 3 0 34 0;
#X connect 3 1 40 0;
#X connect 4 0 34 0;
#X connect 4 1 41 0;
#X connect 5 0 34 0;
#X connect 5 1 38 0;
#X connect 6 0 41 0;
#X connect 6 1 39 0;
#X connect 7 0 39 0;
#X connect 7 1 40 0;
#X connect 8 0 39 0;
#X connect 8 1 44 0;
#X connect 9 0 40 0;
#X connect 9 1 44 0;
#X connect 10 0 39 0;
#X connect 10 1 37 0;
#X connect 11 0 37 0;
#X connect 11 1 40 0;
#X connect 12 0 37 0;
#X connect 12 1 44 0;
#X connect 13 0 34 0;
#X connect 13 1 44 0;
#X connect 14 0 39 0;
#X connect 14 1 43 0;
#X connect 15 0 38 0;
#X connect 15 1 41 0;
#X connect 16 0 38 0;
#X connect 16 1 42 0;
#X connect 17 0 34 0;
#X connect 17 1 42 0;
#X connect 18 0 38 0;
#X connect 18 1 37 0;
#X connect 19 0 34 0;
#X connect 19 1 37 0;
#X connect 20 0 37 0;
#X connect 20 1 41 0;
#X connect 21 0 37 0;
#X connect 21 1 42 0;
#X connect 22 0 37 0;
#X connect 22 1 43 0;
#X connect 23 0 40 0;
#X connect 23 1 42 0;
#X connect 24 0 44 0;
#X connect 24 1 42 0;
#X connect 25 0 41 0;
#X connect 25 1 44 0;
#X connect 26 0 38 0;
#X connect 26 1 43 0;
#X connect 27 0 41 0;
#X connect 27 1 42 0;
#X connect 28 0 41 0;
#X connect 28 1 43 0;
#X connect 29 0 42 0;
#X connect 29 1 43 0;
#X connect 30 0 43 0;
#X connect 30 1 44 0;
#X connect 31 0 40 0;
#X connect 31 1 43 0;
#X connect 32 0 33 0;
#X connect 33 1 37 0;
#X connect 34 0 2 0;
#X connect 34 0 3 0;
#X connect 34 0 4 0;
#X connect 34 0 5 0;
#X connect 34 0 13 0;
#X connect 34 0 17 0;
#X connect 34 0 19 0;
#X connect 35 0 37 1;
#X connect 36 0 37 1;
#X connect 37 0 10 1;
#X connect 37 0 11 0;
#X connect 37 0 12 0;
#X connect 37 0 18 1;
#X connect 37 0 19 1;
#X connect 37 0 20 0;
#X connect 37 0 21 0;
#X connect 37 0 22 0;
#X connect 37 0 33 1;
#X connect 38 0 0 0;
#X connect 38 0 1 0;
#X connect 38 0 5 1;
#X connect 38 0 15 0;
#X connect 38 0 16 0;
#X connect 38 0 18 0;
#X connect 38 0 26 0;
#X connect 39 0 0 1;
#X connect 39 0 2 1;
#X connect 39 0 6 1;
#X connect 39 0 7 0;
#X connect 39 0 8 0;
#X connect 39 0 10 0;
#X connect 39 0 14 0;
#X connect 40 0 1 1;
#X connect 40 0 3 1;
#X connect 40 0 7 1;
#X connect 40 0 9 0;
#X connect 40 0 11 1;
#X connect 40 0 23 0;
#X connect 40 0 31 0;
#X connect 41 0 4 1;
#X connect 41 0 6 0;
#X connect 41 0 15 1;
#X connect 41 0 20 1;
#X connect 41 0 25 0;
#X connect 41 0 27 0;
#X connect 41 0 28 0;
#X connect 42 0 16 1;
#X connect 42 0 17 1;
#X connect 42 0 21 1;
#X connect 42 0 23 1;
#X connect 42 0 24 1;
#X connect 42 0 27 1;
#X connect 42 0 29 0;
#X connect 43 0 14 1;
#X connect 43 0 22 1;
#X connect 43 0 26 1;
#X connect 43 0 28 1;
#X connect 43 0 29 1;
#X connect 43 0 30 0;
#X connect 43 0 31 1;
#X connect 44 0 8 1;
#X connect 44 0 9 1;
#X connect 44 0 12 1;
#X connect 44 0 13 1;
#X connect 44 0 24 0;
#X connect 44 0 25 1;
#X connect 44 0 30 1;
#X restore 39 346 pd structure;
#X msg 284 401 force2D 0 5;
#X msg 340 427 force2D 5 0;
#X obj 212 119 metro 50;
#X obj 55 383 loadbang;
#X msg 286 455 force2D 0 -5;
#X msg 229 428 force2D -5 0;
#X obj 247 171 s \$0-lia;
#X msg 87 439 reset;
#X msg 61 491 resetL;
#X msg 36 517 resetF;
#X obj 36 411 t b b b;
#X text 223 250 ambient Force \, simulating gravity;
#X text 179 63 <- create Gem windows;
#X obj 36 548 s \$0-lia;
#X obj 87 464 s \$0-masse;
#X text 251 96 <- on / off;
#X text 451 425 <- send forces to the structure;
#X text 222 549 If the line does not display corectly \, you sould
upgrade GEM;
#X obj 37 260 square 3.9;
#X obj 37 203 gemhead 11;
#X obj 37 231 color 0 0.5 0;
#X msg 209 293 \; pd dsp 1 \;;
#X msg 291 292 \; pd dsp 0 \;;
#X text 236 11 Forces aply to a mass create sound.;
#X text 234 31 each masse got a diferent frequency;
#X msg 517 312 setK \$1;
#X msg 591 286 setD \$1;
#X msg 733 258 setM \$1;
#X floatatom 517 237 5 -10 200 0 - - -;
#X floatatom 591 235 5 0 0 0 - - -;
#X floatatom 733 235 5 0 0 0 - - -;
#X obj 517 286 / 10;
#X obj 517 260 + 1;
#X obj 591 259 / 10;
#X msg 517 210 100;
#X msg 591 211 25;
#X msg 733 209 50;
#X floatatom 658 235 5 0 0 0 - - -;
#X obj 658 259 / 10;
#X msg 658 286 setD2 \$1;
#X msg 658 211 1;
#X obj 517 344 s \$0-lia;
#X obj 733 286 s \$0-masse;
#X text 517 157 you can change physical properties;
#X text 515 182 this will change the sound;
#X floatatom 373 143 5 0 0 0 - - -;
#X msg 373 167 setFY \$1;
#N canvas 316 568 450 300 gemmouse 0;
#X obj 31 26 gemmouse;
#X obj 31 57 / 62.5;
#X obj 31 80 - 4;
#X obj 31 133 pack f f;
#X msg 31 158 position2D \$1 \$2;
#X obj 155 109 spigot;
#X obj 152 82 r \$0-lia;
#X obj 154 135 s lia;
#X obj 66 83 / -62.5;
#X obj 66 106 + 4;
#X obj 32 193 outlet;
#X connect 0 0 1 0;
#X connect 0 1 8 0;
#X connect 0 2 5 1;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 10 0;
#X connect 5 0 7 0;
#X connect 6 0 5 0;
#X connect 8 0 9 0;
#X connect 9 0 3 1;
#X restore 39 319 pd gemmouse;
#X obj 212 199 s \$0-mass;
#X obj 274 226 iAmbient2D \$0-mass 0 -0.2;
#X obj 553 7 declare -lib Gem;
#X obj 285 487 s \$0-mass;
#X connect 0 0 55 0;
#X connect 0 1 13 0;
#X connect 0 1 56 0;
#X connect 1 0 9 0;
#X connect 2 0 17 0;
#X connect 3 0 4 0;
#X connect 5 0 4 0;
#X connect 7 0 58 0;
#X connect 8 0 58 0;
#X connect 9 0 0 0;
#X connect 10 0 17 0;
#X connect 11 0 58 0;
#X connect 12 0 58 0;
#X connect 14 0 21 0;
#X connect 15 0 20 0;
#X connect 16 0 20 0;
#X connect 17 0 16 0;
#X connect 17 1 15 0;
#X connect 17 2 14 0;
#X connect 26 0 27 0;
#X connect 27 0 25 0;
#X connect 32 0 48 0;
#X connect 33 0 48 0;
#X connect 34 0 49 0;
#X connect 35 0 39 0;
#X connect 36 0 40 0;
#X connect 37 0 34 0;
#X connect 38 0 32 0;
#X connect 39 0 38 0;
#X connect 40 0 33 0;
#X connect 41 0 35 0;
#X connect 42 0 36 0;
#X connect 43 0 37 0;
#X connect 44 0 45 0;
#X connect 45 0 46 0;
#X connect 46 0 48 0;
#X connect 47 0 44 0;
#X connect 52 0 53 0;
#X connect 53 0 56 0;
#X connect 54 0 6 0;