![](http://www.weebly.com/weebly/images/file_icons/image.png)
1534.bmp | |
File Size: | 363 kb |
File Type: | bmp |
Important working links
Servomotor2
Papers to download
%tic
vid = videoinput('winvideo',1);
set(vid,'TriggerRepeat',Inf);
vid.FrameGrabInterval = 2;
vid_src = getselectedsource(vid);
set(vid_src,'Tag','Sorter EYE Sorting ARM');
%figure;
start(vid)
while(vid.FramesAcquired<=5) % Stop after 100 frames
data = getdata(vid,2);
diff_im = data(:,:,:,1);
% imshow(diff_im);
end
stop(vid)
delete(vid)
I=ycbcr2rgb(diff_im);
r=I(:,:,1);
g=I(:,:,2);
b=I(:,:,3);
rpixel=sum(r(:))
gpixel=sum(g(:))
bpixel=sum(b(:))
if(rpixel>2000000)
if(gpixel<1400000)
if(bpixel>3000000)
s = serial('COM15', 'BaudRate', 9600);
figure()
imshow(I);
fopen(s);
fprintf(s,'1');
for i=1:1:100000000;
end
fclose(s);
delete(s);
clear s;
end
end
end
if(rpixel<2000000)
if(gpixel>1800000)
if(bpixel<500000)
s = serial('COM15', 'BaudRate', 9600);
figure()
imshow(I);
fopen(s);
fprintf(s,'2');
for i=1:1:100000000;
end
fclose(s);
delete(s);
clear s;
end
end
end
if(rpixel>3000000)
if(gpixel>1900000)
if(bpixel<1000000)
s = serial('COM15', 'BaudRate', 9600);
figure()
imshow(I);
fopen(s);
fprintf(s,'3');
for i=1:1:100000000;
end
fclose(s);
delete(s);
clear s;
end
end
end
%toc