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/20_moving_vertex.pd | 117 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 117 insertions(+) create mode 100755 exemples/20_moving_vertex.pd (limited to 'exemples/20_moving_vertex.pd') diff --git a/exemples/20_moving_vertex.pd b/exemples/20_moving_vertex.pd new file mode 100755 index 0000000..6066017 --- /dev/null +++ b/exemples/20_moving_vertex.pd @@ -0,0 +1,117 @@ +#N canvas 546 89 548 542 10; +#X obj 16 222 t b b; +#X obj 16 151 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 105 179 loadbang; +#X msg 250 200 0 \, destroy; +#X obj 216 228 gemwin; +#X msg 216 175 reset \, create \, 1; +#X obj 16 486 s masse; +#X obj 105 227 s reset_masse; +#X msg 105 203 bang; +#X obj 16 195 metro 5; +#N canvas 860 482 416 441 creation 0; +#X obj 40 362 s pd-new; +#X msg 95 95 \; pd filename new ./ \; #N canvas \; #X pop 1 \;; +#X msg 45 333 menuclose; +#X obj 85 286 pack f f f; +#X obj 43 47 sel 0 1; +#X obj 44 29 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 69 72 t b b; +#X obj 85 235 t f f f; +#X msg 83 314 obj \$1 \$2 fluide_masse2 \$3; +#X obj 112 261 * 10; +#X obj 85 259 * 10; +#X obj 89 188 * 2; +#X obj 73 163 ch_uzi 30; +#X connect 2 0 0 0; +#X connect 3 0 8 0; +#X connect 4 0 2 0; +#X connect 4 1 6 0; +#X connect 5 0 4 0; +#X connect 6 0 12 0; +#X connect 6 1 1 0; +#X connect 7 0 10 0; +#X connect 7 1 9 0; +#X connect 7 2 3 2; +#X connect 8 0 0 0; +#X connect 9 0 3 1; +#X connect 10 0 3 0; +#X connect 11 0 7 0; +#X connect 12 1 11 0; +#X restore 345 264 pd creation pool; +#X obj 133 305 t b b; +#X obj 194 287 r reset_masse; +#X msg 194 308 reset; +#X obj 269 346 lia foo 0 1; +#X obj 133 386 / 50; +#X text 177 373 X position of the center of the vertex.; +#X floatatom 178 390 5 0 0 0 - - -; +#X text 157 17 same as previus exemple but with a moving vertex (Y) +; +#X obj 133 470 iCircle2D masse 0 0 0 5 0 0 0 0 -1e-006 0.0001; +#X msg 133 443 setX \$1; +#X obj 133 346 masse foo 100000 99; +#N canvas 0 0 464 314 pool 0; +#X obj 0 0 fluide_masse2 0; +#X obj 20 20 fluide_masse2 2; +#X obj 40 40 fluide_masse2 4; +#X obj 60 60 fluide_masse2 6; +#X obj 80 80 fluide_masse2 8; +#X obj 100 100 fluide_masse2 10; +#X obj 120 120 fluide_masse2 12; +#X obj 140 140 fluide_masse2 14; +#X obj 160 160 fluide_masse2 16; +#X obj 180 180 fluide_masse2 18; +#X obj 200 200 fluide_masse2 20; +#X obj 220 220 fluide_masse2 22; +#X obj 240 240 fluide_masse2 24; +#X obj 260 260 fluide_masse2 26; +#X obj 280 280 fluide_masse2 28; +#X obj 300 300 fluide_masse2 30; +#X obj 320 320 fluide_masse2 32; +#X obj 340 340 fluide_masse2 34; +#X obj 360 360 fluide_masse2 36; +#X obj 380 380 fluide_masse2 38; +#X obj 400 400 fluide_masse2 40; +#X obj 420 420 fluide_masse2 42; +#X obj 440 440 fluide_masse2 44; +#X obj 460 460 fluide_masse2 46; +#X obj 480 480 fluide_masse2 48; +#X obj 500 500 fluide_masse2 50; +#X obj 520 520 fluide_masse2 52; +#X obj 540 540 fluide_masse2 54; +#X obj 560 560 fluide_masse2 56; +#X obj 580 580 fluide_masse2 58; +#X restore 345 238 pd pool; +#X text 96 41 The vertex goes from right / left with sinusoidal variations. +the mouvement comes frome a single mass/link structure \, as seen before. +; +#X text 97 92 if you've got a slow computer \, you can slow down the +computation speed by changing the metronome frequency.; +#X floatatom 53 174 5 0 0 0 - - -; +#X text 40 150 <- begin; +#X obj 41 418 iAmbient2D masse 0 0 0 0 1; +#X text 330 175 <- 1; +#X connect 0 0 6 0; +#X connect 0 1 19 0; +#X connect 0 1 27 0; +#X connect 1 0 9 0; +#X connect 2 0 8 0; +#X connect 3 0 4 0; +#X connect 5 0 4 0; +#X connect 8 0 7 0; +#X connect 9 0 0 0; +#X connect 9 0 11 0; +#X connect 11 0 21 0; +#X connect 11 1 14 0; +#X connect 12 0 13 0; +#X connect 13 0 21 0; +#X connect 14 0 21 0; +#X connect 15 0 20 0; +#X connect 20 0 19 0; +#X connect 21 0 14 0; +#X connect 21 0 15 0; +#X connect 21 0 17 0; +#X connect 25 0 9 1; -- cgit v1.2.1