From c050bb9a7595860bf72e7c407ff3e8cbd7e77480 Mon Sep 17 00:00:00 2001 From: Cyrille Henry 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/02_string.pd | 163 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 163 insertions(+) create mode 100755 exemples/02_string.pd (limited to 'exemples/02_string.pd') diff --git a/exemples/02_string.pd b/exemples/02_string.pd new file mode 100755 index 0000000..4ec372a --- /dev/null +++ b/exemples/02_string.pd @@ -0,0 +1,163 @@ +#N canvas 45 79 876 551 12; +#X obj 379 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 3587 1; +#X obj 397 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 3075 1; +#X obj 415 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 2562 1; +#X obj 433 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 2050 1; +#X obj 451 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 1537 1; +#X obj 469 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 1025 1; +#X obj 361 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 4100 1; +#X obj 9 35 metro 10; +#X obj 9 10 loadbang; +#X text 138 362 move the first slider ->; +#X text 570 368 <- or the last one; +#X text 268 11 This is the first exemple of physical modeling; +#X text 268 33 this is an elastic string; +#X obj 487 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 512 1; +#X obj 505 253 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 0 1; +#X obj 9 62 t b b; +#X obj 44 87 s \$0-link; +#X obj 9 113 s \$0-mass; +#X text 158 95 <- metronome send bangs to mass and link and gives the +general computation speed; +#X text 135 409 all the slider are "link" together with a link. slider +got a mass so they have inertial.; +#X obj 3 196 lia \$0-link 0 1 1; +#X obj 151 196 lia \$0-link 0 1 1; +#X obj 300 196 lia \$0-link 0 1 1; +#X obj 449 196 lia \$0-link 0 1 1; +#X obj 599 196 lia \$0-link 0 1 1; +#X obj 747 196 lia \$0-link 0 1 1; +#X obj 896 196 lia \$0-link 0 1 1; +#X obj 1045 196 lia \$0-link 0 1 1; +#X obj 146 172 masse \$0-mass 30; +#X obj 294 171 masse \$0-mass 30; +#X obj 444 172 masse \$0-mass 30; +#X obj 595 172 masse \$0-mass 30; +#X obj 743 171 masse \$0-mass 30; +#X obj 894 171 masse \$0-mass 30; +#X obj 1041 171 masse \$0-mass 30; +#X text 135 451 You can see the propagation of a wave \, and physical +properties of a kind of elastic string.; +#X text 160 132 masses and link has to be compute one after the other. +; +#X obj 749 384 mtof; +#X obj 749 433 line; +#X msg 749 409 \$1 15; +#X obj 749 458 osc~; +#X obj 805 384 mtof; +#X obj 805 433 line; +#X msg 805 409 \$1 15; +#X obj 805 458 osc~; +#X obj 860 384 mtof; +#X obj 860 433 line; +#X msg 860 409 \$1 15; +#X obj 860 458 osc~; +#X obj 916 383 mtof; +#X obj 916 432 line; +#X msg 916 408 \$1 15; +#X obj 916 457 osc~; +#X obj 972 382 mtof; +#X obj 972 431 line; +#X msg 972 407 \$1 15; +#X obj 972 456 osc~; +#X obj 1027 382 mtof; +#X obj 1027 431 line; +#X msg 1027 407 \$1 15; +#X obj 1027 456 osc~; +#X obj 1083 382 mtof; +#X obj 1083 431 line; +#X msg 1083 407 \$1 15; +#X obj 1083 456 osc~; +#X obj 880 534 dac~; +#X obj 880 510 *~ 0.1; +#X obj 933 510 *~ 0.1; +#X connect 0 0 37 0; +#X connect 1 0 41 0; +#X connect 2 0 45 0; +#X connect 3 0 49 0; +#X connect 4 0 53 0; +#X connect 5 0 57 0; +#X connect 6 0 20 0; +#X connect 7 0 15 0; +#X connect 8 0 7 0; +#X connect 13 0 61 0; +#X connect 14 0 27 1; +#X connect 15 0 17 0; +#X connect 15 1 16 0; +#X connect 20 1 28 0; +#X connect 21 0 28 0; +#X connect 21 1 29 0; +#X connect 22 0 29 0; +#X connect 22 1 30 0; +#X connect 23 0 30 0; +#X connect 23 1 31 0; +#X connect 24 0 31 0; +#X connect 24 1 32 0; +#X connect 25 0 32 0; +#X connect 25 1 33 0; +#X connect 26 0 33 0; +#X connect 26 1 34 0; +#X connect 27 0 34 0; +#X connect 28 0 0 0; +#X connect 28 0 20 1; +#X connect 28 0 21 0; +#X connect 29 0 1 0; +#X connect 29 0 21 1; +#X connect 29 0 22 0; +#X connect 30 0 2 0; +#X connect 30 0 22 1; +#X connect 30 0 23 0; +#X connect 31 0 3 0; +#X connect 31 0 23 1; +#X connect 31 0 24 0; +#X connect 32 0 4 0; +#X connect 32 0 24 1; +#X connect 32 0 25 0; +#X connect 33 0 5 0; +#X connect 33 0 25 1; +#X connect 33 0 26 0; +#X connect 34 0 13 0; +#X connect 34 0 26 1; +#X connect 34 0 27 0; +#X connect 37 0 39 0; +#X connect 38 0 40 0; +#X connect 39 0 38 0; +#X connect 40 0 66 0; +#X connect 41 0 43 0; +#X connect 42 0 44 0; +#X connect 43 0 42 0; +#X connect 44 0 66 0; +#X connect 45 0 47 0; +#X connect 46 0 48 0; +#X connect 47 0 46 0; +#X connect 48 0 66 0; +#X connect 48 0 67 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 50 0; +#X connect 52 0 66 0; +#X connect 52 0 67 0; +#X connect 53 0 55 0; +#X connect 54 0 56 0; +#X connect 55 0 54 0; +#X connect 56 0 66 0; +#X connect 56 0 67 0; +#X connect 57 0 59 0; +#X connect 58 0 60 0; +#X connect 59 0 58 0; +#X connect 60 0 67 0; +#X connect 61 0 63 0; +#X connect 62 0 64 0; +#X connect 63 0 62 0; +#X connect 64 0 67 0; +#X connect 66 0 65 0; +#X connect 67 0 65 1; -- cgit v1.2.1