我编的16*16图像分块的程序，请大家帮忙看一下

[wryclY]

f=imread('pout.tif');
[m,n,l]=size(f);
bk=16;
k1=m/bk;
k2=n/bk;
m=k1*bk;
n=k2*bk;
g=zeros(bk,bk);
if l==3
f=rgb2ycbcr(f);
end
g(i,j)=f(1:bk,1:bk,1);
figure;
imshow(g(i,j));

我的循环没有编完，写出来总是不对，请大家帮帮忙帮我编完好吗？谢谢！！

tic;
A=imread('001.jpg');
k=2;%设置k*l个分块
l=4;

z=1;%输出图片的编号

[m,n,p]=size(A);

for x=1:k;
for y=1:l;

for t=1;
for i=1:m/k;
for j=1:n/l;

B(i,j,t)=A(uint16((x-1)*m/k+i),uint16((y-1)*n/l+j),t);

end
end
end

imwrite(B, ['s', num2str(z), '.jpg'], 'jpg');
z=z+1;
end
end

toc;

笑脸 是 ： p