人脸pts文件检查及人脸框输出

function output()
  outtxt = fopen('D:\AR database\kz.txt','wt');
  :
     imgpath= strcat('D:\AR database\kz\',int2str(i) , '.jpg');
     img = im2uint8(imread(imgpath));
     shapepath = strcat(imgpath(:end-), 'pts');
     shape = double(loadshape(shapepath));
     bbox = getbbox(shape);
     region = enlargingbbox(bbox, 1.25);
     out(outtxt, imgpath, region, shape);
     %drawshapes(img, shape);
     %rectangle(),bbox(),bbox(),bbox()]);
     %rectangle(),region(),region(),region()]);
     %i
     %w = waitforbuttonpress;

  end
  fclose(outtxt);
end
function out(outtxt, imgpath, region, shape)
fprintf(outtxt, '%s ', imgpath);
fprintf(outtxt, ),region(),region(),region());
fprintf(outtxt, , );
:
    shapes2(i, ) = shape(i, ) - region();
    shapes2(i, ) = shape(i, ) - region();
    fprintf(outtxt, ), shapes2(i, ));
end
fprintf(outtxt, '\n');
end

function shape = loadshape(path)
% function: load shape from pts file
file = fopen(path);

if ~isempty(strfind(path, 'COFW'))
    shape = textscan(file, , );
else
    shape = textscan(file, , );
end
fclose(file);

shape = shape{};
end

function drawshapes(img, shapes)
%DRAWSHAPE Summary of this function goes here
%   Function: draw face landmarks on img
%   Detailed explanation goes here
%   Input:
%       img: input image
%       shapes: given face shapes

imshow(img);
hold on;

colors = {'r.' 'g.' 'b.' 'c.' 'm.' 'y.' 'k.'};

:size(shapes, )/ %
:size(shapes, )  %
    scatter(shapes(*(s-) + ), shapes(*s),'w.');
    scatter(shapes(*(s-) + ), shapes(*s),'k');
    %text(shapes(*(s-) + ),shapes(*s),{is},'color','r');
end
end

end

function bbox = getbbox(shape)
%GETBBOX Summary of this function goes here
%   Function: get the bounding box of given shape
%   Detailed explanation goes here
%   Input:
%      shape: the shape of face
%   Output:
%      bbox: the bounding box of given face shape

bbox = zeros(, );

left_x   = min(shape(:, ));
right_x  = max(shape(:, ));
top_y    = min(shape(:, ));
bottom_y = max(shape(:, ));

bbox()  = left_x;
bbox()  = top_y;
bbox()  = right_x - left_x + ;
bbox()  = bottom_y - top_y + ;

end

function region = enlargingbbox(bbox, scale)

region() = floor(bbox() - (scale - )/*bbox());
region() = floor(bbox() - (scale - )/*bbox());

region() = floor(scale*bbox());
region() = floor(scale*bbox());

% region.right_x = floor(region.left_x + region.width - );
% region.bottom_y = floor(region.top_y + region.height - );

end