【正文】 )。endimwrite(d,39。39。)。figure(8),subplot(3,2,5),imshow(d),title(39。39。)% 尋找連續(xù)有文字的塊，若長(zhǎng)度大于某閾值，則認(rèn)為該塊有兩個(gè)字符組成，需要分割d=qiege(d)。[m,n]=size(d)。figure,subplot(2,1,1),imshow(d),title(n)k1=1。k2=1。s=sum(d)。j=1。while j~=n while s(j)==0 j=j+1。 end k1=j。 while s(j)~=0 amp。amp。 j=n1 j=j+1。 end k2=j1。 if k2k1=round(n/) [val,num]=min(sum(d(:,[k1+5:k25])))。 d(:,k1+num+5)=0。 % 分割 endend% 再切割d=qiege(d)。% 切割出 7 個(gè)字符y1=10。y2=。flag=0。word1=[]。while flag==0 [m,n]=size(d)。 left=1。wide=0。 while sum(d(:,wide+1))~=0 wide=wide+1。 end if widey1 % 認(rèn)為是左側(cè)干擾 d(:,[1:wide])=0。 d=qiege(d)。 else temp=qiege(imcrop(d,[1 1 wide m]))。 [m,n]=size(temp)。 all=sum(sum(temp))。 two_thirds=sum(sum(temp([round(m/3):2*round(m/3)],:)))。 if two_thirds/ally2 flag=1。word1=temp。 % WORD 1 end d(:,[1:wide])=0。d=qiege(d)。 endend% 分割出第二個(gè)字符[word2,d]=getword(d)。% 分割出第三個(gè)字符[word3,d]=getword(d)。% 分割出第四個(gè)字符[word4,d]=getword(d)。% 分割出第五個(gè)字符[word5,d]=getword(d)。% 分割出第六個(gè)字符[word6,d]=getword(d)。% 分割出第七個(gè)字符[word7,d]=getword(d)。subplot(5,7,1),imshow(word1),title(39。139。)。subplot(5,7,2),imshow(word2),title(39。239。)。subplot(5,7,3),imshow(word3),title(39。339。)。subplot(5,7,4),imshow(word4),title(39。439。)。subplot(5,7,5),imshow(word5),title(39。539。)。subplot(5,7,6),imshow(word6),title(39。639。)。subplot(5,7,7),imshow(word7),title(39。739。)。[m,n]=size(word1)。% 商用系統(tǒng)程序中歸一化大小為 40*20,此處演示word1=imresize(word1,[40 20])。word2=imresize(word2,[40 20])。word3=imresize(word3,[40 20])。word4=imresize(word4,[40 20])。word5=imresize(word5,[40 20])。word6=imresize(word6,[40 20])。word7=imresize(word7,[40 20])。subplot(5,7,15),imshow(word1),title(39。139。)。subplot(5,7,16),imshow(word2),title(39。239。)。subplot(5,7,17),imshow(word3),title(39。339。)。subplot(5,7,18),imshow(word4),title(39。439。)。subplot(5,7,19),imshow(word5),title(39。539。)。subplot(5,7,20),imshow(word6),title(39。639。)。subplot(5,7,21),imshow(word7),title(39。739。)。imwrite(word1,39。39。)。imwrite(word2,39。39。)。imwrite(word3,39。39。)。imwrite(word4,39。39。)。imwrite(word5,39。39。)。imwrite(word6,39。39。)。imwrite(word7,39。39。)。liccode=char([39。039。:39。939。 39。A39。:39。Z39。 39。湘蘇豫陜魯39。])。 %建立自動(dòng)識(shí)別字符代碼表 SubBw2=zeros(40,20)。l=1。for I=1:7 ii=int2str(I)。 t=imread([ii,39。.jpg39。])。 SegBw2=imresize(t,[40 20],39。nearest39。)。 if l==1 %第一位漢字識(shí)別 kmin=37。 kmax=40。 elseif l==2 %第二位 A~Z 字母識(shí)別 kmin=11。 kmax=36。 else l=3 %第三位以后是字母或數(shù)字識(shí)別 kmin=1。 kmax=36。 end for k2=kmin:kmax fname=strcat(39。字符模板\39。,liccode(k2),39。.jpg39。)。 SamBw2 = imread(fname)。 for i=1:40 for j=1:20 SubBw2(i,j)=SegBw2(i,j)SamBw2(i,j)。 end end % 以上相當(dāng)于兩幅圖相減得到第三幅圖 Dmax=0。 for k1=1:40 for l1=1:20 if ( SubBw2(k1,l1) 0 | SubBw2(k1,l1) 0 ) Dmax=Dmax+1。 end end end Error(k2)=Dmax。 end Error1=Error(kmin:kmax)。 MinError=min(Error1)。 findc=find(Error1==MinError)。 Code(l*21)=liccode(findc(1)+kmin1)。 Code(l*2)=39。 39。 l=l+1。endfigure(10),imshow(dw),title ([39。車牌號(hào)碼:39。, Code],39。Color39。,39。b39。)。function [word,result]=getword(d)word=[]。flag=0。y1=8。y2=。 while flag==0 [m,n]=size(d)。 wide=0。 while sum(d(:,wide+1))~=0 amp。amp。 wide=n2 wide=wide+1。 end temp=qiege(imcrop(d,[1 1 wide m]))。 [m1,n1]=size(temp)。 if widey1 amp。amp。 n1/m1y2 d(:,[1:wide])=0。 if sum(sum(d))~=0 d=qiege(d)。 % 切割出最小范圍 else word=[]。flag=1。 end else word=qiege(imcrop(d,[1 1 wide m]))。 d(:,[1:wide])=0。 if sum(sum(d))~=0。 d=qiege(d)。flag=1。 else d=[]。 end end end%end result=d。function e=qiege(d)[m,n]=size(d)。top=1。bottom=m。left=1。right=n。 % initwhile sum(d(top,:))==0 amp。amp。 top=m top=top+1。endwhile sum(d(bottom,:))==0 amp。amp。 bottom=1 bottom=bottom1。endwhile sum(d(:,left))==0 amp。amp。 left=n left=left+1。endwhile sum(d(:,right))==0 amp。amp。 right=1 right=right1。enddd=rightleft。hh=bottomtop。e=imcrop(d,[left top dd hh])。