标签:case 动画 end Gray lj MATLAB 字符 data 视频
clc; clear;
%% 获取视频帧图
% 原视频最好不要太大
path1='E:\我\其他\mzd.mp4'; %原视频存放路径
obji=VideoReader(path1);
num=obji.NumberOfFrames; %获取视频帧数
for i=1:num
frame=read(obji,i);
lj=strcat('E:\我\其他\maozhongdu\mzd',num2str(i)); %帧图输出路径
lj=strcat(lj,'.jpg');
imwrite(frame,lj)
end
%% 读入帧图
for i=1:num %4211
path='E:\我\其他\maozhongdu\'; %帧图路径
picture_name=strcat('mzd',num2str(i),'.jpg');%图片名称
data=imread([path,picture_name]);%读取图片
%转化为灰度矩阵
R=double(data(:,:,1));
G=double(data(:,:,2));
B=double(data(:,:,3));
Gray_data = (R*299 + G*587 + B*114 + 500) / 1000;
% 按照灰度矩阵生成字符矩阵
% 网上应该有“灰度-ASCII字符”对应表,如果有这张表更好。
% 这里是简单分了十阶,参考的这篇https://zhuanlan.zhihu.com/p/38751476。
[m,n]=size(Gray_data);
for i=1:m
for j=1:n
flag=fix(Gray_data(i,j)/25);
switch flag
case 10
Gray(i,j)='.';
case 9
Gray(i,j)='!';
case 8
Gray(i,j)='u';
case 7
Gray(i,j)='o';
case 6
Gray(i,j)='a';
case 5
Gray(i,j)='*';
case 4
Gray(i,j)='p';
case 3
Gray(i,j)='8';
case 2
Gray(i,j)='m';
case 1
Gray(i,j)='&';
case 0
Gray(i,j)='$';
end
end
end
%% 写入文本文件再输出
filename=['E:\我\matlab\','test.txt'];
dlmwrite(filename,Gray,'delimiter',' ','newline','pc');%怼个空格进去
fid=fopen('test.txt','r');
clc;
A = fscanf(fid,'%c')
sta = fclose(fid);
delete('test.txt');
% 然后在MATLAB的设置中把字体改为1,点击运行之后录屏即可
%disp(A);
end
效果展示
链接: https://www.bilibili.com/video/BV11L411J74X?share_source=copy_web.
标签:case,动画,end,Gray,lj,MATLAB,字符,data,视频 来源: https://blog.csdn.net/weixin_61197640/article/details/121731567
本站声明: 1. iCode9 技术分享网(下文简称本站)提供的所有内容,仅供技术学习、探讨和分享; 2. 关于本站的所有留言、评论、转载及引用,纯属内容发起人的个人观点,与本站观点和立场无关; 3. 关于本站的所有言论和文字,纯属内容发起人的个人观点,与本站观点和立场无关; 4. 本站文章均是网友提供,不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属;如您发现该文章侵犯了您的权益,可联系我们第一时间进行删除; 5. 本站为非盈利性的个人网站,所有内容不会用来进行牟利,也不会利用任何形式的广告来间接获益,纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。