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/42_tentacule.pd | 453 +++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 453 insertions(+)
 create mode 100755 exemples/42_tentacule.pd

(limited to 'exemples/42_tentacule.pd')

diff --git a/exemples/42_tentacule.pd b/exemples/42_tentacule.pd
new file mode 100755
index 0000000..03bf052
--- /dev/null
+++ b/exemples/42_tentacule.pd
@@ -0,0 +1,453 @@
+#N canvas 165 113 638 442 10;
+#N canvas 20 38 1340 956 tentacule 0;
+#X obj 482 749 gemhead;
+#X obj 114 173 mass3D M 1 1 -0.6 0;
+#X obj 277 123 mass3D M 1 0 -0.6 0;
+#X obj 364 170 mass3D M 1 -1 -0.6 0;
+#X obj 283 231 mass3D M 1 0 1.13 0;
+#X obj 115 402 mass3D M 1 1 -0.6 1;
+#X obj 305 370 mass3D M 1 0 -0.6 1;
+#X obj 414 402 mass3D M 1 -1 -0.6 1;
+#X obj 310 479 mass3D M 1 0 1.13 1;
+#X obj 351 448 link3D L 0 1;
+#X obj 245 446 link3D L 0 1;
+#X obj 250 400 link3D L 0 1;
+#X obj 324 401 link3D L 0 1;
+#X obj 348 336 link3D L2 0 1;
+#X obj 280 309 link3D L2 0 1;
+#X obj 263 247 link3D L2 0 1;
+#X obj 179 332 link3D L2 0 1;
+#X obj 77 266 link3D L2 0 1;
+#X obj 175 253 link3D L2 0 1;
+#X obj 354 258 link3D L2 0 1;
+#X obj 395 298 link3D L2 0 1;
+#X obj 306 201 link3D L 0 1;
+#X obj 218 198 link3D L 0 1;
+#X obj 222 152 link3D L 0 1;
+#X obj 297 152 link3D L 0 1;
+#X obj 838 302 link3D L2 0 1;
+#X obj 906 268 link3D L2 0 1;
+#X obj 1026 212 link3D L 0 1;
+#X obj 949 213 link3D L 0 1;
+#X obj 953 167 link3D L 0 1;
+#X obj 1028 167 link3D L 0 1;
+#X obj 696 325 link3D L2 0 1;
+#X obj 617 379 link3D L2 0 1;
+#X obj 618 175 link3D L2 0 1;
+#X obj 588 296 link3D L2 0 1;
+#X obj 496 245 link3D L2 0 1;
+#X obj 575 217 link3D L2 0 1;
+#X obj 750 232 link3D L2 0 1;
+#X obj 770 269 link3D L2 0 1;
+#X obj 287 44 link3D L 0 1;
+#X obj 431 96 link3D L 0 1;
+#X obj 506 147 link3D L 0 1;
+#X obj 84 119 link3D L 0 1;
+#X msg 88 91 position3D 1 -0.6 0;
+#X msg 529 29 position3D -1 -0.6 0;
+#X msg 577 122 position3D 0 1.13 0;
+#X msg 301 16 position3D 0 -0.6 0;
+#X obj 722 46 r M2;
+#X obj 722 72 route reset;
+#X obj 1003 361 link3D L3 0 1;
+#X obj 1051 316 link3D L3 0 1;
+#X obj 1108 283 link3D L3 0 1;
+#X obj 991 405 link3D L3 0 1;
+#X obj 1209 370 r M2;
+#X obj 1109 190 mass3D M 1 -0.5 -0.3 1.5;
+#X obj 1009 138 mass3D M 1 0 -0.3 1.5;
+#X obj 822 188 mass3D M 1 0.5 -0.3 1.5;
+#X obj 984 274 mass3D M 1 0 0.58 1.5;
+#X obj 465 776 curve3d 5 5;
+#X msg 198 573 set 0 1 \$1 \$2 \$3;
+#X msg 218 604 set 1 1 \$1 \$2 \$3;
+#X msg 239 621 set 2 1 \$1 \$2 \$3;
+#X msg 261 644 set 3 1 \$1 \$2 \$3;
+#X msg 278 666 set 4 1 \$1 \$2 \$3;
+#X msg 395 580 set 0 2 \$1 \$2 \$3;
+#X msg 417 606 set 1 2 \$1 \$2 \$3;
+#X msg 436 628 set 2 2 \$1 \$2 \$3;
+#X msg 458 651 set 3 2 \$1 \$2 \$3;
+#X msg 475 673 set 4 2 \$1 \$2 \$3;
+#X msg 666 580 set 0 3 \$1 \$2 \$3;
+#X msg 686 611 set 1 3 \$1 \$2 \$3;
+#X msg 706 628 set 2 3 \$1 \$2 \$3;
+#X msg 730 651 set 3 3 \$1 \$2 \$3;
+#X msg 746 673 set 4 3 \$1 \$2 \$3;
+#X msg 863 587 set 0 4 \$1 \$2 \$3;
+#X msg 884 613 set 1 4 \$1 \$2 \$3;
+#X msg 903 635 set 2 4 \$1 \$2 \$3;
+#X msg 926 658 set 3 4 \$1 \$2 \$3;
+#X msg 944 681 set 4 4 \$1 \$2 \$3;
+#X obj 43 568 loadbang;
+#X msg 88 649 set 2 0 0 -0.3 0;
+#X msg 106 687 set 3 0 0 -0.3 0;
+#X msg 53 596 set 0 0 0 -0.3 0;
+#X msg 70 628 set 1 0 0 -0.3 0;
+#X msg 123 709 set 4 0 0 -0.3 0;
+#X obj 1152 421 mass3D M 4 0 0 2;
+#X msg 6 64 setM \$1;
+#X obj 4 40 inlet;
+#X msg 148 42 setM \$1;
+#X obj 146 18 inlet;
+#X obj 836 40 inlet;
+#X connect 0 0 58 0;
+#X connect 1 0 13 0;
+#X connect 1 0 17 1;
+#X connect 1 0 22 0;
+#X connect 1 0 23 0;
+#X connect 1 0 62 0;
+#X connect 1 0 42 1;
+#X connect 2 0 15 0;
+#X connect 2 0 18 1;
+#X connect 2 0 23 1;
+#X connect 2 0 24 0;
+#X connect 2 0 59 0;
+#X connect 2 0 63 0;
+#X connect 2 0 39 0;
+#X connect 3 0 16 1;
+#X connect 3 0 20 0;
+#X connect 3 0 21 1;
+#X connect 3 0 24 1;
+#X connect 3 0 60 0;
+#X connect 3 0 40 0;
+#X connect 4 0 14 0;
+#X connect 4 0 19 0;
+#X connect 4 0 21 0;
+#X connect 4 0 22 1;
+#X connect 4 0 61 0;
+#X connect 4 0 41 0;
+#X connect 5 0 10 0;
+#X connect 5 0 11 0;
+#X connect 5 0 16 0;
+#X connect 5 0 17 0;
+#X connect 5 0 67 0;
+#X connect 5 0 35 0;
+#X connect 5 0 34 0;
+#X connect 6 0 11 1;
+#X connect 6 0 12 0;
+#X connect 6 0 15 1;
+#X connect 6 0 19 1;
+#X connect 6 0 64 0;
+#X connect 6 0 68 0;
+#X connect 6 0 33 0;
+#X connect 6 0 31 0;
+#X connect 7 0 9 1;
+#X connect 7 0 12 1;
+#X connect 7 0 13 1;
+#X connect 7 0 20 1;
+#X connect 7 0 65 0;
+#X connect 7 0 38 0;
+#X connect 7 0 36 0;
+#X connect 8 0 9 0;
+#X connect 8 0 10 1;
+#X connect 8 0 14 1;
+#X connect 8 0 18 0;
+#X connect 8 0 66 0;
+#X connect 8 0 32 0;
+#X connect 8 0 37 1;
+#X connect 9 0 8 0;
+#X connect 9 1 7 0;
+#X connect 10 0 5 0;
+#X connect 10 1 8 0;
+#X connect 11 0 5 0;
+#X connect 11 1 6 0;
+#X connect 12 0 6 0;
+#X connect 12 1 7 0;
+#X connect 13 0 1 0;
+#X connect 13 1 7 0;
+#X connect 14 0 4 0;
+#X connect 14 1 8 0;
+#X connect 15 0 2 0;
+#X connect 15 1 6 0;
+#X connect 16 0 5 0;
+#X connect 16 1 3 0;
+#X connect 17 0 5 0;
+#X connect 17 1 1 0;
+#X connect 18 0 8 0;
+#X connect 18 1 2 0;
+#X connect 19 0 4 0;
+#X connect 19 1 6 0;
+#X connect 20 0 3 0;
+#X connect 20 1 7 0;
+#X connect 21 0 4 0;
+#X connect 21 1 3 0;
+#X connect 22 0 1 0;
+#X connect 22 1 4 0;
+#X connect 23 0 1 0;
+#X connect 23 1 2 0;
+#X connect 24 0 2 0;
+#X connect 24 1 3 0;
+#X connect 25 1 56 0;
+#X connect 26 1 55 0;
+#X connect 27 0 57 0;
+#X connect 27 1 54 0;
+#X connect 28 0 56 0;
+#X connect 28 1 57 0;
+#X connect 29 0 56 0;
+#X connect 29 1 55 0;
+#X connect 30 0 55 0;
+#X connect 30 1 54 0;
+#X connect 31 0 6 0;
+#X connect 31 1 57 0;
+#X connect 32 0 8 0;
+#X connect 32 1 57 0;
+#X connect 33 0 6 0;
+#X connect 33 1 55 0;
+#X connect 34 0 5 0;
+#X connect 34 1 54 0;
+#X connect 35 0 5 0;
+#X connect 35 1 56 0;
+#X connect 36 0 7 0;
+#X connect 36 1 56 0;
+#X connect 37 0 55 0;
+#X connect 37 1 8 0;
+#X connect 38 0 7 0;
+#X connect 38 1 54 0;
+#X connect 39 0 2 0;
+#X connect 40 0 3 0;
+#X connect 41 0 4 0;
+#X connect 42 1 1 0;
+#X connect 43 0 42 0;
+#X connect 44 0 40 1;
+#X connect 45 0 41 1;
+#X connect 46 0 39 1;
+#X connect 47 0 48 0;
+#X connect 48 0 44 0;
+#X connect 48 0 45 0;
+#X connect 48 0 46 0;
+#X connect 48 0 43 0;
+#X connect 49 0 55 0;
+#X connect 49 1 85 0;
+#X connect 50 0 54 0;
+#X connect 50 1 85 0;
+#X connect 51 0 57 0;
+#X connect 51 1 85 0;
+#X connect 52 0 56 0;
+#X connect 52 1 85 0;
+#X connect 53 0 85 0;
+#X connect 54 0 27 1;
+#X connect 54 0 30 1;
+#X connect 54 0 70 0;
+#X connect 54 0 38 1;
+#X connect 54 0 34 1;
+#X connect 54 0 50 0;
+#X connect 55 0 26 1;
+#X connect 55 0 29 1;
+#X connect 55 0 30 0;
+#X connect 55 0 69 0;
+#X connect 55 0 73 0;
+#X connect 55 0 33 1;
+#X connect 55 0 37 0;
+#X connect 55 0 49 0;
+#X connect 56 0 25 1;
+#X connect 56 0 28 0;
+#X connect 56 0 29 0;
+#X connect 56 0 72 0;
+#X connect 56 0 35 1;
+#X connect 56 0 36 1;
+#X connect 56 0 52 0;
+#X connect 57 0 27 0;
+#X connect 57 0 28 1;
+#X connect 57 0 71 0;
+#X connect 57 0 32 1;
+#X connect 57 0 31 1;
+#X connect 57 0 51 0;
+#X connect 59 0 58 0;
+#X connect 60 0 58 0;
+#X connect 61 0 58 0;
+#X connect 62 0 58 0;
+#X connect 63 0 58 0;
+#X connect 64 0 58 0;
+#X connect 65 0 58 0;
+#X connect 66 0 58 0;
+#X connect 67 0 58 0;
+#X connect 68 0 58 0;
+#X connect 69 0 58 0;
+#X connect 70 0 58 0;
+#X connect 71 0 58 0;
+#X connect 72 0 58 0;
+#X connect 73 0 58 0;
+#X connect 74 0 58 0;
+#X connect 75 0 58 0;
+#X connect 76 0 58 0;
+#X connect 77 0 58 0;
+#X connect 78 0 58 0;
+#X connect 79 0 82 0;
+#X connect 79 0 83 0;
+#X connect 79 0 80 0;
+#X connect 79 0 81 0;
+#X connect 79 0 84 0;
+#X connect 80 0 58 0;
+#X connect 81 0 58 0;
+#X connect 82 0 58 0;
+#X connect 83 0 58 0;
+#X connect 84 0 58 0;
+#X connect 85 0 74 0;
+#X connect 85 0 78 0;
+#X connect 85 0 49 1;
+#X connect 85 0 50 1;
+#X connect 85 0 51 1;
+#X connect 85 0 52 1;
+#X connect 85 0 75 0;
+#X connect 85 0 76 0;
+#X connect 85 0 77 0;
+#X connect 86 0 17 0;
+#X connect 86 0 35 0;
+#X connect 86 0 52 0;
+#X connect 87 0 86 0;
+#X connect 88 0 15 0;
+#X connect 88 0 33 0;
+#X connect 88 0 49 0;
+#X connect 89 0 88 0;
+#X connect 90 0 58 0;
+#X restore 51 405 pd tentacule;
+#X msg 17 56 create \, 1;
+#X msg 27 77 0 \, destroy;
+#X msg 36 121 lighting 1;
+#X obj 367 144 t b b;
+#X obj 392 169 s M;
+#X obj 398 201 s L;
+#X obj 380 220 s L2;
+#X obj 480 101 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 500 143 t b b b;
+#X obj 566 213 s M;
+#X msg 566 190 reset;
+#X obj 528 222 s L;
+#X obj 510 241 s L2;
+#X msg 518 188 resetL;
+#X msg 500 167 resetF;
+#X obj 593 214 s M2;
+#X obj 500 263 s L3;
+#X obj 367 242 s L3;
+#X obj 17 238 ch_gemwin 50;
+#X obj 367 120 gemhead;
+#X obj 121 309 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 121 333 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 51 359 / 150;
+#X obj 84 359 / 150;
+#X obj 84 383 + 0.6;
+#X obj 51 383 + 0.6;
+#X msg 136 356 draw control_line;
+#X msg 136 385 draw fill;
+#X obj 36 98 loadbang;
+#N canvas 0 0 452 302 light 0;
+#X obj 43 70 gemhead;
+#X obj 43 114 world_light;
+#X obj 43 25 gemhead;
+#X obj 43 49 world_light;
+#X obj 43 92 rotateXYZ 230 0 80;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 4 0 1 0;
+#X restore 272 222 pd light;
+#X obj 500 119 loadbang;
+#N canvas 0 0 547 274 init 0;
+#X obj 11 125 s M;
+#X msg 11 102 setM \$1;
+#X msg 17 58 13;
+#X msg 91 109 setD \$1;
+#X obj 91 138 s L;
+#X floatatom 90 86 5 0 0 0 - - -;
+#X obj 153 137 s L;
+#X floatatom 152 85 5 0 0 0 - - -;
+#X msg 153 108 setK \$1;
+#X msg 93 59 2;
+#X msg 216 109 setD \$1;
+#X floatatom 215 86 5 0 0 0 - - -;
+#X floatatom 277 85 5 0 0 0 - - -;
+#X msg 278 108 setK \$1;
+#X msg 218 59 2;
+#X obj 216 138 s L2;
+#X obj 278 137 s L2;
+#X msg 165 55 5;
+#X msg 290 55 0.7;
+#X msg 343 108 setD \$1;
+#X floatatom 342 85 5 0 0 0 - - -;
+#X floatatom 416 89 5 0 0 0 - - -;
+#X msg 417 112 setK \$1;
+#X obj 343 137 s L3;
+#X obj 417 141 s L3;
+#X msg 429 59 1;
+#X msg 345 58 3;
+#X obj 84 -14 loadbang;
+#X floatatom 9 79 5 0 0 0 - - -;
+#X connect 1 0 0 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 5 0 3 0;
+#X connect 7 0 8 0;
+#X connect 8 0 6 0;
+#X connect 9 0 3 0;
+#X connect 10 0 15 0;
+#X connect 11 0 10 0;
+#X connect 12 0 13 0;
+#X connect 13 0 16 0;
+#X connect 14 0 10 0;
+#X connect 17 0 8 0;
+#X connect 18 0 13 0;
+#X connect 19 0 23 0;
+#X connect 20 0 19 0;
+#X connect 21 0 22 0;
+#X connect 22 0 24 0;
+#X connect 25 0 22 0;
+#X connect 26 0 19 0;
+#X connect 27 0 9 0;
+#X connect 27 0 17 0;
+#X connect 27 0 14 0;
+#X connect 27 0 18 0;
+#X connect 27 0 26 0;
+#X connect 27 0 25 0;
+#X connect 27 0 2 0;
+#X connect 28 0 1 0;
+#X restore 272 247 pd init;
+#X text 522 98 <- reset;
+#X text 280 319 <- change lenght of some link to distord the structure
+;
+#X text 283 10 muscle exemples;
+#X text 158 26 you can change the lengh of some like to distord the
+structure;
+#X obj 42 154 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 64 178 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 87 201 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X text 129 136 camera position;
+#X connect 1 0 19 0;
+#X connect 2 0 19 0;
+#X connect 3 0 19 0;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 18 0;
+#X connect 4 1 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 15 0;
+#X connect 9 1 14 0;
+#X connect 9 2 11 0;
+#X connect 11 0 10 0;
+#X connect 11 0 16 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 14 0 17 0;
+#X connect 15 0 10 0;
+#X connect 15 0 13 0;
+#X connect 15 0 12 0;
+#X connect 15 0 17 0;
+#X connect 20 0 4 0;
+#X connect 21 0 23 0;
+#X connect 22 0 24 0;
+#X connect 23 0 26 0;
+#X connect 24 0 25 0;
+#X connect 25 0 0 1;
+#X connect 26 0 0 0;
+#X connect 27 0 0 2;
+#X connect 28 0 0 2;
+#X connect 29 0 3 0;
+#X connect 31 0 9 0;
+#X connect 37 0 19 1;
+#X connect 38 0 19 2;
+#X connect 39 0 19 3;
-- 
cgit v1.2.1