#N canvas 500 433 98 67 10;
#X obj 256 0 inlet;
#X obj 435 0 inlet OSC;
#N canvas 0 0 981 424 saves 0;
#X obj 45 160 originator \$1 \$0;
#X obj 152 132 inlet OSC;
#X obj 507 86 r \$0-s1;
#X obj 47 55 r \$0-substate;
#X obj 15 13 inlet substate;
#X obj 15 35 route substate;
#X obj 159 55 r \$0-copy;
#X msg 159 76 copy;
#X obj 243 50 r \$0-paste;
#X msg 241 71 paste;
#X text 154 15 This is the originator \, including some ready to use
standard functionality.;
#X text 507 56 Put your commun sends here \, if you like.;
#X msg 15 91 setsub \$1;
#X msg 249 184 svdir \$1;
#X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 250 163 savepanel;
#X msg 108 214 svdir /tmp/svdir.dat;
#X msg 78 241 lddir /tmp/svdir.dat;
#X obj 152 189 outlet OSC;
#X obj 507 110 commun /chan \$0;
#X obj 507 135 s \$0-s1;
#X obj 643 82 r \$0-which;
#X obj 643 106 commun /which \$0;
#X obj 643 131 s \$0-which-r;
#X connect 0 2 18 0;
#X connect 1 0 0 1;
#X connect 2 0 19 0;
#X connect 3 0 12 0;
#X connect 4 0 5 0;
#X connect 5 0 12 0;
#X connect 5 1 0 0;
#X connect 6 0 7 0;
#X connect 7 0 0 0;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X connect 12 0 0 0;
#X connect 13 0 0 0;
#X connect 14 0 15 0;
#X connect 15 0 13 0;
#X connect 16 0 0 0;
#X connect 17 0 0 0;
#X connect 19 0 20 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X restore 373 -1 pd saves;
#N canvas 569 61 450 300 cnv.ctl 0;
#X obj 90 188 s \$0-background-cnv;
#X floatatom 108 59 5 100 1000 0 width - -;
#X floatatom 112 83 4 50 500 0 height - -;
#X obj 92 132 pack 0 0;
#X msg 92 159 vis_size \$1 \$2;
#X obj 110 106 t b f;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 3 0;
#X connect 5 1 3 1;
#X restore 298 -1 pd cnv.ctl;
#X obj 135 169 outlet;
#X text 186 -1 look! ==>;
#X obj 373 20 outlet OSC;
#X obj 120 -7 ctlin;
#X obj 123 22 pack 0 0 0;
#X obj 2 21 cnv 15 90 40 empty empty empty 20 12 0 14 -225271 -66577
0;
#X symbolatom 47 25 5 0 0 0 which #0-which-r #0-which;
#X obj 228 29 r \$0-which;
#X obj 133 145 OSCprepend /RRADICAL;
#X obj 177 45 r \$0-c;
#X obj 145 74 nroute 1 1;
#X msg 145 110 \$2 \$3;
#X msg 124 50 \$3 \$2 \$1;
#X floatatom 47 44 5 1 128 0 chan - #0-c;
#X connect 1 0 2 1;
#X connect 2 0 6 0;
#X connect 7 0 8 0;
#X connect 7 1 8 1;
#X connect 7 2 8 2;
#X connect 8 0 16 0;
#X connect 11 0 12 1;
#X connect 12 0 4 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 15 0 12 0;
#X connect 16 0 14 0;
#X coords 0 0 1 1 92 60 1;