From a89a3c9fecd05a623aef900114cf936ba9ecd9e7 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Wed, 15 Mar 2006 04:55:34 +0000 Subject: 0.8.1 svn path=/trunk/; revision=4710 --- externals/gridflow/pd_examples/epicycloid.pd | 220 +++++++++++++-------------- 1 file changed, 110 insertions(+), 110 deletions(-) (limited to 'externals/gridflow/pd_examples/epicycloid.pd') diff --git a/externals/gridflow/pd_examples/epicycloid.pd b/externals/gridflow/pd_examples/epicycloid.pd index c1589de9..000bc8c0 100644 --- a/externals/gridflow/pd_examples/epicycloid.pd +++ b/externals/gridflow/pd_examples/epicycloid.pd @@ -1,125 +1,125 @@ -#N canvas 443 76 1178 736 10; -#X text 18 93 epicycloid; -#X text 18 116 x(t) = (R+r) cos(t) - p*cos((R+r)t/r); -#X text 18 140 y(t) = (R+r) sin(t) - p*sin((R+r)t/r); -#X obj 38 383 #draw_polygon put 1; -#X obj 287 438 #import ( 4 2 ); -#X obj 38 406 #out window; -#X obj -22 -22 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1 +#N canvas 301 73 904 550 10; +#X text 158 43 epicycloid; +#X text 168 56 x(t) = (R+r) cos(t) - p*cos((R+r)t/r); +#X text 168 69 y(t) = (R+r) sin(t) - p*sin((R+r)t/r); +#X obj 24 273 #draw_polygon put 1; +#X obj 24 292 #out window; +#X obj -22 68 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1 ; -#X obj 327 375 pack f f f f; -#X msg 327 404 \$2 \$1 \$4 \$1 \$4 \$3 \$2 \$3; -#X text 334 350 x; -#X text 394 352 y; -#X text 421 354 y+1; -#X text 357 352 x+1; -#X floatatom 327 327 5 0 0 0 - - -; -#X obj 369 325 + 1; -#X floatatom 405 327 5 0 0 0 - - -; -#X obj 447 324 + 1; -#X obj 332 297 t f f; -#X obj 417 297 t f f; -#X obj 0 50 s met; -#X obj 286 350 r met; -#X obj 468 97 hsl 128 15 5 100 0 1 empty empty empty -2 -6 0 8 -24198 +#X obj 297 428 pack f f f f; +#X msg 297 447 \$2 \$1 \$4 \$1 \$4 \$3 \$2 \$3; +#X text 304 403 x; +#X text 364 405 y; +#X text 391 407 y+1; +#X text 327 405 x+1; +#X floatatom 303 381 5 0 0 0 - - -; +#X obj 345 379 + 1; +#X floatatom 390 382 5 0 0 0 - - -; +#X obj 432 379 + 1; +#X obj 303 358 t f f; +#X obj 390 361 t f f; +#X obj -16 108 s met; +#X obj 258 428 r met; +#X obj 388 197 hsl 128 15 5 100 0 1 empty empty empty -2 -6 0 8 -24198 -1 -1 5500 1; -#X obj 585 148 hsl 128 15 -100 100 0 1 empty empty empty -2 -6 0 8 +#X obj 515 238 hsl 128 15 -100 100 0 1 empty empty empty -2 -6 0 8 -44926 -1 -1 4000 1; -#X obj 732 173 hsl 128 15 -150 150 0 1 empty empty empty -2 -6 0 8 +#X obj 665 263 hsl 128 15 -150 150 0 1 empty empty empty -2 -6 0 8 -258699 -1 -1 3200 1; -#X text 439 52 t = valeur en angles de 0 a 360; -#X obj 465 153 t f f; -#X obj 582 180 t f f; -#X obj 729 193 t f f; -#X obj 333 127 * 6.28319; -#X obj 333 106 / 360; -#X floatatom 333 88 5 0 0 0 - - -; -#X obj 333 152 t f f; -#X obj -22 355 #store; -#X obj 15 205 loadbang; -#X obj 420 250 expr ($f2+$f3)*sin($f1) - $f4*sin(($f2+$f3)*$f1/$f3) +#X text 313 155 t = valeur en angles de 0 a 360; +#X obj 385 241 t f f; +#X obj 512 270 t f f; +#X obj 662 283 t f f; +#X obj 303 217 * 6.28319; +#X obj 303 196 / 360; +#X floatatom 303 178 5 0 0 0 - - -; +#X obj 303 236 t f f; +#X obj -22 273 #store; +#X obj -14 129 loadbang; +#X obj 390 323 expr ($f2+$f3)*sin($f1) - $f4*sin(($f2+$f3)*$f1/$f3) ; -#X obj 333 212 expr ($f2+$f3)*cos($f1) - $f4*cos(($f2+$f3)*$f1/$f3) +#X obj 303 302 expr ($f2+$f3)*cos($f1) - $f4*cos(($f2+$f3)*$f1/$f3) ; -#X obj 333 65 + 1; -#X msg 333 41 1; -#X floatatom 375 65 5 0 0 0 - - -; -#X msg 375 16 0; -#X text 406 19 reset count; -#X text 129 231 reset image; -#X text 540 126 r = Rayon du deuxieme cercle -100 a 100; -#X obj 420 275 + 150; -#X obj 333 272 + 150; -#X floatatom 477 123 5 0 0 0 - - -; -#X floatatom 633 173 5 0 0 0 - - -; -#X floatatom 779 196 5 0 0 0 - - -; -#X obj -22 7 metro 1; -#X obj 33 -21 hsl 128 15 0 15 0 0 empty empty empty -2 -6 0 8 -260818 +#X obj 303 135 + 1; +#X msg 303 111 1; +#X floatatom 335 138 5 0 0 0 - - -; +#X msg 335 119 0; +#X text 366 122 reset count; +#X text 100 147 reset image; +#X text 470 216 r = Rayon du deuxieme cercle -100 a 100; +#X obj 390 342 + 150; +#X obj 303 339 + 150; +#X floatatom 397 223 5 0 0 0 - - -; +#X floatatom 563 263 5 0 0 0 - - -; +#X floatatom 712 286 5 0 0 0 - - -; +#X obj -22 85 metro 1; +#X obj 25 68 hsl 128 15 0 15 0 0 empty empty empty -2 -6 0 8 -260818 -1 -1 0 1; -#X text 440 78 R = Rayon du premier cercle 5 a 100; -#X obj -38 525 cnv 15 900 30 empty empty empty 20 12 0 14 -200249 -66577 +#X text 360 178 R = Rayon du premier cercle 5 a 100; +#X obj -38 515 cnv 15 900 30 empty empty empty 20 12 0 14 -200249 -66577 0; -#X text -29 532 GridFlow 0.8.0; -#X text -29 532 GridFlow 0.8.0; -#X obj -35 -85 cnv 15 940 30 empty empty empty 20 12 0 14 -233017 -66577 +#X text -29 522 GridFlow 0.8.0; +#X text -29 522 GridFlow 0.8.0; +#X obj -35 5 cnv 15 800 30 empty empty empty 20 12 0 14 -233017 -66577 0; -#X obj 102 317 #color; -#X obj 102 268 loadbang; -#X msg 102 292 230 224 0; -#X msg 15 232 300 300 3 # 0; -#X text -22 -72 Copyright 2004 Alexandre Castonguay; -#X text -22 -85 epicycloid.pd; -#X text 80 204 start with a blank \, black image; -#X text 727 158 deuxieme cercle - 150 a 150; -#X text 727 143 p = distance du centre du; -#X connect 3 0 5 0; -#X connect 3 0 32 1; -#X connect 4 0 3 2; -#X connect 6 0 48 0; -#X connect 7 0 8 0; -#X connect 8 0 4 0; -#X connect 13 0 7 0; -#X connect 14 0 7 2; -#X connect 15 0 7 1; -#X connect 16 0 7 3; -#X connect 17 0 13 0; -#X connect 17 1 14 0; -#X connect 18 0 15 0; -#X connect 18 1 16 0; -#X connect 20 0 7 0; +#X obj 88 213 #color; +#X obj 88 175 loadbang; +#X msg 88 194 230 224 0; +#X msg -14 148 300 300 3 # 0; +#X text -22 18 Copyright 2004 Alexandre Castonguay; +#X text -22 5 epicycloid.pd; +#X text 51 128 start with a blank \, black image; +#X text 660 248 deuxieme cercle - 150 a 150; +#X text 660 233 p = distance du centre du; +#X obj 297 466 #import (4 2); +#X connect 3 0 4 0; +#X connect 3 0 31 1; +#X connect 5 0 47 0; +#X connect 6 0 7 0; +#X connect 7 0 63 0; +#X connect 12 0 6 0; +#X connect 13 0 6 2; +#X connect 14 0 6 1; +#X connect 15 0 6 3; +#X connect 16 0 12 0; +#X connect 16 1 13 0; +#X connect 17 0 14 0; +#X connect 17 1 15 0; +#X connect 19 0 6 0; +#X connect 20 0 24 0; +#X connect 20 0 44 0; #X connect 21 0 25 0; #X connect 21 0 45 0; #X connect 22 0 26 0; #X connect 22 0 46 0; -#X connect 23 0 27 0; -#X connect 23 0 47 0; -#X connect 25 0 35 1; -#X connect 25 1 34 1; -#X connect 26 0 35 2; -#X connect 26 1 34 2; -#X connect 27 0 35 3; -#X connect 27 1 34 3; -#X connect 28 0 31 0; +#X connect 24 0 34 1; +#X connect 24 1 33 1; +#X connect 25 0 34 2; +#X connect 25 1 33 2; +#X connect 26 0 34 3; +#X connect 26 1 33 3; +#X connect 27 0 30 0; +#X connect 28 0 27 0; #X connect 29 0 28 0; -#X connect 30 0 29 0; -#X connect 31 0 35 0; -#X connect 31 1 34 0; -#X connect 32 0 3 0; -#X connect 33 0 58 0; +#X connect 30 0 34 0; +#X connect 30 1 33 0; +#X connect 31 0 3 0; +#X connect 32 0 57 0; +#X connect 33 0 42 0; #X connect 34 0 43 0; -#X connect 35 0 44 0; -#X connect 36 0 38 0; -#X connect 36 0 30 0; -#X connect 37 0 36 0; -#X connect 38 0 36 1; -#X connect 39 0 38 0; -#X connect 43 0 18 0; -#X connect 44 0 17 0; -#X connect 48 0 19 0; -#X connect 48 0 32 0; -#X connect 48 0 37 0; -#X connect 49 0 48 1; -#X connect 55 0 3 1; -#X connect 56 0 57 0; -#X connect 57 0 55 0; -#X connect 58 0 32 1; +#X connect 35 0 37 0; +#X connect 35 0 29 0; +#X connect 36 0 35 0; +#X connect 37 0 35 1; +#X connect 38 0 37 0; +#X connect 42 0 17 0; +#X connect 43 0 16 0; +#X connect 47 0 18 0; +#X connect 47 0 31 0; +#X connect 47 0 36 0; +#X connect 48 0 47 1; +#X connect 54 0 3 1; +#X connect 55 0 56 0; +#X connect 56 0 54 0; +#X connect 57 0 31 1; +#X connect 63 0 3 2; -- cgit v1.2.1