List L and H store the angles of the hands; H stores current position and L stores last position.

The Hour hand also moves according to the minute.

This is my first post.

' comments

{0,0,0 → L

Degree:StoreGDB 1:FnOff :AxesOff:Zstandard:ZInteger:ClrDraw:PlotsOff

'draw the clockface

Circle(0,0,31,{i

'draw tickmarks

For(A,0,177,6

cos(A → B

sin(A → C

27-2not(fPart(.2A

Line(30B,30C,AnsB,AnsC

Line(-30B,-30C,-AnsB,-AnsC

End

'get and store the time, convert to hand positions

Repeat getKey

getTime

90-6{Ans(3),Ans(2),iPart(5Ans(1)+.083333333333Ans(2 → H

If max(_{L}L <> Ans:Then

'draw each hand

For(A,1,3

30-7A

If _{L}L(A) <> _{L}H(A)

Line(0,0,P▶Rx(Ans, _{L}L(A)),P▶Ry(Ans, _{L}L(A)),0

Line(0,0,P▶Rx(Ans, _{L}H(A)),P▶Ry(Ans, _{L}H(A

Text(0,0,getTmStr(getTmFmt

End

End

_{L}H → L

End

DelVar _{L}LDelVar _{L}H

RecallGDB 1

Delvar GDB1DelVar A

ClrHome