„…’$¨$XFÒXMËXHÒXMÉXSÅYFÒYMËYHÒYMÉYSÅYDÉALRMÂHALÆØS¤T¤M¤W¤SHFÔCØCÙPIOVER²ÁÈÍÓJIÆB1¸B1¹B2°IÈIÍÃX¨Y¨EX¨EY¨PX¨PY¨PX1¨PY1¨ÙPX2¨PY2¨ÎÕÄWIÄBÓBÔCÃA@@p@@@€@r@V@r @r @4 AE A$CY A`@•@WBg@…€6@8"–¿1Ac9A’@4AA$@@( @A! A"V A#ž A$æ A%. A&v A'¾ A( )A1A*N A+– ,-.@/@60BsD1Btr2Bty $$Press space bar to set alarms.›M +'0@9-@@M(Éîéôéáìéúéîç!?6€-A6-@'6‚-@p36ƒ-@?6„-@(c6…-@€6†-@r'6‡-@V36ˆ-@r?6‰-@rK6Š-@4W6‹-AEc6Œ-2NF:‹&@,@€*-‹‹%@6: N‹&@@€<Ÿ1Ž;@,;@,;@,‘;@,M6’-@`$@$A6Y6“-A`e6”-@•q6•-@W{ Ap…+Ÿ0@F.@.@@K:PC'(Is the clock already set? (Y/N)C((Or press H for HELP.)Z0)@––"@‰& A€0 A`d#–"@r A`# @€n–@x@x (N‚) A@() Is it (A)M or (P)M?Œ/)@––"@e%6Ž.AM/ Ap–"–"@€6Ž.PM" Ap  A@ª (>:–,´) A€%  What is the hour)—¾) A%  How many minutes)˜È) A%  How many seconds)™Ò  A€ÜB'6š-@`$+™%@`$˜%A6$—,:—@*Ž4PMB6š-š%’æ—"@*Ž4AM6š-š%’ðE6›-P:š'BU6,$6š-š&BU6$›56œ-P:š'AV,E6-š&AV$œúi@ !@›-@œ9@ iPOKE 20,0 INSURES NO TURNOVERS WHILE SETTING.›^:6š-+F:@,$BU6%F:@,$AV%F:@ ,,Fš!C9™™T6š-š&C@^ A@6š-P:š'@`,W6—-š'A6$6š-š&A6$P:—,26˜-š'@`E6™-š&@`$P:˜,N6ž-P:—,W6Ÿ-P:˜,"36—-—'@‘&•#6˜-˜'@ T“&•36™-™'@ T“&•,*F:@w,!A"*@wA"6000@@@&F:@w,'@@ A` DRAW CLOCK FRAME›JQ ,“”=/“%?p$‚$E:—&?,”%?p$‡$G:—&?,Q/“%‚$E:—,”%‡$G:—,T=7/“%?p$‚$E:—%?,”%?p$‡$G:—%?,=/“”^i,“%@”M/@%“%?p$‚$E:—&?,”%?p$‡$G:—&?,i/@%“%‚$E:—,”%‡$G:—,hM?/@%“%?p$‚$E:—%?,”%?p$‡$G:—%?,M/@%“”rQ ,“”=/“%?p$ƒ$E:˜&?,”%?p$ˆ$G:˜&?,Q/“%ƒ$E:˜,”%ˆ$G:˜,|=7/“%?p$ƒ$E:˜%?,”%?p$ˆ$G:˜%?,=/“”†i,“%@”M/@%“%?p$ƒ$E:˜&?,”%?p$ˆ$G:˜&?,i/@%“%ƒ$E:˜,”%ˆ$G:˜,M?/@%“%?p$ƒ$E:˜%?,”%?p$ˆ$G:˜%?,M/@%“”šEEPLOT CX,CY:DRAWTO CX+XSE*COS(S),CY+YSE*SIN(S) :REM TOO SLOW!!!›¤77PLOT CX+1,CY:DRAWTO 1+CX+XSE*COS(S),CY+YSE*SIN(S)›® A@¸"F:Ad,"@3" A @Â2F:Ad,"@("+, A/2ÌAdAUÖ6-?:A6,à#Ÿ"*Œ"# A`êŸ"@6Œ-ô#Ÿ"@0*Œ"# AþŸ"@16Œ-6 -C/ž"F:‹%@$ ,*Ÿ"F:‹%@$ %@,9 AC A`%6 - %@%  @A0& A`03 -@#,¡8 ,¢8 ,//£8 ,¤8 ,3  :C -@+,¡8 ,%@¢8 ,?/£8 ,%@¤8 ,C  DC -@+,¡8 ,%@¢8 ,?/£8 ,%@¤8 ,C  N?,¥8@,¦8@,/ -@;/¥8 ,¦8 ,?  XO#,¥8@,%@¦8@,7 -@K/¥8 ,%@¦8 ,O  bO#,¥8@,%@¦8@,7 -@K/¥8 ,%@¦8 ,O  lO#,§8@,%@¨8@,7 -@K/§8 ,%@¨8 ,O  vO#,§8@,%@¨8@,7 -@K/§8 ,%@¨8 ,O  €?,§8@,¨8@,/ -@;/§8 ,¨8 ,?  ŠE-@%©-@1,ª8,«8,=/ª8©,«8©,A ©E ”$žs¡9@,¢9@,£9@,¤9@,¥9@,¦9@,§9@,¨9@,ª9@,«9@,6 -¨S-@'?R696¡8 ,-E:,$+&@,%“S6£8 ,-E:,$+%@,%“²76¢8 ,-G:,$+†&@,%”76¤8 ,-G:,$+†%@,%”¼36§8 ,-E:,$€$@%“36¨8 ,-G:,$…$@%”Æ56¥8 ,-E:,$€%“#6¦8 ,-G:,$…%”16 - %@5 Ð[ -@76ª8 ,-E: $@r,$€'@%“W6«8 ,-G: $@r,$…'@%”[  Ú"F:A@,@–" Bä$î ROUTINE TO DO HOURLY CHIME›ø›6Œ-@ AP' -@¬C-@@@_2A@{2@@P@—2@A@› x -@6?0<2A@X2@@P@t2@A@x  -@A   $ ##ROUTINE TO DO HALF HOUR CHIME›*j6Œ-@ AP6-@@6@J -@b2 A% @f  j 4l -@6@4 -@L2 A% @P  d -@@%h  l >$H``ROUTINE USED BY HOURLY/HALF HOUR CHIME FOR BOOKEEPING AND TO SILENCE CHIMES AT LATE NIGHT.›R@ž @)ž!@"'$@QUIET MODE FROM 11PM TO 7:59AM›\# 6¬-žž!@#6¬-ž&@f$pALARM SOUND ROUTINE›zMAdAU!6­-@0;0@@M@w„‘-@@#3©-AU@O2©@@k2@­@@y6­-­%@…­!AU‘6­-Ž F:Ad,"AU © ˜\AdAU72Y2@\$¢XXROUTINE TO SET ALARMS. NOTE ALARMS ARE SET IN MEMORY SO ARE NOT LOST BETWEEN RUNS›¬c +'0@;-@ P(>:@e%,] c6 -F:‹%@$,¶/ "!( No alarm set.% / A pÀ<6®-F:‹%@%@$,( A@8( : < Ê=((Press: X to exit or=( A-J to set an alarmÔ))@––"@ˆ& A€)$Þ!!– @e)–!@tA €è26–-–&@e2F:‹%@$–,"A0ò8(8(Áìáòí Û>:–%A“,Ý éó áìòåáäù óåô áô> üK6 -F:‹%@$–,16®-F:‹%@%@$–,; A@K( : h( (?( Set [>:–%@e,] for what hourd( (0 to unset alarm)h ) "‹%@$– ) A @D((How many minutes after the hour,®D‹%@$–%@®$))  (A)M or (P)M?./)@"@e%6.AM/ A8""@€6.PM" AB ApL$  @*4PM$6 - %@V$ "@*4AM$6 - %@`‹%@$–  A @j<<TO CONVERT C(HR) AND D(MIN) TO PRINTABLE FORMS C;M$;T$›t+ 6.PM"  @) "@$+6.AM~ !@6 - &@ˆ3® @6.0)67@,.=:®,3 A€’ 6.=:®,œ$¦GGROUTINE TO SHOW CURRENT TIME VAUES. USEFUL FOR TIMING SOMETHING.›°k86š-F:@,$BU6%F:@,$AV%F:@ ,I( JIFFIES = šZ6š-P:š'@`,k( SECONDS = šºq6 -P:š'A6,$6š-š&A6$ 56®-P:š'@`,E6™-š&@`$®O A@q( TIME IS>  ::™ Ä$Î$$PRINT TIME IN DIGITAL FORM TOO›Ø6¯-@6â= )-”%Š%@”%Š%@1,“&¯9/“%¯= ì= @)-”%Š”%Š%@@1,“&¯9/“%¯= ö;-@#,“&¯%”%Š7/“&¯%”%Š%@; ;-@#,“%¯%”%Š7/“%¯%”%Š%@;  H 6 -ž6®-Ÿ A@"6‘.=: ,.  @66‘. H6‘7@,.=: ,46‘7@,.:#6‘7@,.46‘7@,. 76‘7@,."6©-”%Š%@*6-“&¯4 A07$($$WRITE STRING W$ AT X,Y IN GR.8›2U>6–-@@$©%F:@ˆ,%F:@‰,$AV%P:+,'@,U6°-AV$F:AV,<< -@B:‘,"6®-@:‘7 < ,,.® @•<6®-®&@2FG6±-°%®$@#²-±±%@<–% %@@$+²&±,F:²,@ ²D  G$PA +'0@A0@@Z--(%     ÈÏ× ÔÏ ÕÓÅ ÔÈÅ ÁÎÁÄÉÇ ÃÌÏÃË     d((Óåôôéîç ôèå ôéíåºnRR(JSince this clock works off an internalclock, you will only have to set thexM(( time every time you power up theM( computer. To set the clock just‚Q)(!answer the questions. To set theQ(#clock accurately, enter the secondsŒ**("question just as that time passes.–((Õóéîç ôèå áìáòíóº JJ(BYou can set up to 10 alarms. To set alarms, press the space-bar.ª ( (Ñõéôôéîç ôèå ðòïçòáíº´))(!To quit the clock just press ESC.¾ ( ( $ÈN +@$'0@@A0@@K@N$0u2 #B!-A6A'%"©+©/ 2$:uee160,0,24,173,48,2,105,5,133,203,173,49,2,105,0,133,204,165,203,105,96,133,205,165,204,105,0,133›Ducc206,173,49,2,56,233,31,141,230,2,165,89,209,203,208,7,173,230,2,133,89,208,13,170,177,203,133›Nubb89,138,145,203,24,105,15,145,205,165,89,141,80,6,165,88,141,79,6,169,0,162,30,153,80,127,200›Xu))208,250,238,80,6,202,208,244,104,96›€D:LISTING7.BAS