[y,n,flag1]=f3(a,p,n); end
while (flag1~=0|flag~=0)&length(y(1,:)) [y,n,flag]=f2(a,y,n); % fwrite(f1,y,n,'int'); else [y,n,flag1]=f3(a,y,n); % fwrite(f1,y,n,'int'); end end (11) pinjie2()函数代码 function pinjie2() a=read2(); [x,x1,x2]=size(a); p(:,:)=a(1,:,:); n=[1]; [y,n,flag]=f2(a,p,n); flag1=1; if flag==0 [y,n,flag1]=f3(a,p,n); end while (flag1~=0|flag~=0)&length(y(1,:)) [y,n,flag]=f2(a,y,n); % fwrite(f1,y,n,'int'); else [y,n,flag1]=f3(a,y,n); % fwrite(f1,y,n,'int'); end end (12) pinjie3()函数代码 function pinjie3() 24 a=read3(); [x,x1,x2]=size(a); p(:,:)=a(1,:,:); n=[1]; [y,n,flag]=f2(a,p,n); flag1=1; if flag==0 [y,n,flag1]=f3(a,p,n); end while (flag1~=0|flag~=0)&length(y(1,:)) [y,n,flag]=f2(a,y,n); % fwrite(f1,y,n,'int'); else [y,n,flag1]=f3(a,y,n); % fwrite(f1,y,n,'int'); end end y1=y'; q=length(n); q1=int16(x/q); t=ones(q1,q*x2,x1); t(1,:,:)=y1; C=a; [x,x1,x2]=size(a); c=1:1:x; for k=2:q1 [c,C]=ff(C,c,n); [x,x1,x2]=size(C); p(:,:)=C(1,:,:); n=[1]; [y,n,flag]=f2(C,p,n); flag1=1; if flag==0 [y,n,flag1]=f3(C,p,n); end while (flag1~=0|flag~=0)&length(y(1,:)) 25 if flag==1 [y,n,flag]=f2(C,y,n); % fwrite(f1,y,n,'int'); else [y,n,flag1]=f3(C,y,n); % fwrite(f1,y,n,'int'); end end y1=y'; t(k,:,:)=y1; end pin=pinjie3(t); pin_=pin'; imwrite(pin_,'d:\\pp.bmp'); a=t; [x,x1,x2]=size(a); p(:,:)=a(1,:,:); n=[1]; [y,n,flag]=f2(a,p,n); flag1=1; if flag==0 [y,n,flag1]=f3(a,p,n); end while (flag1~=0|flag~=0)&length(y(1,:)) [y,n,flag]=f2(a,y,n); % fwrite(f1,y,n,'int'); else [y,n,flag1]=f3(a,y,n); % fwrite(f1,y,n,'int'); end end (13) pinjie4()函数代码 function pinjie4() a=read4(); [x,x1,x2]=size(a); 26 p(:,:)=a(1,:,:); n=[1]; [y,n,flag]=f2(a,p,n); flag1=1; if flag==0 [y,n,flag1]=f3(a,p,n); end while (flag1~=0|flag~=0)&length(y(1,:)) [y,n,flag]=f2(a,y,n); % fwrite(f1,y,n,'int'); else [y,n,flag1]=f3(a,y,n); % fwrite(f1,y,n,'int'); end end y1=y'; q=length(n); q1=int16(x/q); t=ones(q1,q*x2,x1); t(1,:,:)=y1; C=a; [x,x1,x2]=size(a); c=1:1:x; for k=2:q1 [c,C]=ff(C,c,n); [x,x1,x2]=size(C); p(:,:)=C(1,:,:); n=[1]; [y,n,flag]=f2(C,p,n); flag1=1; if flag==0 [y,n,flag1]=f3(C,p,n); end while (flag1~=0|flag~=0)&length(y(1,:)) 27 [y,n,flag]=f2(C,y,n); % fwrite(f1,y,n,'int'); else [y,n,flag1]=f3(C,y,n); % fwrite(f1,y,n,'int'); end end y1=y'; t(k,:,:)=y1; end pin=pinjie3(t); pin_=pin'; imwrite(pin_,'d:\\pp.bmp'); a=t; [x,x1,x2]=size(a); p(:,:)=a(1,:,:); n=[1]; [y,n,flag]=f2(a,p,n); flag1=1; if flag==0 [y,n,flag1]=f3(a,p,n); end while (flag1~=0|flag~=0)&length(y(1,:)) [y,n,flag]=f2(a,y,n); % fwrite(f1,y,n,'int'); else [y,n,flag1]=f3(a,y,n); % fwrite(f1,y,n,'int'); end end 28