From 0e347f96730d3162c8970e853c6e2c59317b86ce Mon Sep 17 00:00:00 2001 From: Frank Barknecht Date: Mon, 25 Sep 2006 15:58:22 +0000 Subject: added clone of IEMLIB's for++ svn path=/trunk/abstractions/purepd/; revision=6026 --- for++-help.pd | 71 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ for++.pd | 66 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 137 insertions(+) create mode 100644 for++-help.pd create mode 100644 for++.pd diff --git a/for++-help.pd b/for++-help.pd new file mode 100644 index 0000000..710dea9 --- /dev/null +++ b/for++-help.pd @@ -0,0 +1,71 @@ +#N canvas 359 334 702 405 10; +#X text 9 235 (c) musil@iem.kug.ac.at; +#X text 51 248 IEM KUG; +#X text 26 260 graz \, austria 2001; +#X obj 25 52 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X obj 64 186 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 -1 +-1; +#X floatatom 64 61 4 0 0 0 - - -; +#X floatatom 121 88 4 0 0 0 - - -; +#X floatatom 64 163 4 0 0 0 - - -; +#X floatatom 178 110 4 0 0 0 - - -; +#X text 7 8 for++; +#X obj 111 166 print; +#X msg 25 71 start; +#X msg 25 91 stop; +#X text 63 47 first number; +#X text 121 72 last number; +#X obj 237 213 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X floatatom 237 190 4 0 0 0 - - -; +#X obj 280 186 print; +#X obj 237 143 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X text 235 44 2.arg: last number; +#X text 235 32 1.arg: first number; +#X obj 165 166 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X obj 337 193 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X text 67 9 counter in time-intervals; +#X text 163 181 finished; +#X text 336 208 finished; +#X obj 237 264 print finished; +#X obj 509 141 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X obj 629 184 bng 15 250 50 0 empty empty empty 8 -8 0 10 -262144 +-1 -1; +#X text 628 199 finished; +#X obj 509 208 timer; +#X obj 509 183 sel 0 1000; +#X floatatom 509 231 5 0 0 1 1234? - -; +#X text 235 56 3.arg: increment-delay in ms; +#X text 172 92 increment-delay in ms; +#X text 40 19 increment-step-size is allways 1 or -1; +#X obj 64 132 for++ 10 20 200; +#X obj 237 161 for++ 50 40 100; +#X obj 509 160 for++ 0 1000 1.234; +#X connect 3 0 36 0; +#X connect 5 0 36 0; +#X connect 6 0 36 1; +#X connect 7 0 4 0; +#X connect 8 0 36 2; +#X connect 11 0 36 0; +#X connect 12 0 36 0; +#X connect 16 0 15 0; +#X connect 18 0 37 0; +#X connect 21 0 26 0; +#X connect 22 0 26 0; +#X connect 27 0 38 0; +#X connect 30 0 32 0; +#X connect 31 0 30 0; +#X connect 31 1 30 1; +#X connect 36 0 7 0; +#X connect 36 0 10 0; +#X connect 36 1 21 0; +#X connect 37 0 16 0; +#X connect 37 0 17 0; +#X connect 37 1 22 0; +#X connect 38 0 31 0; +#X connect 38 1 28 0; diff --git a/for++.pd b/for++.pd new file mode 100644 index 0000000..343ad8f --- /dev/null +++ b/for++.pd @@ -0,0 +1,66 @@ +#N canvas 280 169 721 581 10; +#X obj 28 35 inlet; +#X obj 390 35 inlet; +#X obj 505 39 inlet; +#X obj 243 322 + 1; +#X obj 28 61 route bang start stop; +#X obj 28 205 float \$1; +#X obj 304 137 int \$1; +#X obj 390 140 int \$2; +#X obj 162 334 select \$2; +#X obj 58 436 outlet; +#X msg 243 258 clear; +#X obj 162 357 t b b; +#X obj 192 397 outlet; +#X obj 304 36 loadbang; +#X obj 243 294 pipe \$3; +#X obj 304 64 t b b; +#X obj 28 235 t a a; +#X text 247 401 finished; +#X text 108 436 output; +#N canvas 0 0 450 300 up-or-down 0; +#X obj 127 96 t b a; +#X msg 127 176 -1; +#X obj 127 128 <; +#X obj 127 151 select 0; +#X obj 127 57 inlet; +#X obj 79 56 inlet; +#X obj 127 218 outlet; +#X connect 0 0 2 0; +#X connect 0 1 2 1; +#X connect 1 0 6 0; +#X connect 2 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 6 0; +#X connect 4 0 0 0; +#X connect 5 0 2 0; +#X restore 304 165 pd up-or-down; +#X obj 28 89 t b b b; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 14 1; +#X connect 3 0 5 0; +#X connect 4 0 20 0; +#X connect 4 1 20 0; +#X connect 4 2 10 0; +#X connect 4 3 6 1; +#X connect 5 0 16 0; +#X connect 6 0 5 1; +#X connect 6 0 19 0; +#X connect 7 0 19 1; +#X connect 7 0 8 1; +#X connect 8 0 11 0; +#X connect 8 1 14 0; +#X connect 10 0 14 0; +#X connect 11 0 10 0; +#X connect 11 1 12 0; +#X connect 13 0 15 0; +#X connect 14 0 3 0; +#X connect 15 0 6 0; +#X connect 15 1 7 0; +#X connect 16 0 8 0; +#X connect 16 1 9 0; +#X connect 19 0 3 1; +#X connect 20 0 5 0; +#X connect 20 1 10 0; +#X connect 20 2 6 0; -- cgit v1.2.1