程序如下:
clear all;
clc;
x=-125:50:125;
y=-125:50:125;
for i=1:1:36;
if i<=6
Sx(i)=x(1);
end
if i>6 && i<=12;
Sx(i)=x(2);
end
if i>12 && i<=18;
Sx(i)=x(3);
end
if i>18 && i<=24;
Sx(i)=x(4);
end
if i>24 && i<=30;
Sx(i)=x(5);
end
if i>30 && i<=36;
Sx(i)=x(6);
end
end
Sy=[];
for i=1:1:6;
Sy=[Sy,y];
end
%---------------------------------------------------
r=20;%刀具半径,切深设成20μm
Rw=180;%刀位点初始半径
Ro=200;%刀具轮廓外沿初始点
Ri=160;%刀具轮廓内沿初始点
Sf=36;%进给率36μm/rev
N=Rw/Sf;%N=5刀具共循环5圈</