$\text{NEW PROBLEM}$

No selection allowed for all input boxes

Fix position and allow selection for all text objects

Empty all input boxes

#006758

#B00020

#252525

#4D4D4D

#757575

#949494

#E44461

#DA2570

#E66B9E

#3A6ED6

#5991FF

#008475

#0F8538

#00a83c

#5145A8

#6557D2

#8575FF

#903D14

#BD6C43

#C75000

#E07415

$\textsf{NEW STATEMENT}$

resetJar

$\textsf\bold{CLEAR JAR}$

C_2 = (-0.44946324081696487, 7.260033930006486)
B_2 = (4.959295022240524, 7.105497979633415)
M_1 = (2.1467407254506297, 4.602015583589663)
L_1 = (5.237459732912052, 4.169314922545063)
K_1 = (0.6631956018691471, 4.385665253067363)
J_1 = (-0.44946324081696487, 3.8602430217989205)
I_1 = (3.0739564276890565, 3.8602430217989205)
A = (0.39057202089228776, -1.7375293319539025)
B = (1.7142863368369188, -1.7990974396722574)
C = (4.392499022585358, -1.7375293319539025)
D = (3.130352814359082, -1.6143931165171927)
E = (5.654645230811635, -1.4912569010804828)
F = (4.731123615036311, -0.629303393023514)
G = (2.329967414020468, -0.7216555546010464)
H = (1.129389313512547, -0.7524396084602238)
I = (-0.4803704308915791, -0.8067426794678279)
J = (3.561329568387567, -0.41381501600927173)
K = (6.071953864926637, -0.3431348283486144)
L = (0.32321651104839066, 0.08956583269598477)
M = (2.637807952612243, 0.4173544381885197)
N = (-0.4803704308915791, 0.9549671547851831)
O = (4.423283076444536, 0.5404906536252295)
P = (5.6392532038820375, 0.7386168242628836)
Q = (1.4358753537345026, 0.7077096341882694)
R = (3.561329568387567, 1.4332282155413758)
S = (4.773851881792839, 1.6967397165759246)
T = (0.5704740316453044, 1.604018146352082)
U = (2.3939982460475435, 1.5731109562774677)
V = (-0.4185560507423507, 2.3457907081428235)
W = (5.979232294702793, 1.9749044272474527)
Z = (1.4358753537345026, 2.3148835180682092)
A_1 = (3.7848217994051834, 2.5930482287397374)
B_1 = (5.052016592464367, 2.809398559262037)
C_1 = (2.610348576569843, 2.8712129394112655)
D_1 = (0.508659651496076, 3.087563269933565)
E_1 = (1.621318494182188, 3.5511711210527785)
F_1 = (4.217522460449783, 3.643892691276621)
H_1 = (6.071953864926637, 3.334820790530479)
N_1 = (3.9084505597036405, 4.787458724037347)
O_1 = (6.071953864926637, 4.972901864485033)
P_1 = (-0.4185560507423507, 5.0656234347088755)
Q_1 = (4.990202212315139, 5.560138475902703)
R_1 = (2.9503276673905994, 5.560138475902703)
S_1 = (1.2504322132868173, 5.3746953354550175)
T_1 = (0.230494940824548, 6.085560707171145)
U_1 = (5.9483251046281795, 6.332818227768059)
V_1 = (1.9612975850029444, 6.394632607917288)
W_1 = (3.970264939852869, 6.394632607917288)
Z_1 = (2.9503276673905994, 7.229126739931871)
A_2 = (1.0031746926899034, 7.0745907895588)
statement3case = 1
marbleNames: {"striped", "dotted", "plain"}
countQuestion = 1
randomList2 = Shuffle(Sequence[15])
randomList1 = Shuffle(Sequence[20])
randomNum2 = Element(randomList2, Mod[countQuestion, 15] + 1)
input2: 7
randomNum1 = Element(randomList1, Mod[countQuestion, 20] + 1)
input1: 6
xPixelsRight: 16
xPixelsLeft: 16
yPixelsTop: 24
yPixelsBottom: 16
borderBox = Polygon(Zip[PixelsToPoint[Corner[1], Corner[3], Corner[5], A], A, {(xPixelsLeft, yPixelsBottom), (xPixelsLeft, y(Corner[5]) - yPixelsTop), Corner[5] - (xPixelsRight, yPixelsTop), (x(Corner[5]) - xPixelsRight, yPixelsBottom)}])
scenario: 3
dieSide = 2.8 (slider from -5 to 5)
AppSize = Corner(5)
statement2case = 2
Marble1C1: (11.28813, 10.5)
Marble1C2 = Point(y = y(Marble1C1))
numMarb1 = 0 (slider from 0 to maxM1, step 1)
numMarb2 = 0 (slider from 0 to maxM2, step 1)
numMarb3 = 0 (slider from 0 to maxM3, step 1)
allMarbles = Shuffle(Flatten[{If[numMarb1 > 0, Sequence[1, n, 1, numMarb1], {}], If[numMarb2 > 0, Sequence[2, n, 1, numMarb2], {}], If[numMarb3 > 0, Sequence[3, n, 1, numMarb3], {}]}])
allMarblesPositions: {A, B, C, D, E, F, G, H, I, J, K, L, M, N, O, P, Q, R, S, T, U, V, W, Z, A_1, B_1, C_1, D_1, E_1, F_1, H_1, I_1, J_1, K_1, L_1, M_1, N_1, O_1, P_1, Q_1, R_1, S_1, T_1, U_1, V_1, W_1, Z_1, A_2, B_2, C_2}
maxNumMarbles = Length(allMarblesPositions)
speed: 1
maxM1: maxNumMarbles - numMarb2 - numMarb3
maxM2: maxNumMarbles - numMarb1 - numMarb3
Marble2C1 = Point(x = x(Marble1C1))
Marble2C2: (x(Marble1C2), y(Marble2C1))
Marble3C1 = Point(x = x(Marble1C1))
Marble3C2: (x(Marble1C2), y(Marble3C1))
numMarb1Text: "\(" + (LaTeX[numMarb1]) + "\)"
numMarb2Text: (("\textsf{" * numMarb2) * "}")
numMarb3Text: (("\textsf{" * numMarb3) * "}")
numMarbles: numMarb1 + numMarb2 + numMarb3
ratio3: "" + (Element[{numMarb1, numMarb2, numMarb3}, statement3case]) + ":" + numMarbles + ""
fraction3: (((("\frac{" * Element[{numMarb1, numMarb2, numMarb3}, statement3case]) * "}{") * numMarbles) * "}")
fraction3reduced = If(GCD[numMarbles, Element[{numMarb1, numMarb2, numMarb3}, statement3case]] > 1, " or \textbf{\[" + (FractionText[Element[{numMarb1, numMarb2, numMarb3}, statement3case] / numMarbles]) + "\]}", "")
marbles = Zip(Translate[Element[{marble1, marble2, marble3}, A], Vector[Element[{Marble1C1, Marble2C1, Marble3C1}, A], P]], A, allMarbles, P, allMarblesPositions)
JarC1: (-1.27177, -2.6)
JarC2: (8.42521, -2.6)
MarbleExamplePos = (19.04570865955384, 2.5414541544717517)
marbleExample = Translate(Element[{marble1, marble2, marble3}, statement3case], Vector[Element[{Marble1C1, Marble2C1, Marble3C1}, statement3case], MarbleExamplePos])
G_1 = Corner(5)
statement3: "\textsf{The probability of picking \\
a " + (LaTeX[marbleNames(statement3case)]) + " 
marble is \phantom{p}\\
\textbf{" + (LaTeX[ratio3]) + "} or \textbf{" + (LaTeX[fraction3]) + "}" + (LaTeX[fraction3reduced]) + ".}"
xMin = -2.8417536343213716
yMin = -2.6302668938700657
yMax = 12.823328143437047
xMax = 21.847057560739003
maxM3: maxNumMarbles - numMarb2 - numMarb1

Tool: PixelsToPoint
PixelsToPoint(Corner1,Corner3,Corner5,InputPixels)
Input: Corner1, Corner3, Corner5, InputPoint
Output: OutputPoint

Corner1: (-5, -5)
Corner3: (16, 6)
Corner5: (300, 200)
xLeft: x(Corner1)
xRight: x(Corner3)
xCoord: (x(InputPoint) / x(Corner5) * (xRight - xLeft)) + xLeft
yTop: y(Corner3)
yBottom: y(Corner1)
yCoord: (y(InputPoint) / y(Corner5) * (yTop - yBottom)) + yBottom
OutputPoint: (xCoord, yCoord)

Tool: PointToPixels
PointToPixels(corner1,corner3,corner5,inputPoint)
Input: Corner1, Corner3, Corner5, InputPoint
Output: OutputPixels

Corner1: (-5, -5)
Corner3: (16, 6)
Corner5: (300, 200)
xLeft: x(Corner1)
xRight: x(Corner3)
yTop: y(Corner3)
yBottom: y(Corner1)
yPixels: (y(Corner5) * (y(InputPoint) - yBottom) / (yTop - yBottom))
xPixels: (x(Corner5) * (x(InputPoint) - xLeft) / (xRight - xLeft))
OutputPixels: (xPixels, yPixels)

Tool: PixelsToPoint (command PixelsToPoint1)
PixelsToPoint(Corner1,Corner3,Corner5,InputPixels)
Input: Corner1, Corner3, Corner5, InputPoint
Output: OutputPoint

Corner1: (-5, -5)
Corner3: (16, 6)
Corner5: (300, 200)
xLeft: x(Corner1)
xRight: x(Corner3)
xCoord: (x(InputPoint) / x(Corner5) * (xRight - xLeft)) + xLeft
yTop: y(Corner3)
yBottom: y(Corner1)
yCoord: (y(InputPoint) / y(Corner5) * (yTop - yBottom)) + yBottom
OutputPoint: (xCoord, yCoord)