[PD-cvs] SF.net SVN: pure-data:[10215] trunk/abstractions/senderfruit/semento

[lukeiannini at users.sourceforge.net]

Revision: 10215
          http://pure-data.svn.sourceforge.net/pure-data/?rev=10215&view=rev
Author:   lukeiannini
Date:     2008-07-24 09:59:49 +0000 (Thu, 24 Jul 2008)

Log Message:
-----------
renamed

Added Paths:
-----------
    trunk/abstractions/senderfruit/semento/commun-c-constrain.pd
    trunk/abstractions/senderfruit/semento/commun-c-ez.pd
    trunk/abstractions/senderfruit/semento/commun-c-justosc-help.pd
    trunk/abstractions/senderfruit/semento/commun-c-justosc.pd
    trunk/abstractions/senderfruit/semento/commun-c-scale-ez.pd
    trunk/abstractions/senderfruit/semento/commun-c-scale-help.pd
    trunk/abstractions/senderfruit/semento/commun-c-scale.pd
    trunk/abstractions/senderfruit/semento/commun-c.pd
    trunk/abstractions/senderfruit/semento/originator-p.pd
    trunk/abstractions/senderfruit/semento/rradical.state-p.pd

Removed Paths:
-------------
    trunk/abstractions/senderfruit/semento/sft.commun.ez.pd
    trunk/abstractions/senderfruit/semento/sft.commun.pd
    trunk/abstractions/senderfruit/semento/sft.commun.sc-help.pd
    trunk/abstractions/senderfruit/semento/sft.commun.sc.constrain.pd
    trunk/abstractions/senderfruit/semento/sft.commun.sc.ez.pd
    trunk/abstractions/senderfruit/semento/sft.commun.sc.pd
    trunk/abstractions/senderfruit/semento/sft.commun.x-help.pd
    trunk/abstractions/senderfruit/semento/sft.commun.x.pd
    trunk/abstractions/senderfruit/semento/sft.originator.pd
    trunk/abstractions/senderfruit/semento/sft.rradical.state.pd

Copied: trunk/abstractions/senderfruit/semento/commun-c-constrain.pd (from rev 10214, trunk/abstractions/senderfruit/semento/sft.commun.sc.constrain.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/commun-c-constrain.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/commun-c-constrain.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,189 @@
+#N canvas 286 32 505 662 10;
+#X obj 12 11 inlet;
+#X obj 108 565 outlet;
+#X text 5 93 RRADICAL_MEMENTO is also in originator;
+#X obj 108 538 list;
+#X obj 132 318 expr_scale 0 1 \$3 \$4;
+#X obj 289 318 expr_scale 0 1 \$3 \$4;
+#X obj 176 371 hotpack f f;
+#X obj 45 437 demultiplex;
+#X obj 108 459 round;
+#X obj 45 370 expr_scale 0 1 \$3 \$4;
+#X obj 156 11 inlet;
+#X obj 286 11 inlet;
+#X text 63 590 Use to constrain input to a smaller subset of the full
+range. Input as relative to 0-1. Reports back what the result will
+be when scaled fully;
+#X obj 156 59 s \$0boundLowFull;
+#X obj 286 59 s \$0boundHighFull;
+#X obj 162 252 r \$0boundLowFull;
+#X obj 329 252 r \$0boundHighFull;
+#X obj 132 229 r \$0constrainLow;
+#X obj 289 230 r \$0constrainHigh;
+#X obj 329 277 t b a;
+#X obj 162 279 t b a;
+#X obj 108 415 r \$0round?;
+#X obj 45 459 t a;
+#X text 186 548 Read \$1-OSC (== \$0-OSC) \, filter by argument \$2
+;
+#X obj 45 188 deeprouteOSC \$2-normalized;
+#X obj 187 521 deeprouteOSC \$2;
+#X obj 187 497 r \$1-RRADICAL-OSC;
+#X obj 45 165 r \$1-RRADICAL-OSC;
+#X obj 12 42 prepent \$2;
+#X obj 12 69 s \$1-RRADICAL-MEMENTO;
+#X obj 108 513 route \$2;
+#X obj 108 489 r \$1-in;
+#X text 191 538 ^;
+#N canvas 0 22 221 199 handleArgs 0;
+#X obj 26 26 loadbang;
+#X msg 26 127 1;
+#X obj 26 102 sel round hide;
+#X obj 26 149 s \$0round?;
+#X obj 26 78 list-drip;
+#X obj 95 149 s \$0hide?;
+#X obj 26 53 list append \$5 \$6;
+#X connect 0 0 6 0;
+#X connect 1 0 3 0;
+#X connect 2 0 1 0;
+#X connect 2 1 5 0;
+#X connect 4 0 2 0;
+#X connect 6 0 4 0;
+#X restore 297 108 pd handleArgs;
+#N canvas 0 22 390 211 listParams 0;
+#X obj 31 79 spigot 1;
+#X msg 161 62 0;
+#X obj 161 39 r \$0hide?;
+#X obj 31 49 r \$1/listParams;
+#X obj 31 136 s \$1/returnParams;
+#X obj 31 106 list append \$2-normalized;
+#X text 16 161 listParams is used by Controctopus \, so we return a
+special address for 0-1 data input only;
+#X connect 0 0 5 0;
+#X connect 1 0 0 1;
+#X connect 2 0 1 0;
+#X connect 3 0 0 0;
+#X connect 5 0 4 0;
+#X restore 297 133 pd listParams;
+#N canvas 0 22 352 303 receiveConstraints 0;
+#X obj 80 156 unpack f f;
+#X obj 80 200 s \$0constrainLow;
+#X obj 137 178 s \$0constrainHigh;
+#X obj 16 50 loadbang;
+#X msg 16 75 0 1;
+#X obj 80 115 list;
+#X obj 131 115 t a a;
+#X obj 80 87 route get;
+#X text 62 264 Used to recall the 0-1 ranged constraint;
+#X obj 80 20 r \$1-RRADICAL-OSC;
+#X obj 64 245 s \$1-COMMUN-RESPONSE;
+#X obj 80 43 deeprouteOSC \$2-constrain;
+#X obj 64 224 prepent \$2-constrained-to-0-1;
+#X text 145 68 Save the constraints;
+#X obj 147 87 commun \$2-constraints \$1;
+#X connect 0 0 1 0;
+#X connect 0 1 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 0 0;
+#X connect 4 0 5 1;
+#X connect 5 0 0 0;
+#X connect 5 0 12 0;
+#X connect 6 0 0 0;
+#X connect 6 1 5 1;
+#X connect 7 0 5 0;
+#X connect 7 1 6 0;
+#X connect 7 1 14 0;
+#X connect 9 0 11 0;
+#X connect 11 0 7 0;
+#X connect 12 0 10 0;
+#X connect 14 0 6 0;
+#X restore 297 157 pd receiveConstraints;
+#N canvas 323 119 442 277 constraintsFeedback 0;
+#X obj 19 35 inlet;
+#X obj 19 63 t a a b;
+#X msg 58 85 1;
+#X obj 19 128 spigot;
+#X obj 38 107 s \$1\$2/constraint/lookup/call;
+#X obj 67 129 r \$1\$2/constraint/lookup/response;
+#X obj 67 151 t a b;
+#X msg 94 173 0;
+#X obj 19 234 s \$1-COMMUN-RESPONSE;
+#X obj 19 213 prepent \$2-constrained-to;
+#X text 126 164 Only allow one or the other;
+#X text 79 31 Allows one to replace the "scaled output" response with
+something prettier (e.g. \, if it actually corresponds to a waveform
+selector \, you can return the names);
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 1 1 4 0;
+#X connect 1 2 2 0;
+#X connect 2 0 3 1;
+#X connect 3 0 9 0;
+#X connect 5 0 6 0;
+#X connect 6 0 9 0;
+#X connect 6 1 7 0;
+#X connect 7 0 3 1;
+#X connect 9 0 8 0;
+#X restore 176 396 pd constraintsFeedback;
+#N canvas 488 62 303 238 receiveMultiplier 1;
+#X obj 133 63 commun \$2-multiplier \$1;
+#X obj 72 15 r \$1-RRADICAL-OSC;
+#X obj 72 38 deeprouteOSC \$2-multiplier;
+#X obj 72 63 route get;
+#X obj 72 98 f;
+#X obj 38 171 prepent \$2-multiplier-is;
+#X obj 38 194 s \$1-COMMUN-RESPONSE;
+#X obj 72 134 s \$0multiplier;
+#X obj 123 98 t a a;
+#X obj 7 17 loadbang;
+#X msg 7 42 1;
+#X connect 0 0 8 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 1 0 0;
+#X connect 3 1 8 0;
+#X connect 4 0 7 0;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 8 0 7 0;
+#X connect 8 1 4 1;
+#X connect 9 0 10 0;
+#X connect 10 0 7 0;
+#X restore 297 181 pd receiveMultiplier;
+#X obj 81 391 r \$0multiplier;
+#X obj 45 408 *;
+#X connect 0 0 28 0;
+#X connect 3 0 1 0;
+#X connect 4 0 6 0;
+#X connect 4 0 9 3;
+#X connect 5 0 6 1;
+#X connect 5 0 9 4;
+#X connect 6 0 36 0;
+#X connect 7 0 22 0;
+#X connect 7 1 8 0;
+#X connect 8 0 22 0;
+#X connect 9 0 39 0;
+#X connect 10 0 13 0;
+#X connect 11 0 14 0;
+#X connect 15 0 20 0;
+#X connect 16 0 19 0;
+#X connect 17 0 4 0;
+#X connect 18 0 5 0;
+#X connect 19 0 5 0;
+#X connect 19 1 5 4;
+#X connect 19 1 4 4;
+#X connect 20 0 4 0;
+#X connect 20 1 5 3;
+#X connect 20 1 4 3;
+#X connect 21 0 7 1;
+#X connect 22 0 3 0;
+#X connect 24 0 9 0;
+#X connect 25 0 3 0;
+#X connect 26 0 25 0;
+#X connect 27 0 24 0;
+#X connect 28 0 29 0;
+#X connect 30 0 3 0;
+#X connect 31 0 30 0;
+#X connect 38 0 39 1;
+#X connect 39 0 7 0;

Copied: trunk/abstractions/senderfruit/semento/commun-c-ez.pd (from rev 10214, trunk/abstractions/senderfruit/semento/sft.commun.ez.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/commun-c-ez.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/commun-c-ez.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,18 @@
+#N canvas 32 487 626 210 10;
+#X obj 21 62 commun-c \$2-\$3 \$1;
+#X obj 21 28 r \$1\$3;
+#X obj 21 92 s \$1\$3R;
+#X text 154 18 Use like commun-c.ez \$0 "uniqueID" paramName;
+#X text 154 34 UniqueID is a /ID used to allow multiple units of one
+type;
+#X text 174 53 e.g. sft.cfm /sfs1 /busA /unitA = unitA is the uniqueID
+;
+#X text 205 68 thus you'd call as commun-c.ez \$0 \$3 paramName;
+#X text 157 123 paramName is mapped to the local xers* that would usually
+be defined in the GUIcontrol. So a paramName of "baseFreq" will result
+in "\$0baseFreq" and "\$0baseFreqR" \, which is 99% of cases.;
+#X text 158 89 paramName is of course the parameter name \, but it
+also gets mapped to the commun as uniqueID-paramName.;
+#X text 434 183 *xers: [send]ers/[receive]rs;
+#X connect 0 0 2 0;
+#X connect 1 0 0 0;

Copied: trunk/abstractions/senderfruit/semento/commun-c-justosc-help.pd (from rev 10214, trunk/abstractions/senderfruit/semento/sft.commun.x-help.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/commun-c-justosc-help.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/commun-c-justosc-help.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,17 @@
+#N canvas 797 415 454 304 10;
+#X text 25 26 commun-c-justosc - Make a control visible to the OSC system
+of Memento \, without state-saving.;
+#X text 25 62 Mostly this is for buttons \, but could also work for
+other controls whose state is transient in nature.;
+#X obj 24 219 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 110 277 originator-p /system1 \$0;
+#X obj 24 143 commun-c-justosc /button1 \$0;
+#X msg 229 133 /system1/button1 bang;
+#X obj 229 159 s PDOSC;
+#X obj 229 239 s /system1/OSC;
+#X msg 229 211 /button1 bang;
+#X text 250 184 Or;
+#X connect 4 0 2 0;
+#X connect 5 0 6 0;
+#X connect 8 0 7 0;

Copied: trunk/abstractions/senderfruit/semento/commun-c-justosc.pd (from rev 10192, trunk/abstractions/senderfruit/semento/sft.commun.x.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/commun-c-justosc.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/commun-c-justosc.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,13 @@
+#N canvas 921 437 386 156 10;
+#X obj 202 38 r \$2/listParams;
+#X obj 202 65 list append \$1;
+#X obj 24 107 outlet;
+#X obj 24 30 r \$2-RRADICAL-OSC;
+#X obj 24 80 list;
+#X obj 24 54 deeprouteOSC \$1;
+#X obj 202 95 s \$2/returnParams;
+#X connect 0 0 1 0;
+#X connect 1 0 6 0;
+#X connect 3 0 5 0;
+#X connect 4 0 2 0;
+#X connect 5 0 4 0;

Copied: trunk/abstractions/senderfruit/semento/commun-c-scale-ez.pd (from rev 10214, trunk/abstractions/senderfruit/semento/sft.commun.sc.ez.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/commun-c-scale-ez.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/commun-c-scale-ez.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,13 @@
+#N canvas 33 512 438 278 10;
+#X obj 106 36 r \$1\$3;
+#X obj 106 95 s \$1\$3R;
+#X text 47 201 Receives from \$0paramName and sends to \$0paramNameR
+;
+#X text 330 223 *optional;
+#X obj 106 66 commun-c-scale \$1 \$2/\$3 \$4 \$5 \$6 \$7;
+#X text 47 171 \$3 is uniqueID like /chptrA. In Bathyscaphe that's
+\$3 \, in FXS it's \$2.;
+#X text 46 153 [commun-c-scale-ez \$0 \$3 paramName 0 5000 round* hide*]
+;
+#X connect 0 0 4 0;
+#X connect 4 0 1 0;

Copied: trunk/abstractions/senderfruit/semento/commun-c-scale-help.pd (from rev 10214, trunk/abstractions/senderfruit/semento/sft.commun.sc-help.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/commun-c-scale-help.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/commun-c-scale-help.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,36 @@
+#N canvas 731 31 478 597 10;
+#X text 130 258 Inlet 2 changes the lower scaling bound;
+#X text 228 288 Inlet 3 changes the upper scaling bound;
+#X floatatom 131 273 5 0 0 0 - - -;
+#X floatatom 232 304 5 0 0 0 - - -;
+#X floatatom 31 253 5 0 0 0 - - -;
+#X floatatom 31 363 5 0 0 0 - - -;
+#X text 29 236 Inlet 1 is the standard commun input;
+#X text 340 552 2008 Luke Iannini;
+#X text 2 573 Originally based on [commun-scale] by Frank Barknecht
+;
+#X text 13 26 Use commun-c-scale(ale) so that 0-1 values coming out
+of OSC stuff (like Controctopus) can be rescaled appropriately.;
+#X text 14 145 commun-c-scale's first and second args are swapped from
+commun-c (i.e. \$0 and /parametername);
+#X text 15 182 Optionally prepend a unique ID to the parameter when
+using with an abstraction that will have multiple copies;
+#X obj 31 327 commun-c-scale \$0 \$3/parameter 5 37;
+#X text 13 109 Don't use this for communs that are meant to store symbolic
+or list data (use regular commun-c for that).;
+#X text 34 404 * Argument 5 and 6 can be "round" and/or "hide" (the
+order doesn't matter).;
+#X text 34 434 * "hide" hides the parameter from Controctopus sniffing
+(useful to pare down the options to just the most interesting inputs).
+;
+#X text 34 476 * "round" rounds up from 0.5 increments so that an integer
+is always output (useful for communs connected to v/hdials and toggles).
+;
+#X text 14 62 0-1 data should be directed to /paramatername-normalized.
+The address /parametername still exists and will output arbitrary data.
+;
+#X text 328 537 made more confusing by;
+#X connect 2 0 12 1;
+#X connect 3 0 12 2;
+#X connect 4 0 12 0;
+#X connect 12 0 5 0;

Copied: trunk/abstractions/senderfruit/semento/commun-c-scale.pd (from rev 10214, trunk/abstractions/senderfruit/semento/sft.commun.sc.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/commun-c-scale.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/commun-c-scale.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,79 @@
+#N canvas 286 32 505 662 10;
+#X obj 12 11 inlet;
+#X obj 108 565 outlet;
+#X text 5 93 RRADICAL_MEMENTO is also in originator;
+#X obj 108 538 list;
+#X obj 45 437 demultiplex;
+#X obj 108 459 round;
+#X obj 45 370 expr_scale 0 1 \$3 \$4;
+#X obj 156 11 inlet;
+#X obj 286 11 inlet;
+#X text 63 590 Use to constrain input to a smaller subset of the full
+range. Input as relative to 0-1. Reports back what the result will
+be when scaled fully;
+#X obj 156 59 s \$0boundLowFull;
+#X obj 286 59 s \$0boundHighFull;
+#X obj 132 252 r \$0boundLowFull;
+#X obj 162 282 r \$0boundHighFull;
+#X obj 108 415 r \$0round?;
+#X obj 45 459 t a;
+#X text 186 548 Read \$1-OSC (== \$0-OSC) \, filter by argument \$2
+;
+#X obj 45 188 deeprouteOSC \$2-normalized;
+#X obj 187 521 deeprouteOSC \$2;
+#X obj 187 497 r \$1-RRADICAL-OSC;
+#X obj 45 165 r \$1-RRADICAL-OSC;
+#X obj 12 42 prepent \$2;
+#X obj 12 69 s \$1-RRADICAL-MEMENTO;
+#X obj 108 513 route \$2;
+#X obj 108 489 r \$1-in;
+#X text 191 538 ^;
+#N canvas 0 22 221 199 handleArgs 0;
+#X obj 26 26 loadbang;
+#X msg 26 127 1;
+#X obj 26 102 sel round hide;
+#X obj 26 149 s \$0round?;
+#X obj 26 78 list-drip;
+#X obj 95 149 s \$0hide?;
+#X obj 26 53 list append \$5 \$6;
+#X connect 0 0 6 0;
+#X connect 1 0 3 0;
+#X connect 2 0 1 0;
+#X connect 2 1 5 0;
+#X connect 4 0 2 0;
+#X connect 6 0 4 0;
+#X restore 348 118 pd handleArgs;
+#N canvas 0 22 390 211 listParams 0;
+#X obj 31 79 spigot 1;
+#X msg 161 62 0;
+#X obj 161 39 r \$0hide?;
+#X obj 31 49 r \$1/listParams;
+#X obj 31 136 s \$1/returnParams;
+#X obj 31 106 list append \$2-normalized;
+#X text 16 161 listParams is used by Controctopus \, so we return a
+special address for 0-1 data input only;
+#X connect 0 0 5 0;
+#X connect 1 0 0 1;
+#X connect 2 0 1 0;
+#X connect 3 0 0 0;
+#X connect 5 0 4 0;
+#X restore 347 143 pd listParams;
+#X connect 0 0 21 0;
+#X connect 3 0 1 0;
+#X connect 4 0 15 0;
+#X connect 4 1 5 0;
+#X connect 5 0 15 0;
+#X connect 6 0 4 0;
+#X connect 7 0 10 0;
+#X connect 8 0 11 0;
+#X connect 12 0 6 3;
+#X connect 13 0 6 4;
+#X connect 14 0 4 1;
+#X connect 15 0 3 0;
+#X connect 17 0 6 0;
+#X connect 18 0 3 0;
+#X connect 19 0 18 0;
+#X connect 20 0 17 0;
+#X connect 21 0 22 0;
+#X connect 23 0 3 0;
+#X connect 24 0 23 0;

Copied: trunk/abstractions/senderfruit/semento/commun-c.pd (from rev 10192, trunk/abstractions/senderfruit/semento/sft.commun.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/commun-c.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/commun-c.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,35 @@
+#N canvas 560 190 666 338 10;
+#X obj 162 41 inlet;
+#X obj 161 260 outlet;
+#X obj 161 158 r \$2-in;
+#X obj 161 208 route \$1;
+#X text 22 282 Read \$2-OSC (== \$0-OSC) \, filter by argument \$1
+;
+#X obj 162 99 s \$2-RRADICAL-MEMENTO;
+#X text 95 123 RRADICAL_MEMENTO is also in originator;
+#X obj 49 183 r \$2-RRADICAL-OSC;
+#X obj 299 164 r \$2/listParams;
+#X obj 299 221 list append \$1;
+#X obj 162 72 prepent \$1;
+#X obj 161 233 list;
+#X obj 299 194 spigot 1;
+#X obj 429 106 loadbang;
+#X obj 429 154 sel hide;
+#X msg 429 177 0;
+#X obj 429 129 list append \$3;
+#X obj 49 207 deeprouteOSC \$1;
+#X obj 299 251 s \$2/returnParams;
+#X connect 0 0 10 0;
+#X connect 2 0 3 0;
+#X connect 3 0 11 0;
+#X connect 7 0 17 0;
+#X connect 8 0 12 0;
+#X connect 9 0 18 0;
+#X connect 10 0 5 0;
+#X connect 11 0 1 0;
+#X connect 12 0 9 0;
+#X connect 13 0 16 0;
+#X connect 14 0 15 0;
+#X connect 15 0 12 1;
+#X connect 16 0 14 0;
+#X connect 17 0 11 0;

Copied: trunk/abstractions/senderfruit/semento/originator-p.pd (from rev 10214, trunk/abstractions/senderfruit/semento/sft.originator.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/originator-p.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/originator-p.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,265 @@
+#N canvas 210 71 1030 697 10;
+#X text 425 22 responsibilities:;
+#X text 98 10 ORIGINATOR (the mixing engineer);
+#X text 447 59 * set memento (restore settings from photo);
+#X text 448 40 * create memento (take photo);
+#N canvas 76 23 720 450 createMemento 0;
+#X obj 48 84 inlet;
+#X obj 97 117 symbol \$1;
+#X obj 97 90 loadbang;
+#X obj 97 150 s \$0-memento;
+#X text 75 49 \$1 is the default name of the memento \, that this originator
+creates \, but it can be changed later.;
+#X obj 74 179 outlet;
+#X text 292 108 What is a memento?;
+#X text 275 121 a memento is a directory in a global (data)pool;
+#X obj 305 139 r \$0-memento;
+#X msg 309 180 state \$1;
+#X obj 319 213 s \$0-pool;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 1 0 5 0;
+#X connect 2 0 1 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X restore 122 321 pd createMemento;
+#X obj 122 104 inlet;
+#N canvas 600 185 664 406 setMemento 0;
+#X text 238 12 setMemento is responsible for restoring all registered
+variables.;
+#X obj 64 26 inlet;
+#X obj 109 286 outlet;
+#X obj 109 249 r \$0-restore;
+#X msg 64 126 getall;
+#X obj 64 183 s \$0-pool;
+#N canvas 468 415 450 300 change2substate 0;
+#X obj 92 39 inlet;
+#X obj 113 198 outlet;
+#X obj 185 93 r \$0-memento;
+#X obj 280 93 r \$0-substate;
+#X obj 113 144 pack s s 0;
+#X obj 92 93 symbol chdir;
+#X obj 92 67 t b;
+#X obj 113 167 route list;
+#X text 218 163 un-list again;
+#X connect 0 0 6 0;
+#X connect 2 0 4 1;
+#X connect 3 0 4 2;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 7 0 1 0;
+#X restore 131 127 pd change2substate;
+#X text 186 104 change to dir memento substate;
+#X obj 64 52 t b b b;
+#X obj 130 75 s \$0-set-ON;
+#X connect 1 0 8 0;
+#X connect 3 0 2 0;
+#X connect 4 0 5 0;
+#X connect 6 0 5 0;
+#X connect 8 0 4 0;
+#X connect 8 1 6 0;
+#X connect 8 2 9 0;
+#X restore 256 446 pd setMemento;
+#X text 431 90 What is a memento?;
+#X text 463 111 a memento is a directory in a global (data)pool;
+#X text 432 135 What is a state?;
+#X obj 563 328 r \$0-pool;
+#X symbolatom 691 374 10 0 0 3 memento - -;
+#X msg 170 103 create help;
+#X msg 261 103 set memento;
+#X obj 777 348 inlet;
+#X obj 178 297 s \$0-substate;
+#X obj 828 482 r \$0-substate;
+#X msg 828 511 substate \$1;
+#X msg 99 471 copy;
+#X msg 210 472 paste;
+#X obj 134 514 s \$0-pool;
+#X obj 309 341 symbol;
+#X obj 156 440 t b b;
+#X obj 563 460 s \$2-in;
+#X obj 197 418 r \$0-set;
+#X obj 148 472 s \$0-set;
+#X obj 828 540 s \$0-pool;
+#X obj 225 274 s \$0-pool;
+#X text 819 348 OSC inlet;
+#X text 462 154 a state is the content of a memento subdirectory named
+by a number.;
+#X obj 535 273 r \$2-RRADICAL-MEMENTO;
+#X text 443 248 \$2-RRADICAL-MEMENTO is sent by commun objects;
+#X obj 777 413 s \$2-RRADICAL-OSC;
+#X obj 385 520 outlet;
+#N canvas 468 415 450 300 ch2subs 0;
+#X obj 92 39 inlet;
+#X obj 113 198 outlet;
+#X obj 185 93 r \$0-memento;
+#X obj 280 93 r \$0-substate;
+#X obj 113 144 pack s s 0;
+#X obj 92 67 t b;
+#X obj 113 167 route list;
+#X text 218 163 un-list again;
+#X obj 92 94 symbol chdir;
+#X connect 0 0 5 0;
+#X connect 2 0 4 1;
+#X connect 3 0 4 2;
+#X connect 4 0 6 0;
+#X connect 5 0 8 0;
+#X connect 6 0 1 0;
+#X connect 8 0 4 0;
+#X restore 255 252 pd ch2subs;
+#X obj 225 230 t a b;
+#X obj 563 382 spigot;
+#X obj 448 520 spigot;
+#N canvas 548 386 450 300 tgl 0;
+#X obj 155 198 outlet;
+#X obj 240 198 outlet;
+#X msg 151 120 0;
+#X msg 184 120 1;
+#X msg 233 120 0;
+#X msg 266 120 1;
+#X obj 295 55 r \$0-set-ON;
+#X obj 292 85 loadbang;
+#X obj 185 65 r \$0-get-ON;
+#X text 20 7 This tgl is to prevent some loops when using get and set.
+;
+#X connect 2 0 0 0;
+#X connect 3 0 0 0;
+#X connect 4 0 1 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 6 0 5 0;
+#X connect 7 0 5 0;
+#X connect 7 0 2 0;
+#X connect 8 0 3 0;
+#X connect 8 0 4 0;
+#X restore 486 348 pd tgl;
+#X obj 235 177 t a b;
+#X obj 287 175 s \$0-get-ON;
+#X obj 385 493 spigot;
+#X obj 448 544 outlet;
+#X text 353 541 Value outlet;
+#X text 494 545 Value/Key outlet;
+#X obj 370 228 s \$0-substate;
+#X obj 340 203 t b f;
+#X obj 23 316 s \$0-pool;
+#X obj 646 494 outlet;
+#X text 641 515 OSC outlet;
+#X obj 637 461 OSCprepend \$1;
+#X msg 720 487 setsub \$1;
+#X obj 720 547 s \$0-setsub;
+#X obj 173 77 r \$0-setsub;
+#X obj 161 378 select copy paste set;
+#X obj 122 132 route create substate get setsub;
+#X obj 340 251 s \$0-set;
+#X obj 25 261 symbol;
+#X obj 101 267 symbol;
+#X obj 12 220 t b a;
+#X msg 12 360 set;
+#X text 12 382 after loadx \, set;
+#X obj 12 77 r SET_ALL_RRADICALS;
+#X obj 818 245 r \$0-substate;
+#X text 795 218 \$2 == \$0 parent;
+#X msg 818 270 set \$1;
+#X obj 818 298 s \$2-parentstate;
+#X msg 745 513 /preset \$1;
+#X obj 563 351 rradical.state-p \$1;
+#X obj 262 77 r \$2-localSave;
+#X text 14 47 global send to do something crazy with!;
+#X obj 262 56 r \$1-localSetsub;
+#X obj 22 197 route lddir svdir;
+#X msg 23 285 lddir \$1;
+#X msg 102 289 svdir \$1;
+#X obj 884 377 r \$1/OSC;
+#X obj 731 308 r PDOSC;
+#X obj 77 580 r \$1/getParams;
+#X obj 77 619 s \$2/listParams;
+#X text 85 599 Dispatch to commun-cs;
+#X obj 563 419 prepent RRADICAL.dummy;
+#X obj 535 300 prepent set;
+#X obj 448 493 prepent RRADICAL.dummy;
+#X obj 235 196 prepent get;
+#X obj 816 32 r \$2-COMMUN-RESPONSE;
+#X obj 816 86 s PDOSC;
+#X obj 816 60 OSCprepend \$1;
+#X obj 764 437 routeOSC /preset /substate;
+#X obj 777 377 deeprouteOSC \$1;
+#X obj 247 579 r \$2/returnParams;
+#X obj 247 619 s \$1/paramsList;
+#X connect 5 0 55 0;
+#X connect 10 0 68 0;
+#X connect 11 0 50 1;
+#X connect 12 0 55 0;
+#X connect 13 0 55 0;
+#X connect 14 0 88 0;
+#X connect 16 0 17 0;
+#X connect 16 0 67 0;
+#X connect 17 0 26 0;
+#X connect 18 0 20 0;
+#X connect 19 0 20 0;
+#X connect 21 0 54 0;
+#X connect 22 0 25 0;
+#X connect 22 1 19 0;
+#X connect 24 0 6 0;
+#X connect 30 0 50 0;
+#X connect 30 0 81 0;
+#X connect 34 0 27 0;
+#X connect 35 0 27 0;
+#X connect 35 1 34 0;
+#X connect 36 0 80 0;
+#X connect 37 0 42 0;
+#X connect 38 0 37 1;
+#X connect 38 0 41 1;
+#X connect 38 1 36 1;
+#X connect 39 0 83 0;
+#X connect 39 1 40 0;
+#X connect 41 0 33 0;
+#X connect 46 0 56 0;
+#X connect 46 1 45 0;
+#X connect 50 0 48 0;
+#X connect 51 0 52 0;
+#X connect 53 0 55 0;
+#X connect 54 0 18 0;
+#X connect 54 1 22 0;
+#X connect 54 2 6 0;
+#X connect 55 0 4 0;
+#X connect 55 1 15 0;
+#X connect 55 2 39 0;
+#X connect 55 3 46 0;
+#X connect 55 4 21 0;
+#X connect 55 4 72 0;
+#X connect 57 0 73 0;
+#X connect 58 0 74 0;
+#X connect 59 0 60 0;
+#X connect 59 1 57 0;
+#X connect 60 0 21 0;
+#X connect 62 0 55 0;
+#X connect 63 0 65 0;
+#X connect 65 0 66 0;
+#X connect 67 0 50 0;
+#X connect 68 0 36 0;
+#X connect 68 0 41 0;
+#X connect 68 0 82 0;
+#X connect 68 1 80 1;
+#X connect 68 1 82 1;
+#X connect 68 2 11 0;
+#X connect 69 0 55 0;
+#X connect 71 0 55 0;
+#X connect 72 0 59 0;
+#X connect 72 1 58 0;
+#X connect 73 0 47 0;
+#X connect 74 0 47 0;
+#X connect 75 0 32 0;
+#X connect 75 0 87 0;
+#X connect 76 0 88 0;
+#X connect 77 0 78 0;
+#X connect 80 0 23 0;
+#X connect 81 0 68 0;
+#X connect 82 0 37 0;
+#X connect 83 0 35 0;
+#X connect 84 0 86 0;
+#X connect 86 0 85 0;
+#X connect 87 0 51 0;
+#X connect 87 1 51 0;
+#X connect 88 0 32 0;
+#X connect 88 0 87 0;
+#X connect 89 0 90 0;

Copied: trunk/abstractions/senderfruit/semento/rradical.state-p.pd (from rev 10192, trunk/abstractions/senderfruit/semento/sft.rradical.state.pd)
===================================================================
--- trunk/abstractions/senderfruit/semento/rradical.state-p.pd	                        (rev 0)
+++ trunk/abstractions/senderfruit/semento/rradical.state-p.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -0,0 +1,220 @@
+#N canvas 33 22 1040 638 10;
+#X obj 108 454 outlet;
+#X obj 87 475 outlet;
+#X obj 173 410 print attr;
+#X obj 87 380 pool RRADICAL;
+#X obj 205 46 inlet;
+#X obj 42 331 r \$0-pool;
+#X obj 356 373 s \$0-pool;
+#X obj 205 124 symbol \$1;
+#X obj 134 29 loadbang;
+#X msg 255 278 getdir;
+#X obj 130 433 outlet;
+#X obj 457 313 prepend get;
+#X msg 306 160 getall;
+#X obj 386 228 s \$0-substate;
+#X obj 356 203 t b f;
+#X msg 121 318 echodir \$1;
+#X obj 121 291 tgl 15 1 empty empty empty 0 -6 0 8 -262144 -1 -1 1
+1;
+#X msg 118 347 getdir;
+#X msg 137 79 bang;
+#X msg 508 190 copyall;
+#X msg 565 190 paste;
+#X obj 532 223 s \$0-pool;
+#X obj 508 136 symbol;
+#N canvas 468 415 458 308 mkchange2substate 0;
+#X obj 92 39 inlet;
+#X obj 111 224 outlet;
+#X obj 198 93 r \$0-memento;
+#X obj 293 93 r \$0-substate;
+#X obj 111 150 pack s s 0;
+#X obj 92 93 symbol mkchdir;
+#X obj 92 67 t b;
+#X obj 111 180 route list;
+#X text 204 180 Un-List it again;
+#X connect 0 0 6 0;
+#X connect 2 0 4 1;
+#X connect 3 0 4 2;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 7 0 1 0;
+#X restore 356 274 pd mkchange2substate;
+#X obj 205 160 t b b s;
+#X obj 249 209 s \$0-memento;
+#X obj 17 525 print pool;
+#X obj 205 84 route state getstate getall substate set get;
+#X obj 508 160 select copy paste;
+#X obj 698 550 s \$0-pool;
+#X obj 17 544 print svld;
+#X obj 601 373 symbol;
+#X obj 793 377 symbol;
+#X obj 17 563 print currentDir;
+#X msg 191 349 printroot;
+#N canvas 468 415 478 328 mkchange2tmp 0;
+#X obj 92 39 inlet;
+#X obj 111 224 outlet;
+#X obj 198 93 r \$0-memento;
+#X obj 92 93 symbol mkchdir;
+#X obj 92 67 t b;
+#X obj 111 180 route list;
+#X text 204 180 Un-List it again;
+#X msg 296 94 symbol tmp;
+#X obj 111 150 pack s s s;
+#X obj 296 66 loadbang;
+#X msg 167 37 bang;
+#X connect 0 0 4 0;
+#X connect 2 0 8 1;
+#X connect 3 0 8 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 7 0 8 2;
+#X connect 8 0 5 0;
+#X connect 9 0 7 0;
+#X connect 10 0 4 0;
+#X restore 623 347 pd mkchange2tmp;
+#N canvas 1317 161 462 312 mkchange2substate 0;
+#X obj 92 39 inlet;
+#X obj 111 224 outlet;
+#X obj 198 93 r \$0-memento;
+#X obj 293 93 r \$0-substate;
+#X obj 111 150 pack s s 0;
+#X obj 92 93 symbol mkchdir;
+#X obj 111 180 route list;
+#X text 204 180 Un-List it again;
+#X text 195 29 change back to substate dir;
+#X obj 92 67 t b b;
+#X msg 38 98 clrclip;
+#X connect 0 0 9 0;
+#X connect 2 0 4 1;
+#X connect 3 0 4 2;
+#X connect 4 0 6 0;
+#X connect 5 0 4 0;
+#X connect 6 0 1 0;
+#X connect 9 0 10 0;
+#X connect 9 1 5 0;
+#X connect 10 0 1 0;
+#X restore 771 424 pd mkchange2substate;
+#X obj 579 325 t b a b;
+#N canvas 405 362 623 338 sub2tmp 0;
+#X obj 121 12 inlet;
+#X obj 111 224 outlet;
+#X obj 198 93 r \$0-memento;
+#X obj 92 93 symbol mkchdir;
+#X obj 111 180 route list;
+#X text 204 180 Un-List it again;
+#X msg 36 91 paste;
+#X obj 121 40 t b b b;
+#X msg 406 90 copyall;
+#X text 189 8 copies data from current dir \, changes to "tmp" dir
+\, pastes data.;
+#X obj 293 93 symbol tmp;
+#X msg 294 47 bang;
+#X obj 359 47 loadbang;
+#X obj 111 150 pack s s s;
+#X connect 0 0 7 0;
+#X connect 2 0 13 1;
+#X connect 3 0 13 0;
+#X connect 4 0 1 0;
+#X connect 6 0 1 0;
+#X connect 7 0 6 0;
+#X connect 7 1 3 0;
+#X connect 7 2 8 0;
+#X connect 8 0 1 0;
+#X connect 10 0 13 2;
+#X connect 11 0 10 0;
+#X connect 12 0 10 0;
+#X connect 13 0 4 0;
+#X restore 815 348 pd sub2tmp;
+#X obj 771 324 t b a b;
+#X msg 536 357 bang;
+#X obj 17 582 print currentCommand;
+#X obj 661 100 t a;
+#N canvas 757 334 643 358 tmp2sub+abs1 0;
+#X obj 121 12 inlet;
+#X obj 181 257 outlet;
+#X obj 268 126 r \$0-memento;
+#X obj 363 126 r \$0-substate;
+#X obj 181 183 pack s s 0;
+#X obj 162 126 symbol mkchdir;
+#X obj 181 213 route list;
+#X text 274 213 Un-List it again;
+#X msg 106 124 paste;
+#X msg 476 123 copyall;
+#X obj 121 40 t b b b b;
+#X msg 35 125 absdir 1;
+#X text 191 19 copies data from "tmp" dir \, changes to current substate
+\, pastes data \, returns to absolute directory mode.;
+#X connect 0 0 10 0;
+#X connect 2 0 4 1;
+#X connect 3 0 4 2;
+#X connect 4 0 6 0;
+#X connect 5 0 4 0;
+#X connect 6 0 1 0;
+#X connect 8 0 1 0;
+#X connect 9 0 1 0;
+#X connect 10 0 11 0;
+#X connect 10 1 8 0;
+#X connect 10 2 5 0;
+#X connect 10 3 9 0;
+#X connect 11 0 1 0;
+#X restore 579 417 pd tmp2sub+abs1;
+#X obj 661 293 route lddir svdir;
+#X msg 793 398 absdir 0 \, svdir \$1 \, absdir 1;
+#X msg 601 393 absdir 0 \, lddir \$1;
+#X obj 407 160 prepent set;
+#X connect 3 0 1 0;
+#X connect 3 1 0 0;
+#X connect 3 2 10 0;
+#X connect 3 4 2 0;
+#X connect 4 0 27 0;
+#X connect 5 0 3 0;
+#X connect 7 0 24 0;
+#X connect 8 0 7 0;
+#X connect 9 0 6 0;
+#X connect 11 0 6 0;
+#X connect 12 0 6 0;
+#X connect 14 0 23 0;
+#X connect 14 1 13 0;
+#X connect 15 0 3 0;
+#X connect 16 0 15 0;
+#X connect 17 0 3 0;
+#X connect 18 0 7 0;
+#X connect 19 0 21 0;
+#X connect 20 0 21 0;
+#X connect 22 0 28 0;
+#X connect 23 0 6 0;
+#X connect 24 0 9 0;
+#X connect 24 1 23 0;
+#X connect 24 2 25 0;
+#X connect 27 0 7 0;
+#X connect 27 1 9 0;
+#X connect 27 2 12 0;
+#X connect 27 3 14 0;
+#X connect 27 4 47 0;
+#X connect 27 5 11 0;
+#X connect 27 6 22 0;
+#X connect 27 6 42 0;
+#X connect 28 0 19 0;
+#X connect 28 1 20 0;
+#X connect 31 0 46 0;
+#X connect 32 0 45 0;
+#X connect 34 0 3 0;
+#X connect 35 0 29 0;
+#X connect 36 0 29 0;
+#X connect 37 0 43 0;
+#X connect 37 1 31 0;
+#X connect 37 2 35 0;
+#X connect 38 0 29 0;
+#X connect 39 0 36 0;
+#X connect 39 1 32 0;
+#X connect 39 2 38 0;
+#X connect 40 0 31 0;
+#X connect 42 0 44 0;
+#X connect 43 0 29 0;
+#X connect 44 0 37 0;
+#X connect 44 1 39 0;
+#X connect 45 0 29 0;
+#X connect 46 0 29 0;
+#X connect 47 0 6 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.commun.ez.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.commun.ez.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.commun.ez.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,18 +0,0 @@
-#N canvas 32 487 626 210 10;
-#X obj 21 62 commun-c \$2-\$3 \$1;
-#X obj 21 28 r \$1\$3;
-#X obj 21 92 s \$1\$3R;
-#X text 154 18 Use like commun-c.ez \$0 "uniqueID" paramName;
-#X text 154 34 UniqueID is a /ID used to allow multiple units of one
-type;
-#X text 174 53 e.g. sft.cfm /sfs1 /busA /unitA = unitA is the uniqueID
-;
-#X text 205 68 thus you'd call as commun-c.ez \$0 \$3 paramName;
-#X text 157 123 paramName is mapped to the local xers* that would usually
-be defined in the GUIcontrol. So a paramName of "baseFreq" will result
-in "\$0baseFreq" and "\$0baseFreqR" \, which is 99% of cases.;
-#X text 158 89 paramName is of course the parameter name \, but it
-also gets mapped to the commun as uniqueID-paramName.;
-#X text 434 183 *xers: [send]ers/[receive]rs;
-#X connect 0 0 2 0;
-#X connect 1 0 0 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.commun.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.commun.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.commun.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,35 +0,0 @@
-#N canvas 560 190 666 338 10;
-#X obj 162 41 inlet;
-#X obj 161 260 outlet;
-#X obj 161 158 r \$2-in;
-#X obj 161 208 route \$1;
-#X text 22 282 Read \$2-OSC (== \$0-OSC) \, filter by argument \$1
-;
-#X obj 162 99 s \$2-RRADICAL-MEMENTO;
-#X text 95 123 RRADICAL_MEMENTO is also in originator;
-#X obj 49 183 r \$2-RRADICAL-OSC;
-#X obj 299 164 r \$2/listParams;
-#X obj 299 221 list append \$1;
-#X obj 162 72 prepent \$1;
-#X obj 161 233 list;
-#X obj 299 194 spigot 1;
-#X obj 429 106 loadbang;
-#X obj 429 154 sel hide;
-#X msg 429 177 0;
-#X obj 429 129 list append \$3;
-#X obj 49 207 deeprouteOSC \$1;
-#X obj 299 251 s \$2/returnParams;
-#X connect 0 0 10 0;
-#X connect 2 0 3 0;
-#X connect 3 0 11 0;
-#X connect 7 0 17 0;
-#X connect 8 0 12 0;
-#X connect 9 0 18 0;
-#X connect 10 0 5 0;
-#X connect 11 0 1 0;
-#X connect 12 0 9 0;
-#X connect 13 0 16 0;
-#X connect 14 0 15 0;
-#X connect 15 0 12 1;
-#X connect 16 0 14 0;
-#X connect 17 0 11 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.commun.sc-help.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.commun.sc-help.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.commun.sc-help.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,36 +0,0 @@
-#N canvas 731 31 478 597 10;
-#X text 130 258 Inlet 2 changes the lower scaling bound;
-#X text 228 288 Inlet 3 changes the upper scaling bound;
-#X floatatom 131 273 5 0 0 0 - - -;
-#X floatatom 232 304 5 0 0 0 - - -;
-#X floatatom 31 253 5 0 0 0 - - -;
-#X floatatom 31 363 5 0 0 0 - - -;
-#X text 29 236 Inlet 1 is the standard commun input;
-#X text 340 552 2008 Luke Iannini;
-#X text 2 573 Originally based on [commun-scale] by Frank Barknecht
-;
-#X text 13 26 Use commun-c-scale(ale) so that 0-1 values coming out
-of OSC stuff (like Controctopus) can be rescaled appropriately.;
-#X text 14 145 commun-c-scale's first and second args are swapped from
-commun-c (i.e. \$0 and /parametername);
-#X text 15 182 Optionally prepend a unique ID to the parameter when
-using with an abstraction that will have multiple copies;
-#X obj 31 327 commun-c-scale \$0 \$3/parameter 5 37;
-#X text 13 109 Don't use this for communs that are meant to store symbolic
-or list data (use regular commun-c for that).;
-#X text 34 404 * Argument 5 and 6 can be "round" and/or "hide" (the
-order doesn't matter).;
-#X text 34 434 * "hide" hides the parameter from Controctopus sniffing
-(useful to pare down the options to just the most interesting inputs).
-;
-#X text 34 476 * "round" rounds up from 0.5 increments so that an integer
-is always output (useful for communs connected to v/hdials and toggles).
-;
-#X text 14 62 0-1 data should be directed to /paramatername-normalized.
-The address /parametername still exists and will output arbitrary data.
-;
-#X text 328 537 made more confusing by;
-#X connect 2 0 12 1;
-#X connect 3 0 12 2;
-#X connect 4 0 12 0;
-#X connect 12 0 5 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.commun.sc.constrain.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.commun.sc.constrain.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.commun.sc.constrain.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,189 +0,0 @@
-#N canvas 286 32 505 662 10;
-#X obj 12 11 inlet;
-#X obj 108 565 outlet;
-#X text 5 93 RRADICAL_MEMENTO is also in originator;
-#X obj 108 538 list;
-#X obj 132 318 expr_scale 0 1 \$3 \$4;
-#X obj 289 318 expr_scale 0 1 \$3 \$4;
-#X obj 176 371 hotpack f f;
-#X obj 45 437 demultiplex;
-#X obj 108 459 round;
-#X obj 45 370 expr_scale 0 1 \$3 \$4;
-#X obj 156 11 inlet;
-#X obj 286 11 inlet;
-#X text 63 590 Use to constrain input to a smaller subset of the full
-range. Input as relative to 0-1. Reports back what the result will
-be when scaled fully;
-#X obj 156 59 s \$0boundLowFull;
-#X obj 286 59 s \$0boundHighFull;
-#X obj 162 252 r \$0boundLowFull;
-#X obj 329 252 r \$0boundHighFull;
-#X obj 132 229 r \$0constrainLow;
-#X obj 289 230 r \$0constrainHigh;
-#X obj 329 277 t b a;
-#X obj 162 279 t b a;
-#X obj 108 415 r \$0round?;
-#X obj 45 459 t a;
-#X text 186 548 Read \$1-OSC (== \$0-OSC) \, filter by argument \$2
-;
-#X obj 45 188 deeprouteOSC \$2-normalized;
-#X obj 187 521 deeprouteOSC \$2;
-#X obj 187 497 r \$1-RRADICAL-OSC;
-#X obj 45 165 r \$1-RRADICAL-OSC;
-#X obj 12 42 prepent \$2;
-#X obj 12 69 s \$1-RRADICAL-MEMENTO;
-#X obj 108 513 route \$2;
-#X obj 108 489 r \$1-in;
-#X text 191 538 ^;
-#N canvas 0 22 221 199 handleArgs 0;
-#X obj 26 26 loadbang;
-#X msg 26 127 1;
-#X obj 26 102 sel round hide;
-#X obj 26 149 s \$0round?;
-#X obj 26 78 list-drip;
-#X obj 95 149 s \$0hide?;
-#X obj 26 53 list append \$5 \$6;
-#X connect 0 0 6 0;
-#X connect 1 0 3 0;
-#X connect 2 0 1 0;
-#X connect 2 1 5 0;
-#X connect 4 0 2 0;
-#X connect 6 0 4 0;
-#X restore 297 108 pd handleArgs;
-#N canvas 0 22 390 211 listParams 0;
-#X obj 31 79 spigot 1;
-#X msg 161 62 0;
-#X obj 161 39 r \$0hide?;
-#X obj 31 49 r \$1/listParams;
-#X obj 31 136 s \$1/returnParams;
-#X obj 31 106 list append \$2-normalized;
-#X text 16 161 listParams is used by Controctopus \, so we return a
-special address for 0-1 data input only;
-#X connect 0 0 5 0;
-#X connect 1 0 0 1;
-#X connect 2 0 1 0;
-#X connect 3 0 0 0;
-#X connect 5 0 4 0;
-#X restore 297 133 pd listParams;
-#N canvas 0 22 352 303 receiveConstraints 0;
-#X obj 80 156 unpack f f;
-#X obj 80 200 s \$0constrainLow;
-#X obj 137 178 s \$0constrainHigh;
-#X obj 16 50 loadbang;
-#X msg 16 75 0 1;
-#X obj 80 115 list;
-#X obj 131 115 t a a;
-#X obj 80 87 route get;
-#X text 62 264 Used to recall the 0-1 ranged constraint;
-#X obj 80 20 r \$1-RRADICAL-OSC;
-#X obj 64 245 s \$1-COMMUN-RESPONSE;
-#X obj 80 43 deeprouteOSC \$2-constrain;
-#X obj 64 224 prepent \$2-constrained-to-0-1;
-#X text 145 68 Save the constraints;
-#X obj 147 87 commun \$2-constraints \$1;
-#X connect 0 0 1 0;
-#X connect 0 1 2 0;
-#X connect 3 0 4 0;
-#X connect 4 0 0 0;
-#X connect 4 0 5 1;
-#X connect 5 0 0 0;
-#X connect 5 0 12 0;
-#X connect 6 0 0 0;
-#X connect 6 1 5 1;
-#X connect 7 0 5 0;
-#X connect 7 1 6 0;
-#X connect 7 1 14 0;
-#X connect 9 0 11 0;
-#X connect 11 0 7 0;
-#X connect 12 0 10 0;
-#X connect 14 0 6 0;
-#X restore 297 157 pd receiveConstraints;
-#N canvas 323 119 442 277 constraintsFeedback 0;
-#X obj 19 35 inlet;
-#X obj 19 63 t a a b;
-#X msg 58 85 1;
-#X obj 19 128 spigot;
-#X obj 38 107 s \$1\$2/constraint/lookup/call;
-#X obj 67 129 r \$1\$2/constraint/lookup/response;
-#X obj 67 151 t a b;
-#X msg 94 173 0;
-#X obj 19 234 s \$1-COMMUN-RESPONSE;
-#X obj 19 213 prepent \$2-constrained-to;
-#X text 126 164 Only allow one or the other;
-#X text 79 31 Allows one to replace the "scaled output" response with
-something prettier (e.g. \, if it actually corresponds to a waveform
-selector \, you can return the names);
-#X connect 0 0 1 0;
-#X connect 1 0 3 0;
-#X connect 1 1 4 0;
-#X connect 1 2 2 0;
-#X connect 2 0 3 1;
-#X connect 3 0 9 0;
-#X connect 5 0 6 0;
-#X connect 6 0 9 0;
-#X connect 6 1 7 0;
-#X connect 7 0 3 1;
-#X connect 9 0 8 0;
-#X restore 176 396 pd constraintsFeedback;
-#N canvas 488 62 303 238 receiveMultiplier 1;
-#X obj 133 63 commun \$2-multiplier \$1;
-#X obj 72 15 r \$1-RRADICAL-OSC;
-#X obj 72 38 deeprouteOSC \$2-multiplier;
-#X obj 72 63 route get;
-#X obj 72 98 f;
-#X obj 38 171 prepent \$2-multiplier-is;
-#X obj 38 194 s \$1-COMMUN-RESPONSE;
-#X obj 72 134 s \$0multiplier;
-#X obj 123 98 t a a;
-#X obj 7 17 loadbang;
-#X msg 7 42 1;
-#X connect 0 0 8 0;
-#X connect 1 0 2 0;
-#X connect 2 0 3 0;
-#X connect 3 0 4 0;
-#X connect 3 1 0 0;
-#X connect 3 1 8 0;
-#X connect 4 0 7 0;
-#X connect 4 0 5 0;
-#X connect 5 0 6 0;
-#X connect 8 0 7 0;
-#X connect 8 1 4 1;
-#X connect 9 0 10 0;
-#X connect 10 0 7 0;
-#X restore 297 181 pd receiveMultiplier;
-#X obj 81 391 r \$0multiplier;
-#X obj 45 408 *;
-#X connect 0 0 28 0;
-#X connect 3 0 1 0;
-#X connect 4 0 6 0;
-#X connect 4 0 9 3;
-#X connect 5 0 6 1;
-#X connect 5 0 9 4;
-#X connect 6 0 36 0;
-#X connect 7 0 22 0;
-#X connect 7 1 8 0;
-#X connect 8 0 22 0;
-#X connect 9 0 39 0;
-#X connect 10 0 13 0;
-#X connect 11 0 14 0;
-#X connect 15 0 20 0;
-#X connect 16 0 19 0;
-#X connect 17 0 4 0;
-#X connect 18 0 5 0;
-#X connect 19 0 5 0;
-#X connect 19 1 5 4;
-#X connect 19 1 4 4;
-#X connect 20 0 4 0;
-#X connect 20 1 5 3;
-#X connect 20 1 4 3;
-#X connect 21 0 7 1;
-#X connect 22 0 3 0;
-#X connect 24 0 9 0;
-#X connect 25 0 3 0;
-#X connect 26 0 25 0;
-#X connect 27 0 24 0;
-#X connect 28 0 29 0;
-#X connect 30 0 3 0;
-#X connect 31 0 30 0;
-#X connect 38 0 39 1;
-#X connect 39 0 7 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.commun.sc.ez.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.commun.sc.ez.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.commun.sc.ez.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,13 +0,0 @@
-#N canvas 33 512 438 278 10;
-#X obj 106 36 r \$1\$3;
-#X obj 106 95 s \$1\$3R;
-#X text 47 201 Receives from \$0paramName and sends to \$0paramNameR
-;
-#X text 330 223 *optional;
-#X obj 106 66 commun-c-scale \$1 \$2/\$3 \$4 \$5 \$6 \$7;
-#X text 47 171 \$3 is uniqueID like /chptrA. In Bathyscaphe that's
-\$3 \, in FXS it's \$2.;
-#X text 46 153 [commun-c-scale-ez \$0 \$3 paramName 0 5000 round* hide*]
-;
-#X connect 0 0 4 0;
-#X connect 4 0 1 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.commun.sc.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.commun.sc.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.commun.sc.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,79 +0,0 @@
-#N canvas 286 32 505 662 10;
-#X obj 12 11 inlet;
-#X obj 108 565 outlet;
-#X text 5 93 RRADICAL_MEMENTO is also in originator;
-#X obj 108 538 list;
-#X obj 45 437 demultiplex;
-#X obj 108 459 round;
-#X obj 45 370 expr_scale 0 1 \$3 \$4;
-#X obj 156 11 inlet;
-#X obj 286 11 inlet;
-#X text 63 590 Use to constrain input to a smaller subset of the full
-range. Input as relative to 0-1. Reports back what the result will
-be when scaled fully;
-#X obj 156 59 s \$0boundLowFull;
-#X obj 286 59 s \$0boundHighFull;
-#X obj 132 252 r \$0boundLowFull;
-#X obj 162 282 r \$0boundHighFull;
-#X obj 108 415 r \$0round?;
-#X obj 45 459 t a;
-#X text 186 548 Read \$1-OSC (== \$0-OSC) \, filter by argument \$2
-;
-#X obj 45 188 deeprouteOSC \$2-normalized;
-#X obj 187 521 deeprouteOSC \$2;
-#X obj 187 497 r \$1-RRADICAL-OSC;
-#X obj 45 165 r \$1-RRADICAL-OSC;
-#X obj 12 42 prepent \$2;
-#X obj 12 69 s \$1-RRADICAL-MEMENTO;
-#X obj 108 513 route \$2;
-#X obj 108 489 r \$1-in;
-#X text 191 538 ^;
-#N canvas 0 22 221 199 handleArgs 0;
-#X obj 26 26 loadbang;
-#X msg 26 127 1;
-#X obj 26 102 sel round hide;
-#X obj 26 149 s \$0round?;
-#X obj 26 78 list-drip;
-#X obj 95 149 s \$0hide?;
-#X obj 26 53 list append \$5 \$6;
-#X connect 0 0 6 0;
-#X connect 1 0 3 0;
-#X connect 2 0 1 0;
-#X connect 2 1 5 0;
-#X connect 4 0 2 0;
-#X connect 6 0 4 0;
-#X restore 348 118 pd handleArgs;
-#N canvas 0 22 390 211 listParams 0;
-#X obj 31 79 spigot 1;
-#X msg 161 62 0;
-#X obj 161 39 r \$0hide?;
-#X obj 31 49 r \$1/listParams;
-#X obj 31 136 s \$1/returnParams;
-#X obj 31 106 list append \$2-normalized;
-#X text 16 161 listParams is used by Controctopus \, so we return a
-special address for 0-1 data input only;
-#X connect 0 0 5 0;
-#X connect 1 0 0 1;
-#X connect 2 0 1 0;
-#X connect 3 0 0 0;
-#X connect 5 0 4 0;
-#X restore 347 143 pd listParams;
-#X connect 0 0 21 0;
-#X connect 3 0 1 0;
-#X connect 4 0 15 0;
-#X connect 4 1 5 0;
-#X connect 5 0 15 0;
-#X connect 6 0 4 0;
-#X connect 7 0 10 0;
-#X connect 8 0 11 0;
-#X connect 12 0 6 3;
-#X connect 13 0 6 4;
-#X connect 14 0 4 1;
-#X connect 15 0 3 0;
-#X connect 17 0 6 0;
-#X connect 18 0 3 0;
-#X connect 19 0 18 0;
-#X connect 20 0 17 0;
-#X connect 21 0 22 0;
-#X connect 23 0 3 0;
-#X connect 24 0 23 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.commun.x-help.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.commun.x-help.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.commun.x-help.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,17 +0,0 @@
-#N canvas 797 415 454 304 10;
-#X text 25 26 commun-c-justosc - Make a control visible to the OSC system
-of Memento \, without state-saving.;
-#X text 25 62 Mostly this is for buttons \, but could also work for
-other controls whose state is transient in nature.;
-#X obj 24 219 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 110 277 originator-p /system1 \$0;
-#X obj 24 143 commun-c-justosc /button1 \$0;
-#X msg 229 133 /system1/button1 bang;
-#X obj 229 159 s PDOSC;
-#X obj 229 239 s /system1/OSC;
-#X msg 229 211 /button1 bang;
-#X text 250 184 Or;
-#X connect 4 0 2 0;
-#X connect 5 0 6 0;
-#X connect 8 0 7 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.commun.x.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.commun.x.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.commun.x.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,13 +0,0 @@
-#N canvas 921 437 386 156 10;
-#X obj 202 38 r \$2/listParams;
-#X obj 202 65 list append \$1;
-#X obj 24 107 outlet;
-#X obj 24 30 r \$2-RRADICAL-OSC;
-#X obj 24 80 list;
-#X obj 24 54 deeprouteOSC \$1;
-#X obj 202 95 s \$2/returnParams;
-#X connect 0 0 1 0;
-#X connect 1 0 6 0;
-#X connect 3 0 5 0;
-#X connect 4 0 2 0;
-#X connect 5 0 4 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.originator.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.originator.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.originator.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,265 +0,0 @@
-#N canvas 210 71 1030 697 10;
-#X text 425 22 responsibilities:;
-#X text 98 10 ORIGINATOR (the mixing engineer);
-#X text 447 59 * set memento (restore settings from photo);
-#X text 448 40 * create memento (take photo);
-#N canvas 76 23 720 450 createMemento 0;
-#X obj 48 84 inlet;
-#X obj 97 117 symbol \$1;
-#X obj 97 90 loadbang;
-#X obj 97 150 s \$0-memento;
-#X text 75 49 \$1 is the default name of the memento \, that this originator
-creates \, but it can be changed later.;
-#X obj 74 179 outlet;
-#X text 292 108 What is a memento?;
-#X text 275 121 a memento is a directory in a global (data)pool;
-#X obj 305 139 r \$0-memento;
-#X msg 309 180 state \$1;
-#X obj 319 213 s \$0-pool;
-#X connect 0 0 1 0;
-#X connect 1 0 3 0;
-#X connect 1 0 5 0;
-#X connect 2 0 1 0;
-#X connect 8 0 9 0;
-#X connect 9 0 10 0;
-#X restore 122 321 pd createMemento;
-#X obj 122 104 inlet;
-#N canvas 600 185 664 406 setMemento 0;
-#X text 238 12 setMemento is responsible for restoring all registered
-variables.;
-#X obj 64 26 inlet;
-#X obj 109 286 outlet;
-#X obj 109 249 r \$0-restore;
-#X msg 64 126 getall;
-#X obj 64 183 s \$0-pool;
-#N canvas 468 415 450 300 change2substate 0;
-#X obj 92 39 inlet;
-#X obj 113 198 outlet;
-#X obj 185 93 r \$0-memento;
-#X obj 280 93 r \$0-substate;
-#X obj 113 144 pack s s 0;
-#X obj 92 93 symbol chdir;
-#X obj 92 67 t b;
-#X obj 113 167 route list;
-#X text 218 163 un-list again;
-#X connect 0 0 6 0;
-#X connect 2 0 4 1;
-#X connect 3 0 4 2;
-#X connect 4 0 7 0;
-#X connect 5 0 4 0;
-#X connect 6 0 5 0;
-#X connect 7 0 1 0;
-#X restore 131 127 pd change2substate;
-#X text 186 104 change to dir memento substate;
-#X obj 64 52 t b b b;
-#X obj 130 75 s \$0-set-ON;
-#X connect 1 0 8 0;
-#X connect 3 0 2 0;
-#X connect 4 0 5 0;
-#X connect 6 0 5 0;
-#X connect 8 0 4 0;
-#X connect 8 1 6 0;
-#X connect 8 2 9 0;
-#X restore 256 446 pd setMemento;
-#X text 431 90 What is a memento?;
-#X text 463 111 a memento is a directory in a global (data)pool;
-#X text 432 135 What is a state?;
-#X obj 563 328 r \$0-pool;
-#X symbolatom 691 374 10 0 0 3 memento - -;
-#X msg 170 103 create help;
-#X msg 261 103 set memento;
-#X obj 777 348 inlet;
-#X obj 178 297 s \$0-substate;
-#X obj 828 482 r \$0-substate;
-#X msg 828 511 substate \$1;
-#X msg 99 471 copy;
-#X msg 210 472 paste;
-#X obj 134 514 s \$0-pool;
-#X obj 309 341 symbol;
-#X obj 156 440 t b b;
-#X obj 563 460 s \$2-in;
-#X obj 197 418 r \$0-set;
-#X obj 148 472 s \$0-set;
-#X obj 828 540 s \$0-pool;
-#X obj 225 274 s \$0-pool;
-#X text 819 348 OSC inlet;
-#X text 462 154 a state is the content of a memento subdirectory named
-by a number.;
-#X obj 535 273 r \$2-RRADICAL-MEMENTO;
-#X text 443 248 \$2-RRADICAL-MEMENTO is sent by commun objects;
-#X obj 777 413 s \$2-RRADICAL-OSC;
-#X obj 385 520 outlet;
-#N canvas 468 415 450 300 ch2subs 0;
-#X obj 92 39 inlet;
-#X obj 113 198 outlet;
-#X obj 185 93 r \$0-memento;
-#X obj 280 93 r \$0-substate;
-#X obj 113 144 pack s s 0;
-#X obj 92 67 t b;
-#X obj 113 167 route list;
-#X text 218 163 un-list again;
-#X obj 92 94 symbol chdir;
-#X connect 0 0 5 0;
-#X connect 2 0 4 1;
-#X connect 3 0 4 2;
-#X connect 4 0 6 0;
-#X connect 5 0 8 0;
-#X connect 6 0 1 0;
-#X connect 8 0 4 0;
-#X restore 255 252 pd ch2subs;
-#X obj 225 230 t a b;
-#X obj 563 382 spigot;
-#X obj 448 520 spigot;
-#N canvas 548 386 450 300 tgl 0;
-#X obj 155 198 outlet;
-#X obj 240 198 outlet;
-#X msg 151 120 0;
-#X msg 184 120 1;
-#X msg 233 120 0;
-#X msg 266 120 1;
-#X obj 295 55 r \$0-set-ON;
-#X obj 292 85 loadbang;
-#X obj 185 65 r \$0-get-ON;
-#X text 20 7 This tgl is to prevent some loops when using get and set.
-;
-#X connect 2 0 0 0;
-#X connect 3 0 0 0;
-#X connect 4 0 1 0;
-#X connect 5 0 1 0;
-#X connect 6 0 2 0;
-#X connect 6 0 5 0;
-#X connect 7 0 5 0;
-#X connect 7 0 2 0;
-#X connect 8 0 3 0;
-#X connect 8 0 4 0;
-#X restore 486 348 pd tgl;
-#X obj 235 177 t a b;
-#X obj 287 175 s \$0-get-ON;
-#X obj 385 493 spigot;
-#X obj 448 544 outlet;
-#X text 353 541 Value outlet;
-#X text 494 545 Value/Key outlet;
-#X obj 370 228 s \$0-substate;
-#X obj 340 203 t b f;
-#X obj 23 316 s \$0-pool;
-#X obj 646 494 outlet;
-#X text 641 515 OSC outlet;
-#X obj 637 461 OSCprepend \$1;
-#X msg 720 487 setsub \$1;
-#X obj 720 547 s \$0-setsub;
-#X obj 173 77 r \$0-setsub;
-#X obj 161 378 select copy paste set;
-#X obj 122 132 route create substate get setsub;
-#X obj 340 251 s \$0-set;
-#X obj 25 261 symbol;
-#X obj 101 267 symbol;
-#X obj 12 220 t b a;
-#X msg 12 360 set;
-#X text 12 382 after loadx \, set;
-#X obj 12 77 r SET_ALL_RRADICALS;
-#X obj 818 245 r \$0-substate;
-#X text 795 218 \$2 == \$0 parent;
-#X msg 818 270 set \$1;
-#X obj 818 298 s \$2-parentstate;
-#X msg 745 513 /preset \$1;
-#X obj 563 351 rradical.state-p \$1;
-#X obj 262 77 r \$2-localSave;
-#X text 14 47 global send to do something crazy with!;
-#X obj 262 56 r \$1-localSetsub;
-#X obj 22 197 route lddir svdir;
-#X msg 23 285 lddir \$1;
-#X msg 102 289 svdir \$1;
-#X obj 884 377 r \$1/OSC;
-#X obj 731 308 r PDOSC;
-#X obj 77 580 r \$1/getParams;
-#X obj 77 619 s \$2/listParams;
-#X text 85 599 Dispatch to commun-cs;
-#X obj 563 419 prepent RRADICAL.dummy;
-#X obj 535 300 prepent set;
-#X obj 448 493 prepent RRADICAL.dummy;
-#X obj 235 196 prepent get;
-#X obj 816 32 r \$2-COMMUN-RESPONSE;
-#X obj 816 86 s PDOSC;
-#X obj 816 60 OSCprepend \$1;
-#X obj 764 437 routeOSC /preset /substate;
-#X obj 777 377 deeprouteOSC \$1;
-#X obj 247 579 r \$2/returnParams;
-#X obj 247 619 s \$1/paramsList;
-#X connect 5 0 55 0;
-#X connect 10 0 68 0;
-#X connect 11 0 50 1;
-#X connect 12 0 55 0;
-#X connect 13 0 55 0;
-#X connect 14 0 88 0;
-#X connect 16 0 17 0;
-#X connect 16 0 67 0;
-#X connect 17 0 26 0;
-#X connect 18 0 20 0;
-#X connect 19 0 20 0;
-#X connect 21 0 54 0;
-#X connect 22 0 25 0;
-#X connect 22 1 19 0;
-#X connect 24 0 6 0;
-#X connect 30 0 50 0;
-#X connect 30 0 81 0;
-#X connect 34 0 27 0;
-#X connect 35 0 27 0;
-#X connect 35 1 34 0;
-#X connect 36 0 80 0;
-#X connect 37 0 42 0;
-#X connect 38 0 37 1;
-#X connect 38 0 41 1;
-#X connect 38 1 36 1;
-#X connect 39 0 83 0;
-#X connect 39 1 40 0;
-#X connect 41 0 33 0;
-#X connect 46 0 56 0;
-#X connect 46 1 45 0;
-#X connect 50 0 48 0;
-#X connect 51 0 52 0;
-#X connect 53 0 55 0;
-#X connect 54 0 18 0;
-#X connect 54 1 22 0;
-#X connect 54 2 6 0;
-#X connect 55 0 4 0;
-#X connect 55 1 15 0;
-#X connect 55 2 39 0;
-#X connect 55 3 46 0;
-#X connect 55 4 21 0;
-#X connect 55 4 72 0;
-#X connect 57 0 73 0;
-#X connect 58 0 74 0;
-#X connect 59 0 60 0;
-#X connect 59 1 57 0;
-#X connect 60 0 21 0;
-#X connect 62 0 55 0;
-#X connect 63 0 65 0;
-#X connect 65 0 66 0;
-#X connect 67 0 50 0;
-#X connect 68 0 36 0;
-#X connect 68 0 41 0;
-#X connect 68 0 82 0;
-#X connect 68 1 80 1;
-#X connect 68 1 82 1;
-#X connect 68 2 11 0;
-#X connect 69 0 55 0;
-#X connect 71 0 55 0;
-#X connect 72 0 59 0;
-#X connect 72 1 58 0;
-#X connect 73 0 47 0;
-#X connect 74 0 47 0;
-#X connect 75 0 32 0;
-#X connect 75 0 87 0;
-#X connect 76 0 88 0;
-#X connect 77 0 78 0;
-#X connect 80 0 23 0;
-#X connect 81 0 68 0;
-#X connect 82 0 37 0;
-#X connect 83 0 35 0;
-#X connect 84 0 86 0;
-#X connect 86 0 85 0;
-#X connect 87 0 51 0;
-#X connect 87 1 51 0;
-#X connect 88 0 32 0;
-#X connect 88 0 87 0;
-#X connect 89 0 90 0;

Deleted: trunk/abstractions/senderfruit/semento/sft.rradical.state.pd
===================================================================
--- trunk/abstractions/senderfruit/semento/sft.rradical.state.pd	2008-07-24 09:37:10 UTC (rev 10214)
+++ trunk/abstractions/senderfruit/semento/sft.rradical.state.pd	2008-07-24 09:59:49 UTC (rev 10215)
@@ -1,220 +0,0 @@
-#N canvas 33 22 1040 638 10;
-#X obj 108 454 outlet;
-#X obj 87 475 outlet;
-#X obj 173 410 print attr;
-#X obj 87 380 pool RRADICAL;
-#X obj 205 46 inlet;
-#X obj 42 331 r \$0-pool;
-#X obj 356 373 s \$0-pool;
-#X obj 205 124 symbol \$1;
-#X obj 134 29 loadbang;
-#X msg 255 278 getdir;
-#X obj 130 433 outlet;
-#X obj 457 313 prepend get;
-#X msg 306 160 getall;
-#X obj 386 228 s \$0-substate;
-#X obj 356 203 t b f;
-#X msg 121 318 echodir \$1;
-#X obj 121 291 tgl 15 1 empty empty empty 0 -6 0 8 -262144 -1 -1 1
-1;
-#X msg 118 347 getdir;
-#X msg 137 79 bang;
-#X msg 508 190 copyall;
-#X msg 565 190 paste;
-#X obj 532 223 s \$0-pool;
-#X obj 508 136 symbol;
-#N canvas 468 415 458 308 mkchange2substate 0;
-#X obj 92 39 inlet;
-#X obj 111 224 outlet;
-#X obj 198 93 r \$0-memento;
-#X obj 293 93 r \$0-substate;
-#X obj 111 150 pack s s 0;
-#X obj 92 93 symbol mkchdir;
-#X obj 92 67 t b;
-#X obj 111 180 route list;
-#X text 204 180 Un-List it again;
-#X connect 0 0 6 0;
-#X connect 2 0 4 1;
-#X connect 3 0 4 2;
-#X connect 4 0 7 0;
-#X connect 5 0 4 0;
-#X connect 6 0 5 0;
-#X connect 7 0 1 0;
-#X restore 356 274 pd mkchange2substate;
-#X obj 205 160 t b b s;
-#X obj 249 209 s \$0-memento;
-#X obj 17 525 print pool;
-#X obj 205 84 route state getstate getall substate set get;
-#X obj 508 160 select copy paste;
-#X obj 698 550 s \$0-pool;
-#X obj 17 544 print svld;
-#X obj 601 373 symbol;
-#X obj 793 377 symbol;
-#X obj 17 563 print currentDir;
-#X msg 191 349 printroot;
-#N canvas 468 415 478 328 mkchange2tmp 0;
-#X obj 92 39 inlet;
-#X obj 111 224 outlet;
-#X obj 198 93 r \$0-memento;
-#X obj 92 93 symbol mkchdir;
-#X obj 92 67 t b;
-#X obj 111 180 route list;
-#X text 204 180 Un-List it again;
-#X msg 296 94 symbol tmp;
-#X obj 111 150 pack s s s;
-#X obj 296 66 loadbang;
-#X msg 167 37 bang;
-#X connect 0 0 4 0;
-#X connect 2 0 8 1;
-#X connect 3 0 8 0;
-#X connect 4 0 3 0;
-#X connect 5 0 1 0;
-#X connect 7 0 8 2;
-#X connect 8 0 5 0;
-#X connect 9 0 7 0;
-#X connect 10 0 4 0;
-#X restore 623 347 pd mkchange2tmp;
-#N canvas 1317 161 462 312 mkchange2substate 0;
-#X obj 92 39 inlet;
-#X obj 111 224 outlet;
-#X obj 198 93 r \$0-memento;
-#X obj 293 93 r \$0-substate;
-#X obj 111 150 pack s s 0;
-#X obj 92 93 symbol mkchdir;
-#X obj 111 180 route list;
-#X text 204 180 Un-List it again;
-#X text 195 29 change back to substate dir;
-#X obj 92 67 t b b;
-#X msg 38 98 clrclip;
-#X connect 0 0 9 0;
-#X connect 2 0 4 1;
-#X connect 3 0 4 2;
-#X connect 4 0 6 0;
-#X connect 5 0 4 0;
-#X connect 6 0 1 0;
-#X connect 9 0 10 0;
-#X connect 9 1 5 0;
-#X connect 10 0 1 0;
-#X restore 771 424 pd mkchange2substate;
-#X obj 579 325 t b a b;
-#N canvas 405 362 623 338 sub2tmp 0;
-#X obj 121 12 inlet;
-#X obj 111 224 outlet;
-#X obj 198 93 r \$0-memento;
-#X obj 92 93 symbol mkchdir;
-#X obj 111 180 route list;
-#X text 204 180 Un-List it again;
-#X msg 36 91 paste;
-#X obj 121 40 t b b b;
-#X msg 406 90 copyall;
-#X text 189 8 copies data from current dir \, changes to "tmp" dir
-\, pastes data.;
-#X obj 293 93 symbol tmp;
-#X msg 294 47 bang;
-#X obj 359 47 loadbang;
-#X obj 111 150 pack s s s;
-#X connect 0 0 7 0;
-#X connect 2 0 13 1;
-#X connect 3 0 13 0;
-#X connect 4 0 1 0;
-#X connect 6 0 1 0;
-#X connect 7 0 6 0;
-#X connect 7 1 3 0;
-#X connect 7 2 8 0;
-#X connect 8 0 1 0;
-#X connect 10 0 13 2;
-#X connect 11 0 10 0;
-#X connect 12 0 10 0;
-#X connect 13 0 4 0;
-#X restore 815 348 pd sub2tmp;
-#X obj 771 324 t b a b;
-#X msg 536 357 bang;
-#X obj 17 582 print currentCommand;
-#X obj 661 100 t a;
-#N canvas 757 334 643 358 tmp2sub+abs1 0;
-#X obj 121 12 inlet;
-#X obj 181 257 outlet;
-#X obj 268 126 r \$0-memento;
-#X obj 363 126 r \$0-substate;
-#X obj 181 183 pack s s 0;
-#X obj 162 126 symbol mkchdir;
-#X obj 181 213 route list;
-#X text 274 213 Un-List it again;
-#X msg 106 124 paste;
-#X msg 476 123 copyall;
-#X obj 121 40 t b b b b;
-#X msg 35 125 absdir 1;
-#X text 191 19 copies data from "tmp" dir \, changes to current substate
-\, pastes data \, returns to absolute directory mode.;
-#X connect 0 0 10 0;
-#X connect 2 0 4 1;
-#X connect 3 0 4 2;
-#X connect 4 0 6 0;
-#X connect 5 0 4 0;
-#X connect 6 0 1 0;
-#X connect 8 0 1 0;
-#X connect 9 0 1 0;
-#X connect 10 0 11 0;
-#X connect 10 1 8 0;
-#X connect 10 2 5 0;
-#X connect 10 3 9 0;
-#X connect 11 0 1 0;
-#X restore 579 417 pd tmp2sub+abs1;
-#X obj 661 293 route lddir svdir;
-#X msg 793 398 absdir 0 \, svdir \$1 \, absdir 1;
-#X msg 601 393 absdir 0 \, lddir \$1;
-#X obj 407 160 prepent set;
-#X connect 3 0 1 0;
-#X connect 3 1 0 0;
-#X connect 3 2 10 0;
-#X connect 3 4 2 0;
-#X connect 4 0 27 0;
-#X connect 5 0 3 0;
-#X connect 7 0 24 0;
-#X connect 8 0 7 0;
-#X connect 9 0 6 0;
-#X connect 11 0 6 0;
-#X connect 12 0 6 0;
-#X connect 14 0 23 0;
-#X connect 14 1 13 0;
-#X connect 15 0 3 0;
-#X connect 16 0 15 0;
-#X connect 17 0 3 0;
-#X connect 18 0 7 0;
-#X connect 19 0 21 0;
-#X connect 20 0 21 0;
-#X connect 22 0 28 0;
-#X connect 23 0 6 0;
-#X connect 24 0 9 0;
-#X connect 24 1 23 0;
-#X connect 24 2 25 0;
-#X connect 27 0 7 0;
-#X connect 27 1 9 0;
-#X connect 27 2 12 0;
-#X connect 27 3 14 0;
-#X connect 27 4 47 0;
-#X connect 27 5 11 0;
-#X connect 27 6 22 0;
-#X connect 27 6 42 0;
-#X connect 28 0 19 0;
-#X connect 28 1 20 0;
-#X connect 31 0 46 0;
-#X connect 32 0 45 0;
-#X connect 34 0 3 0;
-#X connect 35 0 29 0;
-#X connect 36 0 29 0;
-#X connect 37 0 43 0;
-#X connect 37 1 31 0;
-#X connect 37 2 35 0;
-#X connect 38 0 29 0;
-#X connect 39 0 36 0;
-#X connect 39 1 32 0;
-#X connect 39 2 38 0;
-#X connect 40 0 31 0;
-#X connect 42 0 44 0;
-#X connect 43 0 29 0;
-#X connect 44 0 37 0;
-#X connect 44 1 39 0;
-#X connect 45 0 29 0;
-#X connect 46 0 29 0;
-#X connect 47 0 6 0;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.