sscanf(buf,"HDR2%c%5d%5d",&mode,&blocksize,&recordsize);
blocksize = blocksize>recordsize?blocksize:recordsize;
skipfile(tape); /* throw away rest of header(s) - not interesting */
sscanf(buf,"HDR2%c%5d%5d",&mode,&blocksize,&recordsize);
blocksize = blocksize>recordsize?blocksize:recordsize;
skipfile(tape); /* throw away rest of header(s) - not interesting */