[ video_file_name,video_file_path ] = uigetfile({'*.mov'});
if(video_file_path==0)
return;
end
output_image_path = fullfile(video_file_path,[video_file_name(1:strfind(video_file_name,'.')-1),'.mp4']);
input_video_file = [video_file_path,video_file_name];
videoFReader = VideoReader(input_video_file);
videoFWrite = VideoWriter(output_image_path,'MPEG-4');
open(videoFWrite);
for count = 1:abs(videoFReader.Duration*videoFReader.FrameRate)
disp(count);
key_frame = read(videoFReader,count);
writeVideo(videoFWrite,key_frame);
end
close(videoFReader);
close(videoFWrite);
disp('COMPLETED');
0 件のコメント
サインインしてコメントする。