Matlab 如何截取视频中的每一帧图像

来源：互联网发布：淘宝乐高星球大战玩具编辑：程序博客网时间：2024/05/21 09:51

%这段代码可以选择一个或多个视频，根据视频名称和帧的序号对图片命名。设定的只能选择avi格式，至于其它格式的视频你可以改改代码的第一句试试%看。

%希望对你有用。
[filename,pathname,fileindex]=uigetfile('*.avi','选择视频文件','video.avi','Multiselect','on');
if ischar(filename) %只有选择了文件才进行以下计算
video=mmreader([pathname filename]);
%%General Settings:
%Duration  时间
%Name  视频名称
%Path  路径
%Tag =
%Type = mmreader
%UserData = []
  %%Video Settings:
%BitsPerPixel=24
%FrameRate 视频采集速率
%Height 高度
%NumberOfFrames 总帧数
%VideoFormat 图像模式
%Width = 宽度
LEN=video.NumberOfFrames; %获得视频长度
dir=strcat(pathname,strrep(filename,'.avi',''),'\pic');
mkdir(dir);
fn=strrep(filename,'.avi','');
for k=1:LEN-1 %若read到len，常会报错如下??? MATLAB:read:readTimedOut，read到len-1就好了
   frame=rgb2gray(read(video,k));
   if k<10
      imwrite(frame,strcat(dir,'\',fn,'-avi-000',int2str(k),'.bmp'),'bmp');%把每帧图像存入硬盘
   elseif k>=10 && k<100
      imwrite(frame,strcat(dir,'\',fn,'-avi-00',int2str(k),'.bmp'),'bmp');%把每帧图像存入硬盘
   elseif k>=100 && k<1000
      imwrite(frame,strcat(dir,'\',fn,'-avi-0',int2str(k),'.bmp'),'bmp');%把每帧图像存入硬盘
   elseif k>=1000 && k<10000
      imwrite(frame,strcat(dir,'\',fn,'-avi-',int2str(k),'.bmp'),'bmp');%把每帧图像存入硬盘
      end
end
elseif iscell(filename)
navi=length(filename);
for n=1:navi
   video=mmreader([pathname filename{n}]);
   %%General Settings:
      %Duration  时间
      %Name  视频名称
      %Path  路径
      %Tag =
      %Type = mmreader
      %UserData = []
   %%Video Settings:
      %BitsPerPixel=24
      %FrameRate 视频采集速率
      %Height 高度
      %NumberOfFrames 总帧数
      %VideoFormat 图像模式
      %Width = 宽度
   LEN=video.NumberOfFrames; %获得视频长度
   dir=strcat(pathname,strrep(filename{n},'.avi',''),'\pic');
   mkdir(dir);
   fn=strrep(filename{n},'.avi','');
   for k=1:LEN-1  %若read到len，常会报错如下??? MATLAB:read:readTimedOut，独到len-1就好了
         frame=rgb2gray(read(video,k));
         if k<10
            imwrite(frame,strcat(dir,'\',fn,'-avi-000',int2str(k),'.bmp'),'bmp');%把每帧图像存入硬盘
         elseif k>=10 && k<100
            imwrite(frame,strcat(dir,'\',fn,'-avi-00',int2str(k),'.bmp'),'bmp');%把每帧图像存入硬盘
         elseif k>=100 && k<1000
            imwrite(frame,strcat(dir,'\',fn,'-avi-0',int2str(k),'.bmp'),'bmp');%把每帧图像存入硬盘
         elseif k>=1000 && k<10000
            imwrite(frame,strcat(dir,'\',fn,'-avi-',int2str(k),'.bmp'),'bmp');%把每帧图像存入硬盘
         end
   end
   disp(strcat(num2str(n),'/',num2str(navi),' : "',filename{n},'" Finished!',datestr(now,13)));
end
else
return
end
msgbox('所有帧提取完毕,已写入磁盘！','提示');
clear all

0 0