cent = 0 (slider from 0 to 99, step 1)
cent2: round(cent)
segundo = 0 (slider from 0 to 59, step 1)
segundo2: round(segundo)
minuto = 0 (slider from 0 to 59, step 1)
minuto2: round(minuto)
hora = 0 (slider from 0 to 23, step 1)
hora2: round(hora)
C_R = (0, 0)
tiempo: (3600 * hora2) + (60 * minuto2) + segundo2 + cent2 / 100
γ: (tiempo * ° / 120)
H: (4 * (sin(γ), cos(γ)))
δ: (tiempo * ° / 10)
M: (5 * (sin(δ), cos(δ)))
β = Angle(H, C_R, M)
β_0: β / °
β_1: floor(β_0 + 1.0E-4)
β_2: (abs(β_0 - β_1) * 60)
β_3 = If(β_2  <  0, 0, floor(β_2 + 0.01))
β_4: ((β_2 - β_3) * 60)
α = Angle(M, C_R, H)
α_0: α / °
α_1: floor(α_0 + 1.0E-4)
α_2: (abs(α_0 - α_1) * 60)
α_3 = If(α_2  <  0, 0, floor(α_2 + 0.01))
α_4: ((α_2 - α_3) * 60)
t: (α * 180 / 3.141592653589793)
ε: (6° * tiempo)
C_S = (0, -3.3)
S: C_S + (0.7 * (sin(ε), cos(ε)))
m = Vector((0, 0), M)
h = Vector((0, 0), H)
s = Vector(C_S, S)
c = Circle((0, 0), 5)
d = Circle((0, 0), 4)
ζ: ceil(α)
T1: "α = " + α_1 + "º " + α_3 + "´ " + α_4 + "´´"
T2: "β = " + β_1 + "º " + β_3 + "´ " + β_4 + "´´"
η: (360° * tiempo)
SS: C_S + (1.3 * (sin(η), cos(η)))
a = Segment(C_S, SS)
C'_R = (0, 0)
texto3: "hora = " + hora2
texto4: "minuto = " + minuto2
texto5: "segundo = " + segundo2
texto6: "cent = " + cent2
T4: If[hora2  <  10, "  ", ""] + hora2 + (If[minuto2  <  10, ":0" + minuto2, ":" + minuto2])
T5 = If(hora2  <  12, "AM", "PM")
texto1 = If(segundo2  <  10, "0" + segundo2, "" + segundo2)
texto2 = If(segundo2  <  10, "0" + segundo2, "" + segundo2)
T3: If[hora2  <  10, "  ", ""] + hora2 + (If[minuto2  <  10, ":0" + minuto2, ":" + minuto2])