naclr2.m

来自「一个用matlab编写的 关于笔画提取的仿真试验程序」· M 代码 · 共 23 行

function [t2,na,kk4,kk5]=naclr2(na,kk4,kk5)

k1=0;k2=0;
k1=kk4+1;
k2=kk5+1;
if  na(kk4,k2)>0
    t2=na(kk4,k2);
    na(kk4,kk5)=0;
kk4=kk4;
kk5=k2;
elseif  na(k1,kk5)>0
    t2=na(k1,kk5);
     na(kk4,kk5)=0;
kk4=k1;
kk5=kk5;
elseif na(k1,k2)>0 
    t2=na(k1,k2);
     na(kk4,kk5)=0;
kk4=k1;
kk5=k2;
else
    t2=0;
end