#N canvas 565 25 629 413 12;
#X obj -3 -3 cnv 15 1000 1000 empty empty empty 20 12 0 14 -203904
-66577 0;
#X obj 114 201 moses, f 6;
#X text 194 158 <- Generate a number from 0<100;
#X text 194 198 <- Split output depending on whether input is smaller
or greater than a threshold, f 31;
#X text 51 316 ACTION A;
#X text 161 316 ACTION B;
#X obj 52 274 t b;
#X obj 167 274 t b;
#X obj 52 298 outlet;
#X obj 167 298 outlet;
#X obj 44 113 inlet;
#X obj 154 60 r \$0-chance;
#X obj 154 84 t b f;
#X msg 154 106 100;
#X obj 154 129 -;
#X text 186 108 Reverse probability \, so output will match the slider
position, f 31;
#X obj 5 2 hsl 101 30 0 100 0 0 \$0-chance \$0-init CHANCE 24 16 0
15 -262144 -1 -1 5000 1;
#X text 2 8 A];
#X text 89 8 [B;
#X obj 485 4 loadbang;
#X msg 485 25 50;
#X obj 485 49 s \$0-init;
#X obj 44 162 random 99;
#X connect 1 0 6 0;
#X connect 1 1 7 0;
#X connect 6 0 8 0;
#X connect 7 0 9 0;
#X connect 10 0 22 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 12 1 14 1;
#X connect 13 0 14 0;
#X connect 14 0 1 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 22 0 1 0;
#X coords 0 -1 1 1 112 35 2 0 0;
