APIT算法matlab源代码备课讲稿.doc

《APIT算法matlab源代码备课讲稿.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、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))

2、yyy1(index(3))];%对Y坐标进行做相应变换max_xxx=xxx(3);min_xxx=xxx(1);max_yyy=max(yyy);min_yyy=min(yyy);if((yM

3、(yM>max_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))

4、*(xC-xB);endif((xC-xA)==0)xAC=xC;elseif((yC-yA)==0)xAC=-10;elsexAC=xA+((yM-yA)/(yC-yA))*(xC-xA);endif((xAB

5、(xAB>xxx(2)))xAB=-10;endif((xBC

6、(xBC>xxx(3)))xBC=-10;endif((xAC

7、(xAC>xxx(3)))xAC=-10;endselect1=[xABxBCxAC];find_index=find(select1>=0);oo=size(find_index,2);if(oo

8、<2)flag=0;elsefori=1:ooselect2(i)=select1(find_index(i));endselect2;%显示选择后的坐标值if((xM-select2(1))*(xM-select2(2))<=0)flag=1;elseflag=0;endendend