function lidar=read_HUBIG(filename)

fid=fopen(char(filename));
C=textscan(fid,'%s',1);
l.org_filnm=char(C{1,1});
C=textscan(fid,'%s %s %s %s %s %s %s %s %s',1); %s %s %s %s',1);
l.time_s=datenum([char(C{1,2}),' ',char(C{1,3})],'dd/mm/yyyy HH:MM:SS');
l.time_e=datenum([char(C{1,4}),' ',char(C{1,5})],'dd/mm/yyyy HH:MM:SS');
C=textscan(fid,'%s %s %s %s %s',1);
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(1).descript=[char(C{1,8}),char(C{1,16})];
l.ch(1).nrange=str2num(char(C{1,4}));
l.ch(1).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(2).descript=[char(C{1,8}),char(C{1,16})];
l.ch(2).nrange=str2num(char(C{1,4}));
l.ch(2).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(3).descript=[char(C{1,8}),char(C{1,16})];
l.ch(3).nrange=str2num(char(C{1,4}));
l.ch(3).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(4).descript=[char(C{1,8}),char(C{1,16})];
l.ch(4).nrange=str2num(char(C{1,4}));
l.ch(4).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(5).descript=[char(C{1,8}),char(C{1,16})];
l.ch(5).nrange=str2num(char(C{1,4}));
l.ch(5).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(6).descript=[char(C{1,8}),char(C{1,16})];
l.ch(6).nrange=str2num(char(C{1,4}));
l.ch(6).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(7).descript=[char(C{1,8}),char(C{1,16})];
l.ch(7).nrange=str2num(char(C{1,4}));
l.ch(7).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(8).descript=[char(C{1,8}),char(C{1,16})];
l.ch(8).nrange=str2num(char(C{1,4}));
l.ch(8).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s %s',1);
l.ch(9).descript=[char(C{1,8}),char(C{1,16})];
l.ch(9).nrange=str2num(char(C{1,4}));
l.ch(9).dr=str2num(char(C{1,7}));
C=textscan(fid,'%s',36);
qq=l.ch.nrange;
ntx=max(qq);
C=textscan(fid,'%f %f %f %f %f %f %f %f %f',ntx);
l.ch(1).data=C{1,1};
l.ch(2).data=C{1,2};
l.ch(3).data=C{1,3};
l.ch(4).data=C{1,4};
l.ch(5).data=C{1,5};
l.ch(6).data=C{1,6};
l.ch(7).data=C{1,7};
l.ch(8).data=C{1,8};
l.ch(9).data=C{1,9};
lidar=l;
fclose(fid)
end