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 --- pmrepulsor_3d.pd | 55 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 55 insertions(+) create mode 100644 pmrepulsor_3d.pd (limited to 'pmrepulsor_3d.pd') diff --git a/pmrepulsor_3d.pd b/pmrepulsor_3d.pd new file mode 100644 index 0000000..ca8ec36 --- /dev/null +++ b/pmrepulsor_3d.pd @@ -0,0 +1,55 @@ +#N canvas 146 213 871 573 10; +#X obj 31 34 inlet; +#X obj 59 326 loadbang; +#X obj 32 535 outlet; +#X obj 59 352 pack \$1 \$2; +#X obj 368 37 inlet; +#X msg 368 84 setK lnk \$1; +#X obj 461 38 inlet; +#X msg 461 84 setD lnk \$1; +#X msg 206 239 bang \, get massesPos out \, get massesForces out; +#X obj 32 507 route out; +#X obj 141 536 outlet; +#X obj 141 508 route out; +#X obj 32 483 route massesPosId massesForcesId; +#X obj 139 321 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 32 461 msd3D; +#X msg 171 216 forceX out \$1 \, forceY out \$2 \, forceZ out \$3; +#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 59 378 reset \, mass center 0 1 0 0 0 \, mass out 1 1 0.5 0 +0 \, link lnk center out \$1 0 \, nLink damp center out 0 \$2 0 1 0 +\, nLink damp center out 0 \$2 1 0 0 \, nLink damp center out 0 \$2 +0 0 1 \, 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 14 0; +#X connect 6 0 7 0; +#X connect 7 0 14 0; +#X connect 8 0 14 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 12 0; +#X connect 15 0 14 0; +#X connect 16 0 14 0; +#X connect 17 0 14 0; +#X connect 18 0 14 0; +#X connect 19 0 20 0; +#X connect 19 1 17 0; +#X connect 19 2 15 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 14 0; +#X connect 22 0 14 0; -- cgit v1.2.1