9640 PRINT,"    --- PRESS RETURN NOW ---":LINE INPUT DUM$:GOTO 1125
10000 PRINT,"Quick In Memory Sort -- Reading File":INX%=0
10010 FOR I
%=1 TO 8000:GE
IF INX%<
*** NO PERIODS ****** TOO LONG ****.CTD: ARE:FILES NOW ON . DO A CATEGORY SORT, THEN RETURN ****** NO FILES LIKE THAT ON THAT DISK ****** MUST BE BETWEEN 'A' & 'L' ***CKMCKSORTXSM   RETURN  To PROCEED   X  EXIT To The Operating System   S  SORT Menu   M  MAIN MenuEXPENSE CHART   This Is The Program To Create An                       *** AT LINE NUMBER: *** ERROR NUMBER *** THAT DRIVE NOT AVAILABLE ****** THAT DRIVE NOT READY ****** THAT FILE NOT ON THIS DISK ***:*.CDE: ARE FILES ON : *** ON *** CAN'T FIND *** DRIVE LETTER NOT FOUND. GO TO MAIN MENU-####### TO FOR    *   !-- Working--*  LEGEND? (75 Char Max)RETURN To IGNORECREATION Line At Bottom?Your HEADING? [RETURN To IGNORE]  Chart Saved As .CRTODRIVE To Save Your Chart?YAdd ANOTHER File To This Chart? Y/N?  What SYMBOL Will You Use To Show DEPOSITSWhat SYMBOL Will You Use To Show CHECKS?*** TOO MANY ENTRIES ***.CTDDISK DRIVE Where You Saved This File?Checks You Want To CHART?NAME Of The File Of The|.CDE:.0Expense Category File Name?DISKDRVEI 
RT%:A-