diff options
Diffstat (limited to 'puremapping/pmcloud_3d.pd')
-rw-r--r-- | puremapping/pmcloud_3d.pd | 146 |
1 files changed, 146 insertions, 0 deletions
diff --git a/puremapping/pmcloud_3d.pd b/puremapping/pmcloud_3d.pd new file mode 100644 index 0000000..1564793 --- /dev/null +++ b/puremapping/pmcloud_3d.pd @@ -0,0 +1,146 @@ +#N canvas 605 196 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 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; +#X obj 85 103 \$1; +#X obj 145 229 random 1000; +#X obj 145 253 / 1000; +#X obj 274 230 random 1000; +#X obj 274 254 / 1000; +#X msg 126 419 link lnk cloud in \$1 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 175 95 reset \, mass in 0 1 0 0 0 \, mass fixe 0 0 0 0 0; +#X obj 145 283 pack f f f; +#X obj 367 230 random 1000; +#X obj 367 254 / 1000; +#X msg 367 202 seed \$1; +#X obj 367 179 * 2.42455e+06; +#X msg 145 312 mass cloud 1 1 \$1 \$2 \$3; +#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 msg 48 504 tLink damp fixe cloud 0 \$1 0 0 1 \, tLink damp fixe +cloud 0 \$1 0 1 0 \, tLink damp fixe cloud 0 \$1 1 0 0; +#X connect 0 0 3 0; +#X connect 1 0 2 0; +#X connect 3 1 12 0; +#X connect 3 1 13 0; +#X connect 3 2 11 0; +#X connect 3 3 4 0; +#X connect 3 4 21 0; +#X connect 3 5 19 0; +#X connect 4 0 28 0; +#X connect 5 0 6 0; +#X connect 6 0 22 0; +#X connect 7 0 8 0; +#X connect 8 0 22 1; +#X connect 9 0 1 0; +#X connect 10 0 1 0; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 13 0 29 0; +#X connect 14 0 18 0; +#X connect 15 0 17 0; +#X connect 16 0 5 0; +#X connect 16 0 7 0; +#X connect 16 0 23 0; +#X connect 17 0 5 0; +#X connect 18 0 7 0; +#X connect 19 0 15 0; +#X connect 19 0 14 0; +#X connect 19 0 26 0; +#X connect 20 0 3 0; +#X connect 21 0 1 0; +#X connect 22 0 27 0; +#X connect 23 0 24 0; +#X connect 24 0 22 2; +#X connect 25 0 23 0; +#X connect 26 0 25 0; +#X connect 27 0 1 0; +#X connect 28 0 16 0; +#X connect 29 0 1 0; +#X restore 46 169 pd create_clouds; +#X msg 400 149 posY in \$1; +#X obj 42 300 route massesPosId; +#X obj 42 324 route cloud; +#X obj 305 59 t b l; +#X obj 336 106 unpack f f; +#X msg 336 129 posX in \$1; +#X msg 736 95 setD damp \$1; +#X msg 555 95 setL lnk \$1; +#X msg 305 83 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 131 117 forceY cloud \$1; +#X obj 46 30 route reset force forceX forceY forceZ; +#X obj 91 69 unpack f f f; +#X msg 173 139 forceZ cloud \$1; +#X obj 42 278 msd3D; +#X connect 0 0 19 0; +#X connect 2 0 3 0; +#X connect 3 0 22 0; +#X connect 4 0 13 0; +#X connect 5 0 14 0; +#X connect 6 0 22 0; +#X connect 7 0 22 0; +#X connect 8 0 9 0; +#X connect 9 0 1 0; +#X connect 10 0 15 0; +#X connect 10 1 11 0; +#X connect 11 0 12 0; +#X connect 11 1 7 0; +#X connect 12 0 22 0; +#X connect 13 0 22 0; +#X connect 14 0 22 0; +#X connect 15 0 22 0; +#X connect 16 0 6 0; +#X connect 17 0 22 0; +#X connect 18 0 22 0; +#X connect 19 0 6 0; +#X connect 19 1 20 0; +#X connect 19 2 17 0; +#X connect 19 3 18 0; +#X connect 19 4 21 0; +#X connect 19 5 10 0; +#X connect 20 0 17 0; +#X connect 20 1 18 0; +#X connect 20 2 21 0; +#X connect 21 0 22 0; +#X connect 22 0 8 0; |