From c050bb9a7595860bf72e7c407ff3e8cbd7e77480 Mon Sep 17 00:00:00 2001
From: Cyrille Henry <nusmuk@users.sourceforge.net>
Date: Fri, 9 Apr 2004 16:55:47 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r1590, which included commits to RCS files with non-trunk default branches.

svn path=/trunk/externals/pmpd/; revision=1591
---
 exemples/07_corde3D.pd | 601 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 601 insertions(+)
 create mode 100755 exemples/07_corde3D.pd

(limited to 'exemples/07_corde3D.pd')

diff --git a/exemples/07_corde3D.pd b/exemples/07_corde3D.pd
new file mode 100755
index 0000000..8f48fa4
--- /dev/null
+++ b/exemples/07_corde3D.pd
@@ -0,0 +1,601 @@
+#N canvas 102 60 816 578 12;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 99 622 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 47 593 pd lia;
+#X obj 23 83 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X obj 94 188 s lia;
+#X obj 23 187 s masse;
+#X obj 540 417 s masse;
+#X msg 392 179 setK \$1;
+#X msg 613 131 setM \$1;
+#X obj 392 206 s lia;
+#X obj 613 159 s masse;
+#X obj 392 153 / 10;
+#X obj 392 127 + 1;
+#X obj 43 314 gemwin;
+#X msg 62 281 0 \, destroy;
+#X floatatom 392 105 5 0 0 0 - - -;
+#X floatatom 529 109 5 0 0 0 - - -;
+#X floatatom 613 108 5 0 0 0 - - -;
+#X obj 392 47 loadbang;
+#X obj 23 104 metro 10;
+#X obj 23 128 t b b;
+#X msg 392 81 50;
+#X msg 613 84 200;
+#X obj 251 115 world_light;
+#X obj 251 87 gemhead;
+#X text 194 158 <- gravity simulation;
+#X obj 535 304 s gemhead;
+#X obj 535 223 gemhead;
+#X obj 535 279 rotateXYZ;
+#X floatatom 557 253 5 0 0 0 - - -;
+#X floatatom 607 254 5 0 0 0 - - -;
+#X floatatom 657 254 5 0 0 0 - - -;
+#X msg 158 479 force3D 1000 0 0;
+#X msg 179 503 force3D 0 1000 0;
+#X msg 196 525 force3D 0 0 1000;
+#X msg 556 391 force3D 1000 0 0;
+#X msg 550 368 force3D 0 0 500;
+#X msg 540 346 force3D 0 500 0;
+#N canvas 846 252 304 336 masse 0;
+#X obj 25 99 outlet;
+#X obj 75 228 translateXYZ 0 0 0;
+#X obj 75 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 167 127 / 100;
+#X obj 75 162 r gemhead;
+#X obj 75 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 214 128 / 100;
+#X obj 24 71 masse3D 0 10 0 300 5;
+#X connect 1 0 2 0;
+#X connect 3 0 1 1;
+#X connect 4 0 1 2;
+#X connect 5 0 6 0;
+#X connect 6 0 1 0;
+#X connect 7 1 3 0;
+#X connect 7 2 4 0;
+#X connect 7 3 8 0;
+#X connect 8 0 1 3;
+#X connect 9 0 0 0;
+#X connect 9 0 7 0;
+#X restore 47 562 pd masse;
+#X msg 529 132 setD2 \$1;
+#X msg 58 156 force3D 0 -8 0;
+#X msg 506 517 force3D 0 0 2000;
+#X msg 490 495 force3D 0 2000 0;
+#X msg 468 471 force3D 2000 0 0;
+#X floatatom 445 110 5 0 0 0 - - -;
+#X msg 445 133 setD \$1;
+#X msg 445 84 1;
+#X msg 529 83 1;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 174 623 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 128 593 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 245 623 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 193 594 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 320 624 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 274 594 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 393 626 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 341 597 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 468 627 pd masse;
+#N canvas 470 145 284 118 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 422 597 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 539 627 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 487 598 pd lia;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 568 598 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 613 627 pd masse;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 686 629 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 634 600 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 761 630 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 715 600 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 832 630 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 780 601 pd lia;
+#N canvas 663 236 288 320 masse 0;
+#X obj 25 38 inlet;
+#X obj 25 99 outlet;
+#X obj 76 228 translateXYZ 0 0 0;
+#X obj 76 256 sphere 0.3;
+#X obj 121 127 / 100;
+#X obj 168 127 / 100;
+#X obj 76 162 r gemhead;
+#X obj 76 191 separator;
+#X obj 86 100 unpack s f f f;
+#X obj 215 128 / 100;
+#X obj 25 70 masse3D masse 10;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 4 0 2 1;
+#X connect 5 0 2 2;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 8 1 4 0;
+#X connect 8 2 5 0;
+#X connect 8 3 9 0;
+#X connect 9 0 2 3;
+#X connect 10 0 1 0;
+#X connect 10 0 8 0;
+#X restore 907 631 pd masse;
+#N canvas 470 145 282 116 lia 0;
+#X obj 177 23 inlet;
+#X obj 177 78 outlet;
+#X obj 86 23 inlet;
+#X obj 86 78 outlet;
+#X obj 86 51 lia3D lia 50 10 0;
+#X connect 0 0 4 1;
+#X connect 2 0 4 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X restore 861 601 pd lia;
+#X msg 43 253 reset \, lighting 1 \, create \, 1;
+#X text 433 12 string 3D;
+#X text 25 366 At the initialisation \, all the masse are in the same
+point (0 \, 0). The masse move to find the minimal energy of the system.
+;
+#X text 720 366 <- send forces to all the masses;
+#X text 654 491 <- send forces to specific masses;
+#X text 21 421 The gravity simulation is a force vertical force aply
+to all masses.;
+#X text 710 252 <- rotate the model in 3D;
+#X text 55 78 <- 1;
+#X text 289 255 <- 2;
+#X connect 0 0 1 1;
+#X connect 0 0 48 0;
+#X connect 1 1 0 0;
+#X connect 2 0 18 0;
+#X connect 6 0 8 0;
+#X connect 7 0 9 0;
+#X connect 10 0 6 0;
+#X connect 11 0 10 0;
+#X connect 13 0 12 0;
+#X connect 14 0 11 0;
+#X connect 15 0 38 0;
+#X connect 16 0 7 0;
+#X connect 17 0 21 0;
+#X connect 17 0 46 0;
+#X connect 17 0 20 0;
+#X connect 17 0 45 0;
+#X connect 18 0 19 0;
+#X connect 19 0 4 0;
+#X connect 19 1 3 0;
+#X connect 19 1 39 0;
+#X connect 20 0 14 0;
+#X connect 21 0 16 0;
+#X connect 23 0 22 0;
+#X connect 26 0 27 0;
+#X connect 27 0 25 0;
+#X connect 28 0 27 1;
+#X connect 29 0 27 2;
+#X connect 30 0 27 3;
+#X connect 31 0 0 0;
+#X connect 32 0 0 0;
+#X connect 33 0 0 0;
+#X connect 34 0 5 0;
+#X connect 35 0 5 0;
+#X connect 36 0 5 0;
+#X connect 37 0 1 0;
+#X connect 38 0 8 0;
+#X connect 39 0 4 0;
+#X connect 40 0 55 0;
+#X connect 41 0 55 0;
+#X connect 42 0 55 0;
+#X connect 43 0 44 0;
+#X connect 44 0 8 0;
+#X connect 45 0 43 0;
+#X connect 46 0 15 0;
+#X connect 47 0 48 1;
+#X connect 47 0 50 0;
+#X connect 48 0 0 0;
+#X connect 48 1 47 0;
+#X connect 49 0 50 1;
+#X connect 49 0 52 0;
+#X connect 50 0 47 0;
+#X connect 50 1 49 0;
+#X connect 51 0 52 1;
+#X connect 51 0 54 0;
+#X connect 52 0 49 0;
+#X connect 52 1 51 0;
+#X connect 53 0 54 1;
+#X connect 53 0 56 0;
+#X connect 54 0 51 0;
+#X connect 54 1 53 0;
+#X connect 55 0 56 1;
+#X connect 55 0 58 0;
+#X connect 56 0 53 0;
+#X connect 56 1 55 0;
+#X connect 57 0 58 1;
+#X connect 57 0 59 0;
+#X connect 58 0 55 0;
+#X connect 58 1 57 0;
+#X connect 59 0 57 0;
+#X connect 59 1 60 0;
+#X connect 60 0 62 0;
+#X connect 60 0 59 1;
+#X connect 61 0 62 1;
+#X connect 61 0 64 0;
+#X connect 62 0 60 0;
+#X connect 62 1 61 0;
+#X connect 63 0 64 1;
+#X connect 63 0 66 0;
+#X connect 64 0 61 0;
+#X connect 64 1 63 0;
+#X connect 65 0 66 1;
+#X connect 65 0 68 0;
+#X connect 66 0 63 0;
+#X connect 66 1 65 0;
+#X connect 67 0 68 1;
+#X connect 68 0 65 0;
+#X connect 68 1 67 0;
+#X connect 69 0 12 0;
-- 
cgit v1.2.1