chose/extra/list-abs/list-random.pd

#N canvas 253 175 513 548 10;
#X obj 73 55 inlet;
#X msg 73 111 seed \$1;
#X obj 161 290 random \$1;
#X obj 161 352 list prepend;
#X obj 254 353 t a;
#X obj 161 256 until;
#X obj 138 109 t b b b;
#X obj 138 373 list;
#X obj 219 53 inlet;
#X obj 292 54 inlet;
#X obj 292 133 f \$2;
#X obj 303 105 loadbang;
#X obj 73 86 route seed;
#X obj 138 406 outlet;
#X text 73 29 seed/bang;
#X text 220 31 range;
#X text 293 30 length;
#X obj 161 235 f 1;
#X obj 292 153 max 1;
#X connect 0 0 12 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 7 1;
#X connect 4 0 3 1;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 6 1 17 0;
#X connect 6 2 3 1;
#X connect 7 0 13 0;
#X connect 8 0 2 1;
#X connect 9 0 10 0;
#X connect 10 0 18 0;
#X connect 11 0 10 0;
#X connect 12 0 1 0;
#X connect 12 1 6 0;
#X connect 17 0 5 0;
#X connect 18 0 17 1;