圆弧插补程序

圆弧插补程序

ID:38498226

大小:28.00 KB

页数:3页

时间:2019-06-13

圆弧插补程序_第1页
圆弧插补程序_第2页
圆弧插补程序_第3页
资源描述:

《圆弧插补程序》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、X0=input('ÇëÊäÈëÆðµãºáÖá×ø±êx:');Y0=input('ÇëÊäÈëÆðµã×ÝÖá×ø±êy:');pace=input('ÇëÊäÈë²î²¹²½³¤:');NXY=input('ÇëÊäÈë²½Êý£º');RNSS=input('ÇëÑ¡Ôñ²î²¹×ßÏò(1´ú±í˳ʱÕë/2´ú±íÄæʱÕë):');XM=X0;YM=Y0;%ÒÔÔµãΪԲÐÄ,(X0,Y0)µ½Ô²ÐľàÀëΪ°ë¾¶,»»ù×¼Ô²R=sqrt(X0*X0+Y0*Y0);alpha=0:pi/20

2、:2*pi;xx=R*cos(alpha);yy=R*sin(alpha);plot(xx,yy,'g:');holdon;%ͼÏñ±£³Öaxisequal;%ʹXYÖá×ø±êµÈ¿í%Õë¶Ô¿çÏóÏÞÔËÐÐʱ¶ÔZF³õʼ»¯(ÓÉÓÚÔÚ¿çÏóÏÞÔËÐÐʱ²»¸Ä±äZFÖµËùÒÔ±ØÐë¶ÔÆä³õʼ»¯)ZF=(RNSS==1)*(((Y0==0)*((X0>0)*4+(X0<0)*3))+((X0==0)*((Y0>0)*1+(Y0<0)*2)))+...(RNSS~=1)*(((Y0==

3、0)*((X0>0)*3+(X0<0)*4))+((X0==0)*((Y0>0)*2+(Y0<0)*1)));%½¨Á¢NXY´ÎÑ»·À´ÊµÏֲ¼ÆËãÓë»æͼfornum=1:NXY%FMÖµÅжÏFM=XM*XM+YM*YM-X0*X0-Y0*Y0;%ÏóÏÞÅжÏ(RNSΪ1,2,3,4·Ö±ð´ú±í1,2,3,4ÏóÏÞ)RNS=(XM>0)*((YM>0)*1+(YM<0)*4)+(XM<0)*((YM>0)*2+(YM<0)*3);%×ß²½¼ÆËã(RNS°ÙλΪ1±íʾÄæʱÕë

4、»Ô²,ʮλΪ1±íʾFM<0,¸öλÊý×Ö±íʾËùÔÚÏóÏÞ,ZF´ú±í×ß²½·½Ïò)switchRNS+((FM<0)*10)+(RNSS~=1)*100case001ZF=4;case002ZF=1;case003ZF=3;case004ZF=2;case011ZF=1;case012ZF=3;case013ZF=2;case014ZF=4;case101ZF=2;case102ZF=4;case103ZF=1;case104ZF=3;case111ZF=3;case112ZF=2;case113

5、ZF=4;case114ZF=1;end%²½½øµç»ú×ß²½(ÓÉZF¿ØÖÆ×ß²½·½ÏòÓÉpace¿ØÖƲ½³¤)switchZFcase1x1=[XM,XM+pace];y1=[YM,YM];if(x1==xe&&y1==ye)breakcase2x1=[XM,XM-pace];y1=[YM,YM];case3x1=[XM,XM];y1=[YM,YM+pace];case4x1=[XM,XM];y1=[YM,YM-pace];endplot(x1,y1,'r-');%Óɴ˵ãºÍÇ°Ò»µã×ø±ê×é³

6、ɵÄ2¸öÏòÁ¿»Ö±ÏßXM=x1(2);%±£´æ´Ëµã×ø±ê¹©Ï´Î×÷ͼºÍ±È½ÏʱʹÓÃYM=y1(2);holdon;pause(0.1);%ÑÓʱ³ÌÐòÐβÎΪÿ×ßÒ»²½ËùÓÃʱ¼äendholdoff;

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。