Camera_Start

%Skrypt uruchamiający kamerę i przygotowujący system MATLAB do
%akwizycji obrazów
%
%W wyniku działania skryptu utworzony zostaje obiekt 'vid'
%powiązany z kamerą
%Dodatkowo zmienna globalna 'KameraOn' ustawiana jest na wartość
%'true' - jeśli kamera jest gotowa do pracy, lub
%'false' - w przeciwnym wypadku
%

if (~isempty(whos('global','variable'))),
    global KameraOn
end;

if exist('vid') == 0,
    KameraOn = 0;
end;
if KameraOn == 0,
    info = imaqhwinfo('winvideo');
    %if size(info.DeviceIDs,2) == 0,
    %    error('Brak kamery!');
    %end;
    %vid = videoinput('winvideo',2);
    vid = videoinput('winvideo');
    preview(vid);
end;

set(vid, 'TriggerRepeat', Inf);
set(vid,'ReturnedColorSpace','rgb');
triggerconfig(vid, 'Immediate');

KameraOn = true;
%set(vid, 'FrameGrabInterval', 2);