added clone of IEMLIB's for++

svn path=/trunk/abstractions/purepd/; revision=6026

2 files changed, 137 insertions, 0 deletions

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 <int> first number;
+#X text 121 72 <int> 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: <int> last number;
+#X text 235 32 1.arg: <int> 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: <float> increment-delay in ms;
+#X text 172 92 <float> 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;