paswriterecord.m

这是一篇权威文章的代码

function PASwriterecord(filename,record,comments)
  VERSION=1.0;
  
  [fd,syserrmsg]=fopen(filename,'wt');
  if (fd==-1),
    PASmsg=sprintf('Could not open %s for writing',filename);
    PASerrmsg(PASmsg,syserrmsg); 
  end;
  if (~iscell(comments)),PASerrmsg('Comments must be a cell array','');end;
  
  nobjs=length(record.objects);
  objlabels=sprintf(' "%s"',record.objects(:).label);
  fprintf(fd,'# PASCAL Annotation Version %0.2f\n',VERSION);
  fprintf(fd,'\n');
  fprintf(fd,'Image filename : "%s"\n',record.imgname);
  fprintf(fd,'Image size (X x Y x C) : %d x %d x %d\n',record.imgsize);
  fprintf(fd,'Database : "%s"\n',record.database);
  fprintf(fd,'Objects with ground truth : %d {%s }\n',nobjs,objlabels);
  fprintf(fd,'\n');
  if (length(comments)>0),
    for i=1:length(comments), fprintf(fd,'# %s\n',char(comments(i))); end;
    fprintf(fd,'\n');  
  end;
  fprintf(fd,'# Note that there might be other objects in the image\n');
  fprintf(fd,'# for which ground truth data has not been provided.\n');
  fprintf(fd,'\n');
  fprintf(fd,'# Top left pixel co-ordinates : (1, 1)\n');
  
  for i=1:nobjs,
    lbl=record.objects(i).label;
    fprintf(fd,'\n# Details for object %d ("%s")\n',i,lbl);
    fprintf(fd,'Original label for object %d "%s" : "%s"\n',i,lbl,record.objects(i).orglabel);
    fprintf(fd,'Bounding box for object %d "%s" (Xmin, Ymin) - (Xmax, Ymax) : (%d, %d) - (%d, %d)\n',i,lbl,record.objects(i).bbox);
    if (~isempty(record.objects(i).polygon)),
      fprintf(fd,'Polygon for object %d "%s" (X, Y) :',i,lbl);
      fprintf(fd,' (%d, %d)',record.objects(i).polygon);
      fprintf(fd,'\n');
    end;
    if (~isempty(record.objects(i).mask)),
      fprintf(fd,'Pixel mask for object %d "%s" : "%s"\n',i,lbl, ...
	         record.objects(i).mask);
    end;
  end;
  
  fclose(fd);
return