v0600.m

来自「用matlab实现图像融合」· M 代码 · 共 28 行

%script v0600
while 1
  if (x(k)==si)|(v==1)
    break
  end
  xk1=x(k)+1;  yk1=y(k);
  if I(xk1,yk1)
    break
  end
  xk2=xk1;yk2=yk1+1;
  tr=1;
  if yk1<sj
    tr=(I(xk2,yk2)>0);
  end
  if tr
    per=per+1+I(xk1,yk1-1);
    pr=pr+1;
    if xk1==si
      per=per+1;
    else
      per=per+I(xk1+1,yk1);
    end
    k=k+1;v=5;
    x=[x xk1];  y=[y yk1];
  else
    break
  end
end