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
|
#N canvas 464 555 743 397 10;
#X obj 45 9 inlet;
#X obj 42 350 outlet;
#X obj 643 48 inlet;
#X msg 643 95 setK lnk \$1;
#X obj 736 49 inlet;
#X obj 554 44 inlet;
#N canvas 1239 245 639 733 create_clouds 0;
#X obj 70 30 loadbang;
#X obj 175 649 t a;
#X obj 173 677 outlet;
#X obj 32 50 t b b b b b b;
#N canvas 0 50 259 330 loop 0;
#X obj 74 149 f;
#X obj 74 213 + 1;
#X obj 74 171 moses \$1;
#X obj 74 104 t b f;
#X obj 104 281 outlet;
#X obj 74 82 inlet;
#X msg 74 126 0;
#X obj 74 191 t f f;
#X obj 96 240 t f;
#X connect 0 0 2 0;
#X connect 1 0 8 0;
#X connect 2 0 7 0;
#X connect 3 0 6 0;
#X connect 3 1 2 1;
#X connect 5 0 3 0;
#X connect 6 0 0 0;
#X connect 7 0 1 0;
#X connect 7 1 4 0;
#X connect 8 0 0 0;
#X restore 85 126 pd loop;
#X obj 85 103 \$1;
#X obj 145 229 random 1000;
#X obj 145 253 / 1000;
#X msg 145 312 mass cloud 1 1 \$1 \$2;
#X obj 274 230 random 1000;
#X obj 274 254 / 1000;
#X obj 145 283 pack f f;
#X msg 126 419 link lnk cloud in \$1 0;
#X msg 175 94 reset \, mass in 0 1 0 0 \, mass fixe 0 0 0 0;
#X msg 89 471 link lnk cloud cloud \$1 0;
#X obj 126 391 \$2;
#X obj 85 446 \$2;
#X obj 48 421 \$3;
#X obj 274 179 * 243354;
#X obj 145 177 * 654543;
#X msg 85 156 bang;
#X msg 145 201 seed \$1;
#X msg 274 202 seed \$1;
#X obj 145 145 \$1;
#X obj 39 12 inlet;
#X msg 48 504 setDEnv cloud \$1;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 3 1 16 0;
#X connect 3 1 17 0;
#X connect 3 2 15 0;
#X connect 3 3 5 0;
#X connect 3 4 13 0;
#X connect 3 5 23 0;
#X connect 4 0 20 0;
#X connect 5 0 4 0;
#X connect 6 0 7 0;
#X connect 7 0 11 0;
#X connect 8 0 1 0;
#X connect 9 0 10 0;
#X connect 10 0 11 1;
#X connect 11 0 8 0;
#X connect 12 0 1 0;
#X connect 13 0 1 0;
#X connect 14 0 1 0;
#X connect 15 0 12 0;
#X connect 16 0 14 0;
#X connect 17 0 25 0;
#X connect 18 0 22 0;
#X connect 19 0 21 0;
#X connect 20 0 6 0;
#X connect 20 0 9 0;
#X connect 21 0 6 0;
#X connect 22 0 9 0;
#X connect 23 0 19 0;
#X connect 23 0 18 0;
#X connect 24 0 3 0;
#X connect 25 0 1 0;
#X restore 46 169 pd create_clouds;
#X obj 91 69 unpack f f;
#X msg 346 141 posY in \$1;
#X obj 42 300 route massesPosId;
#X obj 282 98 unpack f f;
#X msg 282 121 posX in \$1;
#X msg 736 95 setD damp \$1;
#X msg 555 95 setL lnk \$1;
#X msg 251 75 bang \, get massesPos cloud;
#X obj 68 143 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 91 96 forceX cloud \$1;
#X msg 155 119 forceY cloud \$1;
#X obj 46 30 route reset force forceX forceY bang;
#X obj 42 278 pmpd2d;
#X msg 42 324 \$2 \$3;
#X connect 0 0 18 0;
#X connect 2 0 3 0;
#X connect 3 0 19 0;
#X connect 4 0 12 0;
#X connect 5 0 13 0;
#X connect 6 0 19 0;
#X connect 7 0 16 0;
#X connect 7 1 17 0;
#X connect 8 0 19 0;
#X connect 9 0 20 0;
#X connect 10 0 11 0;
#X connect 10 1 8 0;
#X connect 11 0 19 0;
#X connect 12 0 19 0;
#X connect 13 0 19 0;
#X connect 14 0 19 0;
#X connect 15 0 6 0;
#X connect 16 0 19 0;
#X connect 17 0 19 0;
#X connect 18 0 6 0;
#X connect 18 1 7 0;
#X connect 18 2 16 0;
#X connect 18 3 17 0;
#X connect 18 4 14 0;
#X connect 18 5 10 0;
#X connect 19 0 9 0;
#X connect 20 0 1 0;
|
