Spielzahl

würfeln

Neustart

B

mein Würfel

in Aktion

in Aktion

hat gewonnen

hat gewonnen

hat verloren

hat verloren

SW

PW

mein Würfel

dein Würfel

mein Würfel

dein Würfel

Würfeln nach Überprüfung

zahl = 1 (slider from 1 to 6, step 1)
WuerfelergebnisseA: {}
WA: {1 / 6, 1 / 6, 1 / 6, 1 / 6, 1 / 6, 1 / 6}
WB: {0.35, 0.15, 0.15, 0.15, 0.15, 0.05}
WBSumme = Sequence(Sum[Take[WB, 1, i]], i, 1, 6)
fB(x) = If[x ≥ 0, If[x < Element[WBSumme, 1], 1, If[x < Element[WBSumme, 2], 2, If[x < Element[WBSumme, 3], 3, If[x < Element[WBSumme, 4], 4, If[x < Element[WBSumme, 5], 5, If[x < Element[WBSumme, 6], 6]]]]]]]
zzB = RandomUniform(0, 1)
wuerfelnB: fB(zzB)
wuerfelnA = Random(1, 6)
WuerfelergebnisseB: {}
zzA = RandomUniform(0, 1)
b = Sum(Zip[z ≟ zahl, z, WuerfelergebnisseB])
Text4: "3-er: " + b + ""
a = Sum(Zip[z ≟ zahl, z, WuerfelergebnisseA])
Text3: "3-er: " + a + ""
vB(x) = If[0 ≤ x < 1, 1 + Sum[Sequence[If[x ≥ Element[WBSumme, i], 1, 0], i, 1, 6]]]
c = 1 (slider from 0 to 1, step 1)
A = (3, 0)
B = (4, 0)
C: (1 | 0)
D: (2 | 0)
v1 = Polygon(Zip[P + v, P, {C, D, D, C}, v, {(-0.2 | 1.2), (0.2 | 1.2), (0.2 | -0.2), (-0.2 | -0.2)}])
v2 = Polygon(Zip[P + v, P, {A, B, B, A}, v, {(-0.2 | 1.2), (0.2 | 1.2), (0.2 | -0.2), (-0.2 | -0.2)}])
v3 = Polygon(Zip[P + v, P, {A, B, B, A}, v, {(-0.2 | 1.2), (0.2 | 1.2), (0.2 | -0.2), (-0.2 | -0.2)}])
v4 = Polygon(Zip[P + v, P, {C, D, D, C}, v, {(-0.2 | 1.2), (0.2 | 1.2), (0.2 | -0.2), (-0.2 | -0.2)}])
G: (3.5 | -1)
I: (1.5 | -1)
sGewinnt: a ≥ 3 ∧ b < 3
pGewinnt: b ≥ 3 ∧ a < 3
unentschieden: a ≥ 3 ∧ b ≥ 3
spielLaeuftNoch: a < 3 ∧ b < 3
l1 = Append(WuerfelergebnisseA, wuerfelnA)
l2 = Append(WuerfelergebnisseB, wuerfelnB)
Text2: "Spielzahl = " + zahl + ""
Text1: "{
\setlength{\tabcolsep}{-5mm}
\begin{tabular}{c|*{" + (LaTeX[Length[WuerfelergebnisseA] + 1]) + "}{c}}
\textcolor{red}{SW} & " + (LaTeX[Sum[Zip[If[a ≠ zahl, Text[a], "\textcolor{red}{" + (Text[a]) + "}"] + "&", a, WuerfelergebnisseA]]]) + "\\ \hline
\textcolor[HTML]{0099cc}{PW} & " + (LaTeX[Sum[Zip[If[a ≠ zahl, Text[a], "\textcolor[HTML]{0099cc}{" + (Text[a]) + "}"] + "&", a, WuerfelergebnisseB]]]) + "
\end{tabular}
}"
E: (5 | 2)
F: (5 | 2.5)
H: (4.25 | 2)
J: (4.25 | 2.5)