CC3P œS$²"THE TIME IS")]RE:]LI04(™"“"R2™£10)"*******************p<™£10)"* *ŽF™£10)"* SAM TIME CLOCK *¬P™£10)"* BY MARK SCHWARZ *ÊZ™£10)"* VERSION 1.0 *èd™£10)"* (C) MARCH 1985 * n™£10)"* *$ x™£10)"*******************7 ‚ SET TIME NOWN Œ™""j –™"(IN HHMMSS FORMAT)‘‘"…  …"ENTER TIME NOW ";TN$ ª‹ Ã(TN$)³±6 § ‰140 © ´TI$²TN$¿ ¾310 :420 :510 Ú ÈSAY S$:SAY S1$:SAY S2$ Ò™" HIT ANY KEY FOR THE TIME."' ÜTT²Å(TI$)3 æTT²TTª3F ðTT$²É(Ä(TT),6)k ú‹ Å(TT$)³99999§ TT$²"0"ªÉ(TT$,5)w TI$²TT$¥ ™" ";TI$® ¡ A$Î "‹ A$ ³±"" § TN$ ² TI$:‰190 Ø ,‰270 û 6 CHECK FOR CORRECT TIME INPUT/ @‹ Å(É(TN$,2))³00 ° Å(É(TN$,2))±59 § 360 :‰140d J‹ Å(È(TN$,2))³01 ° Å(È(TN$,2))±12 § 360 :‰140 T‹ Å(Ê(TN$,3,2))³00 ° Å(Ê(TN$,3,2))±59 § 360 :‰140 £ ^Žº h PRINT TIME ERROR× r™"INCORRECT TIME DATA"ú |™"PLEASE REENTER CORRECT TIME" † T ² 1 ¤ 2500:‚& X²1¤120:™" ";:‚, šŽ< ¤ SAY HOURSG ®S1$²""c ¸‹ Å(È(TN$,2))±9§ ‰470 v ÂS1$²Ê(TN$,2,1)| ÌŽ Ö‹ Å(È(TN$,2))²10 § S1$²"TEN"Á à‹ Å(È(TN$,2))²11 § S1$²"ELEVEN"å ê‹ Å(È(TN$,2))²12 § S1$²"TWELVE"ë ôŽû þ SAY MINS. S2$²""' ‹ Å(Ê(TN$,3,2))²10§S2$²"TEN"K ‹ Å(Ê(TN$,3,2))²11§S2$²"ELEVEN"o &‹ Å(Ê(TN$,3,2))²12§S2$²"TWELVE"• 0‹ Å(Ê(TN$,3,2))²13§S2$²"THIRTEEN"º :‹ Å(Ê(TN$,3,2))²14§S2$²"FORTEEN"ß D‹ Å(Ê(TN$,3,2))²15§S2$²"FIFTEEN"N‹ Å(Ê(TN$,3,2))²16§S2$²"6 TEEN"'X‹ Å(Ê(TN$,3,2))²17§S2$²"7 TEEN"Kb‹ Å(Ê(TN$,3,2))²18§S2$²"8 TEEN"ol‹ Å(Ê(TN$,3,2))²19§S2$²"9 TEEN"—v‹ Å(Ê(TN$,3,2))²00§S2$²"OH CLOCK":Ž»€‹ Å(Ê(TN$,3,1))²0§S2$²"OH":700劋 Å(Ê(TN$,3,1))²2§S2$²"TWENTY":700 ”‹ Å(Ê(TN$,3,1))²3§S2$²"THIR TEE":7008ž‹ Å(Ê(TN$,3,1))²4§S2$²"FORTY":700 a¨‹ Å(Ê(TN$,3,1))²5§S2$²"FIFTY":700 g²Ž|¼ SAY ONES MINS.•Æ‹ Ê(TN$,4,1)²"0" § ްÐS2$²S2$ª" "ªÊ(TN$,4,1)¶ÚŽ