findmaxminh.m

一个用matlab编写的 关于笔画提取的仿真试验程序

function [maxmin]=findmaxminh(c1)
[mwh,nwh]=size(c1);
 for i=1:mwh
     a1=0;
     k1=0;
 k2=0;
    for j=1:nwh-1
        a1=a1+k2-k1;
        ff=0;
        jjj=j+a1;
        jj=jjj;
        if jjj>=nwh 
            break;
        else
        if c1(i,jjj)>=0
            k1=jjj;
          while  c1(i,jjj+1)>0
            jjj=jjj+1;
            ff=1;
            if jjj>=nwh 
                break;
            end
        end
        if ff==1
           k2=jjj;
       end
        if ff==0
            k2=jjj;
        end
        end
        if c1(i,jjj)<0
            k1=jjj;
             while c1(i,jjj+1)<0
            jjj=jjj+1;
           ff=1;
             if jjj>=nwh 
                break;
            end
       end
       if ff==1
           k2=jjj;
       end
       if ff==0
             k2=jjj;
        end
        end
        if (k2-k1)==0
          max=c1(i,k1);
          awwh(i,jj)=max;
      else 
            max=c1(i,k1);
        for kk=(k1+1):(k2)
           if abs(max)<abs(c1(i,kk))
            max=c1(i,kk);
            jj=kk;
        end
    end
    awwh(i,jj)=max;
    end
end
end
end
maxmin=awwh;