clc
clear
close all
a0=imread('D:\Mary.bmp');
subplot(221);
imshow(a0);
title('原圖像');
a=a0;
a=double(a);
%給圖像矩陣數(shù)據(jù)的最上和最下加入兩行0
b=zeros(1,256);
c=[b;a;b];
%給圖像矩陣數(shù)據(jù)的最左和最右加入兩列0
d=zeros(258,1);
e=[d c d];
%建立一個(gè)3×3的平滑濾波器(模板),即3行3列的1的矩陣
panel=[-1 -1 -1;-1 8 -1;-1 -1 -1];
%進(jìn)行模板運(yùn)算
for i=2:257
    for j=2:257
        %取出圖像中的3×3的矩陣
        image33=[e(i-1,j-1) e(i-1,j) e(i-1,j+1);
                 e(i,j-1)   e(i,j)   e(i,j+1);
                 e(i+1,j-1) e(i+1,j) e(i+1,j+1)];
             temp=0;
             for m=1:3
                 for n=1:3  
                  temp= image33(m,n)*panel(m,n)+temp;
                 end
             end
             panelimage(i,j)=temp/9;
             
    end
end
for  i=2:257
    for j=2:257
        c(i,j)=9*a(i-1,j-1)+panelimage(i,j);
        d(i,j)=.1*a(i-1,j-1)+.1*panelimage(i,j);
    end
end
%d=a+.1*panelimage;
panelimage=mat2gray(panelimage);
subplot(222);
imshow(panelimage);
title('銳化濾波圖像');
c=mat2gray(c);
subplot(223);
imshow(c);
title('大系數(shù)高平增強(qiáng)圖像');
d=mat2gray(d);
subplot(224);
imshow(d);
title('小系數(shù)高平增強(qiáng)圖像');