案例说明：使用直径是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