From 2a43e4f6c23855da01f31df4b1819635dfa36d9d Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Mon, 23 Sep 2002 02:05:30 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r137, which included commits to RCS files with non-trunk default branches.

svn path=/trunk/externals/olafmatt/; revision=138
---
 clone/sigab.pd         | 56 ++++++++++++++++++++++++++++++++++++++++++++++++++
 clone/sigtest-clone.pd | 37 +++++++++++++++++++++++++++++++++
 2 files changed, 93 insertions(+)
 create mode 100644 clone/sigab.pd
 create mode 100644 clone/sigtest-clone.pd

(limited to 'clone')

diff --git a/clone/sigab.pd b/clone/sigab.pd
new file mode 100644
index 0000000..3ba5475
--- /dev/null
+++ b/clone/sigab.pd
@@ -0,0 +1,56 @@
+#N canvas 207 82 727 489 12;
+#X obj 222 385 outlet;
+#X floatatom 410 269 5 0 0;
+#X msg 410 198 bang;
+#X obj 410 227 float \$0;
+#X text 118 38 but \$1 is always the number of the current instance
+!;
+#X text 118 56 \$0 works as usual;
+#X text 117 20 you can get the creation arguments with \$2 \, \$3 ...
+as usual;
+#X floatatom 495 268 5 0 0;
+#X msg 495 197 bang;
+#X floatatom 580 266 5 0 0;
+#X msg 580 195 bang;
+#X obj 580 224 float \$2;
+#X obj 495 225 float \$1;
+#X obj 222 243 float \$1;
+#X obj 222 334 pack f f;
+#X obj 329 211 float \$1;
+#X obj 294 244 * 1;
+#X obj 264 164 t b f b;
+#X obj 21 384 outlet~;
+#X obj 23 273 osc~ 440;
+#X obj 21 345 *~ 0.125;
+#X obj 117 384 outlet~;
+#X obj 117 345 *~ 0.125;
+#X obj 38 114 inlet~;
+#X obj 117 295 *~ 0;
+#X obj 151 242 / 100;
+#X obj 216 113 inlet;
+#X obj 113 117 inlet~;
+#X obj 23 311 *~;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 8 0 12 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 0;
+#X connect 12 0 7 0;
+#X connect 13 0 14 0;
+#X connect 14 0 0 0;
+#X connect 15 0 16 1;
+#X connect 16 0 14 1;
+#X connect 17 0 13 0;
+#X connect 17 1 16 0;
+#X connect 17 1 25 0;
+#X connect 17 1 19 0;
+#X connect 17 2 15 0;
+#X connect 19 0 28 0;
+#X connect 20 0 18 0;
+#X connect 22 0 21 0;
+#X connect 23 0 28 1;
+#X connect 24 0 22 0;
+#X connect 25 0 24 1;
+#X connect 26 0 17 0;
+#X connect 27 0 24 0;
+#X connect 28 0 20 0;
diff --git a/clone/sigtest-clone.pd b/clone/sigtest-clone.pd
new file mode 100644
index 0000000..988db82
--- /dev/null
+++ b/clone/sigtest-clone.pd
@@ -0,0 +1,37 @@
+#N canvas 123 -3 665 574 12;
+#X text 136 67 written by Olaf Matthes <olaf.matthes@gmx.de>;
+#X floatatom 142 282 5 0 0;
+#X text 61 7 clone :: route a list according to first element to one
+;
+#X text 133 26 instance of a subpatch \, process data and output;
+#X text 134 44 the result...;
+#X msg 43 157 show 2;
+#X msg 59 185 show 8;
+#X text 103 156 show instance <number>;
+#X obj 109 503 print outlet;
+#X text 275 217 reload N instances (with creation arguments);
+#X msg 142 396 \$1 \$2;
+#X floatatom 154 315 5 0 0;
+#X obj 154 342 t b f;
+#X obj 142 369 pack f f;
+#X text 192 282 number of instance (0 = all);
+#X text 238 445 "clone <subpatch> <instances> (<creation args>)";
+#X obj 43 443 clone sigab 2;
+#X obj 43 500 dac~;
+#X msg 75 218 reload sigab 8 23;
+#X obj 20 122 noise~;
+#X obj 65 396 osc~ 440;
+#X connect 1 0 13 0;
+#X connect 5 0 16 0;
+#X connect 6 0 16 0;
+#X connect 10 0 16 2;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 12 1 13 1;
+#X connect 13 0 10 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 16 2 8 0;
+#X connect 18 0 16 0;
+#X connect 19 0 16 0;
+#X connect 20 0 16 1;
-- 
cgit v1.2.1