千家信息网

怎么使用Matlab制作图形验证码生成器

发表于:2025-01-18 作者:千家信息网编辑
千家信息网最后更新 2025年01月18日,这篇文章主要介绍了怎么使用Matlab制作图形验证码生成器,具有一定借鉴价值,感兴趣的朋友可以参考下,希望大家阅读完这篇文章之后大有收获,下面让小编带着大家一起了解一下。突然发现cla函数也可以应用到
千家信息网最后更新 2025年01月18日怎么使用Matlab制作图形验证码生成器

这篇文章主要介绍了怎么使用Matlab制作图形验证码生成器,具有一定借鉴价值,感兴趣的朋友可以参考下,希望大家阅读完这篇文章之后大有收获,下面让小编带着大家一起了解一下。

    突然发现cla函数也可以应用到app designer控件上,因而对部分内容做出更改,将绘制隐藏像素刷新的方式改为用cla

    hold(acAxes,'off');image(acAxes,[-1,0],[-1,0],ones(1,1,3),'visible','off');hold(acAxes,'on');delete(findobj('tag','ax'));

    cla(acAxes)cla(ax)

    0效果

    1字符图片生成

    如果我们单纯的用text绘制图形,就无法做到效果中符号和符号边缘两个颜色,也无法做到更大程度的变形,因此我们需要将字符转换为矩阵形式。

    想要实现也非常简单,我们只需要创建一个不可视的fig,在其上绘制字符,保存fig为png格式图片,再通过imread读取图片,就能获得字符矩阵:

    第一次运行程序因为要生成字符图片因而会比较慢,再次运行就可以读取之前已经生成过的图片啦:

    % 字符图片矩阵构造 ========================================================% 以下为字符图片创建过程% 原理为构造隐藏的figure和axes% 在其上用text绘制字符并保存figure为图片% 导入图片if ~exist('Materials','dir')   mkdir('Materials');endfig=figure('units','pixels',...        'position',[20 80 200 200],...        'Numbertitle','off',...        'Color',[1 1 1],...        'resize','off',...        'visible','off',...         'menubar','none');ax=axes('Units','pixels',...        'parent',fig,...          'Color',[1 1 1],...        'Position',[0 0 200 200],...        'XLim',[0 200],...        'YLim',[0 200],...        'XColor',[1 1 1],...        'YColor',[1 1 1]);strPic{length(strElement)}=[];for i=1:length(strElement)    % 若是不存在该字符图片则生成,否则直接导入    if ~exist(['.\Materials\',strElement(i),'.png'],'file')        delete(findobj('tag','textStr'));        text(ax,100,100,strElement(i),'HorizontalAlignment',...            'center','FontSize',140,'tag','textStr','FontWeigh','bold')        saveas(fig,['.\Materials\',strElement(i),'.png']);     % 保存图片    end    tempPic=imread(['.\Materials\',strElement(i),'.png']);     % 读取图片    strPic{i}=imresize(tempPic,[150,150]);             % 重新调整图片大小end

    2刷新按钮生成

    大家可以看到这个按钮的样式与大部分按钮不同:

    实际上这是一个HTML控件,输入html文件的位置就可以形成类似嵌入页面的效果:

    acHTML=uihtml(acFigure);acHTML.HTMLSource='.\Materials\textbtn.html';acHTML.DataChangedFcn=@refresh;acHTML.Position=[300 50 88 26];

    如代码所示,我们导入的是Materials文件夹内的textbtn.html文件

    textbtn.html长这样:

                                        看不清?    

    当然为了防止大家不会创建,我在m文件中写了一段能够自动创建html文件的代码,原理就是将字符串信息写入txt,再将txt文件后缀改为html:

    % .html文件自动生成及引入 - - - - - - - - - - - - - - - - - - - - - - - - - htmlContent={'';'';'看不清?'};if ~exist('.\Materials\textbtn.html','file')    fid=fopen('.\Materials\textbtn.txt','w');    for i=1:length(htmlContent)        fprintf(fid,'%s\r\n',htmlContent{i});     end    fclose(fid);    copyfile('.\Materials\textbtn.txt','.\Materials\textbtn.html');    delete('.\Materials\textbtn.txt')end

    3图片处理

    3.1图像任意方向拉伸

    这部分原理就是将图像旋转一定角度后,在竖直方向进行拉伸后再旋转回去

    3.2字符边缘

    这部分原理将字符均值滤波后,把不完全是黑色的部分设置为灰色,后期再设置为其他颜色

    3.3图像处理部分代码

    randColor=@()randi([0,200],[1,3]);   % 生成随机颜色的匿名函数% 从图像集合中提取图像tPic=strPic{randiNums(ii)};tPic=tPic(:,:,1);% 将图像旋转-拉伸-旋转randiTheta1=randi([0,90]);randiTheta2=randi([-30,30]);randiLenth=randi([0,70]);tPic=imrotate(255-tPic,randiTheta1,'bilinear','crop');tPic=imresize(tPic,[150+randiLenth,150]);tPic=imrotate(tPic,-randiTheta1+randiTheta2,'bilinear','crop');% 将图像边缘进行模糊,并将模糊的部分数值设置为150tPic=255-imfilter(tPic,I_5);tPic(tPic~=0&tPic~=255)=150;% 为符号和符号边缘赋予不同颜色tempColor1=randColor();tempColor2=randColor();tempPicR=tPic;tempPicG=tPic;tempPicB=tPic;tempPicR(tPic==150)=tempColor1(1);tempPicR(tPic==0)=tempColor2(1);tempPicG(tPic==150)=tempColor1(2);tempPicG(tPic==0)=tempColor2(2);tempPicB(tPic==150)=tempColor1(3);tempPicB(tPic==0)=tempColor2(3);tempPic_3=uint8(zeros([size(tPic),3]));tempPic_3(:,:,1)=tempPicR;tempPic_3(:,:,2)=tempPicG;tempPic_3(:,:,3)=tempPicB;

    4线条和散点生成

    散点就是生成一堆随机位置点和一些随机颜色后用scatter函数绘制,线条是生成散点后使用’spline’插值方法插值成线后再绘制:

    randColor=@()randi([0,200],[1,3]);           % 生成随机颜色的匿名函数randColor_n=@(n)randi([0,200],[n,3])./255;   % 生成n个随机颜色的匿名函数 randPoint_n=@(n)[randi([5,195],[n,1]),randi([5,65],[n,1])];% 生成n个随机点的匿名函数% 绘制散点pPonintsNum=randi([6,10]);pPoints=randPoint_n(pPonintsNum);pPointsColor=randColor_n(pPonintsNum);scatter(acAxes,pPoints(:,1),pPoints(:,2),6,'filled',...    'CData',pPointsColor,'AlphaData',0.6)% 绘制线lPonintsNum=randi([5,7]);lPoints=randPoint_n(lPonintsNum);lPointsColor=[randColor()./255,0.6];x_lPoints=interp1(1:lPonintsNum,lPoints(:,1),1:0.01:lPonintsNum,'spline');y_lPoints=interp1(1:lPonintsNum,lPoints(:,2),1:0.01:lPonintsNum,'spline');plot(acAxes,x_lPoints,y_lPoints,'Color',lPointsColor,'LineWidth',1.5)

    5关于图像存储

    由于目前版本uifigure还不支持存储为图像,因此我们绘制图像是在figure和uifigure分别绘制一遍,其中figure依旧是不可见状态,主要用于将图片验证码保存为png格式,可以在完整代码中看出这一点。

    同时,本程序的设置为,每次刷新图形验证码,都会刷新当前文件夹下authCode.png为最新的验证码,如需要保存请及时将其改名或复制另存:

    6关于验证码对比

    首先就是需要提取框内验证码:

    codeInPut=acEditField.Value;

    因为我们的验证码字符都是大写的,将输入的文本用upper函数变为大写:

    codeInPut=upper(codeInPut);

    同时我们因为0和O长的太像,所以不对其进行区分,直接将输入的验证码中的0改为O:

    codeInPut(codeInPut=='0')='O';

    之后就能够用strcmp函数将当前验证码和输入的验证码进行对比:

    if strcmp(codeInPut,authCode)    msgbox('验证码正确')else    msgbox('验证码错误')end

    7完整代码

    function authCodestrElement=char([49:57,65:90]);              % 1-9,A-Z的字符randColor=@()randi([0,200],[1,3]);           % 生成随机颜色的匿名函数randColor_n=@(n)randi([0,200],[n,3])./255;   % 生成n个随机颜色的匿名函数 randPoint_n=@(n)[randi([5,195],[n,1]),randi([5,65],[n,1])];% 生成n个随机点的匿名函数global authCode;                             % 全局变量:验证码% 字符图片矩阵构造 ========================================================% 以下为字符图片创建过程% 原理为构造隐藏的figure和axes% 在其上用text绘制字符并保存figure为图片% 导入图片if ~exist('Materials','dir')   mkdir('Materials');endfig=figure('units','pixels',...        'position',[20 80 200 200],...        'Numbertitle','off',...        'Color',[1 1 1],...        'resize','off',...        'visible','off',...         'menubar','none');ax=axes('Units','pixels',...        'parent',fig,...          'Color',[1 1 1],...        'Position',[0 0 200 200],...        'XLim',[0 200],...        'YLim',[0 200],...        'XColor',[1 1 1],...        'YColor',[1 1 1]);strPic{length(strElement)}=[];for i=1:length(strElement)    % 若是不存在该字符图片则生成,否则直接导入    if ~exist(['.\Materials\',strElement(i),'.png'],'file')        delete(findobj('tag','textStr'));        text(ax,100,100,strElement(i),'HorizontalAlignment',...            'center','FontSize',140,'tag','textStr','FontWeigh','bold')        saveas(fig,['.\Materials\',strElement(i),'.png']);     % 保存图片    end    tempPic=imread(['.\Materials\',strElement(i),'.png']);     % 读取图片    strPic{i}=imresize(tempPic,[150,150]);             % 重新调整图片大小end% 更改fig ax样式,为方便后期验证码存储fig.Position=[100 100 200 70];ax.Position=[1 1 199.5 70];ax.XTick=[];ax.YTick=[];ax.XLim=[0,200];ax.YLim=[0,70];ax.XColor=[0.7 0.7 0.7];ax.YColor=[0.7 0.7 0.7];ax.Box='on';ax.YDir='reverse';hold(ax,'on');% APP designer窗口构建 ====================================================acFigure=uifigure();acFigure.Position=[100 100 370 90];acFigure.Name='authCode';acFigure.Resize='off';acAxes=uiaxes(acFigure);acAxes.Position=[10 10 200 70];acAxes.XTick=[];acAxes.YTick=[];acAxes.XLim=[0,200];acAxes.YLim=[0,70];acAxes.XColor=[0.7 0.7 0.7];acAxes.YColor=[0.7 0.7 0.7];acAxes.Box='on';acAxes.YDir='reverse';hold(acAxes,'on');acEditField=uieditfield(acFigure,'text');acEditField.Position=[220 52 70 23];acEditField.FontSize=16;acEditField.FontWeight='bold';acEditField.FontColor=[0.3,0.3,0.3];% .html文件自动生成及引入 - - - - - - - - - - - - - - - - - - - - - - - - - htmlContent={'';'';'看不清?'};if ~exist('.\Materials\textbtn.html','file')    fid=fopen('.\Materials\textbtn.txt','w');    for i=1:length(htmlContent)        fprintf(fid,'%s\r\n',htmlContent{i});     end    fclose(fid);    copyfile('.\Materials\textbtn.txt','.\Materials\textbtn.html');    delete('.\Materials\textbtn.txt')endacHTML=uihtml(acFigure);acHTML.HTMLSource='.\Materials\textbtn.html';acHTML.DataChangedFcn=@refresh;acHTML.Position=[300 50 88 26];% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -acButton=uibutton(acFigure);acButton.Position=[220 15 140 30];acButton.Text='确 认 验 证 码';acButton.BackgroundColor=[0.31 0.58 0.80];acButton.FontColor=[1 1 1];acButton.FontWeight='bold';acButton.FontSize=14;acButton.ButtonPushedFcn=@verify;% 回调函数 ================================================================    function refresh(~,~)        cla(acAxes)        cla(ax)                I_5=fspecial('average',[5,5]);   % 5*5均值滤波模板        randiNums=randi([1,length(strElement)],[1,4]);        authCode=strElement(randiNums);  % 验证码        disp(authCode)        for ii=1:4            tPic=strPic{randiNums(ii)};            tPic=tPic(:,:,1);            %tempPic(tempPic<250)=150;                        % 将图像旋转-拉伸-旋转            randiTheta1=randi([0,90]);            randiTheta2=randi([-30,30]);            randiLenth=randi([0,70]);                tPic=imrotate(255-tPic,randiTheta1,'bilinear','crop');            tPic=imresize(tPic,[150+randiLenth,150]);            tPic=imrotate(tPic,-randiTheta1+randiTheta2,'bilinear','crop');                         % 将图像边缘进行模糊,并将模糊的部分数值设置为150            tPic=255-imfilter(tPic,I_5);            tPic(tPic~=0&tPic~=255)=150;            % 为符号和符号边缘赋予不同颜色            tempColor1=randColor();tempColor2=randColor();            tempPicR=tPic;tempPicG=tPic;tempPicB=tPic;            tempPicR(tPic==150)=tempColor1(1);tempPicR(tPic==0)=tempColor2(1);            tempPicG(tPic==150)=tempColor1(2);tempPicG(tPic==0)=tempColor2(2);            tempPicB(tPic==150)=tempColor1(3);tempPicB(tPic==0)=tempColor2(3);                        tempPic_3=uint8(zeros([size(tPic),3]));            tempPic_3(:,:,1)=tempPicR;            tempPic_3(:,:,2)=tempPicG;            tempPic_3(:,:,3)=tempPicB;                        % 显示图片            image(acAxes,[-size(tempPic_3,2)/2,size(tempPic_3,2)/2]./3.5+40*ii+randi([-5,5]),...                         [-size(tempPic_3,1)/2,size(tempPic_3,1)/2]./3.5+35+randi([-5,5]),...                         tempPic_3,'AlphaData',tempPic_3(:,:,1)~=255,'Interpolation','bilinear')            image(ax,[-size(tempPic_3,2)/2,size(tempPic_3,2)/2]./3.5+40*ii+randi([-5,5]),...                         [-size(tempPic_3,1)/2,size(tempPic_3,1)/2]./3.5+35+randi([-5,5]),...                         tempPic_3,'AlphaData',tempPic_3(:,:,1)~=255,'Interpolation','bilinear')                 end                % 绘制散点        pPonintsNum=randi([6,10]);        pPoints=randPoint_n(pPonintsNum);        pPointsColor=randColor_n(pPonintsNum);        scatter(acAxes,pPoints(:,1),pPoints(:,2),6,'filled',...            'CData',pPointsColor,'AlphaData',0.6)        scatter(ax,pPoints(:,1),pPoints(:,2),6,'filled',...            'CData',pPointsColor,'AlphaData',0.6)                % 绘制线        lPonintsNum=randi([5,7]);        lPoints=randPoint_n(lPonintsNum);        lPointsColor=[randColor()./255,0.6];        x_lPoints=interp1(1:lPonintsNum,lPoints(:,1),1:0.01:lPonintsNum,'spline');        y_lPoints=interp1(1:lPonintsNum,lPoints(:,2),1:0.01:lPonintsNum,'spline');        plot(acAxes,x_lPoints,y_lPoints,'Color',lPointsColor,'LineWidth',1.5)        plot(ax,x_lPoints,y_lPoints,'Color',lPointsColor,'LineWidth',1.5)                saveas(fig,'.\authCode.png');    endrefresh()    function verify(~,~)        codeInPut=acEditField.Value;        codeInPut=upper(codeInPut);        codeInPut(codeInPut=='0')='O';        if strcmp(codeInPut,authCode)            msgbox('验证码正确')        else            msgbox('验证码错误')        end            endend

    :程序第一次运行由于有html文件及png文件需要生成,因而会比较慢,之后的运行速度会快很多。

    对于以前版本没有uihtml控件可以先尝试如下代码:

    这里用正常按钮替换了uihtml控件

    function authCode2strElement=char([49:57,65:90]);              % 1-9,A-Z的字符randColor=@()randi([0,200],[1,3]);           % 生成随机颜色的匿名函数randColor_n=@(n)randi([0,200],[n,3])./255;   % 生成n个随机颜色的匿名函数 randPoint_n=@(n)[randi([5,195],[n,1]),randi([5,65],[n,1])];% 生成n个随机点的匿名函数global authCode;                             % 全局变量:验证码% 字符图片矩阵构造 ========================================================% 以下为字符图片创建过程% 原理为构造隐藏的figure和axes% 在其上用text绘制字符并保存figure为图片% 导入图片if ~exist('Materials','dir')   mkdir('Materials');endfig=figure('units','pixels',...        'position',[20 80 200 200],...        'Numbertitle','off',...        'Color',[1 1 1],...        'resize','off',...        'visible','off',...         'menubar','none');ax=axes('Units','pixels',...        'parent',fig,...          'Color',[1 1 1],...        'Position',[0 0 200 200],...        'XLim',[0 200],...        'YLim',[0 200],...        'XColor',[1 1 1],...        'YColor',[1 1 1]);strPic{length(strElement)}=[];for i=1:length(strElement)    % 若是不存在该字符图片则生成,否则直接导入    if ~exist(['.\Materials\',strElement(i),'.png'],'file')        delete(findobj('tag','textStr'));        text(ax,100,100,strElement(i),'HorizontalAlignment',...            'center','FontSize',140,'tag','textStr','FontWeigh','bold')        saveas(fig,['.\Materials\',strElement(i),'.png']);     % 保存图片    end    tempPic=imread(['.\Materials\',strElement(i),'.png']);     % 读取图片    strPic{i}=imresize(tempPic,[150,150]);             % 重新调整图片大小end% 更改fig ax样式,为方便后期验证码存储fig.Position=[100 100 200 70];ax.Position=[1 1 199.5 70];ax.XTick=[];ax.YTick=[];ax.XLim=[0,200];ax.YLim=[0,70];ax.XColor=[0.7 0.7 0.7];ax.YColor=[0.7 0.7 0.7];ax.Box='on';ax.YDir='reverse';hold(ax,'on');% APP designer窗口构建 ====================================================acFigure=uifigure();acFigure.Position=[100 100 370 90];acFigure.Name='authCode';acFigure.Resize='off';acAxes=uiaxes(acFigure);acAxes.Position=[10 10 200 70];acAxes.XTick=[];acAxes.YTick=[];acAxes.XLim=[0,200];acAxes.YLim=[0,70];acAxes.XColor=[0.7 0.7 0.7];acAxes.YColor=[0.7 0.7 0.7];acAxes.Box='on';acAxes.YDir='reverse';hold(acAxes,'on');acEditField=uieditfield(acFigure,'text');acEditField.Position=[220 52 70 23];acEditField.FontSize=16;acEditField.FontWeight='bold';acEditField.FontColor=[0.3,0.3,0.3];acfreshBtn=uibutton(acFigure);acfreshBtn.Text='看不清?';acfreshBtn.ButtonPushedFcn=@refresh;acfreshBtn.Position=[300 50 60 27];% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -acButton=uibutton(acFigure);acButton.Position=[220 15 140 30];acButton.Text='确 认 验 证 码';acButton.BackgroundColor=[0.31 0.58 0.80];acButton.FontColor=[1 1 1];acButton.FontWeight='bold';acButton.FontSize=14;acButton.ButtonPushedFcn=@verify;% 回调函数 ================================================================    function refresh(~,~)        cla(acAxes)        cla(ax)%         hold(acAxes,'off');%         image(acAxes,[-1,0],[-1,0],ones(1,1,3),'visible','off');%         hold(acAxes,'on');%         delete(findobj('tag','ax'));                I_5=fspecial('average',[5,5]);   % 5*5均值滤波模板        randiNums=randi([1,length(strElement)],[1,4]);        authCode=strElement(randiNums);  % 验证码        disp(authCode)        for ii=1:4            tPic=strPic{randiNums(ii)};            tPic=tPic(:,:,1);            %tempPic(tempPic<250)=150;                        % 将图像旋转-拉伸-旋转            randiTheta1=randi([0,90]);            randiTheta2=randi([-30,30]);            randiLenth=randi([0,70]);                tPic=imrotate(255-tPic,randiTheta1,'bilinear','crop');            tPic=imresize(tPic,[150+randiLenth,150]);            tPic=imrotate(tPic,-randiTheta1+randiTheta2,'bilinear','crop');                         % 将图像边缘进行模糊,并将模糊的部分数值设置为150            tPic=255-imfilter(tPic,I_5);            tPic(tPic~=0&tPic~=255)=150;            % 为符号和符号边缘赋予不同颜色            tempColor1=randColor();tempColor2=randColor();            tempPicR=tPic;tempPicG=tPic;tempPicB=tPic;            tempPicR(tPic==150)=tempColor1(1);tempPicR(tPic==0)=tempColor2(1);            tempPicG(tPic==150)=tempColor1(2);tempPicG(tPic==0)=tempColor2(2);            tempPicB(tPic==150)=tempColor1(3);tempPicB(tPic==0)=tempColor2(3);                        tempPic_3=uint8(zeros([size(tPic),3]));            tempPic_3(:,:,1)=tempPicR;            tempPic_3(:,:,2)=tempPicG;            tempPic_3(:,:,3)=tempPicB;                        % 显示图片            image(acAxes,[-size(tempPic_3,2)/2,size(tempPic_3,2)/2]./3.5+40*ii+randi([-5,5]),...                         [-size(tempPic_3,1)/2,size(tempPic_3,1)/2]./3.5+35+randi([-5,5]),...                         tempPic_3,'AlphaData',tempPic_3(:,:,1)~=255,'Interpolation','bilinear')            image(ax,[-size(tempPic_3,2)/2,size(tempPic_3,2)/2]./3.5+40*ii+randi([-5,5]),...                         [-size(tempPic_3,1)/2,size(tempPic_3,1)/2]./3.5+35+randi([-5,5]),...                         tempPic_3,'AlphaData',tempPic_3(:,:,1)~=255,'Interpolation','bilinear')                 end                % 绘制散点        pPonintsNum=randi([6,10]);        pPoints=randPoint_n(pPonintsNum);        pPointsColor=randColor_n(pPonintsNum);        scatter(acAxes,pPoints(:,1),pPoints(:,2),6,'filled',...            'CData',pPointsColor,'AlphaData',0.6)        scatter(ax,pPoints(:,1),pPoints(:,2),6,'filled',...            'CData',pPointsColor,'AlphaData',0.6)                % 绘制线        lPonintsNum=randi([5,7]);        lPoints=randPoint_n(lPonintsNum);        lPointsColor=[randColor()./255,0.6];        x_lPoints=interp1(1:lPonintsNum,lPoints(:,1),1:0.01:lPonintsNum,'spline');        y_lPoints=interp1(1:lPonintsNum,lPoints(:,2),1:0.01:lPonintsNum,'spline');        plot(acAxes,x_lPoints,y_lPoints,'Color',lPointsColor,'LineWidth',1.5)        plot(ax,x_lPoints,y_lPoints,'Color',lPointsColor,'LineWidth',1.5)                saveas(fig,'.\authCode.png');    endrefresh()    function verify(~,~)        codeInPut=acEditField.Value;        codeInPut=upper(codeInPut);        codeInPut(codeInPut=='0')='O';        if strcmp(codeInPut,authCode)            msgbox('验证码正确')        else            msgbox('验证码错误')        end            endend

    感谢你能够认真阅读完这篇文章,希望小编分享的"怎么使用Matlab制作图形验证码生成器"这篇文章对大家有帮助,同时也希望大家多多支持,关注行业资讯频道,更多相关知识等着你来学习!

    0