Listing of file='CHKFILE' on disk='vmedia/701-2652C.wvd.zip'
# Sector 157, program filename = 'CHKFILE' 0010 REM CHKFILE 0170 COM N0$Q4,N$1,N1$21,N3$8 : COM N0,N1,N2,N3 : COM L4$16,M$(4)62,N 0199 L4$=HEX(A0)&BIN(Q4)&HEX(A015A0086004620662066206A001) : O=0 : GOSUB '99 3530 DEFFN'64(N) : M$()=ALL(FF) : O=O+1 : IF O<>1THEN DATA LOAD DC #N,M$() : $PACK(F=L4$)M$(O)FROMN0$,N1$,N3$,N0,N1,N2,N3,N$ : IF O<>1THEN DBACKSPACE #N,1S : DATA SAVE DC #N,M$() : DBACKSPACE #N,1S : IF O<4THEN RETURN : O=0 : DSKIP #N,1S : RETURN 9999 DEFFN'29"Q$=";HEX(22);"CHKFILE";HEX(22);":SCRATCHTQ$:SAVET()Q$";HEX(0D)