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 --- pmmulti_stable_2d.pd | 116 +++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 116 insertions(+) create mode 100644 pmmulti_stable_2d.pd (limited to 'pmmulti_stable_2d.pd') diff --git a/pmmulti_stable_2d.pd b/pmmulti_stable_2d.pd new file mode 100644 index 0000000..742841f --- /dev/null +++ b/pmmulti_stable_2d.pd @@ -0,0 +1,116 @@ +#N canvas 835 203 726 492 10; +#X obj 42 34 inlet; +#X obj 41 435 outlet; +#X obj 510 34 inlet; +#X msg 510 81 setK lnk \$1; +#X obj 603 35 inlet; +#X msg 603 81 setD lnk \$1; +#X obj 41 363 msd2D; +#N canvas 866 113 421 804 creation_multi_stable 0; +#X obj 32 23 loadbang; +#X obj 175 649 t a; +#X obj 118 19 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 201 150 \$1; +#X obj 145 198 /; +#X obj 173 677 outlet; +#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 145 174 pd loop; +#X obj 145 124 \$1; +#X msg 145 361 mass fixe 0 1 \$1 \$2; +#X obj 145 149 max 2; +#X obj 201 173 max 2; +#X obj 145 220 * 6.28; +#X obj 145 241 t f f; +#X obj 145 337 pack f f; +#X obj 196 267 sin; +#X obj 145 267 cos; +#X obj 79 428 pack \$2 \$3; +#X obj 145 290 * 0.5; +#X obj 196 292 * 0.5; +#X msg 79 450 link lnk fixe out \$1 \$2; +#X obj 32 50 t b b b b b b b; +#X msg 161 81 reset; +#X msg 115 394 mass out 1 1 1 0; +#X msg 63 481 setL lnk 1; +#X msg 35 511 mass grab 0 1 1 0 \, link lgrab out grab 0 0; +#X connect 0 0 20 0; +#X connect 1 0 5 0; +#X connect 2 0 20 0; +#X connect 3 0 10 0; +#X connect 4 0 11 0; +#X connect 6 0 4 0; +#X connect 7 0 9 0; +#X connect 8 0 1 0; +#X connect 9 0 6 0; +#X connect 10 0 4 1; +#X connect 11 0 12 0; +#X connect 12 0 15 0; +#X connect 12 1 14 0; +#X connect 13 0 8 0; +#X connect 14 0 18 0; +#X connect 15 0 17 0; +#X connect 16 0 19 0; +#X connect 17 0 13 0; +#X connect 18 0 13 1; +#X connect 19 0 1 0; +#X connect 20 0 24 0; +#X connect 20 1 23 0; +#X connect 20 2 16 0; +#X connect 20 3 22 0; +#X connect 20 4 7 0; +#X connect 20 5 3 0; +#X connect 20 6 21 0; +#X connect 21 0 1 0; +#X connect 22 0 1 0; +#X connect 23 0 1 0; +#X connect 24 0 1 0; +#X restore 195 310 pd creation_multi_stable; +#X msg 140 90 forceX out \$1 \, forceY out \$2; +#X obj 41 90 unpack f f; +#X msg 41 114 posX grab \$1; +#X msg 90 167 setK lgrab \$1; +#X msg 106 136 posY grab \$1; +#X obj 41 57 route grab grab_on force bang; +#X obj 41 412 route out; +#X obj 41 385 route massesPosId; +#X msg 189 112 bang \, get massesPos out; +#X connect 0 0 13 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 15 0; +#X connect 7 0 6 0; +#X connect 8 0 6 0; +#X connect 9 0 10 0; +#X connect 9 1 12 0; +#X connect 10 0 6 0; +#X connect 11 0 6 0; +#X connect 12 0 6 0; +#X connect 13 0 9 0; +#X connect 13 1 11 0; +#X connect 13 2 8 0; +#X connect 13 3 16 0; +#X connect 14 0 1 0; +#X connect 15 0 14 0; +#X connect 16 0 6 0; -- cgit v1.2.1