From 3faf17f7b713905f582def227df90dac15f3468d Mon Sep 17 00:00:00 2001 From: "N.N." Date: Tue, 10 Jul 2007 07:47:46 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r7969, which included commits to RCS files with non-trunk default branches. svn path=/trunk/abstractions/s-abstractions/; revision=7970 --- sx/ring.pd | 61 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 61 insertions(+) create mode 100644 sx/ring.pd (limited to 'sx/ring.pd') diff --git a/sx/ring.pd b/sx/ring.pd new file mode 100644 index 0000000..6121903 --- /dev/null +++ b/sx/ring.pd @@ -0,0 +1,61 @@ +#N canvas 362 185 526 460 10; +#X obj 119 0 inlet; +#X obj 149 65 rotateXYZ 0 90 0; +#X obj 149 386 rotateXYZ 0 90 0; +#X obj 149 298 translateXYZ 1 0 1; +#X obj 149 252 cuboid 0.1 0.1 1.1; +#X obj 29 110 outlet; +#X obj 119 23 GEMglPushMatrix; +#X obj 29 88 GEMglPopMatrix; +#X obj 119 44 t a a; +#X obj 307 173 \$2; +#X obj 307 151 loadbang; +#X obj 215 130 inlet; +#X obj 296 127 inlet; +#X obj 307 193 select 0; +#X obj 390 204 * 1.1; +#X obj 169 169 select 0; +#X obj 173 109 loadbang; +#X obj 173 131 \$1; +#X obj 149 208 repeat 4; +#X obj 220 362 expr 360 / $f1; +#X obj 390 180 inlet; +#X obj 425 80 loadbang; +#X obj 425 104 \$3; +#X obj 425 126 select 0; +#X text 247 3 args: [pieces] [thickness] [width]; +#X obj 149 89 translateXYZ -0.5 0 -0.5; +#X obj 319 66 / -2; +#X connect 0 0 6 0; +#X connect 1 0 25 0; +#X connect 3 0 2 0; +#X connect 4 0 3 0; +#X connect 6 0 8 0; +#X connect 7 0 5 0; +#X connect 8 0 7 0; +#X connect 8 1 1 0; +#X connect 9 0 13 0; +#X connect 10 0 9 0; +#X connect 11 0 15 0; +#X connect 12 0 9 0; +#X connect 13 1 4 2; +#X connect 14 0 4 3; +#X connect 15 1 18 1; +#X connect 15 1 19 0; +#X connect 16 0 17 0; +#X connect 17 0 15 0; +#X connect 18 0 4 0; +#X connect 19 0 2 2; +#X connect 20 0 14 0; +#X connect 20 0 3 3; +#X connect 20 0 3 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 23 1 14 0; +#X connect 23 1 3 3; +#X connect 23 1 4 3; +#X connect 23 1 26 0; +#X connect 25 0 18 0; +#X connect 26 0 25 3; +#X connect 26 0 25 1; +#X coords 0 0 1 1 85 80 0; -- cgit v1.2.1