clearclc% 设置输入和输出视频文件名inputVideo = 'input.mp4';outputVideo = 'output.mp4';% 读取输入视频文件vIn = VideoReader(inputVideo);% 提取视频信息numFrames = vIn.NumFrames;frameRate = vIn.FrameRate;% 创建输出视频对象vOut = VideoWriter(outputVideo, 'MPEG-4');vOut.FrameRate = frameRate;open(vOut);% 循环遍历每一帧for k = 1:numFrames % 读取当前帧 frame = read(vIn, k); [m,n]=size(rgb2gray(frame)); % 将当前帧怀旧色效果for i=1:mfor j=1:n grayFrame(i,j,1) = 0.393*frame(i,j,1)+0.769*frame(i,j,2)+0.189*frame(i,j,3); grayFrame(i,j,2) = 0.349*frame(i,j,1)+0.686*frame(i,j,2)+0.168*frame(i,j,3); grayFrame(i,j,3) = 0.272*frame(i,j,1)+0.534*frame(i,j,2)+0.131*frame(i,j,3);endend adjust_frame = imadjust(grayFrame,[0.20.8],[]); % 写入灰度化的帧到输出视频 writeVideo(vOut, adjust_frame);end% 关闭输出视频对象close(vOut);