cmc2.asv

根据路线查找规律

function cmc2(st,tt,rowst,rowtt,a,b,ma,md1,md2) 
[ah,al]=size(a);
[bh,bl]=size(b);
t=0;
for i=1:ah
     for j=1:al
        c=((b==a(i,j))&(a(i,j)~=0));
        [m,n]=find(c~=0);
     if ~isempty(m)==1
         o0=rowst(i);
         mi=length(m');
         o1=zeros(1,mi);
         for mii=1:mi
         o1(mii)=rowtt(m(mii));
         if o0==1041|o0==1042
             [rowds,colds]=find(md1==st);
             [rowdt,coldt]=find(md1==a(i,j));
              disp('乘坐第-T1铁路车在D');
              rowds,
              disp('-可以从-');
              st,
              disp('达到地铁站-D');
              rowdt,
              disp('-到达站-');
              a(i,j), 
              elseif o0==1043|o0==1044
              [rowds,colds]=find(md2==st);
              [rowdt,coldt]=find(md2==a(i,j));
              disp('乘坐第-T2铁路车在D');
              rowds,
              disp('-可以从起点-');
              st,
             disp('直达到地铁站-D');
             rowdt,
             disp('-到达终点站-');
             a(i,j),
         else 
           disp('从-');
           st,
           disp('需要转乘');
           o0,
           disp('路车到达');
           a(i,j),
         end
  if o1(mii)==1042|o1(mii)==1041
             [rowds,colds]=find(md1==a(i,j));
             [rowdt,coldt]=find(md1==tt);
             disp('再乘坐第-T1铁路车在D');
             rowds,          
             disp('达到地铁站-D');
             rowdt,
             disp('-到达终点站-');
             tt,            
  elseif o1(mii)==1043|o1(mii)==1044
            [rowds,colds]=find(md2==a(i,j));
            [rowdt,coldt]=find(md2==tt);
            disp('再乘坐第-T2铁路车在D');
            rowds,
            disp('直达到地铁站-D');
            rowdt,
            disp('-到达终点站-');
            tt,
  else 
          disp('再转乘');
          o1(mii),
          disp('路车到达');
          tt,
      end
         end
 t=t+1;
         end
     end 
end
if t==0
    for i=1:ah
        for j=1:al
            for p=bh:-1:1
                for q=bl:-1:1
                    st=a(i,j);tt=b(p,q);
                    [h,l]=size(ma);
                    ma0=zeros(h,l+1);
                    ma0(:,2:l+1)=ma;
                    gj(st,tt,ma0,md1,md2);
                end
            end
        end
    end
end