yz$;DAYMDYAFILELINEPPHOLDFNSCRJJLLSCREEINYXBUTTOHLYYNHNLDLOODIIIAPMBASDINDEXINDEX@  !"#$%&'()*+THE NEW OWNERS COLUMNBY DAVID PLOTKIN%%(c) 1987, ANTIC PUBLISHING INC."AF:A@,"+ ;@!,;@@,;@$,;@,;@,9@%,;@@,;AW,;@,;AE,;@%,;@@, "" >:A%,INITIALIZING...f-6-F:@,%AV$F:@,%@@A-@@#J68,-X6-%@@\ f A1 AcMAIN MENU SCREENd} A+)AY@b;B2w@U0@_ Bq@}6-nO    **Π** -6.>:@,<67@@,.K67@,.O x0, $ SELECT YOUR CHOICE (PRESS A LETTER)0 ]   EW MONTH EDIT6  LD MONTH EDITI  AVE DATA]  LEAR DATAr  RASE MONTH (DISK)1AdAU<@\@@K:i)@r6.>:,$4NA $GET NEW SCREEN%4OA"%EDIT OLD SCREEN'4SA$'SAVE CURRENT DATAb 4C#67@,.>:,;67AE,.>:,J67@,.bCLEAR THE DATA STRING-4EA(-DELETE A FILE FROM DISK >:A%, AWSCREEN EDITOR ROUTINEX A@8@@K:J@\ARn-@@v AdAUb3F:Ad,"AU" Ap3NO KEY PRESSEDg)@l?#"A%)"AV)"AW5AdAU? Apv!6-F:@,!6-F:@,{"@96-@1^R+ @*+&@,'@"P:+&@,'@,,*+ @()!@1,^6-@1I=+"@*"@(,)+"@"*+"@))"AU,,I6-@1 >:, A:6-F:B2y,:@*@*@A$WRITE DATA TO DISKt@+@@8*@P*@P:'AV,t*@&+P:'AV,,$AV(6-@6-@H(4400 BYTES7AP@!AV-AW7 A READ DATA FROM DISK b@+@@8)@E)@R)@b6-$AV%*9AP@'AVAU9AWAU4*6-P:C:,'AV,*6-C:,&$AV>BARAS76-?:C:hhhLV,<@,B@H$DISK DIRECTORYz@.@@K:F >:A%,DRIVE #S)@`6.D1:*.*z67@<@,.>:,2@ >:,2@@]-@@d$@36.7@,]7@<@,4 FREE SECTOA PH'@"P:'@,:-@+%@,'@>(H A @%!-@+%@,'@%( $INITIALIZING STRINGS6.SATSUNMONTUEWEDTHUFRI..6.$JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC""6.312831303130313130313031B67@,.>:,367AE,.>:,B67@,.5 #AP!-@@%%"167,.>:,5 CC104,104,133,204,104,133,203,104,133,207,104,133,206,160,0,177$((206,145,203,200,192,220,208,247,96.226.(----------------------------------------8$GET MONTHX(( INPUT DATE: MONTH,YEAR (XX,XXXX).:6-@X!@) @A + @6-%@+6-&@YY6-@$%P:?`$+%@,,%%P:'@,&P:'A,%P:'A,%@936-P:+'@&P:'@,,$@%?,96- APEDIT OLD MONTHs (DISK DIRECTORY? (Y OR N)2AdAU=@]@@K:j)@s6.>:,4Y)4y A 2(WHAT FILE TO EDIT# A@2GET FILENAME4A# A#READ DATA FROM DISK A _ SAVE CURRENT DATA` J 6.D:867@,.7$@&@<$@,J67@,.=:,j At A DELETE A FILE s (DISK DIRECTORY? (Y OR N)2AdAU=@]@@K:j)@s6.>:, 4Y)4y A  e(WHAT FILE TO DELETE?(*@F(ENTER FILENAME OR PRESS[(RETURN TO ABORTe A@ 4A 2(@3@2 A PRINT CURRENT SCREEN e AAR@& 1@Q@@P:e-@@" L-@@@;67,.7F:8,%&@,%@,? L(@ )'@"P:'@,)(@ ? -@@&(@* 5@? A ??ARRAY TO CHANGE INTERNAL CHARACTERS TO ATASCII CHARACTERS O-AU6-)6-5!A'A6-@O6-&A(& 1 @d'6-%@2%A($1 A1@0 1 @'6-&@d%A($1 A1@: 6-%A($D 67%@,.>:,  ((INITIALIZE PLAYER/MISSILE GRAPHICS 46-F:A,&@&BBy46-$AV 9-B2VB2Y#@' 9B2`AU s@2@F:A,&@?(>:A%,I+s6-F:@,%AV$F:@,%@@ U#-%A%A @?-A$AVM%AUQ U  ]-AA#' 9AY@bKB2w@]A#@ 2 #A2`!-B2HB2U%"+/ 2$ ##48,80,112,144,176,184,192,200HANDLE FILENAMES4$--@B:,!7<,4:$'*6.-$" 6.D:67@,."$88PUT WEEKS ON SCREEN, GET AND SAVE STRINGS OF DATA.<AR@"(>:A%,<0@@@+!@6-&@+6-%@))6-A:7$@&@<$@,,f"@X+'@"P:'@,*'AP:'A,,)'A"P:'A,f6-%@% Ap%RECOVER STRING SCREEN3-@@3-$@&@J%$@!/-$@&@=(Ӿ@'J AS@``(7$@%@<$@%@, 7$@&@<$@, %$@6-%@"@6- B-@#B(' Խ Խ ν% A%SCREEN EDITOR ROUTINE\"@ A`'6-%@3"@?6-E6-\PUT SCREEN IN STRING"@AP"<"@ A`# A<SAVE STRING, GOTO MENU,3 A0 ASP3BUTTON IS 5, PRINT SCREENo!!PUT SCREEN DATA INTO STRINGp`AR@(0-@P6-A$%$A %@`6-%$A z6-?:C:,