From 91b9f6f342524c42239c8ea22ebb6a548d3c0b3d Mon Sep 17 00:00:00 2001
From: Frank Barknecht <fbar@users.sourceforge.net>
Date: Sat, 1 Nov 2008 11:10:42 +0000
Subject: added clone of Max uzi

svn path=/trunk/abstractions/purepd/; revision=10353
---
 uzi-help.pd | 41 +++++++++++++++++++++++++++++++++++++++
 uzi.pd      | 64 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 105 insertions(+)
 create mode 100644 uzi-help.pd
 create mode 100644 uzi.pd

diff --git a/uzi-help.pd b/uzi-help.pd
new file mode 100644
index 0000000..b126543
--- /dev/null
+++ b/uzi-help.pd
@@ -0,0 +1,41 @@
+#N canvas 309 202 633 494 10;
+#X floatatom 207 259 5 0 0 1 set_number_of_bangs - -;
+#X obj 144 383 print BANG;
+#X obj 167 340 print LAST;
+#X obj 190 308 print NUM;
+#X msg 144 125 bang;
+#X obj 255 176 select 5;
+#X msg 255 202 pause;
+#X msg 192 123 continue;
+#X obj 326 177 select 8;
+#X msg 326 203 break;
+#X msg 262 123 resume;
+#X obj 255 154 spigot;
+#X obj 308 153 tgl 15 0 empty empty test_pause 17 7 1 10 -262144 -1
+-1 1 1;
+#X text 141 62 send a specified nr of bangs as fast as possible;
+#X text 141 34 clone of Max' [uzi];
+#X text 384 204 pause the loop;
+#X text 329 123 resume the loop;
+#X text 273 308 number of current bang;
+#X floatatom 190 291 5 0 0 0 - - -;
+#X text 264 342 bang after last bang;
+#X text 235 386 current bang;
+#X obj 144 257 unzi 10;
+#X obj 93 33 unzi;
+#X connect 0 0 21 1;
+#X connect 4 0 21 0;
+#X connect 5 0 6 0;
+#X connect 5 1 8 0;
+#X connect 6 0 21 0;
+#X connect 7 0 21 0;
+#X connect 8 0 9 0;
+#X connect 9 0 21 0;
+#X connect 10 0 21 0;
+#X connect 11 0 5 0;
+#X connect 12 0 11 1;
+#X connect 18 0 3 0;
+#X connect 21 0 1 0;
+#X connect 21 1 2 0;
+#X connect 21 2 11 0;
+#X connect 21 2 18 0;
diff --git a/uzi.pd b/uzi.pd
new file mode 100644
index 0000000..2610fb2
--- /dev/null
+++ b/uzi.pd
@@ -0,0 +1,64 @@
+#N canvas 530 136 725 594 10;
+#N canvas 214 258 450 300 countup 0;
+#X obj 139 133 + 1;
+#X obj 110 73 inlet;
+#X obj 163 71 inlet;
+#X obj 110 101 b;
+#X obj 110 168 outlet;
+#X msg 163 92 1;
+#X obj 110 132 f 1;
+#X connect 0 0 6 1;
+#X connect 1 0 3 0;
+#X connect 2 0 5 0;
+#X connect 3 0 6 0;
+#X connect 5 0 6 1;
+#X connect 6 0 0 0;
+#X connect 6 0 4 0;
+#X restore 92 303 pd countup;
+#X obj 463 116 inlet;
+#X obj 92 51 inlet;
+#X obj 92 266 until;
+#X obj 92 241 max 0;
+#X obj 356 457 outlet;
+#X obj 92 387 swap \$1;
+#X obj 92 421 -;
+#X obj 88 541 outlet;
+#X obj 143 543 outlet;
+#X obj 143 505 select 0;
+#X text 220 506 send last bang when we reach 0;
+#X text 411 458 nr. of bangs;
+#X obj 197 233 b;
+#X obj 92 446 t a b a;
+#X obj 249 138 b;
+#X obj 92 119 f \$1;
+#X obj 92 144 t a b;
+#X obj 92 85 route bang pause break continue resume;
+#X obj 92 327 t float float;
+#X text 154 446 store remainder above;
+#X obj 92 216 f;
+#X connect 0 0 19 0;
+#X connect 1 0 6 1;
+#X connect 1 0 16 1;
+#X connect 2 0 18 0;
+#X connect 3 0 0 0;
+#X connect 4 0 3 0;
+#X connect 6 0 7 0;
+#X connect 6 1 7 1;
+#X connect 7 0 14 0;
+#X connect 10 0 9 0;
+#X connect 13 0 3 1;
+#X connect 14 0 10 0;
+#X connect 14 1 8 0;
+#X connect 14 2 21 1;
+#X connect 15 0 21 0;
+#X connect 16 0 17 0;
+#X connect 17 0 21 0;
+#X connect 17 1 0 1;
+#X connect 18 0 16 0;
+#X connect 18 1 13 0;
+#X connect 18 2 13 0;
+#X connect 18 3 15 0;
+#X connect 18 4 15 0;
+#X connect 19 0 6 0;
+#X connect 19 1 5 0;
+#X connect 21 0 4 0;
-- 
cgit v1.2.1