12

1

2

3

8

9

10

11

4

5

6

7

Montre

A = Intersect(xAxis, yAxis)
c = Circle(A, 1.0)
C, D = Intersect(c, xAxis)
a = Segment(C, D)
liste1 = Sequence((cos(i * 3.141592653589793 / 180.0), sin(i * 3.141592653589793 / 180.0)), i, 0.0, 360.0, 6.0)
liste2 = Sequence((0.95 * cos(i * 3.141592653589793 / 180.0), 0.95 * sin(i * 3.141592653589793 / 180.0)), i, 0.0, 360.0, 6.0)
liste3 = Sequence((0.9 * cos(i * 3.141592653589793 / 180.0), 0.9 * sin(i * 3.141592653589793 / 180.0)), i, 0.0, 360.0, 30.0)
liste4 = Sequence(Segment[Element[liste1, i], Element[liste2, i]], i, 1.0, 60.0, 1.0)
liste5 = Sequence(Segment[Element[liste1, 5.0 * i - 4.0], Element[liste3, i]], i, 1.0, 12.0, 1.0)
H = Point(yAxis)
h = Segment(A, H)
I = Point(yAxis)
i = Segment(A, I)
heures = 8 (slider from 0 to 11, step 1)
minutes = 15 (slider from 0 to 59, step 1)
b = Div(minutes, 12.0)
A' = Rotate(A, -1.0 * (heures + b / 12.0) * 12.0 * °, A)
H' = Rotate(H, -1.0 * (heures + b / 5.0) * 30.0 * °, A)
h' = Segment(A', H')
A'_1 = Rotate(A, -1.0 * minutes * 6.0, A)
I' = Rotate(I, -1.0 * minutes * 6.0 * °, A)
i' = Segment(A'_1, I')
texte18: heures + "h " + minutes + "min"