W> ?MNAMEDATESTUFFYNCC1LINENAMEAPCMODLINEDATEMATDTUNLINE1LINFOBLDYMORSIMDYDAYBLINEOFCLNDLOQUINWCAPRNPLACDTDIMCTTXDATNU  -.bbbb"" - "" O ""A q + s dd (  @@"" )8 A@[j"@@@A! @x!@ "@#@$A%@1&@'()*+,@P-@.@/@%0@112@3@2 PERSONAL POCKET CALENDARBY JIM HODNY$$(c)1988, ANTIC PUBLISHING INC.df +A1AR@T;@,;@,;@0,fAnss;@,;A",;A",;@4,;@%,;@4,;@4,9@B,;A,;@@,x67@<@,.-+67@4,.:67@,.K67@,. Z67A,.i67@,.t@@@K:U,6." *** Appointments and memos *** U6." ----------------------------- R;A,;A,;@4,;@,;@,;@ ,;@&,w6. 6-@s1;@,;@$,;@!,;@4,W6. | | | | | | | |s6.SUNMONTUEWEDTHUFRISAT67@<@,. +67@4,.:67@,.S67@<@,. b67A,.q67@,.}6-6-6-T67@,. #67A",.267@,.86.B6.D:XH6-N6-T6-$$6.F6-@5F67@<@4,. SUN MON TUE WED THR FRI SAT T A@<@@D:NAMEI@T@ Bp-47@<@%,)F:A,"ApQ(}Do you want to personalize thef(calendar (ٯΠ)p A@ A`>)@>>:,0N*>:,0n*>:,0y*>:,0YA@>:,4y)>:,4YA(0MAIN MENU|AdAU'A@d9AAGKAR@Q(}[( |( "'( ('( Create a new calendar,%%( Load a calendar from disk6))(! Enter/edit appointments/memos@--(% Save the present calendar to diskJ&&( Print the present calendarT//(& Display present calendar on screen^''( List calendars on this diskh( End programr.(.("Make the desired selection-->___|.)@. @I)!@VAP 6.>:,((((6-A:,%@P@*@*@ APU "#A( !-@%") ,(I(DO YOU WANT TO SAVE YOURU(, H "!( CALENDAR (ٯΠ)?.)@9>:,4YE6-@H(>:,4Y*496-42)436- "(%"@)"@6-%6-P!@* @#"*"P((ŠӠϠҠΠٮQ!@* @#"*"5-@@#:(G)@Q A`V"@)"@267@<@,. A67A",.P67@,.V6."@Ap$"@ !AAH$#"@ A## A`"@AR"@(}'#@H@@D:*.CALR A "@A &"@A00K"@*")"(8( 򔔔;(A6-K AP:="@(0( 򔔔3(= APD"@ANLOAD CALENDAR FROM DISKX> 6.6-"6-.6-46-> A#bT5(, 򔔔8(T( lE B6.=:," @+6.00E67@<@,.=:,mH 6.=:, 67B:,%@,.467B:,%@,.H67B:,%@,.q67B:,%@,..CALv\ A@5@@B@O@\@ A&@U6-@#-@@0@C67<%A,.Q6-%AU U6-@#-@@0@C67<%A,.Q6-%AU @- #A( -@"# -6.D:X B A`C B@=@@D:*.CALC(}A-@@;(!That calendar is not on this diskA6-2-@@2(Months on this disk are:-6-@6-@-A$-@@$@[7@<@,4X;6-A:7@PRINT PRESENT CALENDARH A AA(R+( (+( 򔔔\v@.@@P:?(@@vOPEN CHANNEL TO PRINTER AND RESET DEFAULTSf==CREATE PAGE 2" BY 3" NEXT TO A LIKE-SIZED PAGEp:(@C>:@f,:SET FORM LENGTH IN LINESzr3(@>:@,>:@',3>:@,rSET COMPRESSED PRINT AND SET LINE SPACING TO 19 L.P.I.(@4(@S14SET PRINTER SUPERSCRIPT MODE1(@U11EPSON UNIDIRECTIONAL MODEL6-@&B:,'@*-@:(@ > L(@E$-@%B:,'@@44(@ 8 E(@(@P6-@&B:,"-@2(@ 6 P(@W1W00-@%B:,@@,(@ 0 99(@7@$@4%@<@$@4,;;(@7@$@4%@<@$@4,[[(@ SUN MON TUE WED THU FRI SAT 7@$@4%@<@ $@4,#6-@#-@@$67<%@3,.$6-%@4<-@@*67<%@3,.86-%@4< . 867<%@3,.Bk6-@+-@qA QApC-%@$@k67%@<%@,.7<%@,L37<,0 )6-P:A:7<%@,,,3 A0VK 7%@<%@,0 A6-P:A:7%@<%@,,,K A0` APj\?7$@4&@)<$@4&@,07@<@),\67%@i<%@i,.*t\?7$@4&@)<$@4&@,07@<@),\67%@p<%@p,.*~6-%@  LL(@7@<@4,7@$@4%@<@ $@4,LL(@7@5<@g,7@$@4%@<@ $@4,+6-@+-@iA@hFF(@7<%@3,7+&@,$@4%@<$@4,\N(@7%@4<%@g,7+&@,$@4%@<$@4,\6-%@ >6-@&B:,'@*-@:(@ > @(@,-%B:,%?P@@<(@ @ 99(@7@$$@4%@<@%$@4,;;(@7@$$@4%@<@%$@4,;;(@7@%$@4%@<@&$@4,;;(@7@%$@4%@<@&$@4,-@@jj(@7+&@,$@4%@<$@4,7+%@%,$@4%@<+%@&,$@4, jj(@7+&@,$@4%@<$@4,7+%@%,$@4%@<+%@&,$@4, (@(DF:A,"A8D('} PRINTER DOES NOT RESPOND2<F:A,"A8*-@@#/(<)@< A`FSAVE CALENDAR TO DISKP; 6.=:, @!6.00;67@<@,.=:,RH 6.=:, 67B:,%@,.467B:,%@,.H67B:,%@,.U67B:,%@,..CALZx A@5@@^($This calendar already exists on thisx(disk. Replace ٯΠ?d6 B)@6>:,0N*>:,0YAnP>:,4N6.7@,46.7@<@,:6-@6-F6-P A`x(rF:A,"A8D(' 䮮V-@@#[(h)@r A"PRINT" CALENDAR TO DISK\ A`@5@@B(@O(@\(@O6-@#-@@=(@7<%A,K6-%AO O6-@#-@@=(@7<%A,K6-%AO F:A,"Ab#@.(B(g@3@y-@@#~()@dF:A,"AD@(# R-@@#W(d)@" B6.D:X"@ 49 A`ENTER/EDIT CALENDARC A @@&6.,(}C6.7@<@1,U&(Appointment for which date? __)(U(&Press to return to main menuB)@B@'* @H)!@X*AUA@?"@')"AU+@@5 B? A`+ (>:,%67@<@,.>:,+6-"L)@L@'* @H)!@X*A&*AUAp,!!"@')"AUA6""A&(~_" A@@% (>:,%67@<@,.>:,J6-P:A:,,Tf ! (8( }Only  days in , .J-@@#O(\)@f A^ (}hm77$@4&@0<$@4,07@<@1,I-@@m(rv77$@4&@0<$@4,07@<@1,I-@@]( o-@@v(|o77$@4&@0<$@4,07@<@1,Y-@+%B:,%B:,,%@e-@k( o 77$@4&@0<$@4,07@<@1,I-@@f(x-@@(n-@@8(J-@@n( `-@&B:,@#(.5-@@N(7@<@),`-@@-@@6(7$@4&@0<$@4,H-@@i(7$@4&@0<$@4,{-@@( ~]-@0(B-@@](ç-@@1:)@: @*+"@')"AU,AL"A%!-@@6(7@<@0,B6-@L A0++"@1*AU*A&A0UU @')"@)"A#)+!A%*A&*AU* AW,A0!! @*"A&A0M!@*"A&'6-&@=-+@%,@C( M A00"AU&6.7@<@0,0 A .-+@%,@ (>:,.67<,.>:, d77$@4&@0<$@4,47@<@1,Z67$@4&@0<$@4,.d A&d77$@4&@0<$@4,47@<@1,Z67$@4&@0<$@4,.d A0`-@@:( `(! 򠰠򩠠:.)@. @H)!@PAPD<"@I267$@4&@0<$@4,.< AN2"@P267$@4&@0<$@4,.X77$@4&@0<$@4,47@<@1,w67$@4&@0<$@4,.7$@4&@0<$@4, Ab Al7767$@4&@0<$@4,.7@<@1,v A*SHOW CALENDAR4# #A( -@"# >F6-@5F67@<@4,. SUN MON TUE WED THR FRI SAT H8-@@*67<%@3,.86-%@4R<-@@*67<%@3,.86-%@4< f pH (}( 6-@@&B:,'@=( A E(H(z67<%@3,.k6-@+-@qAPAC-%@$@k67%@<%@,.7<%@,37<,0 )6-P:A:7<%@,,,3 A" K 7%@<%@,0 A6-P:A:7%@<%@,,,K A"  A"@\?7$@4&@)<$@4&@,07@<@),\67%@5<%@5,.*\?7$@4&@)<$@4&@,07@<@),\67%@6<%@6,.*6-%@  -@AP@4(7<%@3, AdAU()@@@ A`DETERMINE YEAR AND MONTH gA@i6.""4A@](#Load calendar for what month?g A#0 --($Create calendar for what month? 8)@8@'* @H)!@WA#0$ "@'' A`. 367@<@,.>:,3(7@<@,8 )@B "@'' A`L 55 @H)!@W*AU*A&A#`V %"AU6-P:A:,,% A$ ` !"A&(>:,! A#0j ?67@<@,.>:,3(7@<@,?6-P:A:,,t $$(+ @)!@,A$0y c( ("(ONLY 1 - 12, PLEASE4-@@#9(F)@Y(c A#~ )( ()(For what year ? 8)@8@'* @H)!@WA$@ "@'' A` 367@<@,.>:,3(7@<@, L)@L@'* @H)!@W*AU*A&A$p !"A&(>:,! A$@ %"AU6-P:A:,,% A&  "@'' A` 367@<@,.>:,3(7@<@, L)@L@'* @H)!@W*AU*A&A%  !"A&(>:,! A$p %"AU6-P:A:,,% A&  "@'' A` 367@<@,.>:,3(7@<@, L)@L@'* @H)!@W*AU*A&A%p !"A&(>:,! A%  %"AU6-P:A:,,% A& ( "@'' A`2 >67@<@,.>:,)6-P:A:,,>(7@<@,<  "6-$F S2(* 򔔔5(S( P , B,6.312831303130313130313031Z + @6-%@+6-&@d YY6-@$%P:?`$+%@,,%%P:'@,&P:'A,%P:'A,%@n K36-P:+'@&P:'@,,$@%?,?"K6-@x +!@6-&@+6-%@ ))6-A:7$@&@<$@,, O"@A+'@"P:'@,*'AP:'A,,O6-%@ # #A( -@"#  c-@@B&68,-* 66-@H-%&@Q68,-_6-%@c  U6-@#-@@B28,!@ K67<%@,.=:8,,U A'P ]$67%@<%@,.=:8,,167<,. @8,"]67%@<%@,.  6-%@   -@ @J67$@4&@3<$@4&@3,. x67$@4&@2<$@4&@2,.=:,67$@4&@1<$@4&@0,..  k!@ =67$@4&@3<$@4&@2,.=:,k67$@4&@1<$@4&@0,..    6. $ [[JANUARY,FEBRUARY,MARCH,APRIL,MAY,JUNE,JULY,AUGUST,SEPTEMBER,OCTOBER,NOVEMBER,DECEMBER PERSONALIZE CALENDAR r B@<@@D:NAME`(}What is your name (up to 23r( characters)?" Y@476. D(@O@Y A, f67@<@,. 367@%<@%,.B67@,.f67B:,%@