diff options
Diffstat (limited to 'examples/64_distordable_object.pd')
| -rw-r--r-- | examples/64_distordable_object.pd | 143 |
1 files changed, 74 insertions, 69 deletions
diff --git a/examples/64_distordable_object.pd b/examples/64_distordable_object.pd index 09a0395..707d1ad 100644 --- a/examples/64_distordable_object.pd +++ b/examples/64_distordable_object.pd @@ -1,10 +1,10 @@ -#N canvas 358 434 669 579 10; -#X declare -lib Gem; +#N canvas 385 163 669 579 10; +#X declare -lib Gem -path ../; #X obj 52 300 pmpd2d; #X obj 52 78 loadbang; #X obj 64 101 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; -#N canvas 293 344 1137 609 creation 0; +#N canvas 163 153 1137 609 creation 0; #X obj 256 -12 inlet; #X obj 266 16 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; @@ -26,7 +26,7 @@ #X obj 448 371 f; #X obj 520 423 + 1; #X obj 448 418 t f f f f; -#X obj 449 448 + 1, f 4; +#X obj 449 448 + 1; #X obj 447 476 pack f f; #X msg 448 317 19; #X obj 463 179 until; @@ -81,10 +81,10 @@ #X obj 462 286 t b f f; #X obj 2 399 + 20; #X msg 846 276 min -9 -9 \, max 29 29; -#X msg 1 455 link link \$1 \$2 0.03 0.1; -#X msg 152 463 link link \$1 \$2 0.03 0.1; -#X msg 316 462 link link \$1 \$2 0.03 0.1; -#X msg 448 501 link link \$1 \$2 0.03 0.1; +#X msg 1 455 link mesh \$1 \$2 0.03 0.1; +#X msg 152 463 link mesh \$1 \$2 0.03 0.1; +#X msg 316 462 link mesh \$1 \$2 0.03 0.1; +#X msg 448 501 link mesh \$1 \$2 0.03 0.1; #X connect 0 0 2 0; #X connect 1 0 2 0; #X connect 2 2 74 0; @@ -193,13 +193,12 @@ #X connect 77 0 4 0; #X connect 78 0 4 0; #X restore 52 126 pd creation; -#X obj 56 -19 declare -lib Gem; #X obj 69 224 gemhead; #X obj 69 247 t b; #X obj 54 45 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 ; -#N canvas 1324 493 591 562 linkrender 0; -#X obj 150 9 inlet; +#N canvas 485 216 591 562 linkrender 0; +#X obj 146 9 inlet; #X obj 67 285 separator; #X obj 150 148 t b f; #X obj 67 368 curve 2; @@ -213,10 +212,10 @@ #X msg 67 174 0; #X msg 77 337 res 2; #X obj 77 311 loadbang; -#X obj 145 53 route link; -#X obj 68 265 translateXYZ -10 -10 0; -#X obj 69 246 scaleXYZ 0.2 0.2 0.2; -#X connect 0 0 14 0; +#X obj 67 265 translateXYZ -10 -10 0; +#X obj 67 246 scaleXYZ 0.2 0.2 0.2; +#X obj 146 53 route mesh; +#X connect 0 0 16 0; #X connect 1 0 3 0; #X connect 2 0 9 0; #X connect 2 1 4 0; @@ -228,21 +227,21 @@ #X connect 8 2 4 1; #X connect 8 3 6 0; #X connect 8 4 6 1; -#X connect 9 0 16 0; +#X connect 9 0 15 0; #X connect 10 0 11 0; #X connect 11 0 9 0; #X connect 12 0 3 0; #X connect 13 0 12 0; -#X connect 14 0 8 0; -#X connect 15 0 1 0; -#X connect 16 0 15 0; +#X connect 14 0 1 0; +#X connect 15 0 14 0; +#X connect 16 0 8 0; #X restore 52 345 pd linkrender; -#N canvas 714 698 763 327 create_gem 0; +#N canvas 266 267 304 262 create_gem 0; #X msg 137 179 0 \, destroy; #X obj 118 104 inlet; #X obj 118 129 sel 1 0; #X msg 118 156 reset \, create \, 1; -#X obj 118 200 gemwin 50; +#X obj 118 200 gemwin; #X connect 0 0 4 0; #X connect 1 0 2 0; #X connect 2 0 3 0; @@ -251,14 +250,13 @@ #X restore 75 45 pd create_gem; #X obj 239 119 pack f f; #X obj 239 143 spigot 0; -#X obj 255 31 gemmouse 40 -40; +#X obj 255 47 gemmouse 40 -40; #X obj 239 97 - 10; #X obj 281 98 + 30; #X obj 240 73 f; #X obj 207 -13 gemhead; #X obj 207 10 t b; #X obj 207 53 until; -#X msg 69 268 linkEnd link; #X obj 52 323 route linkEnd testLink; #X msg 151 366 setInactive \$1 \, setLinkId \$1 broken; #X obj 480 70 gemhead 45; @@ -271,56 +269,63 @@ #X obj 480 155 circle 2; #X obj 151 345 route break plastic; #X msg 207 197 bang \, forceY net -1e-05 \,; -#X msg 450 38 0; +#X msg 451 38 0; #X obj 451 14 loadbang; #X msg 239 169 iCircle net \$1 \$2 1 -0.1 1 0 0 0 1; -#X text 62 452 click and drag the mouse cursor over the object : you -can interact with it. if force in the links are to importantes \, the -connection lenght will change (plastic deformation). if forces are -to importante \, they will break.; #X msg 207 32 20; -#X msg 185 225 testLink break Id link forceSup 0.03 \, testLink plastic -Id link forceSup 0.002; -#X msg 206 396 setLCurrent link 0.0001; -#X connect 0 0 20 0; +#X obj 26 -19 declare -lib Gem -path ../; +#X text 62 452 Click and drag the mouse cursor over the object : you +can interact with it. If forces in the links are superior to 0.002 +\, the connection lenght will adapt a bit (plastic deformation). If +forces are even bigger (> 0.03) \, the link will break.; +#X text 239 7 simulation speed x20; +#X text 378 367 link with forces > 0.03 breaks; +#X text 350 398 link with forces > 0.002 adpats 1% of their length +; +#X text 186 280 ask pmpd to test the forces of each links; +#X msg 69 268 linkEnd mesh; +#X msg 185 245 testLink break Id mesh forceSup 0.03 \, testLink plastic +Id mesh forceSup 0.002; +#X msg 206 396 setLCurrent mesh 0.01; +#X connect 0 0 18 0; #X connect 1 0 3 0; #X connect 2 0 3 0; #X connect 3 0 0 0; -#X connect 5 0 6 0; -#X connect 6 0 19 0; -#X connect 7 0 9 0; -#X connect 10 0 11 0; -#X connect 11 0 34 0; -#X connect 12 0 15 1; -#X connect 12 1 14 0; -#X connect 12 2 11 1; -#X connect 13 0 10 0; -#X connect 14 0 10 1; -#X connect 15 0 13 0; -#X connect 16 0 17 0; -#X connect 17 0 36 0; -#X connect 18 0 31 0; -#X connect 18 0 15 0; -#X connect 18 0 37 0; +#X connect 4 0 5 0; +#X connect 5 0 40 0; +#X connect 6 0 8 0; +#X connect 9 0 10 0; +#X connect 10 0 32 0; +#X connect 11 0 14 1; +#X connect 11 1 13 0; +#X connect 11 2 10 1; +#X connect 12 0 9 0; +#X connect 13 0 9 1; +#X connect 14 0 12 0; +#X connect 15 0 16 0; +#X connect 16 0 33 0; +#X connect 17 0 29 0; +#X connect 17 0 14 0; +#X connect 17 0 41 0; +#X connect 18 0 7 0; +#X connect 18 1 28 0; #X connect 19 0 0 0; -#X connect 20 0 8 0; -#X connect 20 1 30 0; -#X connect 21 0 0 0; -#X connect 22 0 24 0; -#X connect 23 0 28 0; -#X connect 24 0 23 0; -#X connect 25 0 26 0; -#X connect 25 1 27 0; -#X connect 25 2 22 0; -#X connect 26 0 28 1; -#X connect 27 0 28 2; -#X connect 28 0 29 0; -#X connect 30 0 21 0; -#X connect 30 1 38 0; -#X connect 31 0 0 0; -#X connect 32 0 22 0; -#X connect 33 0 32 0; -#X connect 34 0 0 0; -#X connect 36 0 18 0; -#X connect 37 0 0 0; -#X connect 38 0 0 0; +#X connect 20 0 22 0; +#X connect 21 0 26 0; +#X connect 22 0 21 0; +#X connect 23 0 24 0; +#X connect 23 1 25 0; +#X connect 23 2 20 0; +#X connect 24 0 26 1; +#X connect 25 0 26 2; +#X connect 26 0 27 0; +#X connect 28 0 19 0; +#X connect 28 1 42 0; +#X connect 29 0 0 0; +#X connect 30 0 20 0; +#X connect 31 0 30 0; +#X connect 32 0 0 0; +#X connect 33 0 17 0; +#X connect 40 0 0 0; +#X connect 41 0 0 0; +#X connect 42 0 0 0; |