www.gusucode.com > IPCV_Eval_Kit_R2019a_0ce6858工具箱matlab程序源码 > IPCV_Eval_Kit_R2019a_0ce6858/code/demo_files/I4_11_1_webcam_ML.m

    %% 偮側偑偭偰偄傞USB僇儊儔偺儕僗僩傪昞帵
webcamlist

%% 僇儊儔偐傜夋憸傪庢崬傓僆僽僕僃僋僩傪惗惉
camera = webcam('Logicool HD Pro Webcam C920')    %忋婰 webcamlist偱昞帵偝傟偨傕偺偺拞偐傜丄巊梡偡傞僇儊儔傪巜掕
% camera = webcam       %偙偺婰弎曽偼丄USB僇儊儔偑1偮偺傒偮側偑偭偰偄傞応崌偺傒壜擻

camera.AvailableResolutions
camera.Resolution = '640x480'    %庢崬傓夋憸偺夝憸搙傪愝掕

% preview(camera)       % 僾儗價儏乕偡傞堊偺娭悢

%% 價僨僆傪昞帵偡傞偨傔偺僆僽僕僃僋僩偺惗惉
viewer = vision.DeployableVideoPlayer;
 
%% 僼儗乕儉儗乕僩傪彂偒崬傓偨傔偺僆僽僕僃僋僩傪惗惉
fps = single(0.0);
texts = vision.TextInserter('Running at %2.2f fps', ...
  'Color',[0, 255, 0], 'FontSize',30, 'Location',[20 20]); 
 
%% 僼儗乕儉儗乕僩寁應梡
t = tic();
cnt = 1;

%% 僗僩僢僾儃僞儞偺昞帵
a=true;
sz = get(0,'ScreenSize');
figure('MenuBar','none','Toolbar','none','Position',[20 sz(4)-100 100 70])
uicontrol('Style', 'pushbutton', 'String', 'Stop',...
        'Position', [20 20 80 40],...
        'Callback', 'a=false;');

%% 1僼儗乕儉枅偵張棟偡傞偨傔偺儖乕僾張棟
while (a)
% for i=1:200 
  I = snapshot(camera);        %1僼儗乕儉庢傝崬傒 (uint8)
  Itxt = step(texts,I,fps);    %僼儗乕儉儗乕僩偺彂崬傒
  step(viewer,Itxt);           %僼儗乕儉昞帵

   % 30僼儗乕儉偺暯嬒偐傜僼儗乕儉儗乕僩偺寁嶼
   cnt = cnt + 1;
   if (mod(cnt,30) == 0)
    t = toc(t);
    fps = single(30/t);
    t = tic();
   end
  drawnow limitrate;
end

%%
clear('camera');
release(viewer);
release(texts);

%%
%  Copyright 2014 The MathWorks, Inc.