APIT算法matlab源代码

functionflag=APIT(xA,yA,xB,yB,xC,yC,xM,yM)%xA=str2num(xxA);xB=str2num(xxB);xC=str2num(xxC);xM=str2num(xxM);command%yA=str2num(yyA);yB=str2num(yyB);yC=str2num(yyC);yM=str2num(yyM);commandxxx1=[xAxBxC];yyy1=[yAyByC];[xxx,index]=sort(xxx1);%对X坐标进行排序yyy=[yyy1(index(1))yyy1(index(2))yyy1(index(3))];%对Y坐标进行做相应变换max_xxx=xxx(3);min_xxx=xxx(1);max_yyy=max(yyy);min_yyy=min(yyy);if((yMmin_yyy)|(yMmax_yyy))flag=0;elseif((xB-xA)==0)xAB=xA;elseif((yB-yA)==0)xAB=-10;elsexAB=xA+((yM-yA)/(yB-yA))*(xB-xA);endif((xC-xB)==0)xBC=xC;elseif((yC-yB)==0)xBC=-10;elsexBC=xB+((yM-yB)/(yC-yB))*(xC-xB);endif((xC-xA)==0)xAC=xC;elseif((yC-yA)==0)xAC=-10;elsexAC=xA+((yM-yA)/(yC-yA))*(xC-xA);endif((xABxxx(1))|(xABxxx(2)))xAB=-10;endif((xBCxxx(2))|(xBCxxx(3)))xBC=-10;endif((xACxxx(1))|(xACxxx(3)))xAC=-10;endselect1=[xABxBCxAC];find_index=find(select1=0);oo=size(find_index,2);if(oo2)flag=0;elsefori=1:ooselect2(i)=select1(find_index(i));endselect2;%显示选择后的坐标值if((xM-select2(1))*(xM-select2(2))=0)flag=1;elseflag=0;endendend