数控铣宏程序实例

§4.1 椭圆加工（编程思路:以一小段直线代替曲线）

例1 整椭圆轨迹线加工（假定加工深度为2mm)

方法一:已知椭圆的参数方X=acosθ Y=bsinθ

变量数学表达式

设定θ= #1（0°～ 360° ）

那么 X= #2 = acos［#1］

Y= #3= bsin［#1］

程序

O0001;

S1000 M03;

G90 G54 G00 Z100;

G00 Xa Y0;

G00 Z3;

G01 Z-2 F100;

#1=0;

N99 #2=a*cos［#1］；

#3=b*sin［#1］；

G01 X#2 Y#3 F300;

#1=#1+1;

IF［#1LE360］GOTO99；

GOO Z50；

M30；

例2 斜椭圆且椭心不在原点的轨迹线加工（假设加工深度为2mm）

椭圆心不在原点的参数方程

X=a*CＯS［#1］+ M

Y=b*SIN［#1］+ N

变量数学表达式

设定θ=#1; (0°～360°)

那么X=#2=a*CＯS［#1］+ M

Y=#3=b*SIN［#1］+ N

因为此椭圆绕（M ,N）旋转角度为A 可运用坐标旋转指令G68

格式 G68 X- Y- 　R- X,Y：旋转中心坐标; R: 旋转角度

程序

Ｏ0002;

S1000 M03;

G90 G54 G00 Z100;

GOO X0 Y0;

GOO Z3;

G68 XM YN R45;

#1=0;

N99 #2=a*COS［#1］+M;

#3=b*SIN［#1］+N;

GO1 X#2 Y#3 F300;

G01 Z-2 F100;

#1=#1+1;

IF［#1LE360］GOTO99;

G69 GOO Z100;

M30;

例3:椭圆轮廓加工（深度2mm）

采用椭圆的等距加工方法使椭圆的长半轴

和短半轴同时减少一个行距的方法直到短

半轴小于刀具的半径R

根据椭圆的参数方程可设

变量表达式θ=#1(0°～360°)

a=#2

b=#3(b-R～R)

X=#2*COS［#1］=#4

Y=#3*SIN［#1］=#5

程序

Ｏ0003;

S1000 M03;

G90 G54 G00 Z100;

G00 XO YO;

GOO Z3;

G01 Z-2 F100;

#2=a-R;

#3=b-R;

N99 #1=0;

#4=#2*COS［#1］;

#5=#3*SIN［#1］;

G01 X#4 Y#5 F300;

#1=#1+1；

IF［#1LE360］GOTO99;

#2=#2-R;

#3=#3-R;

IF［#3LER］GOTO99;

GOO Z100;

M30;

例4 非整椭圆轨迹线加工；（加工深度2mm）

已知椭圆的长半轴a 短半轴为b 且与X轴正向夹角为A1,A2。首先根据椭圆的参数方程求出θ1，θ2和P1(x1,y2) P2(x1,y2)

此时要注意 A1≠θ1,A2≠θ2如图示

ON=b , OM=a

NP=P1Q, NP1=PQ

X1=OQ, Y1=P1Q

由上可列出方程

OQ=OM*COSθ=a*COSθ=X (1)

PQ=NP=ON*SINθ=b*SINθ=Y (2)

TANa=PQ/OQ=Y/X (3)

根据（1）（2）（3）可解出θ1，X1,Y1同理可解出θ2,X2,Y2

编程方法一：

根据参数方程 X=a*COSθ Y=b*SINθ

设定变量表达式

#1=0 (角度从θ1 ～ θ2 变化)

#2=a*COS［#1］

#3=b*SIN［#1］

程序

O0001;

S1000 M03;

G90 G54 G00 Z100;

G00 Xa Y0;

G00 Z3;

G01 Z-2 F100;

#1=0;

N99 #2=a*cos［#1］；

#3=b*sin［#1］；

G01 X#2 Y#3F300;

#1=#1+1;

IF［#1LE360］GOTO99；

GOO Z50；

M30；

编程方法二：根据椭圆标准方程 X2/a2+Y2/b2=1

设定变量表达式

#1=X （X值由X～-X变化）

#2=Y=b/a*SQRT［［a*a］-［#1*#1］］

程序

Ｏ0002;

S1000 M03;

G90 G54 G00 Z100;

GOO X1 Y1;

GOO Z3;

G01 Z-2 F100;

#1=X1;

N99 #2=b/a*SQRT［a*a-#1*#1］;

G01 X#1 Y#2 F300;

#1=#1-0.2;

IF［#1LE-a］GOTO99;

G00 Z100;

M30;

4.2 球面加工 （编程思想：以若干个不等半径的整圆代替曲面）

例1 平刀加工凸半球

已知凸半球的半径R，刀具半径r

建立几何模型如图

数学变量表达式

#1=θ=0 (00～900,设定初始值#1=0)

#2=X=R*SIN［#1］+r(刀具中心坐标)

#3=Z=R-R*COS［#1］

编程时以圆球的顶面为Z向O平面

程序

Ｏ0001;

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

G00 Z3;

#1=0;

WHILE［#1LE90］DO1;

#2=R*SIN［#1］+r;

#3=R-R*COS［#1］;

G01 X#2 Y0 F300;

G01 Z-#3 F100;

G02 X#2 Y0 I-#2 J0 F300;

#1=#1+1;

END1;

G00 Z100;

M30;

当加工的球形的角度为非半球时可以

通过调整#1也就是θ角变化范围来改变程序

例2 球刀加工凸半球

已知凸半球的半径R，刀具半径r

建立几何模型如图

设定变量表达式

#1=θ=0 (0°～90°,设定初始值#1=0)

#2=X=［R+r］*SIN［#1］(刀具中心坐标)

#3=Z=R-［R+r］*COS［#1］+r=［R+r］*［1-COS［#1］］

编程时以圆球的顶面为Z向O平面

程序

Ｏ0001;

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

Z3;

#1=0;

WHILE［#1LE90］DO1;

#2=［R+r］*SIN［#1］;

#3=［R+r］*［1-COS［#1］］;

G01 X#2 Y0 F300;

G01 Z-#3 F100;

G02 X#2 Y0 I-#2 J0 F300;

#1=#1+1;

END1;

G00 Z100;

M30;

例3 球刀加工凹半球

已知凸半球的半径R，刀具半径r

建立几何模型如图

设定变量表达式

#1=θ=0 (0°～90°,设定初始值#1=0)

#2=X=［R-r］*COS［#1］(刀具中心坐标)

#3=Z=［R-r］*SIN［#1］+r

程序

Ｏ0003

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

G00 Z3;

#1=0;

WHILE［#1LE90］DO1;

#2=［R-r］*SIN［#1］;

#3=［R-r］*COS［#1］+r;

G01 X#2 Y0F300;

G01Z-#3F100;

G03 X#2 Y0 I-#2 J0F300;

#1=#1+1;

END1;

G00Z100;

M30;

当加工凹半球的一部分时，可以通过改变#1即θ角来实现。如果凹半球底部不加工可以利用平刀加工，方法相似。

4.3 孔口倒圆角

编程思路：以若干不等半径整圆代替环形曲面

例1 平刀倒凸圆角

已知孔口直径φ，孔口圆角半径R,平刀半径r

建立几何模型

设定变量表达式

#1=θ=0 （θ从0°～90°，设定初始值#1=0）

#2=X=φ/2+R-r-R*SIN［#1］

#3=Z=R-R*COS［#1］

程序

Ｏ0001;

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

GOO Z3;

#1=0

N99#2 =φ/2+R-r-R*SIN［#1］

#3 =R-R*COS［#1］

G01 X#2 Y0 F300;

G01Z-#3 F100;

G03 X#2 Y0 I-#2 J0 F300;

#1=#1+1;

IF［#1LE90］GOTO99;

G00 Z100;

M30;

例2 平刀加工凹圆角

已知孔口直径φ，孔口圆角半径R,平刀半径r

建立几何模型

设定变量表达式

#1=θ=0（θ从0°～90°，设定初始值#1=0）

#2=X=φ/2 +R*SIN［#1］–r

#3=Z=R*SIN［#1］

程序

Ｏ0001;

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

G00 Z3;

#1=0

N99#2 =φ/2+R*SIN［#1］-r

#3 = R*SIN［#1］

G01 X#2 Y0 F300;

G01 Z-#3 F100;

G03 X#2 Y0 I-#2 J0 F300;

#1=#1+1;

IF［#1LE90］GOTO99;

G00 Z100;

M30;

例3 球刀倒凸圆角

已知孔口直径φ，孔口圆角半径R,球刀半径r

建立几何模型

设定变量表达式

#1=θ=0（θ从0°～90°，设定初始值#1=0）

#2=X=φ/2 +R-［R+r］*SIN［#1］

#3=Z=R-［R+r］*COS［#1］+r

=［R+r］*［1-COS［#1］］

程序

Ｏ0001;

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

G00 Z3;

#1=0

N99#2 =φ/2 +R-［R+r］*SIN［#1］；

#3=［R+r］*［1-COS［#1］］

G01 X#2 Y0 F300;

G01 Z-#3 F100;

G03 X#2 Y0 I-#2 J0 F300;

#1=#1+1;

IF［#1LE90］GOTO99;

G00 Z100;

M30;

例4 球刀倒凹圆角

已知内口直径φ，孔口圆角半径R,球刀半径r

建立几何模型

设定变量表达式

#1=θ=0（θ从0°～90°，设定初始值#1=0）

#2=X=φ/2 +R*COS［#1］-r

#3=Z=R*SIN［#1］

程序

Ｏ0001;

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

G00 Z3;

#1=0

N99#2 =φ/2 +R*COS［#1］-r；

#3= R*SIN［#1］

G01 X#2 Y0 F300;

G01 Z-#3 F100;

G03 X#2 Y0 I-#2 J0 F300;

#1=#1+1;

IF［#1LE90］GOTO99;

G00 Z100;

M30;

4.4 孔口倒斜角 （编程思路：以若干不等半径整圆代替环形斜面）

例1 平刀倒孔口斜角

已知内孔直径φ 倒角角度θ 倒角深度Ζ1

建立几何模型

设定变量表达式

#1=θ=0（θ从0变化到Ζ1设定初始值#1=0）

#2=X=φ/2 +Ζ1*COT［θ］-#1*COT［θ］-r

程序

Ｏ0001;

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

G00 Z3;

#1=0;

WHILE［#1LEΖ1］DO1;

#2=φ/2 +Ζ1*COT［θ］-#1*COT［θ］-r;

G01 X#2 Y0 F300;

G01Z-#1 F100;

G03X#2 Y0 I-#2 J0 F300;

#1=#1+O.1;

END1;

G00 Z100;

M30;

例2 球刀倒孔口斜角

已知内孔直径φ 倒角角度θ 倒角深度Ζ1

建立几何模型

首先求出 Z2=r-r*COS［θ］

X2= r*SIN［θ］

设定变量表达式

#1=Z=Z2 (Z由Z2变化到Z1+Z2)

#2=X=φ/2 +Ζ1*COT［θ］-［Z-Z2］*COT［θ］-X2

=φ/2 +Ζ1*COT［θ］-r*SIN［θ］-［#1-r+r*COS［θ］*COT［θ］

=φ/2+［Z-#1+r-r*COS［θ］*COT［θ］］-r*SIN［θ］

程序

Ｏ0001;

S1000 M03;

G90 G54 GOO Z100;

G00 X0 Y0;

G00 Z3;

#1=Z2;

WHILE［#1LE(Ζ1+Z2)］DO1;

#2=φ/2+［Z-#1+r-r*COS［θ］*COT［θ］］-r*SIN［θ］;

G01 X#2 Y0 F300;

G01 Z-#1 F100;

G03 X#2 Y0 I-#2 J0 F300;

#1=#1+0.1;

END1;

G00 Z100;

M30;

4.3 多元素倒角

编程思路：通过改变半径补偿值改变加工轮廓的实际大小以若干个轮廓线代替轮廓曲面

运用指令：G10 L12 P 半径补偿号 R 半径补偿值

须知基本概念：刀具半径补偿值=刀具中心到加工轮廓的距离

例1 平刀倒多元素圆角

已知周边圆角半径R,刀具半径r

建立几何模型如图所示

设定变量表达式

#1=θ=0（θ从0°～90°设定初始值#1=0）

#2=D=R*SIN［#1］+r-R(D有可能是负值)

#3=Z= R-R*COS［#1］

程序

Ｏ0001;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 XO Y-3O;

GOO Z3;

#1=0;

N99#2= R*SIN［#1］+r-R;

#3= R-R*COS［#1］;

G01 Z-#3 F100;

G10 L12 P1 R#2;

D01 M98 P100 F3OO;

#1=#1+1；

IF［#1LE90］GOTO99;

G00 Z100;

M30;

子程序

Ｏ100;

G41 G01 X0 Y-15

G01 X-13;

G02 X-13 Y15 R15;

G01 X13;

G02 X13 Y-15 R15;

G01 X0 Y-15;

G40 G01 X0 Y-30;

M99;

例2 球刀倒多元素圆角

图同上例

已知周边圆角半径R,刀具半径r

建立几何模型如图所示

设定变量表达式

#1=θ=0（θ从0°～90°设定初始值#1=0）

#2=D=［R+r］*SIN［#1］-R

#3=Z= ［R+r］-［R+r］*COS［#1］

主程序

Ｏ0001;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 XO Y-3O;

GOO Z3;

#1=0;

N99#2= ［R+r］*SIN［#1］-R;

#3= ［R+r］-［R+r］*COS［#1］;

G01 Z-#3 F100;

G10 L12 P1 R#2;

D01 M98 P100 F3OO;

#1=#1+1；

IF［#1LE90］GOTO99;

G00 Z100;

M30;

子程序

Ｏ100;

G41 G01 X0 Y-15

G01 X-13;

G02 X-13 Y15 R15;

G01 X13;

G02 X13 Y-15 R15;

G01 X0 Y-15;

G40 G01 X0 Y-30;

M99;

例3 平刀倒多元素斜角

已知倒角深度Z，角度θ，平刀半径r

建立几何模型

设定变量表达式

#1=Z=0(Z由0变化到Z1,设定初始值#1=0)

#2=D=Z*COT［θ］+r-Z1*COT［θ］

= #1*COT［θ］+r-Z1*COT［θ］

程序

Ｏ0001;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 XO Y-3O;

GOO Z3;

#1=0;

N99#2= #1*COT［θ］+r-Z1*COT［θ］；

G01 Z-#1 F100;

G10 L12 P1 R#2;

D01M98P100F3OO;

#1=#1+0.1；

IF［#1LEZ1］GOTO99;

G00Z100;

M30;

子程序

Ｏ100;

G41G01X0Y-15

G01X-13;

G02X-13Y15R15;

G01X13;

G02X13Y-15R15;

G01X0Y-15;

G40G01X0Y-30;

M99;

例4 球刀倒多元素斜角

已知倒角深度Z，角度θ，平刀半径r

建立几何模型

设定变量表达式

#1=Z=Z2(Z由Z2变化到Z1+Z2,设定初始值#1= Z2)

#2=D=［Z- Z2］*COT［θ］+r*COT［θ］-Z1*COT［θ］

=［#1-［r-r*COs［θ］］］*COT［θ］+r*COT［θ］- Z1*COT［θ］

=#1+ r*COs［θ］*COT［θ］- Z1*COT［θ］

程序

Ｏ0001;

S1000M03;

G90 G54 G40 G00 Z100;

G00 XO Y-3O;

GOO Z3;

#1= Z2;

N99#2= #1+ r*COs［θ］*COT［θ］- Z1*COT［θ］；

G01 Z-#1 F100;

G10 L12 P1 R#2;

D01 M98 P100 F3OO;

#1=#1+0.1；

IF［#1LE Z1+Z2］GOTO99;

G00 Z100;

M30;

子程序

Ｏ100;

G41G01X0Y-15

G01X-13;

G02X-13Y15R15;

G01X13;

G02X13Y-15R15;

G01X0Y-15;

G40G01X0Y-30;

M99;

4.4 特殊类型加工

例1 运用个G10指令加工腔体或者凸台

G10的格式 G10 L12 P 半径补偿号 R 半径补偿值

编程思路：通过设定刀具半径补偿变量偏置轮廓加工腔体或凸台

已知各尺寸如图刀具假定半径r=5

每层加工2mm 加工行距8

设定变量表达式

#1=Z=2(Z从2变化到10 初始值Z=2)

#2=D=5(刀具半径补偿初始值D=5)

主程序

Ｏ0001;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 XO Y0;

GOO Z3;

#1= 2;

WHILE［#1LE10］DO1;

WHILE［#2LE30］DO2;

#2=5;

G01 Z-#1 F100;

G10 L12 P1 R#2;

D01 M98 P100 F200;

#2=#2+8；

END2;

#1=#1+2;

END1;

GOO Z100;

M30;

子程序

Ｏ100;

G41 G01 Y30;

G01 X-26 Y30;

G03 X-26 Y-30 R30;

G01 X26 Y-30;

G03 X26 Y30 R30;

G01 X0 Y30;

G40 G01 X0 Y0;

M99;

例2 螺纹加工

螺纹加工方法有很多种，本例主要针对单齿螺纹刀运用G02

G03指令加工

螺旋括补代码 G02 G03格式 G02 X- Y- Z- I- J- F-;

G03 X- Y- Z- I- J- F-;

编程思路：运用G02 G03螺旋括补指令设定Z方向为变量

以每一个螺距或导程为递增，加工螺纹

加工M60×3的螺纹深度20

设定变量 #1=Z=0(Z由3变化到-21 设定初始加工平面Z=3)

(每加工一个齿 下降一个螺距3)

程序

Ｏ0002;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 XO Y0;

GOO Z3;

#1=0;

G42 G01 X30 Y0 D01 F100;

WHILE［#1GE-21］DO1;

G02 X30 Y0 Z#1 I-30;

#1=#1-3;

END1;

G40 G01 X0 Y0;

G00 Z100;

M30;

例3 阿基米德螺旋线的轨迹线加工(加工深度2mm)

编程思路：以若干条小段直线代替曲线

已知此曲线极坐标的方程为r=aθ（a：常数 θ：弧度）

起始角θ=0°=0弧度

终止角θ=270°+360°=630°=630×3.14／180弧度=10.99弧度

设定变量表达式 #1=θ=0°(θ由00变化到630° 设定初始值#1=0)

#2=θ（弧度=#1×3.14／180）

#3=r=a*#2

程序

Ｏ0003;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 XO Y0;

GOO Z3;

G01 Z-2 F100;

#1=0;

WHILE［#1LE630］DO 1;

#2=#1*3.14／180

#3=a*#2

G16 G01 X#3 Y#1 F300;

#1=#1+1;

END1;

G15 G00 Z100;

M30;

例4 正弦曲线加工 （深度2mm）

设定变量表达式

#1=t=0(t由0°变化到360°)

#3=a*SIN［#1］=Y

#2=b/360*#1=X

程序

Ｏ0003;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 XO Y0;

GOO Z3;

G01 Z-2 F100;

#1=0;

WHILE［#1LE360］DO 1;

#2= b/360*#1;

#3= a*SIN［#1］;

G01 X#2 Y#3 F300;

#1=#1+1;

END1;

G15 G00 Z100;

M30;

例5 正弦曲面四轴加工

设定变量表达式

#1=A=0(#1为第四轴A的角度由0°～360°)

#2=X=a*SIN［3*#1］

程序

Ｏ0003;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 X-R Y0;

GOO Z3;

G01Z-m F100;

G41 G01 XO YO D01 F200;

#1=0;

WHILE［#1LE360］DO 1;

#2= a*SIN［3*#1］;

G01 X#2 A#1;

#1=#1+1;

END1;

G15 G00 Z100;

M30;

例5 椭球面加工

已知椭球面的标准方程X2/a2+Y2/b2+Z2/c2=1

和椭圆的参数方程X=a*COS［θ］ Y=b*SIN［θ］

X,Y,Z方向三个半轴长度分别为 a,b,c刀半径r

设定变量表达式

#1=θ=0（Z向角度变量，θ由0°变化到90°设定初始值#1=0）

#2=θ=0（平面内角度变量，θ由0°变化到360°设定初始值#2=0）

#3=a1=a*COS［#1］(X向半轴变量)

#4=c1=c*SIN［#1］(Z向半轴变量)

#5=b/c*SQRT［c*c-#4*#4］(Y向半轴变量)

#6=#3*COS［#2］+r(平面内X坐标变量)

#7=#5*SIN［#2］+r(平面内Y坐标变量)

程序

Ｏ0003;

S1000 M03;

G90 G54 G40 G00 Z100;

G00 X0 Y0;

GOO Z3;

#1=0;

WHILE［#1LE90］DO 1;

#3= a*COS［#1］;

#4=c*SIN［#1］；

#5=b/c*SQRT［c*c-#4*#4］；

G01 X#3 Y#5 F300;

G01 Z#4;

#2=0;

WHILE［#2LE360］DO 2;

#6=#3*COS［#2］+r;

#7=#5*SIN［#2］+r

G01 X#6 Y#7;

#2=#2+1;

END2;

#1=#1+1;

END1;

G00 Z100;

M30;

子、法那克、哈斯的 球头宏程序

2010-02-18 13:49:35 阅读39 评论0 字号：大中小 订阅

本文引用自数控之家

引用

的

引用 西门

转自数控中国宏程序版块

西门子、法那克、哈斯的 球头宏程序

宏指令编的半球程序

西门子 802D 系统验证正确可用 R50的半球 中心为G54原点 工件上表面为z0 刀具：8mm键槽刀 D01=4.1(粗加工) 4.05 （半精） 4.0（精加工）

T1D1 G54 G90 G17 定义刀具 坐标系 绝对值编程 加工平面

M03S1200 定义主轴转速

G00Z50 初始高度定位

X60 Y30 坐标定位

Z2 下降到安全高度

R1=0 赋值： 起始角度为0度

NNN: 标记（可以任意给）

R2=50*SIN(R1) X坐标和半径 角度 对应的 关系

R3=50*COS(R1)-50 Z坐标和半径 角度 对应的关系 还要减去一个半径 不然刀具不往下加工 而是从下往上走

G01 Z=R1 F80 刀具下刀第一次加工深度

G41 G01 X=R2 Y10 D01 F1500 从x60 y30 的地方往当前点加刀补

Y0 切入

G02 I=-R2 走一个整圆

G01 Y-10 直线切出 这里G01 不能省略

G40 G01 X60 Y-30 取消刀补

Y30 回到初始定位坐标

R1=R1+1 角度累计增加 粗加工角度给大点 半精给小点 精加工再小一点

IF R1<=90.1 GOTOB NNN 条件转移 因为是半球 所以只要比90度小 就可以了 跳转到 NNN 和上面一致就可以了

G00 Z100 抬刀

X100 Y100 退刀

M05 主轴停止

M02 程序结束并返回开始 （西门子是用M02 要是打了M30程序结束但不返回）

法那克和哈斯系统

O0001

T0101 G54 G90 G17 ; 定义刀具 坐标系 绝对值编程 加工平面

M03S1200 ; 定义主轴转速

G00Z50.; 初始高度定位

X60. Y30.; 坐标定位

Z2.; 下降到安全高度

#1=0; 赋值： 起始角度为0度

N10 #2=50*SIN[#1] ; N10 标记（可以任意给） X坐标和半径 角度 对应的 关系

#3=50*COS[#1]-50 ; Z坐标和半径 角度 对应的关系 还要减去一个半径 不然刀具不往下加工 而是从下往上走

G01 Z#3 F80; 刀具下刀第一次加工深度

G41 G01 X#2 Y10. D01 F150; 从x60 y30 的地方往当前点加刀补

Y0 ; 切入

G02 I-#2 ; 走一个整圆

G01 Y-10. 直线切出 这里G01 不能省略

G40 G01 X60. Y-30.; 取消刀补

Y30.; 回到初始定位坐标

#1=#1+1 角度累计增加 粗加工角度给大点 半精给小点 精加工再小一点

IF[#1LE90.1]GOTO10 条件转移 因为是半球 所以只要比90度小 就可以了 跳转到 N10 和上面一致就可以了 这里不要打GOTOBN10

G00 Z100.; 抬刀

X100; Y100. ; 退刀

M05 ; 主轴停止

M30; 程序结束并返回开始 （法那克和哈斯是用M30 要是打了M02程序结束但不返回）