Update of /cvsroot/pure-data/abstractions/rradical/control In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16256
Added Files: rrad.shuffler.pd Log Message: forgot about this one.
--- NEW FILE: rrad.shuffler.pd --- #N canvas 403 530 252 92 10; #X obj 2 14 cnv 15 247 75 empty $0-background-cnv empty 20 12 1 14 -195568 -66577 0; #X obj 253 0 inlet; #X obj 432 0 inlet OSC; #N canvas 183 51 981 424 saves 0; #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 502 42 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 obj 152 189 outlet OSC; #X msg 108 214 svxdir /tmp/svdir.xml; #X msg 78 241 ldxdir /tmp/svdir.xml; #X obj 482 109 commun /bpm $0; #X obj 606 110 commun /s $0; #X obj 741 106 commun /rand $0; #X obj 741 82 r $0-random-value; #X obj 740 131 s $0-random-value; #X obj 606 86 r $0-shuffle-value; #X obj 606 133 s $0-shuffle-value; #X obj 482 85 r $0-bpm; #X obj 482 134 s $0-bpm; #X obj 486 185 r $0-resolution; #X obj 486 234 s $0-resolution; #X obj 486 209 commun /resol $0; #X obj 612 215 commun /play $0; #X obj 612 191 r $0-play; #X obj 612 240 s $0-play; #X connect 0 2 15 0; #X connect 1 0 0 1; #X connect 2 0 11 0; #X connect 3 0 4 0; #X connect 4 0 11 0; #X connect 4 1 0 0; #X connect 5 0 6 0; #X connect 6 0 0 0; #X connect 7 0 8 0; #X connect 8 0 0 0; #X connect 11 0 0 0; #X connect 12 0 0 0; #X connect 13 0 14 0; #X connect 14 0 12 0; #X connect 16 0 0 0; #X connect 17 0 0 0; #X connect 18 0 26 0; #X connect 19 0 24 0; #X connect 20 0 22 0; #X connect 21 0 20 0; #X connect 23 0 19 0; #X connect 25 0 18 0; #X connect 27 0 29 0; #X connect 29 0 28 0; #X connect 30 0 32 0; #X connect 31 0 30 0; #X restore 370 -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 295 -1 pd cnv.ctl; #X obj 253 69 outlet; #X text 183 -1 look! ==>; #X obj 370 20 outlet OSC; #X obj 335 39 inlet; #X obj 6 24 cnv 15 105 60 empty empty shuffle 10 12 0 10 -233017 -66577 0; #X obj 68 54 nbx 3 12 0 100 0 0 $0-shuffle-value $0-shuffle-value s 0 -6 1 10 -195568 -1 -1 18 256; #X obj 16 54 nbx 4 12 0 1e+37 0 0 $0-random-value $0-random-value rand 0 -6 1 10 -195568 -1 -1 18 256; #X obj 164 62 bng 15 250 50 0 $0-copy empty copy 0 -6 0 8 -225271 -1 -1; #X obj 193 62 bng 15 250 50 0 $0-paste empty paste 0 -6 0 8 -257472 -1 -1; #X obj 200 30 cnv 15 45 15 empty $0-resolution-show 1/4 1 8 0 10 -233017 -66577 0; #N canvas 586 27 377 256 tempomap 0; #X obj 30 11 inlet; #X obj 95 164 outlet; #X obj 75 13 r $0-resolution; #X obj 30 116 nroute b1 1; #X obj 76 71 makefilename b%d; #X msg 76 95 $1; #X obj 30 140 unpack s 0; #X obj 75 52 expr pow(2 , $f1); #X obj 75 32 int; #X obj 187 125 makefilename 1/%d; #X obj 210 176 symbol $0-resolution-show; #X obj 209 152 loadbang; #X obj 159 197 pack s s; #X msg 158 217 ; $2 label $1; #X connect 0 0 3 0; #X connect 2 0 8 0; #X connect 3 0 6 0; #X connect 4 0 5 0; #X connect 5 0 3 1; #X connect 6 1 1 0; #X connect 7 0 4 0; #X connect 7 0 9 0; #X connect 8 0 7 0; #X connect 9 0 12 0; #X connect 10 0 12 1; #X connect 11 0 10 0; #X connect 12 0 13 0; #X restore 253 23 pd tempomap; #N canvas 45 266 651 594 shuffle 0; #X obj 73 107 mod 2; #X obj 73 128 select 0 1; #X obj 82 315 f; #X obj 41 315 f; #X obj 55 369 outlet; #X obj 260 171 random 10; #X obj 260 202 * 0.001; #X obj 333 172 * 0.001; #X obj 96 239 delay 0; #X obj 164 277 delay 0; #X obj 155 18 r $0-shuffle-value; #X obj 333 130 r $0-random-value; #X obj 46 67 inlet; #X obj 414 176 > 0; #X obj 260 225 spigot; #X obj 415 210 select 0; #X msg 415 233 0; #X obj 244 250 + 0; #X obj 305 5 r $0-bpm; #X obj 305 29 select 0; #X msg 305 51 120; #X obj 401 19 r $0-resolution; #X obj 401 40 select 0; #X msg 401 62 1; #X obj 153 69 clip 0 100; #X obj 452 63 int; #X obj 305 75 expr 60000/$f1; #X obj 452 84 expr 1/pow(2 , $f1); #X obj 479 140 *; #X obj 153 96 * 0.01; #X obj 228 132 *; #X obj 473 108 t b b f; #X obj 228 92 f 0; #X floatatom 271 283 5 0 0 0 - - -; #X obj 292 114 t b; #X msg 191 243 0; #X obj 247 377 t b; #X msg 244 400 0; #X obj 64 346 spigot; #X obj 128 336 r $0-play; #X obj 142 442 s $0-play; #X msg 141 422 1; #X obj 142 393 loadbang; #X connect 0 0 1 0; #X connect 1 0 8 0; #X connect 1 1 5 0; #X connect 1 1 9 0; #X connect 2 0 38 0; #X connect 3 0 38 0; #X connect 5 0 6 0; #X connect 6 0 14 0; #X connect 7 0 6 1; #X connect 8 0 3 0; #X connect 9 0 2 0; #X connect 10 0 24 0; #X connect 11 0 7 0; #X connect 11 0 13 0; #X connect 12 0 0 0; #X connect 12 0 2 1; #X connect 12 0 3 1; #X connect 13 0 14 1; #X connect 13 0 15 0; #X connect 14 0 17 1; #X connect 15 0 16 0; #X connect 16 0 17 1; #X connect 17 0 33 0; #X connect 17 0 9 1; #X connect 18 0 19 0; #X connect 19 0 20 0; #X connect 19 1 26 0; #X connect 20 0 26 0; #X connect 21 0 22 0; #X connect 22 0 23 0; #X connect 22 1 25 0; #X connect 23 0 31 0; #X connect 24 0 29 0; #X connect 25 0 27 0; #X connect 26 0 28 0; #X connect 26 0 34 0; #X connect 27 0 31 0; #X connect 28 0 30 1; #X connect 29 0 30 0; #X connect 29 0 32 1; #X connect 30 0 17 0; #X connect 31 0 32 0; #X connect 31 1 28 0; #X connect 31 2 28 1; #X connect 32 0 30 0; #X connect 34 0 32 0; #X connect 35 0 9 1; #X connect 35 0 8 1; #X connect 36 0 37 0; #X connect 37 0 9 1; #X connect 38 0 4 0; #X connect 39 0 38 1; #X connect 41 0 40 0; #X connect 42 0 41 0; #X restore 253 47 pd shuffle; #X obj 118 63 nbx 4 14 0 400 0 0 $0-bpm $0-bpm bpm 0 -6 0 8 -233017 -1 -1 120 256; #X obj 118 31 hradio 13 1 0 6 $0-resolution $0-resolution resol 0 -6 0 8 -128992 -143491 -1 2; #X obj 225 62 tgl 15 0 $0-play $0-play play 0 -6 0 8 -24198 -1 -1 1 1; #X connect 1 0 15 0; #X connect 2 0 3 1; #X connect 3 0 7 0; #X connect 8 0 3 0; #X connect 15 0 16 0; #X connect 16 0 5 0; #X coords 0 0 1 1 250 90 1;