From 82362ad6efa5ab5451903f17cc724b5817d6e468 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Thu, 27 Mar 2008 23:25:08 +0000 Subject: svn path=/trunk/externals/nusmuk/; revision=9632 --- msd/02_msdstring.pd | 91 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 91 insertions(+) create mode 100644 msd/02_msdstring.pd (limited to 'msd/02_msdstring.pd') diff --git a/msd/02_msdstring.pd b/msd/02_msdstring.pd new file mode 100644 index 0000000..6cb98e0 --- /dev/null +++ b/msd/02_msdstring.pd @@ -0,0 +1,91 @@ +#N canvas 489 48 887 847 10; +#X obj 53 15 loadbang; +#X obj 299 517 print msd; +#X obj 52 490 msd --------------------------------; +#X obj 52 243 tgl 25 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 +; +#X text 83 242 ON / OFF; +#X obj 45 305 cnv 15 700 60 empty empty empty 20 12 0 14 -261689 -66577 +0; +#X obj 52 312 metro 50; +#X text 474 328 COMPUTE AND GET MASSES POSITIONS; +#X obj 151 28 cnv 15 595 270 empty empty empty 20 12 0 14 -262131 -66577 +0; +#X obj 167 274 t a; +#X obj 167 33 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1 +-1; +#X msg 253 78 reset; +#X msg 218 153 mass mob 1 \$1 \$2; +#X msg 201 181 Xmax 100 \, Xmin 0; +#X msg 235 104 mass fix 0 100 80; +#X msg 218 129 100 65 \, 100 50 \, 100 35 \, 100 20; +#X obj 46 380 cnv 15 700 90 empty empty empty 20 12 0 14 -262131 -66577 +0; +#X text 455 399 SET RIGIDITY AND VISCOSITY OF LINKS; +#X text 455 438 ADD FORCE ON ALL MOBILE MASSES; +#X msg 184 153 0; +#X obj 45 576 cnv 15 300 200 empty empty empty 20 12 0 14 -261689 -66577 +0; +#X obj 88 590 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -261689 +-1 -1 6955 1; +#X obj 111 590 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -261689 +-1 -1 5050 1; +#X obj 66 590 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -261689 +-1 -1 8860 1; +#X msg 52 736 posX fix \$1; +#X obj 156 590 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -261689 +-1 -1 1240 1; +#X obj 134 590 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -261689 +-1 -1 3145 1; +#X text 199 638 MOVE FIRST SLIDER; +#X text 182 662 TO MOVE THE FIXED MASS; +#X msg 66 438 forceX mob 300; +#X msg 180 438 forceX mob -300; +#X obj 167 55 t b b b b b b; +#X text 205 34 RESET; +#X obj 52 523 route massesPosL; +#X msg 52 335 bang \, massesPosL; +#X obj 52 545 unpack f f f f f; +#X text 490 126 CREATION : 5 MASSES \, 1 iLINK; +#X msg 66 384 setK inter 1; +#X msg 66 406 setK inter 2; +#X msg 176 385 setD inter 0.01; +#X msg 176 407 setD inter 1; +#X msg 184 223 link inter fix mob 10 10; +#X connect 0 0 31 0; +#X connect 2 0 33 0; +#X connect 2 1 1 0; +#X connect 3 0 6 0; +#X connect 6 0 34 0; +#X connect 9 0 2 0; +#X connect 10 0 31 0; +#X connect 11 0 9 0; +#X connect 12 0 9 0; +#X connect 13 0 9 0; +#X connect 14 0 9 0; +#X connect 15 0 12 0; +#X connect 19 0 3 0; +#X connect 23 0 24 0; +#X connect 24 0 2 0; +#X connect 29 0 2 0; +#X connect 30 0 2 0; +#X connect 31 0 3 0; +#X connect 31 1 19 0; +#X connect 31 1 41 0; +#X connect 31 2 13 0; +#X connect 31 3 15 0; +#X connect 31 4 14 0; +#X connect 31 5 11 0; +#X connect 33 0 35 0; +#X connect 33 1 1 0; +#X connect 34 0 2 0; +#X connect 35 0 23 0; +#X connect 35 1 21 0; +#X connect 35 2 22 0; +#X connect 35 3 26 0; +#X connect 35 4 25 0; +#X connect 37 0 2 0; +#X connect 38 0 2 0; +#X connect 39 0 2 0; +#X connect 40 0 2 0; +#X connect 41 0 9 0; -- cgit v1.2.1