diff options
Diffstat (limited to 'examples/05_corde2D.pd')
-rw-r--r-- | examples/05_corde2D.pd | 905 |
1 files changed, 453 insertions, 452 deletions
diff --git a/examples/05_corde2D.pd b/examples/05_corde2D.pd index 7855ead..0f9674c 100644 --- a/examples/05_corde2D.pd +++ b/examples/05_corde2D.pd @@ -1,452 +1,453 @@ -#N canvas 80 32 844 550 12;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 143 446 pd mass;
-#X obj 62 214 s link;
-#X obj 27 239 s mass;
-#X obj 397 308 s mass;
-#X msg 184 199 setK \$1;
-#X msg 399 149 setM \$1;
-#X obj 184 231 s link;
-#X obj 399 177 s mass;
-#X obj 184 173 / 10;
-#X obj 184 147 + 1;
-#X obj 508 151 gemwin;
-#X msg 515 122 0 \, destroy;
-#X floatatom 184 125 5 10 100 0 - - -;
-#X floatatom 245 127 5 0 3 0 - - -;
-#X floatatom 399 126 5 20 500 0 - - -;
-#X msg 411 278 force2D 2000 0;
-#X obj 27 163 metro 10;
-#X obj 27 187 t b b;
-#X msg 396 335 force2D 0 5000;
-#X msg 184 101 50;
-#X msg 245 101 1;
-#X msg 399 102 200;
-#X obj 868 143 world_light;
-#X obj 868 84 gemhead;
-#X obj 868 114 rotateXYZ;
-#X msg 397 250 force2D 0 1000;
-#X msg 245 150 setD \$1;
-#X obj 27 9 loadbang;
-#X msg 108 99 reset;
-#X obj 108 126 s mass;
-#X obj 27 40 t b b b b;
-#X msg 49 100 resetF;
-#X obj 49 127 s link;
-#X floatatom 321 127 5 0 3 0 - - -;
-#X msg 321 101 1;
-#X msg 321 150 setD2 \$1;
-#N canvas 306 123 570 357 mass 0;
-#X obj 24 99 outlet;
-#X obj 145 98 gemhead;
-#X obj 137 134 unpack s f f;
-#X obj 143 190 translateXYZ 0 0 0;
-#X obj 144 224 sphere 0.3;
-#X obj 185 160 / 100;
-#X obj 228 161 / 100;
-#X obj 25 70 mass2D mass2 10 -300 0;
-#X connect 1 0 3 0;
-#X connect 2 1 5 0;
-#X connect 2 2 6 0;
-#X connect 3 0 4 0;
-#X connect 5 0 3 1;
-#X connect 6 0 3 2;
-#X connect 7 0 0 0;
-#X connect 7 0 2 0;
-#X restore 11 383 pd mass;
-#X msg 396 366 force2D 5000 0;
-#X text 461 7 2D string;
-#X text 542 250 <- send Y force to all masss;
-#X text 544 279 <- send X force to all masss;
-#X text 540 335 <- send Y force to 2 masss;
-#X text 542 364 <- send X force to 1 masss;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 281 449 pd mass;
-#X obj 11 409 link2D link 30 1 1;
-#X obj 158 408 link2D link 30 1 1;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 432 446 pd mass;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 570 449 pd mass;
-#X obj 300 409 link2D link 30 1 1;
-#X obj 447 408 link2D link 30 1 1;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 719 449 pd mass;
-#X obj 596 408 link2D link 30 1 1;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 870 446 pd mass;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 1008 449 pd mass;
-#X obj 738 409 link2D link 30 1 1;
-#X obj 885 408 link2D link 30 1 1;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 156 589 pd mass;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 294 592 pd mass;
-#X obj 24 552 link2D link 30 1 1;
-#X obj 171 551 link2D link 30 1 1;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 445 589 pd mass;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 583 592 pd mass;
-#X obj 313 552 link2D link 30 1 1;
-#X obj 460 551 link2D link 30 1 1;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 732 592 pd mass;
-#X obj 609 551 link2D link 30 1 1;
-#N canvas 306 123 261 242 mass 0;
-#X obj 24 23 inlet;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass 10;
-#X connect 0 0 8 0;
-#X connect 2 0 4 0;
-#X connect 3 1 6 0;
-#X connect 3 2 7 0;
-#X connect 4 0 5 0;
-#X connect 6 0 4 1;
-#X connect 7 0 4 2;
-#X connect 8 0 1 0;
-#X connect 8 0 3 0;
-#X restore 883 589 pd mass;
-#N canvas 306 123 265 246 mass 0;
-#X obj 24 83 outlet;
-#X obj 83 138 gemhead;
-#X obj 84 85 unpack s f f;
-#X obj 83 169 translateXYZ 0 0 0;
-#X obj 83 197 sphere 0.3;
-#X obj 129 111 / 100;
-#X obj 175 112 / 100;
-#X obj 24 55 mass2D mass2 10 300;
-#X connect 1 0 3 0;
-#X connect 2 1 5 0;
-#X connect 2 2 6 0;
-#X connect 3 0 4 0;
-#X connect 5 0 3 1;
-#X connect 6 0 3 2;
-#X connect 7 0 0 0;
-#X connect 7 0 2 0;
-#X restore 1021 524 pd mass;
-#X obj 751 552 link2D link 30 1 1;
-#X obj 898 551 link2D link 30 1 1;
-#X msg 508 95 reset \, lighting 1 \, create \, 1;
-#X obj 112 15 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
--1;
-#X text 325 23 masss are link together like in an elastic string.
-;
-#X text 30 652 The extrem right and extreme left masss are fixed :
-the does not receive a force. they are neaded for the model to be link
-to a special point in the screen.;
-#X text 742 94 <- 1;
-#X connect 0 0 44 1;
-#X connect 0 0 45 0;
-#X connect 4 0 6 0;
-#X connect 5 0 7 0;
-#X connect 8 0 4 0;
-#X connect 9 0 8 0;
-#X connect 11 0 10 0;
-#X connect 12 0 9 0;
-#X connect 13 0 26 0;
-#X connect 14 0 5 0;
-#X connect 15 0 3 0;
-#X connect 16 0 17 0;
-#X connect 17 0 2 0;
-#X connect 17 1 1 0;
-#X connect 18 0 0 0;
-#X connect 18 0 43 0;
-#X connect 19 0 12 0;
-#X connect 20 0 13 0;
-#X connect 21 0 14 0;
-#X connect 23 0 24 0;
-#X connect 24 0 22 0;
-#X connect 25 0 3 0;
-#X connect 26 0 6 0;
-#X connect 27 0 30 0;
-#X connect 28 0 29 0;
-#X connect 30 0 16 0;
-#X connect 30 1 31 0;
-#X connect 30 2 28 0;
-#X connect 30 3 19 0;
-#X connect 30 3 20 0;
-#X connect 30 3 21 0;
-#X connect 30 3 34 0;
-#X connect 31 0 32 0;
-#X connect 33 0 35 0;
-#X connect 34 0 33 0;
-#X connect 35 0 6 0;
-#X connect 36 0 44 0;
-#X connect 37 0 46 0;
-#X connect 43 0 45 1;
-#X connect 43 0 48 0;
-#X connect 44 1 0 0;
-#X connect 45 0 0 0;
-#X connect 45 1 43 0;
-#X connect 46 0 48 1;
-#X connect 46 0 49 0;
-#X connect 47 0 49 1;
-#X connect 47 0 51 0;
-#X connect 48 0 43 0;
-#X connect 48 1 46 0;
-#X connect 49 0 46 0;
-#X connect 49 1 47 0;
-#X connect 50 0 51 1;
-#X connect 50 0 54 0;
-#X connect 51 0 47 0;
-#X connect 51 1 50 0;
-#X connect 52 0 54 1;
-#X connect 52 0 55 0;
-#X connect 53 0 55 1;
-#X connect 53 0 58 0;
-#X connect 54 0 50 0;
-#X connect 54 1 52 0;
-#X connect 55 0 52 0;
-#X connect 55 1 53 0;
-#X connect 56 0 58 1;
-#X connect 56 0 59 0;
-#X connect 57 0 59 1;
-#X connect 57 0 62 0;
-#X connect 58 0 53 0;
-#X connect 58 1 56 0;
-#X connect 59 0 56 0;
-#X connect 59 1 57 0;
-#X connect 60 0 62 1;
-#X connect 60 0 63 0;
-#X connect 61 0 63 1;
-#X connect 61 0 65 0;
-#X connect 62 0 57 0;
-#X connect 62 1 60 0;
-#X connect 63 0 60 0;
-#X connect 63 1 61 0;
-#X connect 64 0 65 1;
-#X connect 64 0 68 0;
-#X connect 65 0 61 0;
-#X connect 65 1 64 0;
-#X connect 66 0 68 1;
-#X connect 66 0 69 0;
-#X connect 67 0 69 1;
-#X connect 68 0 64 0;
-#X connect 68 1 66 0;
-#X connect 69 0 66 0;
-#X connect 70 0 10 0;
-#X connect 71 0 30 0;
+#N canvas 76 91 844 550 12; +#X declare -lib Gem; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 143 446 pd mass; +#X obj 62 214 s link; +#X obj 27 239 s mass; +#X obj 397 308 s mass; +#X msg 184 199 setK \$1; +#X msg 399 149 setM \$1; +#X obj 184 231 s link; +#X obj 399 177 s mass; +#X obj 184 173 / 10; +#X obj 184 147 + 1; +#X obj 508 151 gemwin; +#X msg 515 122 0 \, destroy; +#X floatatom 184 125 5 10 100 0 - - -; +#X floatatom 245 127 5 0 3 0 - - -; +#X floatatom 399 126 5 20 500 0 - - -; +#X msg 411 278 force2D 2000 0; +#X obj 27 163 metro 10; +#X obj 27 187 t b b; +#X msg 396 335 force2D 0 5000; +#X msg 184 101 50; +#X msg 245 101 1; +#X msg 399 102 200; +#X obj 868 143 world_light; +#X obj 868 84 gemhead; +#X obj 868 114 rotateXYZ; +#X msg 397 250 force2D 0 1000; +#X msg 245 150 setD \$1; +#X obj 27 9 loadbang; +#X msg 108 99 reset; +#X obj 108 126 s mass; +#X obj 27 40 t b b b b; +#X msg 49 100 resetF; +#X obj 49 127 s link; +#X floatatom 321 127 5 0 3 0 - - -; +#X msg 321 101 1; +#X msg 321 150 setD2 \$1; +#N canvas 306 123 570 357 mass 0; +#X obj 24 99 outlet; +#X obj 145 98 gemhead; +#X obj 137 134 unpack s f f; +#X obj 143 190 translateXYZ 0 0 0; +#X obj 144 224 sphere 0.3; +#X obj 185 160 / 100; +#X obj 228 161 / 100; +#X obj 25 70 mass2D mass2 10 -300 0; +#X connect 1 0 3 0; +#X connect 2 1 5 0; +#X connect 2 2 6 0; +#X connect 3 0 4 0; +#X connect 5 0 3 1; +#X connect 6 0 3 2; +#X connect 7 0 0 0; +#X connect 7 0 2 0; +#X restore 11 383 pd mass; +#X msg 396 366 force2D 5000 0; +#X text 461 7 2D string; +#X text 542 250 <- send Y force to all masss; +#X text 544 279 <- send X force to all masss; +#X text 540 335 <- send Y force to 2 masss; +#X text 542 364 <- send X force to 1 masss; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 281 449 pd mass; +#X obj 11 409 link2D link 30 1 1; +#X obj 158 408 link2D link 30 1 1; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 432 446 pd mass; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 570 449 pd mass; +#X obj 300 409 link2D link 30 1 1; +#X obj 447 408 link2D link 30 1 1; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 719 449 pd mass; +#X obj 596 408 link2D link 30 1 1; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 870 446 pd mass; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 1008 449 pd mass; +#X obj 738 409 link2D link 30 1 1; +#X obj 885 408 link2D link 30 1 1; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 156 589 pd mass; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 294 592 pd mass; +#X obj 24 552 link2D link 30 1 1; +#X obj 171 551 link2D link 30 1 1; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 445 589 pd mass; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 583 592 pd mass; +#X obj 313 552 link2D link 30 1 1; +#X obj 460 551 link2D link 30 1 1; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 732 592 pd mass; +#X obj 609 551 link2D link 30 1 1; +#N canvas 306 123 261 242 mass 0; +#X obj 24 23 inlet; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass 10; +#X connect 0 0 8 0; +#X connect 2 0 4 0; +#X connect 3 1 6 0; +#X connect 3 2 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 1; +#X connect 7 0 4 2; +#X connect 8 0 1 0; +#X connect 8 0 3 0; +#X restore 883 589 pd mass; +#N canvas 306 123 265 246 mass 0; +#X obj 24 83 outlet; +#X obj 83 138 gemhead; +#X obj 84 85 unpack s f f; +#X obj 83 169 translateXYZ 0 0 0; +#X obj 83 197 sphere 0.3; +#X obj 129 111 / 100; +#X obj 175 112 / 100; +#X obj 24 55 mass2D mass2 10 300; +#X connect 1 0 3 0; +#X connect 2 1 5 0; +#X connect 2 2 6 0; +#X connect 3 0 4 0; +#X connect 5 0 3 1; +#X connect 6 0 3 2; +#X connect 7 0 0 0; +#X connect 7 0 2 0; +#X restore 1021 524 pd mass; +#X obj 751 552 link2D link 30 1 1; +#X obj 898 551 link2D link 30 1 1; +#X msg 508 95 reset \, lighting 1 \, create \, 1; +#X obj 112 15 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X text 325 23 masss are link together like in an elastic string.; +#X text 30 652 The extrem right and extreme left masss are fixed : +the does not receive a force. they are neaded for the model to be link +to a special point in the screen.; +#X text 742 94 <- 1; +#X obj 443 44 declare -lib Gem; +#X connect 0 0 44 1; +#X connect 0 0 45 0; +#X connect 4 0 6 0; +#X connect 5 0 7 0; +#X connect 8 0 4 0; +#X connect 9 0 8 0; +#X connect 11 0 10 0; +#X connect 12 0 9 0; +#X connect 13 0 26 0; +#X connect 14 0 5 0; +#X connect 15 0 3 0; +#X connect 16 0 17 0; +#X connect 17 0 2 0; +#X connect 17 1 1 0; +#X connect 18 0 0 0; +#X connect 18 0 43 0; +#X connect 19 0 12 0; +#X connect 20 0 13 0; +#X connect 21 0 14 0; +#X connect 23 0 24 0; +#X connect 24 0 22 0; +#X connect 25 0 3 0; +#X connect 26 0 6 0; +#X connect 27 0 30 0; +#X connect 28 0 29 0; +#X connect 30 0 16 0; +#X connect 30 1 31 0; +#X connect 30 2 28 0; +#X connect 30 3 19 0; +#X connect 30 3 20 0; +#X connect 30 3 21 0; +#X connect 30 3 34 0; +#X connect 31 0 32 0; +#X connect 33 0 35 0; +#X connect 34 0 33 0; +#X connect 35 0 6 0; +#X connect 36 0 44 0; +#X connect 37 0 46 0; +#X connect 43 0 45 1; +#X connect 43 0 48 0; +#X connect 44 1 0 0; +#X connect 45 0 0 0; +#X connect 45 1 43 0; +#X connect 46 0 48 1; +#X connect 46 0 49 0; +#X connect 47 0 49 1; +#X connect 47 0 51 0; +#X connect 48 0 43 0; +#X connect 48 1 46 0; +#X connect 49 0 46 0; +#X connect 49 1 47 0; +#X connect 50 0 51 1; +#X connect 50 0 54 0; +#X connect 51 0 47 0; +#X connect 51 1 50 0; +#X connect 52 0 54 1; +#X connect 52 0 55 0; +#X connect 53 0 55 1; +#X connect 53 0 58 0; +#X connect 54 0 50 0; +#X connect 54 1 52 0; +#X connect 55 0 52 0; +#X connect 55 1 53 0; +#X connect 56 0 58 1; +#X connect 56 0 59 0; +#X connect 57 0 59 1; +#X connect 57 0 62 0; +#X connect 58 0 53 0; +#X connect 58 1 56 0; +#X connect 59 0 56 0; +#X connect 59 1 57 0; +#X connect 60 0 62 1; +#X connect 60 0 63 0; +#X connect 61 0 63 1; +#X connect 61 0 65 0; +#X connect 62 0 57 0; +#X connect 62 1 60 0; +#X connect 63 0 60 0; +#X connect 63 1 61 0; +#X connect 64 0 65 1; +#X connect 64 0 68 0; +#X connect 65 0 61 0; +#X connect 65 1 64 0; +#X connect 66 0 68 1; +#X connect 66 0 69 0; +#X connect 67 0 69 1; +#X connect 68 0 64 0; +#X connect 68 1 66 0; +#X connect 69 0 66 0; +#X connect 70 0 10 0; +#X connect 71 0 30 0; |