From 5587b9a0f1768206a9037b86a7ce3b81a1bd17f7 Mon Sep 17 00:00:00 2001 From: Cyrille Henry Date: Sat, 13 Jan 2007 11:40:44 +0000 Subject: *** empty log message *** svn path=/trunk/externals/mapping/; revision=7332 --- pmattractor_3d.pd | 56 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 56 insertions(+) create mode 100644 pmattractor_3d.pd (limited to 'pmattractor_3d.pd') diff --git a/pmattractor_3d.pd b/pmattractor_3d.pd new file mode 100644 index 0000000..0f6cd4e --- /dev/null +++ b/pmattractor_3d.pd @@ -0,0 +1,56 @@ +#N canvas 522 233 697 573 10; +#X obj 31 34 inlet; +#X obj 76 286 loadbang; +#X obj 31 511 outlet; +#X obj 76 312 pack \$1 \$2; +#X obj 341 24 inlet; +#X msg 341 71 setK lnk \$1; +#X obj 434 25 inlet; +#X msg 434 71 setD lnk \$1; +#X msg 276 246 bang \, get massesPos out \, get massesForces out; +#X obj 31 483 route out; +#X obj 140 512 outlet; +#X obj 140 484 route out; +#X obj 31 459 route massesPosId massesForcesId; +#X obj 156 281 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X msg 209 217 forceX out \$1 \, forceY out \$2 \, forceZ out \$3; +#X obj 31 437 msd3D; +#X msg 31 112 posX grab \$1; +#X msg 145 192 setK lgrab \$1; +#X msg 70 136 posY grab \$1; +#X obj 31 55 route grab grab_on force bang; +#X obj 31 88 unpack f f f; +#X msg 111 159 posZ grab \$1; +#X msg 76 338 reset \, mass border 0 1 -1 0 0 \, mass border 0 1 1 +0 0 \, mass border 0 1 0 -1 0 \, mass border 0 1 0 1 0 \, mass border +0 1 0 0 1 \, mass border 0 1 0 0 -1 \, mass out 1 1 0 0 0 \, link lnk +border out \$1 \$2 \, mass grab 0 1 0 0 0 \, link lgrab out grab 0 +0; +#X connect 0 0 19 0; +#X connect 1 0 3 0; +#X connect 3 0 22 0; +#X connect 4 0 5 0; +#X connect 5 0 15 0; +#X connect 6 0 7 0; +#X connect 7 0 15 0; +#X connect 8 0 15 0; +#X connect 9 0 2 0; +#X connect 11 0 10 0; +#X connect 12 0 9 0; +#X connect 12 1 11 0; +#X connect 13 0 3 0; +#X connect 14 0 15 0; +#X connect 15 0 12 0; +#X connect 16 0 15 0; +#X connect 17 0 15 0; +#X connect 18 0 15 0; +#X connect 19 0 20 0; +#X connect 19 1 17 0; +#X connect 19 2 14 0; +#X connect 19 3 8 0; +#X connect 20 0 16 0; +#X connect 20 1 18 0; +#X connect 20 2 21 0; +#X connect 21 0 15 0; +#X connect 22 0 15 0; -- cgit v1.2.1