西门子系统加工中心宏程序编半球程序

交流电特

在论坛里看到有人问西门子编球型怎么编，在此小弟发表下自己的编程方法，可能不是很好的方法 希望大家多多指点……
以半径为15的半球为例吧 以半径为5的键槽刀为例
G64
G54G90G00Z100
X0Y0S1800M03
Z5
R1=0    (在z轴方向的变量)
MA:R2=SQRT(15*15-（15+R1）*(15+R1))   （球半径随着z轴变量的改变而改变）
G00X=R2
G01Z=R1F500
G02I=-R2F3000
R1=R1-0.02
IF R1>=-15GOTOB MA
G00Z100
Y150
M30
这个程序没用到刀补，要求精度很高的话 不是很使用，如有需要 我可以稍加修改增加刀补编程！
本人接触加工中心两个月多一点，所以学到的东西不是很多，希望高手多多指教 谢谢！