,,,80 () "E" () "H"  FP "SYSTEM END or RUN S/E/R "   "SsEeRr"  &( a 2,2,",",<,<2   <  F >P s("list.rnd") ""   "R",,"list.rnd",8VZ ,  r.m,  r.,  r.,  r., # r.,  r.d , 8 r n  sxp " DO YOU WANT TO CREATE FILES, AMEND FILES, LIST FILES, or END C/A/L/E "   "CcAaLlEe"  . A ,,,,,,, c  , ,c' r.m (," ")   > c , " FILES FULL" x) "ENTER DESIRED FILE NUMBER ",c ,c+ r.m (," ") ,  ^Gp " MORE YES/NO Y/N "   "YyNn"   a , x    "4,    " NOT KNOWN "E6p " ADD NEW RECORD YES/NO Y/N "   "YyNn"  @ A ,JTL^ "";c;" ";r.m;" ";r.;" ";r.;" PAGE ";r.;" ";r.eh   p "CHANGE, DELETE, PRINT, END or SKIP C/D/P/E/S "   "CcDdPpEeSs"  .r A ,,,,,,x,x|?  p "DELETE YES/NO Y/N"   "YyNn"   A   r "" ,cA   " RECORD DELETED "  c   " MAG ";m " ISSUE "; " YEAR "; " PAGE "; " TITLE "; "COMMENT ";F  p " O.K. YES/NO Y/N "   "YyNn"  Lm %(m)   %()   %()   %() a  & m "" :0 r.m m:  "" ND r. N  "" bX r. b  "" vl r. v  ""  r.   ""  r.  ,c:  " NEW/CHANGE WRITTEN "v             " CREATING EMPTY FILE ! PLEASE WAIT " "R",,"list.rnd",8 ,8 r r ""   ,  8         " FILE CREATED " a   "******************************* FILE NUMBER ";c;" ************************" X* " MAG ";r.m;" ISSUE ";r.;" ";r.;" PAGE ";r.;" TITLE ";r.  4K>p "PRINTED LIST or SCREEN INDEX P/S "   "PpSs"   H A  4R  "START PRINTING FROM RECORD NUMBER "; 0\  "END PRINTING AT RECORD NUMBER ";f c  pz ,c  r.m (," ")     x  ()p   aA u  A ""  A u   A w(,A)  A         c  , ,c  r.m (," ") xM  c;" ";r.m;" ";r.;" ";r.;" PAGE ";r.;" ";r.         x  E$  " PRESS ANY KEY TO CONTINUE LIST or E (e) tTO END "  S.a u  a ""  a u   a "e" a "E" x8ONTINUE LIST or E (e) tTO END "  S.a u  a ""  a u