From ebf4462966046bca8790b090ec2482b0f0c9c116 Mon Sep 17 00:00:00 2001 From: Cyrille Henry Date: Fri, 18 May 2012 16:00:20 +0000 Subject: initial commit of a new example about non-linearity svn path=/trunk/externals/pmpd/; revision=16137 --- examples/62_NL.pd | 237 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 237 insertions(+) create mode 100644 examples/62_NL.pd (limited to 'examples/62_NL.pd') diff --git a/examples/62_NL.pd b/examples/62_NL.pd new file mode 100644 index 0000000..c21bcbd --- /dev/null +++ b/examples/62_NL.pd @@ -0,0 +1,237 @@ +#N canvas 34 144 1185 713 10; +#X obj 39 450 pmpd; +#X msg 116 276 reset; +#X obj 65 248 t b b b b; +#X obj 65 225 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 65 201 loadbang; +#X obj 471 43 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X msg 39 396 bang \, get massesPos mobile; +#X obj 39 474 route massesPosId; +#X obj 39 494 route 1; +#X floatatom 39 518 5 0 0 0 - - -; +#X msg 99 300 mass fix 0 1 0.5; +#X obj 305 451 pmpd; +#X msg 382 277 reset; +#X obj 331 249 t b b b b; +#X obj 331 226 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 331 202 loadbang; +#X msg 305 397 bang \, get massesPos mobile; +#X obj 305 475 route massesPosId; +#X obj 305 495 route 1; +#X floatatom 305 519 5 0 0 0 - - -; +#X obj 323 426 r force; +#X obj 52 425 r force; +#X obj 578 453 pmpd; +#X msg 655 279 reset; +#X obj 604 251 t b b b b; +#X obj 604 228 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 604 204 loadbang; +#X msg 578 399 bang \, get massesPos mobile; +#X obj 578 477 route massesPosId; +#X obj 578 497 route 1; +#X floatatom 578 521 5 0 0 0 - - -; +#X msg 471 124 forceX mobile 0.1; +#X obj 471 154 s force; +#X obj 596 428 r force; +#X obj 471 64 metro 20; +#X obj 39 368 r metro; +#X obj 471 86 s metro; +#X obj 305 368 r metro; +#X obj 578 370 r metro; +#N canvas 11 85 772 307 oscillo 0; +#N canvas 0 0 450 300 (subpatch) 0; +#X array \$0-oscillo1 100 float 2; +#X coords 0 1 100 0 200 127 1; +#X restore 100 100 graph; +#X obj 362 86 inlet; +#X text 405 86 data; +#X obj 362 193 pack f f; +#X obj 361 171 % 100; +#X obj 362 129 f; +#X obj 361 149 + 1; +#X obj 362 108 t b f; +#X obj 362 214 s \$0-oscillo1; +#X connect 1 0 7 0; +#X connect 3 0 8 0; +#X connect 4 0 5 1; +#X connect 5 0 6 0; +#X connect 5 0 3 0; +#X connect 6 0 4 0; +#X connect 7 0 5 0; +#X connect 7 1 3 1; +#X coords 0 -1 1 1 200 127 1 100 100; +#X restore 87 519 pd oscillo; +#N canvas 9 89 772 307 oscillo 0; +#N canvas 0 0 450 300 (subpatch) 0; +#X array \$0-oscillo2 100 float 2; +#X coords 0 1 100 0 200 127 1; +#X restore 100 100 graph; +#X obj 362 86 inlet; +#X text 405 86 data; +#X obj 362 193 pack f f; +#X obj 361 171 % 100; +#X obj 362 129 f; +#X obj 361 149 + 1; +#X obj 362 108 t b f; +#X obj 362 214 s \$0-oscillo2; +#X connect 1 0 7 0; +#X connect 3 0 8 0; +#X connect 4 0 5 1; +#X connect 5 0 6 0; +#X connect 5 0 3 0; +#X connect 6 0 4 0; +#X connect 7 0 5 0; +#X connect 7 1 3 1; +#X coords 0 -1 1 1 200 127 1 100 100; +#X restore 349 524 pd oscillo; +#N canvas 9 89 772 307 oscillo 0; +#N canvas 0 0 450 300 (subpatch) 0; +#X array \$0-oscillo3 100 float 2; +#X coords 0 1 100 0 200 127 1; +#X restore 100 100 graph; +#X obj 362 86 inlet; +#X text 405 86 data; +#X obj 362 193 pack f f; +#X obj 361 171 % 100; +#X obj 362 129 f; +#X obj 361 149 + 1; +#X obj 362 108 t b f; +#X obj 362 214 s \$0-oscillo3; +#X connect 1 0 7 0; +#X connect 3 0 8 0; +#X connect 4 0 5 1; +#X connect 5 0 6 0; +#X connect 5 0 3 0; +#X connect 6 0 4 0; +#X connect 7 0 5 0; +#X connect 7 1 3 1; +#X coords 0 -1 1 1 200 127 1 100 100; +#X restore 635 524 pd oscillo; +#X msg 82 319 mass mobile 1 1 0.5; +#X msg 348 320 mass mobile 1 1 0.5; +#X msg 621 324 mass mobile 1 1 0.5; +#X msg 365 301 mass fix 0 1 0.5; +#X msg 638 303 mass fix 0 1 0.5; +#X text 83 57 - linear rigidity; +#X text 61 18 This Example provide 3 simples oscillator using 3 differents +kind of link :; +#X obj 868 453 pmpd; +#X msg 945 279 reset; +#X obj 894 251 t b b b b; +#X obj 894 228 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 894 204 loadbang; +#X msg 868 399 bang \, get massesPos mobile; +#X obj 868 477 route massesPosId; +#X obj 868 497 route 1; +#X floatatom 868 521 5 0 0 0 - - -; +#X obj 886 428 r force; +#X obj 868 370 r metro; +#N canvas 7 93 772 307 oscillo 0; +#N canvas 0 0 450 300 (subpatch) 0; +#X array \$0-oscillo4 100 float 2; +#X coords 0 1 100 0 200 127 1; +#X restore 100 100 graph; +#X obj 362 86 inlet; +#X text 405 86 data; +#X obj 362 193 pack f f; +#X obj 361 171 % 100; +#X obj 362 129 f; +#X obj 361 149 + 1; +#X obj 362 108 t b f; +#X obj 362 214 s \$0-oscillo4; +#X connect 1 0 7 0; +#X connect 3 0 8 0; +#X connect 4 0 5 1; +#X connect 5 0 6 0; +#X connect 5 0 3 0; +#X connect 6 0 4 0; +#X connect 7 0 5 0; +#X connect 7 1 3 1; +#X coords 0 -1 1 1 200 127 1 100 100; +#X restore 925 524 pd oscillo; +#X msg 928 303 mass fix 0 1 0.5; +#X msg 65 344 link linear fix mobile 0.03 0.01; +#X msg 331 344 link sqrt fix mobile 0.03 0.01 0.5; +#X msg 604 344 link sqr fix mobile 0.03 0.01 2; +#X msg 911 324 mass mobile 1 1 0.5; +#X msg 893 345 link linear fix mobile 0.03 0.01 -0.2; +#X text 84 116 - rigidity proportionnal to pow(lenght \, -0.2); +#X text 83 97 - rigidity proportionnal to square of elongation; +#X text 83 77 - rigidity proportionnal to square root of elongation +; +#X connect 0 0 7 0; +#X connect 1 0 0 0; +#X connect 2 0 62 0; +#X connect 2 1 42 0; +#X connect 2 2 10 0; +#X connect 2 3 1 0; +#X connect 3 0 2 0; +#X connect 4 0 3 0; +#X connect 5 0 34 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 39 0; +#X connect 10 0 0 0; +#X connect 11 0 17 0; +#X connect 12 0 11 0; +#X connect 13 0 63 0; +#X connect 13 1 43 0; +#X connect 13 2 45 0; +#X connect 13 3 12 0; +#X connect 14 0 13 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 18 0 40 0; +#X connect 20 0 11 0; +#X connect 21 0 0 0; +#X connect 22 0 28 0; +#X connect 23 0 22 0; +#X connect 24 0 64 0; +#X connect 24 1 44 0; +#X connect 24 2 46 0; +#X connect 24 3 23 0; +#X connect 25 0 24 0; +#X connect 26 0 25 0; +#X connect 27 0 22 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 29 0 41 0; +#X connect 31 0 32 0; +#X connect 33 0 22 0; +#X connect 34 0 36 0; +#X connect 35 0 6 0; +#X connect 37 0 16 0; +#X connect 38 0 27 0; +#X connect 42 0 0 0; +#X connect 43 0 11 0; +#X connect 44 0 22 0; +#X connect 45 0 11 0; +#X connect 46 0 22 0; +#X connect 49 0 55 0; +#X connect 50 0 49 0; +#X connect 51 0 66 0; +#X connect 51 1 65 0; +#X connect 51 2 61 0; +#X connect 51 3 50 0; +#X connect 52 0 51 0; +#X connect 53 0 52 0; +#X connect 54 0 49 0; +#X connect 55 0 56 0; +#X connect 56 0 57 0; +#X connect 56 0 60 0; +#X connect 58 0 49 0; +#X connect 59 0 54 0; +#X connect 61 0 49 0; +#X connect 62 0 0 0; +#X connect 63 0 11 0; +#X connect 64 0 22 0; +#X connect 65 0 49 0; +#X connect 66 0 49 0; -- cgit v1.2.1