Listing of file='DOC.PASS' on disk='vmedia/701-2739G.wvd.zip'
# Sector 959, program filename = 'DOC.PASS' 4161 % -- line 4161 -- 4162 DEFFN'79(A6$,B9) : IF B9<>INT(B9)OR B9<=0THEN B1$=HEX(08) : IF A1(1,B9)<>B9OR A1(2,B9)=-1THEN B1$=HEX(07) : IF B1$<>HEX(00)THEN RETURN : GOSUB '213(A1(2,B9)," ",A6$,2) : B1$=R1$ : RETURN