球刀加工球体时，可以使用宏程序来实现。以下是一个使用R5球刀加工R50的半圆球的宏程序示例：
```plaintext
； 凸半圆球加工宏程序
O0001；
G90 G54 G00 Z100.0；
X0 Y0；
S1500 M03；
Z10.0；
G01 Z0 F100；
1=50； （半圆球半径）
2=5； （球刀半径）
3=0； （角度初始化）
WHILE [3LE90] DO1； （角度小于等于90度重复执行DO1-END1）
4=[1+2]*SIN[3]； （X轴变量）
5=[1+2]-[1+2]*COS[3]； （Z轴变量）
G01 X4 F1000；
Z-5；
G02 X4 I-4；
3=3+1； （角度递增为1度）
END1；
G00 Z100.0；
M05；
M30；
```
解释
初始化
`O0001；`：设置机床坐标系为绝对坐标系。
`G90 G54 G00 Z100.0；`：将机床Z轴移动到100mm。
`X0 Y0；`：将机床X轴和Y轴移动到原点。
`S1500 M03；`：设置主轴转速为1500rpm，并启用冷却液。
加工循环
`Z10.0；`：将机床Z轴移动到10mm，作为加工的起始高度。
`G01 Z0 F100；`：以F100的进给速度，Z轴向下移动到0mm。
`1=50；`：设置半圆球的半径为50mm。
`2=5；`：设置球刀的半径为5mm。
`3=0；`：设置初始角度为0度。
`WHILE [3LE90] DO1；`：当角度小于等于90度时，重复执行以下步骤。
`4=[1+2]*SIN[3]；`：计算当前角度下的X轴坐标。
`5=[1+2]-[1+2]*COS[3]；`：计算当前角度下的Z轴坐标。
`G01 X4 F1000；`：以F1000的进给速度，沿X轴移动到计算出的X坐标，并加工。
`Z-5；`：沿Z轴向下移动到计算出的Z坐标。
`G02 X4 I-4；`：以圆弧插补方式，沿X轴和I轴移动到下一个加工点。
`3=3+1；`：角度递增1度。
结束
`G00 Z100.0；`：将机床Z轴移动回100mm。
`M05；`：停止主轴。
`M30；`：程序结束。
这个宏程序通过循环控制角度和坐标，实现了球刀对球体的加工。可以根据实际需要调整半径和角度等参数，以加工不同尺寸和形状的球体。