#N canvas 269 340 167 101 10;
#X obj 2 20 cnv 15 160 75 empty \$0-background-cnv empty 20 12 1 14
-233017 -66577 0;
#X obj 434 3 inlet OSC;
#N canvas 261 108 981 424 saves 0;
#X msg 15 103 set;
#X msg 45 104 substate \$1;
#X obj 15 78 t b f;
#X obj 45 160 originator \$1 \$0;
#X obj 152 132 inlet OSC;
#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 obj 29 261 r \$0-RRADICAL-OSC;
#X obj 29 285 OSCroute /bpm;
#X obj 29 304 s \$0-bpm;
#X obj 385 228 r \$0-bpm;
#X obj 385 286 expr 60000/$f1;
#X obj 385 315 s \$0-beatdur;
#X obj 507 110 commun /divider \$0;
#X obj 507 86 r \$0-divider;
#X obj 507 133 s \$0-divider;
#X obj 507 160 r \$0-lop;
#X obj 507 207 s \$0-lop;
#X obj 507 184 commun /lop \$0;
#X obj 617 159 r \$0-damp;
#X obj 617 183 commun /damp \$0;
#X obj 617 207 s \$0-damp;
#X obj 30 354 OSCroute /preset;
#X obj 30 330 r \$0-RRADICAL-OSC;
#X obj 30 384 s \$0-substate;
#X obj 528 287 r \$0-bypass;
#X obj 528 334 s \$0-bypass;
#X obj 528 311 commun /bypass \$0;
#X connect 0 0 3 0;
#X connect 1 0 3 0;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 4 0 3 1;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X connect 7 1 3 0;
#X connect 8 0 9 0;
#X connect 9 0 3 0;
#X connect 10 0 11 0;
#X connect 11 0 3 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 20 0 22 0;
#X connect 21 0 20 0;
#X connect 23 0 25 0;
#X connect 25 0 24 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 29 0 31 0;
#X connect 30 0 29 0;
#X connect 32 0 34 0;
#X connect 34 0 33 0;
#X restore 372 2 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 297 2 pd cnv.ctl;
#X obj 98 76 bng 15 250 50 0 \$0-copy empty copy 0 -6 0 8 -225271 -1
-1;
#X obj 132 76 bng 15 250 50 0 \$0-paste empty paste 0 -6 0 8 -257472
-1 -1;
#X text 93 0 look! ==>;
#N canvas 381 136 597 481 engine 0;
#X obj 367 423 outlet~;
#X msg 255 102 0.25;
#X msg 299 102 0.333;
#X msg 395 102 1;
#X obj 422 125 t b f;
#X msg 218 105 0;
#X obj 329 29 loadbang;
#X msg 347 103 0.666;
#X obj 305 258 lop~ 500;
#X obj 367 237 sig~;
#X obj 256 258 *~ 0.3;
#X obj 367 215 *;
#X obj 69 216 inlet~;
#X obj 367 259 vd~ \$0-del;
#X obj 69 328 delwrite~ \$0-del 5000;
#X obj 450 103 r \$0-beatdur;
#X obj 459 263 r \$0-bypass;
#X obj 400 43 select 0 1 2 3 4;
#X msg 397 25 \$1;
#X obj 397 5 r \$0-divider;
#X obj 443 193 f;
#X obj 492 221 t b;
#X obj 249 211 r \$0-lop;
#X obj 178 224 r \$0-damp;
#X obj 369 372 gpan~;
#X obj 206 154 s \$0-div;
#X msg 163 127 label \$1|;
#X obj 506 410 outlet~;
#X connect 1 0 11 0;
#X connect 1 0 26 0;
#X connect 2 0 11 0;
#X connect 2 0 26 0;
#X connect 3 0 11 0;
#X connect 3 0 26 0;
#X connect 4 0 11 0;
#X connect 4 1 11 1;
#X connect 4 1 20 1;
#X connect 5 0 11 0;
#X connect 5 0 26 0;
#X connect 6 0 3 0;
#X connect 7 0 11 0;
#X connect 7 0 26 0;
#X connect 8 0 10 0;
#X connect 9 0 13 0;
#X connect 10 0 14 0;
#X connect 11 0 9 0;
#X connect 12 0 14 0;
#X connect 12 0 24 1;
#X connect 13 0 8 0;
#X connect 13 0 24 0;
#X connect 15 0 4 0;
#X connect 16 0 24 2;
#X connect 17 0 5 0;
#X connect 17 1 1 0;
#X connect 17 2 2 0;
#X connect 17 3 7 0;
#X connect 17 4 3 0;
#X connect 18 0 17 0;
#X connect 19 0 18 0;
#X connect 19 0 21 0;
#X connect 20 0 11 1;
#X connect 21 0 20 0;
#X connect 22 0 8 1;
#X connect 23 0 10 1;
#X connect 24 0 0 0;
#X connect 24 1 0 0;
#X connect 26 0 25 0;
#X restore 251 32 pd engine;
#X obj 252 3 inlet~;
#X obj 252 58 outlet~;
#X obj 131 32 tgl 15 0 \$0-bypass \$0-bypass bypass -5 -6 0 8 -24198
-258699 -1 1 1;
#X obj 7 33 hradio 15 1 0 5 \$0-divider \$0-divider divider 0 -6 0
8 -261681 -1 -1 0;
#X obj 11 58 hsl 64 12 10 22050 0 0 \$0-lop \$0-lop lop 0 6 0 8 -257472
-1 -1 2000 1;
#X obj 10 77 hsl 64 12 0 0.99 0 0 \$0-damp \$0-damp damp 0 6 0 8 -262131
-1 -1 3700 1;
#X obj 85 33 cnv 15 35 15 empty \$0-div 0| 2 9 0 8 -261681 -66577 0
;
#X obj 326 60 outlet~;
#X connect 1 0 2 1;
#X connect 7 0 9 0;
#X connect 8 0 7 0;
#X coords 0 0 1 1 162 95 1;