aboutsummaryrefslogtreecommitdiff
path: root/exemples/05_corde2D.pd
diff options
context:
space:
mode:
Diffstat (limited to 'exemples/05_corde2D.pd')
-rwxr-xr-xexemples/05_corde2D.pd452
1 files changed, 452 insertions, 0 deletions
diff --git a/exemples/05_corde2D.pd b/exemples/05_corde2D.pd
new file mode 100755
index 0000000..d5f4136
--- /dev/null
+++ b/exemples/05_corde2D.pd
@@ -0,0 +1,452 @@
+#N canvas 80 32 844 550 12;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#X obj 62 214 s lia;
+#X obj 27 239 s masse;
+#X obj 397 308 s masse;
+#X msg 184 199 setK \$1;
+#X msg 399 149 setM \$1;
+#X obj 184 231 s lia;
+#X obj 399 177 s masse;
+#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 masse;
+#X obj 27 40 t b b b b;
+#X msg 49 100 resetF;
+#X obj 49 127 s lia;
+#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 masse 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 masse2D masse2 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 masse;
+#X msg 396 366 force2D 5000 0;
+#X text 461 7 2D string;
+#X text 542 250 <- send Y force to all masses;
+#X text 544 279 <- send X force to all masses;
+#X text 540 335 <- send Y force to 2 masses;
+#X text 542 364 <- send X force to 1 masses;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#X obj 11 409 lia2D lia 30 1 1;
+#X obj 158 408 lia2D lia 30 1 1;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#X obj 300 409 lia2D lia 30 1 1;
+#X obj 447 408 lia2D lia 30 1 1;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#X obj 596 408 lia2D lia 30 1 1;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#X obj 738 409 lia2D lia 30 1 1;
+#X obj 885 408 lia2D lia 30 1 1;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#X obj 24 552 lia2D lia 30 1 1;
+#X obj 171 551 lia2D lia 30 1 1;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#X obj 313 552 lia2D lia 30 1 1;
+#X obj 460 551 lia2D lia 30 1 1;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#X obj 609 551 lia2D lia 30 1 1;
+#N canvas 306 123 261 242 masse 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 masse2D masse 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 masse;
+#N canvas 306 123 265 246 masse 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 masse2D masse2 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 masse;
+#X obj 751 552 lia2D lia 30 1 1;
+#X obj 898 551 lia2D lia 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 masses are link together like in an elastic string.
+;
+#X text 30 652 The extrem right and extreme left masses 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;