加工中心立銑刀，帶粗銑球面宏程序

案例說明：使用直徑是12的立銑刀，對R50的凸半球進行粗、精銑，工件坐標系的原點設在圓心。

說明：

1.從下往上加工。

2.使用角度變量θ，區間是0度到90度

3.粗銑每2mm銑削一層

O1225

G54 G00 X100. Y0 Z100. 定位

T1 粗銑刀

M03 S1000 主軸正轉

#1=51 粗銑圓弧

#2=12 銑刀直徑

#3=0

#4=#1+#2/2+20 定位點

#7=2 角度變化

#8=SQRT[#1*#1+#1*#1] 自變直徑

#9=2 銑削深度

WHILE[#8GE#1]DO2 循環判斷要銑的層數

#8=#8-#9 每次直徑變化

#10=SQRT[#8*#8-#1*#1] 計算Z向距離

#3=ATAN[#10/#8] 計算初始角度

#11=90-#3 計算結束角度

G00 Z20 進刀

X#4. Y0

WHILE[#3LE#11]DO1 循環判斷每層中每刀銑削的尺寸

#5=#8*COS[#3]+#2/2 計算X向位置

#6=#8*SIN[#3] 計算Z向位置

G01 X#5 Z#6 F300 進刀

G02 I-#5 銑削球面

#3=#3+#7 角度自增

END1 每層銑削結束

G00 Z70. 退刀

X100. Y0

END2 粗銑結束

G00 Z100.

X100. Y0 退刀

T2

M03 S1000

#1=50

#2=12

#3=0

#4=#1+#2/2+10

#7=5

G00 Z2

X#4. Y0

WHILE[#3LE90]DO1

#5=#1*COS[#3]+#2/2

#6=#1*SIN[#3]

G01 X#5 Z#6 F300

G02 I-#5

#3=#3+#7

END1

M01

M05

M30