发那科加工中心螺旋铣半球体的宏程序

问题补充：

本例Z轴原点设在半球的圆心。

%

0001

G90 G80 G40 G00

G91 G30 Z0.

M06 T10

G54 G90 G00 X0. Y0.

G43 H10 Z100.

M03 S8000

M08

#700=50. //半球半径

#701=90. //起始角度

#703=5.  //刀具半径，本例使用平底立铣刀

N10

#710=#700*COS[#701]+#703

#711=#700*SIN[#701]

G00 X[#700+#703+2] Y1. //X.Y向落刀安全距离

G00 Z[#711+1.]         //Z轴落刀

G01 Z#711 F1000

G01 X#710

G01 Y0.

G02 I-#710

G01 Y-1.

G00 Z2.

#701=#701-1.

IF[#701 GE 0] GOTO10

G00 Z50.

M05

M09

G91 G28 Z0.

G28 Y0.

M30

%

-----------------------------------------------------

-----------------------------------------------------

使用球头刀精铣程序

%

0001

G90 G80 G40 G00

G91 G30 Z0.

M06 T10

G54 G90 G00 X0. Y0.

G43 H10 Z100.

M03 S8000

M08

#700=50. //半球半径

#701=90. //起始角度

#703=5.  //刀具半径，使用R5球头立铣刀

N10

#710=[#700+#703]*COS[#701]        //此处不一样

#711=[#700+#703]*SIN[#701]-#703   //此处不一样

G00 X[#700+#703+2] Y1.

G00 Z[#711+1.]  

G01 Z#711 F1000

G01 X#710

G01 Y0.

G02 I-#710

G01 Y-1.

G00 Z2.

#701=#701-1.

IF[#701 GE 0] GOTO10

G00 Z50.

M05

M09

G91 G28 Z0.

G28 Y0.

M30

%