Advertisement
cristiano002

Wizja komputerowa LAB1

Oct 7th, 2014
211
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
MatLab 1.01 KB | None | 0 0
  1. imaqhwinfo
  2. info = imaqhwinfo('winvideo')
  3.  
  4. vid = videoinput('winvideo') %utworzenie obiektu powiązanego z wejściem wideo
  5.  
  6. preview(vid) %utworzenie okna podglądu
  7.  
  8. get(vid) %wyświetlenie właściwości obiektu powiązanego z wejściem wideo
  9. get(getselectedsource(vid)) %wyświetlenie właściwości obiektu powiązanego
  10. %ze źródłem wideo
  11. set(vid, 'TriggerRepeat', Inf) %ustawienie właściwości TriggerRepeat na wartość Inf
  12. %– ciągła akwizycja obrazów (do momentu
  13. %zamierzonego jej przerwania)
  14.  
  15. figure; %utworzenie okna graficznego
  16. set(gcf, 'doublebuffer', 'on') %zapewnia płynne wyświetlanie
  17. start(vid) %uruchomienie obiektu (powoduje automatyczne wyzwolenie akwizycji)
  18.  
  19.  
  20. while (1)
  21. data = getdata(vid, 1);
  22. %diff_im = imabsdiff(data(:,:,:,1), data(:,:,:,2));
  23. gray_image = rgb2gray(data);
  24. imshow(gray_image); %wyświetlenie obrazu różnicowego
  25. end
  26. stop(vid)
  27.  
  28. delete(vid) %usunięcie obiektu wideo
  29. clear %wyczyszczenie przestrzeni roboczej MATLABa
  30. close(gcf) %zamknięcie okna graficznego
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement