read($self->{'fileMST'}, $buff, 4) || croak "can't read NXTMFN from MST: $!";
$self->{'NXTMFN'}=unpack("V",$buff) || croak "NXTNFN is zero";
read($self->{'fileMST'}, $buff, 4) || croak "can't read NXTMFN from MST: $!";
$self->{'NXTMFN'}=unpack("V",$buff) || croak "NXTNFN is zero";