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_2d.pd | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 52 insertions(+) create mode 100644 pmattractor_2d.pd (limited to 'pmattractor_2d.pd') diff --git a/pmattractor_2d.pd b/pmattractor_2d.pd new file mode 100644 index 0000000..f08630d --- /dev/null +++ b/pmattractor_2d.pd @@ -0,0 +1,52 @@ +#N canvas 736 156 871 573 10; +#X obj 46 21 inlet; +#X obj 174 278 loadbang; +#X obj 46 495 outlet; +#X obj 174 304 pack \$1 \$2; +#X obj 526 16 inlet; +#X msg 526 115 setK lnk \$1; +#X obj 619 17 inlet; +#X msg 619 115 setD lnk \$1; +#X msg 194 110 bang \, get massesPos out \, get massesForces out; +#X obj 46 467 route out; +#X obj 155 496 outlet; +#X obj 155 467 route out; +#X obj 46 443 route massesPosId massesForcesId; +#X obj 46 421 msd2D; +#X msg 145 89 forceX out \$1 \, forceY out \$2; +#X obj 254 273 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X msg 174 330 reset \, mass border 0 1 -1 0 \, mass border 0 1 1 0 +\, mass border 0 1 0 -1 \, mass border 0 1 0 1 \, mass out 1 1 0 0 +\, link lnk border out \$1 \$2 \, mass grab 0 1 0 0 \, link lgrab out +grab 0 0; +#X obj 46 89 unpack f f; +#X msg 46 113 posX grab \$1; +#X msg 95 166 setK lgrab \$1; +#X msg 111 135 posY grab \$1; +#X obj 46 56 route grab grab_on force bang; +#X connect 0 0 21 0; +#X connect 1 0 3 0; +#X connect 3 0 16 0; +#X connect 4 0 5 0; +#X connect 5 0 13 0; +#X connect 6 0 7 0; +#X connect 7 0 13 0; +#X connect 8 0 13 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 12 0; +#X connect 14 0 13 0; +#X connect 15 0 3 0; +#X connect 16 0 13 0; +#X connect 17 0 18 0; +#X connect 17 1 20 0; +#X connect 18 0 13 0; +#X connect 19 0 13 0; +#X connect 20 0 13 0; +#X connect 21 0 17 0; +#X connect 21 1 19 0; +#X connect 21 2 14 0; +#X connect 21 3 8 0; -- cgit v1.2.1