*improved random scaling logic

l2ork_addons/K12/math_random.pd

-#N canvas 512 50 424 259 10;
+#N canvas 512 50 431 468 10;
 #X obj 162 159 ggee/image @pd_extra/K12/objects/math_random.png 1;
 #X obj 121 181 nbx 5 19 -1e+37 1e+37 0 1 \$0-s-null \$0-r-null empty
 0 -8 0 16 -262144 -1 -1 127 256 1;
@@ -7,22 +7,37 @@
 #X obj 121 156 nbx 5 19 -1e+37 1e+37 0 1 \$0-s-null \$0-r-null empty
 0 -8 0 16 -262144 -1 -1 0 256 1;
 #X obj 62 62 preset_node k12;
-#X obj 8 291 outlet;
+#X obj 8 491 outlet;
 #X text 120 140 low;
 #X text 175 197 high;
 #X obj 63 85 preset_node k12;
 #X obj 8 107 sel 1;
 #X msg 162 85 open @pd_extra/K12/objects/math_random.png;
-#X obj 8 265 int;
-#X obj 8 240 maxlib/scale 0 10000 0 10000;
+#X obj 8 465 int;
+#X obj 8 440 maxlib/scale 0 10000 0 10000;
 #X obj 8 189 random 10000;
-#X obj 140 219 + 1;
+#X obj 179 382 + 1;
+#X obj 88 361 moses 0;
+#X obj 140 361 moses 0;
+#X obj 88 382 - 1;
+#X obj 200 281 t f f;
+#X obj 240 334 sel 1;
+#X obj 240 355 f;
+#X obj 240 313 >;
+#X obj 290 281 t f f;
+#X obj 330 334 sel 1;
+#X obj 330 355 f;
+#X obj 330 313 <;
 #X connect 1 0 9 0;
-#X connect 1 0 15 0;
+#X connect 1 0 17 0;
+#X connect 1 0 23 0;
+#X connect 1 0 22 1;
 #X connect 2 0 10 0;
 #X connect 3 0 11 0;
 #X connect 4 0 5 0;
-#X connect 4 0 13 3;
+#X connect 4 0 16 0;
+#X connect 4 0 19 0;
+#X connect 4 0 26 1;
 #X connect 5 0 4 0;
 #X connect 9 0 1 0;
 #X connect 10 0 14 0;
@@ -30,4 +45,19 @@
 #X connect 13 0 12 0;
 #X connect 14 0 13 0;
 #X connect 15 0 13 4;
+#X connect 16 0 18 0;
+#X connect 16 1 13 3;
+#X connect 17 0 13 4;
+#X connect 17 1 15 0;
+#X connect 18 0 13 3;
+#X connect 19 0 22 0;
+#X connect 19 1 21 1;
+#X connect 20 0 21 0;
+#X connect 21 0 1 0;
+#X connect 22 0 20 0;
+#X connect 23 0 26 0;
+#X connect 23 1 25 1;
+#X connect 24 0 25 0;
+#X connect 25 0 4 0;
+#X connect 26 0 24 0;
 #X coords 0 -1 1 1 89 89 2 117 127;