Nastav čas

Stred: (0, 0)
H_{12}: Stred + (0, 3.2)
R_h: Stred + (0, 2.7)
R_m: Stred + (0, 3)
m = 7200 (slider from 0 to 43200, step 1)
Cas: m
e = Circle(Stred, R_m)
c = Circle(Stred, H_{12})
d = Circle(Stred, R_h)
Hodiny: floor(Cas / 3600)
Minuty: floor((Cas - (Hodiny * 3600)) / 60)
Sekundy: Cas - (Hodiny * 3600) - (Minuty * 60)
Sek: ((Sekundy / 60 * 360))°
SEK = Rotate(R_m, (-Sek), Stred)
s = Angle(SEK, Stred, R_h)
Min: ((Minuty * 6) + Sekundy / 10)°
MIN = Rotate(R_m, (-Min), Stred)
Hod: ((Hodiny * 30) + Minuty / 2 + Sekundy / 60)°
HOD = Rotate(R_h, (-Hod), Stred)
E = Point(xAxis)
f = Circle(Stred, E)
g, h = Tangent(HOD, f)
F = Intersect(f, h)
G = Intersect(f, g)
t1, f_1, hod, g_1 = Polygon(HOD, G, F)
i, j = Tangent(MIN, f)
H = Intersect(f, i)
I = Intersect(f, j)
p = CircleSector(Stred, H, I)
t2, i_1, min, h_1 = Polygon(MIN, H, I)
Zoznam_1 = Sequence(Rotate[R_m, (6° * i), Stred], i, 1, 59)
α = Angle(HOD, Stred, MIN)
J = Intersect(e, yAxis, 2)
K = Intersect(e, yAxis, 1)
k = Segment(K, J)
L = Intersect(e, xAxis, 1)
M = Intersect(e, xAxis, 2)
l = Segment(L, M)
N = Point(e)
O = Point(e)
P = Point(e)
Q = Point(e)
R = Point(e)
S = Point(e)
T = Point(e)
U = Point(e)
text1: "Hodinové ručičky zvierajú " + α + " uhol"
u = Vector(Stred, SEK)