1.
' Simple Analog Stop Watch (QPR173)
2.
gw
=
640
3.
gh
480
4.
GraphicsWindow
.
Width
5.
Height
6.
BackgroundColor
"LightGray"
7.
cx
/
2
8.
cy
9.
w
10
10.
l
180
11.
DrawMark
(
)
12.
PenWidth
0
13.
BrushColor
"Silver"
14.
secondhand
Shapes
AddRectangle
,
15.
Move

+
16.
t0
Clock
ElapsedMilliseconds
17.
Timer
Interval
1000
24
18.
Tick
OnTick
19.
Sub
20.
t1
21.
sec
22.
Title
23.
a
60
*
360
24.
Rotate
25.
rad
Math
GetRadians
26.
x
Sin
27.
y
Cos
28.
29.
EndSub
30.
31.
"White"
32.
r
3
33.
FillEllipse
34.
"Black"
35.
For
To
11
12
Step
36.
37.
5
38.
39.
40.
EndFor
41.