From 35994ca3a4ef6a136a16cac63b4f68540d0434e1 Mon Sep 17 00:00:00 2001 From: Frank Barknecht Date: Fri, 23 Apr 2004 16:22:42 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r1630, which included commits to RCS files with non-trunk default branches. svn path=/trunk/abstractions/rradical/; revision=1631 --- control/_slider-commun.pd | 47 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 47 insertions(+) create mode 100644 control/_slider-commun.pd (limited to 'control/_slider-commun.pd') diff --git a/control/_slider-commun.pd b/control/_slider-commun.pd new file mode 100644 index 0000000..78ef62b --- /dev/null +++ b/control/_slider-commun.pd @@ -0,0 +1,47 @@ +#N canvas 563 234 607 600 10; +#X obj 425 146 symbol \$1; +#X obj 425 213 t f; +#X obj 425 192 unpack 0; +#X obj 425 119 loadbang; +#X obj 342 287 - 1; +#X obj 342 307 mod 32; +#X obj 342 327 + 1; +#X obj 409 417 r \$0-current; +#X obj 358 243 f 1; +#X obj 342 264 +; +#X obj 393 444 f; +#X obj 307 187 r \$2-shifter; +#X msg 328 497 \; \$2 \$3; +#X obj 328 474 pack s s 0; +#X obj 303 429 symbol \$1; +#X obj 307 219 t b f b; +#X obj 393 387 r \$2-prepare-shift; +#X obj 43 44 inlet; +#X obj 51 175 outlet; +#X obj 342 349 makefilename \$2-s%d; +#X obj 425 169 symbol2list /s; +#X obj 48 120 commun \$1 \$2; +#X obj 103 60 s \$0-current; +#X connect 0 0 20 0; +#X connect 1 0 8 1; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 19 0; +#X connect 7 0 10 1; +#X connect 8 0 9 1; +#X connect 9 0 4 0; +#X connect 10 0 13 2; +#X connect 11 0 15 0; +#X connect 13 0 12 0; +#X connect 14 0 13 0; +#X connect 15 0 14 0; +#X connect 15 1 9 0; +#X connect 15 2 8 0; +#X connect 16 0 10 0; +#X connect 17 0 21 0; +#X connect 17 0 22 0; +#X connect 19 0 13 1; +#X connect 20 0 2 0; +#X connect 21 0 18 0; -- cgit v1.2.1