Matlab数据处理程序（2）

clear allclose allDispartyData = 'cal5-90.txt';RGBpicture = '5L.bmp';a1 = 640*480;tmpfile='tmp2.mat';fidin = fopen(DispartyData, 'r'); % 打开原始数据文件（.list）fidtmp=fopen(tmpfile,'w'); % 创建保存数据文件（不含说明文字）while ~feof(fidin) % 判断是否为文件末尾  tline=fgetl(fidin); % 从文件读入一行文本（不含回车键）  if ~isempty(tline) % 判断是否空行    [m,n]=size(tline);    flag=1;    for i=1:n %判断一行中有没有相应的字符      if (tline(i)=='#'||tline(i)=='w'||tline(i)=='h')        flag=0;        break;      end    end    if flag==1 % 如果是数字行，把此行数据写入文件      fprintf(fidtmp,'%s\n',tline);    end  endendfclose(fidin);   %关闭fclose(fidtmp);  %关闭[a,b,c,d,e,t,h,i,j] = textread(tmpfile,'%f %f %f %d %d %d [%d %d] d%d',a1,'headerlines',6);A = [a,b,c,d,e,t,h,i,j];