Matlabデータハンドラ(2)

clear all
close all
DispartyData = '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
',tline);
    end
  end
end

fclose(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];