1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
|
#N canvas 23 65 716 390 10;
#X msg 43 139 seed \$1;
#X obj 43 72 r RTC-rs;
#X obj 221 69 loadbang;
#X obj 173 69 inlet;
#X obj 109 69 inlet;
#X obj 109 196 expr ($i1 + $i2 + 1) % ($i3 + 1);
#X obj 109 172 random 4;
#X obj 109 250 outlet;
#X obj 173 124 - 1;
#X obj 173 97 int \$1;
#X obj 109 221 t a a;
#X obj 173 145 t a a;
#X text 267 110 (Current_RNum + Previous_RNum + 1) modulo (range +
1);
#X text 374 153 Algorithm from Michael Gold;
#X text 300 270 vs 1.1;
#X connect 0 0 6 0;
#X connect 1 0 0 0;
#X connect 2 0 9 0;
#X connect 3 0 9 0;
#X connect 4 0 6 0;
#X connect 5 0 10 0;
#X connect 6 0 5 0;
#X connect 8 0 11 0;
#X connect 9 0 8 0;
#X connect 10 0 7 0;
#X connect 10 1 5 1;
#X connect 11 0 6 1;
#X connect 11 1 5 2;
|