Start

Stopp

Zwischenzeit

Stoppuhr

Listezwischenzeiten: {1.08, 1.742, 2.197}
Lt: (Listezwischenzeiten * 1000)
Zeit_0: {14, 12, 9, 0, 5, 1, 2021, "Jänner", "Dienstag", 3}
t = 67 (slider from 0 to 100, step 1)
Zeit_t: {138, 18, 9, 0, 5, 1, 2021, "Jänner", "Dienstag", 3}
ms_0: Element[Zeit_0, 1] + (Element[Zeit_0, 2] * 1000) + (Element[Zeit_0, 3] * 60000) + (((Element[Zeit_0, 4] * 24) * 3600) * 1000)
ms_t: Element[Zeit_t, 1] + (Element[Zeit_t, 2] * 1000) + (Element[Zeit_t, 3] * 60000) + (((Element[Zeit_t, 4] * 24) * 3600) * 1000)
msΔ: ms_t - ms_0
Stunden = Div(msΔ, 86400000)
Minuten = Div(Mod[msΔ, 86400000], 60000)
Sekunden = Div(Mod[Mod[msΔ, 86400000], 60000], 1000)
Millisekunden = Mod(Mod[Mod[msΔ, 86400000], 60000], 1000)
msms = Last("00" + Millisekunden, 3)
mm = Last("00" + Minuten, 2)
ss = Last("00" + Sekunden, 2)
hh = Last("00" + Stunden, 2)
Liste1: {hh, mm, ss, msms}
Liste2: {"Stunden", "Minuten", "Sekunden", "Millisekunden"}
Zähler = 4
Liste2b = Join({{"Zwischenzeiten"}, Liste2})
j = 1 (slider from -5 to 5, step 1)
Stoppuhr: true
Uhr: "{" + (LaTeX[TableText[{Liste2, Liste1}, "_|c"]]) + "}"
Lms = Sequence(Mod[Mod[Mod[Lt(i), 86400000], 60000], 1000], i, 1, Length[Lt])
Lmin = Sequence(Div[Mod[Lt(i), 86400000], 60000], i, 1, Length[Lt])
Ls = Sequence(Div[Mod[Mod[Lt(i), 86400000], 60000], 1000], i, 1, Length[Lt])
Lh = Sequence(Div[Lt(i), 86400000], i, 1, Length[Lt])
Tabzz = Sequence({i, Lh(i), Lmin(i), Ls(i), Lms(i)}, i, Max[Zähler - 5, 1], Zähler - 1)
l1 = Append(Liste2b, Tabzz)
ZZ = Sequence(If[i ≟ 0, Liste2b, Tabzz(i)], i, 0, Length[Tabzz])
Zwischenzeiten = TableText(ZZ, "_|c")
leereListe = Sequence("", i, 1, 300)
A1: 1.08
A2: 1.742
A3: 2.197