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

    clc;close all;imtool close all;clear;

%% 嵍塃偺摦夋憸傪撉崬傓僆僽僕僃僋僩偺嶌惉
readerLeft = vision.VideoFileReader('handshake_left.avi', ...
                              'VideoOutputDataType','uint8');
readerRight = vision.VideoFileReader('handshake_right.avi', ...
                              'VideoOutputDataType','uint8');
%% 摦夋傪昞帵偡傞偨傔偺僆僽僕僃僋僩傪嶌惉
player3D    = vision.DeployableVideoPlayer();

%% 僗僥儗僆僉儍儕僽儗乕僔儑儞寢壥偺撉崬傒
load('handshakeStereoParams.mat');

%% Stop 儃僞儞昞帵
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;');
    
%% 尦擖椡夋憸偺妋擣
while ~isDone(readerLeft) && (a)
    % 嵍塃偺僼儗乕儉偺撉崬傒
    frameLeft = step(readerLeft);
    frameRight = step(readerRight);
    
    step(player3D, [frameLeft, repmat(0, [480 10 3]), frameRight]);

    pause(0.05)
end
a = true;
release(readerLeft);
release(readerRight);
release(player3D);

%% 儊僀儞儖乕僾
a = true;
readerLeft.PlayCount  = inf;
readerRight.PlayCount = inf;
while (a)
%for i=1:30
    % 嵍塃偺僼儗乕儉偺撉崬傒
    frameLeft = step(readerLeft);
    frameRight = step(readerRight);
    
    % 僗僥儗僆暯峴壔
    [frameLeftRect, frameRightRect] = rectifyStereoImages(frameLeft,...
        frameRight, stereoParams, 'OutputView', 'valid');
    % 3D僼儗乕儉偺昞帵
    step(player3D, stereoAnaglyph(frameLeftRect, frameRightRect));

    pause(0.04)
end

release(readerLeft);
release(readerRight);
release(player3D);


%% Copyright 2014 The MathWorks, Inc.