Wizja komputerowa LAB6

    imaqhwinfo
    info = imaqhwinfo('winvideo')
    vid = videoinput('winvideo') %utworzenie obiektu powiązanego z wejściem wideo

    preview(vid) %utworzenie okna podglądu

    get(vid) %wyświetlenie właściwości obiektu powiązanego z wejściem wideo
    get(getselectedsource(vid)) %wyświetlenie właściwości obiektu powiązanego
    %ze źródłem wideo
    set(vid, 'TriggerRepeat', Inf) %ustawienie właściwości TriggerRepeat na wartość Inf
    %– ciągła akwizycja obrazów (do momentu
    %zamierzonego jej przerwania)

    set(gcf, 'doublebuffer', 'on') %zapewnia płynne wyświetlanie
    start(vid) %uruchomienie obiektu (powoduje automatyczne wyzwolenie akwizycji)


    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%FUNKCJA%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    input('Zrob zdjecie');
    data1a = getsnapshot(vid);
    data1a = imresize(data1a, 0.5);
    try
    imwrite(data1a,'A.BMP','BMP');
    disp('zapisano');
    catch
    disp('error');
    end

    stop(vid)
    delete(vid) %usunięcie obiektu wideo
    clear %wyczyszczenie przestrzeni roboczej MATLABa

    %close(gcf) %zamknięcie okna graficznego