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
|
#N canvas 1 53 792 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;
#X obj 42 278 msd2D;
#N canvas 801 117 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 0 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 tLink damp fixe cloud 0 \$1 0 1 \, tLink damp fixe cloud
0 \$1 1 0;
#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 42 324 route cloud;
#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 connect 0 0 20 0;
#X connect 0 0 21 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 4 0 14 0;
#X connect 5 0 15 0;
#X connect 6 0 10 0;
#X connect 7 0 6 0;
#X connect 8 0 18 0;
#X connect 8 1 19 0;
#X connect 9 0 6 0;
#X connect 10 0 11 0;
#X connect 11 0 1 0;
#X connect 12 0 13 0;
#X connect 12 1 9 0;
#X connect 13 0 6 0;
#X connect 14 0 6 0;
#X connect 15 0 6 0;
#X connect 16 0 6 0;
#X connect 17 0 7 0;
#X connect 18 0 6 0;
#X connect 19 0 6 0;
#X connect 20 0 7 0;
#X connect 20 1 8 0;
#X connect 20 2 18 0;
#X connect 20 3 19 0;
#X connect 20 4 16 0;
#X connect 20 5 12 0;
|