function [dat]=rd_TimeStp(fnam,n)
%
%  Program to read DH-4 timestp file
%
%  INPUTS
%    FNAM = file name to read in.
%    N =  number of digital ports
%  OUTPUTS
%    
%  	
%    dat = timestamps
%
%
%  Written by Emmanuel Boss, U of Maine, 2002.
%   

fid=fopen(fnam,'r')

%skip first line  
line=fgetl(fid);
for i=1:2*n %2 per digital port
      junk=fscanf(fid,'%s',[4]);
      dat(i)=fscanf(fid,'%f',[1]);
      line=fgetl(fid);
end
fclose(fid);