From f18d063d9312c95e25294e0777bc135ee9a3fd8a Mon Sep 17 00:00:00 2001 From: Thomas O Fredericks Date: Sun, 25 Oct 2009 00:39:13 +0000 Subject: Adding mtl svn path=/trunk/abstractions/mtl/; revision=12667 --- 2dAngleLine.pd | 72 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 72 insertions(+) create mode 100644 2dAngleLine.pd (limited to '2dAngleLine.pd') diff --git a/2dAngleLine.pd b/2dAngleLine.pd new file mode 100644 index 0000000..239715d --- /dev/null +++ b/2dAngleLine.pd @@ -0,0 +1,72 @@ +#N canvas 362 123 799 765 10; +#X obj 371 32 inlet current_angle; +#X obj 25 10 inlet target_angle; +#X obj 314 627 line; +#X obj 229 667 t f f; +#X obj 228 713 outlet; +#X obj 247 20 inlet time; +#X obj 474 79 loadbang; +#X obj 394 110 f \$2; +#X obj 456 351 moses 0; +#X obj 537 397 moses 180; +#X obj 430 388 moses -180; +#X msg 488 423 0; +#X obj 98 253 -; +#X obj 25 67 moses 0; +#X obj 178 125 mod 360; +#X obj 77 306 f 0; +#X obj 126 212 f 0; +#X obj 78 181 t b f b f; +#X obj 45 156 t f f; +#X msg 430 412 1; +#X msg 595 427 2; +#X obj 542 508 expr 360+$f1; +#X obj 443 504 expr $f1-360; +#X msg 385 165 \$1 0; +#X obj 441 543 t f f; +#X obj 289 528 pack f \$1; +#X msg 277 569 \$1 \$2; +#X msg 431 569 \$1 0; +#X obj 8 106 expr (($f1*(-1))%360)*(-1); +#X obj 401 462 zexy/demultiplex 0 1 2; +#X connect 0 0 7 0; +#X connect 1 0 13 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 3 1 15 1; +#X connect 3 1 16 1; +#X connect 5 0 25 1; +#X connect 6 0 7 0; +#X connect 7 0 23 0; +#X connect 8 0 10 0; +#X connect 8 1 9 0; +#X connect 9 0 11 0; +#X connect 9 1 20 0; +#X connect 10 0 19 0; +#X connect 10 1 11 0; +#X connect 11 0 29 1; +#X connect 12 0 8 0; +#X connect 13 0 28 0; +#X connect 13 1 14 0; +#X connect 14 0 18 0; +#X connect 15 0 29 0; +#X connect 16 0 12 1; +#X connect 17 0 15 0; +#X connect 17 1 12 0; +#X connect 17 2 16 0; +#X connect 18 0 25 0; +#X connect 18 1 17 0; +#X connect 19 0 29 1; +#X connect 20 0 29 1; +#X connect 21 0 24 0; +#X connect 22 0 24 0; +#X connect 23 0 2 0; +#X connect 24 0 27 0; +#X connect 24 1 15 1; +#X connect 24 1 16 1; +#X connect 25 0 26 0; +#X connect 26 0 2 0; +#X connect 27 0 2 0; +#X connect 28 0 18 0; +#X connect 29 1 22 0; +#X connect 29 2 21 0; -- cgit v1.2.1