哪个大侠能帮我的这段代码加点注释 感激不尽
 

这是段关于条码识读的代码，老师要我读懂每一行 但我是个matlab小白
哪个大侠能给我加点注释让我能看懂些 感激不尽
Image0=imread('grey11.png');
Image=rgb2gray(Image0);
subplot(2,3,1);
imshow(Image);
title('原图');
%中值滤波
MedianImage=medfilt2(Image);
subplot(2,3,2);
imshow(MedianImage);
title('中值滤波');
%阈值分割
Im=MedianImage;
[x,y]=size(Im); % 求出图象大小
b=double(Im);
zd=max(max(Im)); % 求出图象中最大的灰度
zx=min(min(Im)); % 最小的灰度
T=double(zd+zx)/2; % T赋初值，为最大值和最小值的平均值
while 1 % 迭代最佳阈值分割算法
S0=0.0; n0=0.0; %为计算灰度大于阈值的元素的灰度总值、个数赋值
S1=0.0; n1=0.0; %为计算灰度小于阈值的元素的灰度总值、个数赋值
for i=1:x
for j=1:y
if double(Im(i,j))>=T
S1=S1+double(Im(i,j)); %大于阈域值图像点灰度值累加
n1=n1+1; %大于阈域值图像点个数累加
else
S0=S0+double(Im(i,j)); %小于阈域值图像点灰度值累加
n0=n0+1; %小于阀域值图像点个数累加
end
end
end
T0=S0/n0; %求小于阀域值均值
T1=S1/n1; %求大于阀域值均值
if abs(T-((T0+T1)/2))<0.1 %迭代至前后两次阀域值相差几乎为0时停止迭代。
break;
else
T=(T0+T1)/2; %在阈值T下，迭代阈值的计算过程
end
end
T %显示最佳阈值
thread=T/255;
SegImage=im2bw(MedianImage,thread); % 图像在最佳阈值下二值化
subplot(2,3,3);
imshow(SegImage);
title('分割结果');
%边沿检测
%水平方向
a=SegImage;
[M,N]=size(a);%求灰度图的大小
n=0;
m=0;
l=0;
for i=1:M
for j=1:N
if a(i,j)==0
n=n+1;
m=m+1;
end
end
if m~=0
l=l+1;%统计出行数
end
A(i)=m;
m=0;
end
average=n/l;%求出平均每行有多少个黑点
for i=1:M
if abs(A(i+1)-A(i))<1&&A(i)>=average
c=i;
break
end
end
b=a(c:c+20,:);
subplot(2,3,4);
imshow(b);
%竖直方向
[P,Q]=size(b);
n=0;
m=0;
l=0;
for j=1:Q
for i=1:P
if b(i,j)==0
n=n+1;
m=m+1;
end
end
if m~=0
l=l+1;
end
B(j)=m;
m=0;
end
ave=n/l;
for j=1:Q
if B(j)>=ave
B(j)=0;
else B(j)=1;
end
end
subplot(2,3,5);
imshow(B);
%%%%%%条码识别
%%%计算条码宽度，并记录条空总数
k=1;
for j=1:Q-1
if B(j)~=B(j+1)
bar(k)=j; %记录条空变化位置
k=k+1;
end
end
bar_sum=bar(60)-bar(1); %计算条码总宽度
%相似边计算每个字符的条码宽度
k=1;
for i=4:24
if rem(i,4)==0
T1(k)=bar(i+2)-bar(i);
T2(k)=bar(i+3)-bar(i+1);
T(k)=bar(i+4)-bar(i);
C1(k)=bar(i+1)-bar(i);
C2(k)=bar(i+2)-bar(i+1);
C3(k)=bar(i+3)-bar(i+2);
C4(k)=bar(i+4)-bar(i+3);
if T1(k)/T(k)<2.5/7
AT1(k)=2;
end
if T1(k)/T(k)>=2.5/7&&T1(k)/T(k)<3.5/7
AT1(k)=3;
end
if T1(k)/T(k)>=3.5/7&&T1(k)/T(k)<4.5/7
AT1(k)=4;
end
if T1(k)/T(k)>=4.5/7
AT1(k)=5;
end
if T2(k)/T(k)<2.5/7
AT2(k)=2;
end
if T2(k)/T(k)>=2.5/7&&T2(k)/T(k)<3.5/7
AT2(k)=3;
end
if T2(k)/T(k)>=3.5/7&&T2(k)/T(k)<4.5/7
AT2(k)=4;
end
if T2(k)/T(k)>=4.5/7
AT2(k)=5;
end
k=k+1;
end
end
%左侧条码识别
for k=1:6
switch AT1(k)*10+AT2(k)
case 53
bar_right(k)=0;
D(k)=1;
case 44
if C3(k)>C4(k)
bar_right(k)=1;
else bar_right(k)=7;
end
D(k)=1;
case 33
if C2(k)>C3(k)
bar_right(k)=8;
else bar_right(k)=2;
end
D(k)=1;
case 55
bar_right(k)=3;
D(k)=1;
case 24
bar_right(k)=4;
D(k)=1;
case 35
bar_right(k)=5;
D(k)=1;
case 22
bar_right(k)=6;
D(k)=1;
case 42
bar_right(k)=9;
D(k)=1;
case 23
bar_right(k)=0;
D(k)=2;
case 34
if C1(k)>C2(k)
bar_right(k)=7;
else bar_right(k)=1;
end
D(k)=2;
case 43
if C2(k)>C3(k)
bar_right(k)=2;
else bar_right(k)=8;
end
D(k)=2;
case 25
bar_right(k)=3;
D(k)=2;
case 54
bar_right(k)=4;
D(k)=2;
case 45
bar_right(k)=5;
D(k)=2;
case 52
bar_right(k)=6;
D(k)=2;
case 32
bar_right(k)=9;
D(k)=2;
end
end
%识别前置码
switch D(1)*100000+D(2)*10000+D(3)*1000+D(4)*100+D(5)*10+D(6)
case 111111
bar_first=0;
case 112122
bar_first=1;
case 112212
bar_first=2;
case 112221
bar_first=3;
case 121122
bar_first=4;
case 122112
bar_first=5;
case 122211
bar_first=6;
case 121212
bar_first=7;
case 121221
bar_first=8;
case 122121
bar_first=9;
end
%右侧条码识别
k=7;
for i=33:53
if rem(i-1,4)==0
T1(k)=bar(i+2)-bar(i);
T2(k)=bar(i+3)-bar(i+1);
T(k)=bar(i+4)-bar(i);
D1(k)=bar(i+1)-bar(i);
D2(k)=bar(i+2)-bar(i+1);
D3(k)=bar(i+3)-bar(i+2);
D4(k)=bar(i+4)-bar(i+3);
if T1(k)/T(k)<2.5/7
AT1(k)=2;
end
if T1(k)/T(k)>=2.5/7&&T1(k)/T(k)<3.5/7
AT1(k)=3;
end
if T1(k)/T(k)>=3.5/7&&T1(k)/T(k)<4.5/7
AT1(k)=4;
end
if T1(k)/T(k)>=4.5/7
AT1(k)=5;
end
if T2(k)/T(k)<2.5/7
AT2(k)=2;
end
if T2(k)/T(k)>=2.5/7&&T2(k)/T(k)<3.5/7
AT2(k)=3;
end
if T2(k)/T(k)>=3.5/7&&T2(k)/T(k)<4.5/7
AT2(k)=4;
end
if T2(k)/T(k)>=4.5/7
AT2(k)=5;
end
k=k+1;
end
end
for k=7:12
switch AT1(k)*10+AT2(k)
case 53
bar_right(k)=0;
case 44
if D3(k)>D4(k)
bar_right(k)=1;
else bar_right(k)=7;
end
case 33
if D2(k)>D3(k)
bar_right(k)=8;
else bar_right(k)=2;
end
case 55
bar_right(k)=3;
case 24
bar_right(k)=4;
case 35
bar_right(k)=5;
case 22
bar_right(k)=6;
case 42
bar_right(k)=9;
end
end
E(1)=bar_first;
for i=1:12
E(i+1)=bar_right(i);
end
disp(E);
%条码数据的校验
N=0;
M=0;
N1=3*(E(2)+E(4)+E(6)+E(8)+E(10)+E(12));
N2=E(1)+E(3)+E(5)+E(7)+E(9)+E(11);
N=N1+N2;
M=10-mod(N,10);
if M==E(13)
disp(E);
else
disp('译码错误');
end