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.