function acquisition_cam1
clc
clear all
disp('Début du programme');
workspace;
delete(instrfindall);
imaqreset;
cam1 = videoinput('dcam', 1, 'Y16_640x480'); %select input device
hvpc = vision.VideoPlayer; %create video player object
src = getselectedsource(cam1);
cam1.FramesPerTrigger =1;
cam1.TriggerRepeat = Inf;
cam1.ReturnedColorspace = 'rgb';
src.FrameRate = '30';
start(cam1)
%start main loop for image acquisition
for t=1:500
imgO=getdata(cam1,1,'uint8'); %get image from camera
hvpc.step(imgO); %see current image in player
end