From e95c23e9ba17c5a7fcc2ac51d5aa8ec6c3096fe3 Mon Sep 17 00:00:00 2001
From: Luke Iannini <lukeiannini@users.sourceforge.net>
Date: Sat, 21 Jun 2008 17:34:17 +0000
Subject: fixed a bug in controctopus demonstration (-help), renamed
 midi-tentacle generator to something slightly less obfuscated

svn path=/trunk/abstractions/senderfruit/; revision=10062
---
 controctopus/grow-tentacles.pd | 90 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 90 insertions(+)
 create mode 100644 controctopus/grow-tentacles.pd

(limited to 'controctopus/grow-tentacles.pd')

diff --git a/controctopus/grow-tentacles.pd b/controctopus/grow-tentacles.pd
new file mode 100644
index 0000000..d3b754e
--- /dev/null
+++ b/controctopus/grow-tentacles.pd
@@ -0,0 +1,90 @@
+#N canvas 636 218 493 407 10;
+#X obj -35 84 r \$1/controlsList;
+#X obj -35 110 list prepend \$1;
+#X obj -35 243 list prepend;
+#X obj 44 218 r \$0x;
+#X obj -35 195 list prepend;
+#X obj 44 171 r \$0y;
+#X obj -35 136 t a b;
+#X obj 238 284 f 0;
+#X obj 238 359 s \$0y;
+#X obj 270 284 + 1;
+#X obj 321 287 f 0;
+#X obj 353 287 + 1;
+#X obj 321 342 s \$0x;
+#X obj 9 136 s \$0count;
+#X obj 238 255 r \$0count;
+#X obj 321 256 r \$0count;
+#X obj 238 309 div 8;
+#X obj 385 287 mod 8;
+#N canvas 50 247 1320 500 \$0controls 0;
+#X restore 148 10 pd \$0controls;
+#X obj -35 350 s pd-\$0controls;
+#X obj 302 11 loadbang;
+#X msg 302 38 clear;
+#X obj 302 62 s pd-\$0controls;
+#X obj 321 316 * 160;
+#X obj 238 333 * 80;
+#X msg 148 194 vis 1;
+#X obj 148 219 s pd-\$0controls;
+#X obj 175 113 s \$1/getControls;
+#X obj 301 101 cnv 15 15 15 empty empty g 2 7 0 14 -231960 -66577 0
+;
+#X obj 312 101 cnv 15 15 15 empty empty r 2 7 0 14 -181753 -66577 0
+;
+#X obj 323 101 cnv 15 15 15 empty empty o 2 7 0 14 -232778 -66577 0
+;
+#X obj 334 101 cnv 15 15 15 empty empty w 2 7 0 14 -36361 -66577 0
+;
+#X obj 345 101 cnv 15 15 15 empty empty G 2 7 0 14 -32312 -66577 0
+;
+#X obj 356 101 cnv 15 15 15 empty empty R 2 7 0 14 -230614 -66577 0
+;
+#X obj 367 101 cnv 15 15 15 empty empty O 2 7 0 14 -230961 -66577 0
+;
+#X obj 378 101 cnv 14 14 15 empty empty W 2 7 0 14 -221241 -66577 0
+;
+#X obj 301 114 cnv 15 91 45 empty empty \$1 2 7 0 11 -20537 -150464
+0;
+#X obj 303 143 bng 15 250 50 0 \$0show \$0showR Show 17 7 0 11 -174336
+-1 -183899;
+#X obj 303 126 bng 15 250 50 0 \$0getControls \$0getControlsR Generate
+17 7 0 11 -49136 -1 -239456;
+#X obj 148 172 r \$0show;
+#X obj 148 70 r \$0getControls;
+#X msg -35 269 obj \$1 \$2 midi-tentacle \$3 \$4;
+#X obj -35 295 list append \$2;
+#X obj -35 317 list trim;
+#X obj 148 91 t b b;
+#X obj 148 135 s \$0show;
+#X connect 0 0 1 0;
+#X connect 1 0 6 0;
+#X connect 2 0 41 0;
+#X connect 3 0 2 1;
+#X connect 4 0 2 0;
+#X connect 5 0 4 1;
+#X connect 6 0 4 0;
+#X connect 6 1 13 0;
+#X connect 7 0 9 0;
+#X connect 7 0 16 0;
+#X connect 9 0 7 1;
+#X connect 10 0 11 0;
+#X connect 10 0 23 0;
+#X connect 11 0 17 0;
+#X connect 14 0 7 0;
+#X connect 15 0 10 0;
+#X connect 16 0 24 0;
+#X connect 17 0 10 1;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 23 0 12 0;
+#X connect 24 0 8 0;
+#X connect 25 0 26 0;
+#X connect 39 0 25 0;
+#X connect 40 0 44 0;
+#X connect 41 0 42 0;
+#X connect 42 0 43 0;
+#X connect 43 0 19 0;
+#X connect 44 0 45 0;
+#X connect 44 1 27 0;
+#X coords 0 -1 1 1 93 60 2 300 100;
-- 
cgit v1.2.1