www.pudn.com > BubianjuWork.rar > ABC1.m

%灰度共生矩阵实别方法 
function [TT]=ABC1(X) 
 
[Xl Xv Xa0 Xa1]=number(X); 
 
A=imread('D:\matlab\work\image\A.bmp'); 
[Al Av Aa0 Aa1]=number(A); 
 
B=imread('D:\matlab\work\image\B.bmp'); 
[Bl Bv Ba0 Ba1]=number(B); 
 
C=imread('D:\matlab\work\image\C.bmp'); 
[Cl Cv Ca0 Ca1]=number(C); 
 
D=imread('D:\matlab\work\image\D.bmp'); 
[Dl Dv Da0 Da1]=number(D); 
 
E=imread('D:\matlab\work\image\E.bmp'); 
[El Ev Ea0 Ea1]=number(E); 
 
F=imread('D:\matlab\work\image\F.bmp'); 
[Fl Fv Fa0 Fa1]=number(F); 
 
G=imread('D:\matlab\work\image\G.bmp'); 
[Gl Gv Ga0 Ga1]=number(G); 
 
H=imread('D:\matlab\work\image\H.bmp'); 
[Hl Hv Ha0 Ha1]=number(H); 
 
I=imread('D:\matlab\work\image\I.bmp'); 
[Il Iv Ia0 Ia1]=number(I); 
 
J=imread('D:\matlab\work\image\J.bmp'); 
[Jl Jv Ja0 Ja1]=number(J); 
 
K=imread('D:\matlab\work\image\K.bmp'); 
[Kl Kv Ka0 Ka1]=number(K); 
 
L=imread('D:\matlab\work\image\L.bmp'); 
[Ll Lv La0 La1]=number(L); 
 
M=imread('D:\matlab\work\image\M.bmp'); 
[Ml Mv Ma0 Ma1]=number(M); 
 
N=imread('D:\matlab\work\image\N.bmp'); 
[Nl Nv Na0 Na1]=number(N); 
 
Z=imread('D:\matlab\work\image\Z.bmp'); 
[Zl Zv Za0 Za1]=number(Z); 
 
TT=[Al Bl Cl Dl El Fl Gl Hl Il Jl Kl Ll Ml Nl Zl;...  
Av Bv Cv Dv Ev Fv Gv Hv Iv Jv Kv Lv Mv Nv Zv;...  
Aa0 Ba0 Ca0 Da0 Ea0 Fa0 Ga0 Ha0 Ia0 Ja0 Ka0 La0 Ma0 Na0 Za0;... 
Aa1 Ba1 Ca1 Da1 Ea1 Fa1 Ga1 Ha1 Ia1 Ja1 Ka1 La1 Ma1 Na1 Za1]; 
 
 
XX=[Xl;Xv;Xa0;Xa1]; 
tt=['A' 'B' 'C' 'D' 'E' 'F' 'G' 'H' 'I' 'J' 'K' 'L' 'M' 'N' 'Z']; 
 
for i=1:15 
    if  (XX==TT(:,(2*i-1):(2*i))) 
        figure,imshow(X); 
        disp('This is '); 
        tt(i) 
        break 
    end 
end