3H
~>F >~
d
n program for the micro bee
x
2 to speed up clock,type5...9(9 is the fastest)
2 to slow down clock,type5..1(1 is the slowest)
to exit program,type q
# to move the minute hand type m
" this also resets the "second"
# to move the hour hand on type h
' D=2175: d=2000:remlarge main timing
( P1=355/113: close appoximation to p1
Z=5: small delay
6 R6=80:R7=100: set lengths of small and large hands
% printthe numbers on the clock...
32,8:"*"
" 32,2:"12"
, 32,14:"6"
6
49,8:"3"
@
15,8:"9"
J
40,3:"1"
T
46,5:"2"
^ 46,11:"4"
h 40,13:"5"
r 24,13:"7"
| 18,11:"8"
18,5:"10"
24,3:"11"
0
& A0=0:B0=0: reset hours and minutes
hours jumps to here
[B0]1000
minutes to here
[A0]2000
Y=0
5000: look at keyboard
Y=Y+1:Y="0" A1$<="9" Z=((A1$))
' A1$="q" : : qit clock program
2 allow theuse of the "h" key for setting hours
= A1$="h" [B0] 1000: B0=B0+1:[B0]1000: B0=12 B0=0
and the "m" key for minutes
J A1$="m"A1$="M" Y=0:[A0]2000:A0=A0+1: [A1]2000: A0=60 A0=0
1AY)tS~
CLOCKQspace,