plotbox.m

Face recognition using webcam and this data.if the person exist means its gives the serial data out.

function plotbox(output,col,t)
%function plotbox(output,col,t);
%
%INPUT:
%output - output from face dection (see facefind.m)
%col    - color for detection boxes [default [1 0 0]]
%t      - thickness of lines [default 2]
global wtype
if ((nargin<2) || isempty(col))
    col=[1 0 0];
end

if ((nargin<3) || isempty(t))
    t=2;
end

N=size(output,2);

if (N>0)
    for i=1:N
        x1=output(1,i);
        x2=output(2,i);
        y1=output(3,i);
        y2=output(4,i);
        boxv([x1 x2 y1 y2],col,t)
    end
end
wtype=imresize(wtype,[300 300],'nearest');
i1=imcrop(wtype,[x1,y1,x2-x1,y2-y1]);
i1=rgb2gray(i1);
i1= imresize(i1,[32 32],'bilinear');
imwrite(i1,'D:\matlab1\meenakshi code\TestDatabase\9.jpg','jpg');
% % Normalize between 0 and 255 :
% i2 = i1 - min(min(i1));
% i3 = i2/max(max(i2))*255;
% s = uint8(i3);  % Change to integer unit
% % Save :
% imwrite(s,'D:\a\a6.jpg','jpg')




function boxv(vec,col,t)
%function boxv(vec,col,t);
%
%INPUT:
%vec - vector with corner coordiantes ([x1 x2 y1 y2]) for a box
%col - color [default [1 0 0]]
%t   - thickness of lines [default 0.5]

if ((nargin<2) || isempty(col))
    col=[1 0 0];
end

if ((nargin<3) || isempty(t))
    t=0.5;
end

ind=find(isinf(vec));%special case if coordinate is Inf
a=200;%should be realmax, but bug in Matlab? (strange lines occur)
vec(ind)=sign(vec(ind))*a;

h1=line([vec(1) vec(2)],[vec(3) vec(3)]);
h2=line([vec(2) vec(2)],[vec(3) vec(4)]);
h3=line([vec(1) vec(2)],[vec(4) vec(4)]);
h4=line([vec(1) vec(1)],[vec(3) vec(4)]);

h=[h1 h2 h3 h4];
set(h,'Color',col);

set(h,'LineWidth',t)