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 --- pmopen_string_1d.pd | 94 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 94 insertions(+) create mode 100644 pmopen_string_1d.pd (limited to 'pmopen_string_1d.pd') diff --git a/pmopen_string_1d.pd b/pmopen_string_1d.pd new file mode 100644 index 0000000..aad7eba --- /dev/null +++ b/pmopen_string_1d.pd @@ -0,0 +1,94 @@ +#N canvas 267 388 662 400 10; +#X obj 31 227 msd; +#X obj 31 34 inlet; +#X obj 31 301 outlet; +#X obj 453 39 inlet; +#X msg 453 86 setK lnk \$1; +#X obj 546 40 inlet; +#X msg 546 86 setD lnk \$1; +#X obj 126 300 outlet; +#N canvas 327 184 457 717 creation_corde 0; +#X msg 143 117 0; +#X obj 143 142 f; +#X obj 143 193 + 1; +#X obj 143 169 moses \$1; +#X obj 165 220 t f f; +#X obj 175 649 t a; +#X obj 195 366 pack f f; +#X obj 195 247 t f f; +#X obj 241 248 \$1; +#X msg 195 389 mass M-\$1 1 1 \$2; +#X obj 225 300 /; +#X msg 121 580 link lnk M-\$1 M-\$2 \$3 \$4; +#X obj 121 552 pack f f \$2 \$3; +#X obj 69 418 f; +#X obj 69 445 moses \$1; +#X obj 173 677 outlet; +#X msg 31 578 setL lnk 0; +#X obj 43 50 t b b b b b b; +#X obj 43 23 inlet; +#X msg 163 94 reset \, mass M-0 0 1 0; +#X msg 69 392 0; +#X obj 152 525 + 1; +#X obj 69 495 + 1; +#X obj 69 470 t f f f; +#X obj 91 522 t f; +#X connect 0 0 1 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 2 0; +#X connect 4 0 1 0; +#X connect 4 1 7 0; +#X connect 5 0 15 0; +#X connect 6 0 9 0; +#X connect 7 0 6 0; +#X connect 7 1 10 0; +#X connect 8 0 10 1; +#X connect 9 0 5 0; +#X connect 10 0 6 1; +#X connect 11 0 5 0; +#X connect 12 0 11 0; +#X connect 13 0 14 0; +#X connect 14 0 23 0; +#X connect 16 0 5 0; +#X connect 17 0 16 0; +#X connect 17 1 20 0; +#X connect 17 3 0 0; +#X connect 17 4 19 0; +#X connect 17 5 8 0; +#X connect 18 0 17 0; +#X connect 19 0 5 0; +#X connect 20 0 13 0; +#X connect 21 0 12 1; +#X connect 22 0 24 0; +#X connect 23 0 22 0; +#X connect 23 1 12 0; +#X connect 23 2 21 0; +#X connect 24 0 13 0; +#X restore 69 174 pd creation_corde; +#X msg 317 84 forceX M-\$1 \$2; +#X obj 31 249 route massesPos massesForces; +#X obj 70 151 loadbang; +#X obj 136 154 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X msg 31 81 bang \, get massesPos \, get massesForces; +#X obj 317 42 inlet; +#X obj 31 57 t b f; +#X msg 61 104 posX M-0 \$1; +#X connect 0 0 10 0; +#X connect 1 0 15 0; +#X connect 3 0 4 0; +#X connect 4 0 0 0; +#X connect 5 0 6 0; +#X connect 6 0 0 0; +#X connect 8 0 0 0; +#X connect 9 0 0 0; +#X connect 10 0 2 0; +#X connect 10 1 7 0; +#X connect 11 0 8 0; +#X connect 12 0 8 0; +#X connect 13 0 0 0; +#X connect 14 0 9 0; +#X connect 15 0 13 0; +#X connect 15 1 16 0; +#X connect 16 0 0 0; -- cgit v1.2.1