\start83\
\comment=Program file dated 08/01/98, 06:10
\name=ZWORKCHG
\file=C:\TI\83\WORK\ZWORKCHG.TXT
ClrHome
2((E-9)/7)+(F=20)+2(F=43)\->\A
Input "TIME= ",B
If B>24:Then
ClrHome
Pause "INVALID TIME"
End
If B<12:Then
Menu("TIME","AM",1,"PM",2
Lbl 2
B+12\->\B
Lbl 1
End
B\->\[E](\theta\,A)
Return
\stop83\

