《直线插补逐点比较法(MATLAB版)(共1页).docx》由会员分享，可在线阅读，更多相关《直线插补逐点比较法(MATLAB版)(共1页).docx（1页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、精选优质文档-倾情为你奉上function myfun = pbpLinearintepol(x0, y0, x1, y1)%x0,y0,x1,y1分别为起始点的横、纵坐标和终止点的横、纵坐标%以下程序是将图形限制在area区域内，并且将网格间距调整为1个单位长度area = max(max(x0,y0),max(x1,y1);plot(0 0,area area);grid onset(gca,XTick,0:1:area) set(gca,YTick,0:1:area)%以下部分程序是画出需要加工的工件轮廓line(x0 x1,y0 y1);hold on;grid on%以下部分程序是模
2、拟走刀路径num = abs(x0-x1) + abs(y0-y1);px = x0;py = y0;k0 = (y1-y0)/(x1-x0);k = k0; for i=1:num lastX = px; lastY = py; %lastX、lastY为走刀之前的位置坐标if (kk0)py = py + 1; else px = px + 1; endline(lastX px,lastY py,Marker,.,Color,r,Linestyle,-,LineWidth,2);k = (y1-py)/(x1-px);pause(.5); %每走一步暂停0.5秒endsSS专心-专注-专业