用matlab打造属于自己屏幕录像工具

clc;clear;
% 创建用于录制音频的对象R
R = audiorecorder(22050,16,1);
% 定义录制长度，注意这里不是录制时长，是截屏的张数
len = 1000;
vd = cell(len,1);
tic;
% 开始声音录制
record(R);
for k = 1:len
% screensnap采用C语言编写，需要VC编译
% 下载地址：https://ww2.mathworks.cn/matlabcentral/fileexchange?q=screensnap
    imwrite(screensnap(0),[num2str(k),'.jpg']);
end
% 截屏结束时停止声音录制
stop(R);
disp('录制完成');
fR = toc;
signal = getaudiodata(R);
% 保存音频
audiowrite('myspeech.wav',signal,22050,'BitsPerSample',16);
ved = VideoWriter('myspeech.avi');
ved.FrameRate = floor(len/fR);
open(ved);
% 截图生成视频文件
for k = 1:len
    writeVideo(ved,imread([num2str(k),'.jpg']));
end
close(ved);
% 音视频合并需要用到Micah Richert编写mmread和mmwrite函数
% https://ww2.mathworks.cn/matlabcentral/fileexchange/8028-mmread
% https://ww2.mathworks.cn/matlabcentral/fileexchange/15881-mmwrite
[~, audio] = mmread('myspeech.wav');
[video, ~] = mmread('myspeech.avi');
mmwrite('myspeech.wmv',audio,video);
disp('处理完成');
delete('myspeech.wav');
delete('myspeech.avi');
for k = 1:len
    delete([num2str(k),'.jpg']);
end
disp('清理完成');