宏程序钻深孔的编程方法如下：
初始化参数
设定初始深度、每次钻深、退刀距离等参数。
例如，钻孔总深度为90.1毫米，每次钻深3毫米，退回加工起点后快速进刀到上次加工深度。
循环控制
使用`WHILE`循环来控制钻孔过程，直到达到设定的深度。
在每次循环中，计算并更新当前深度，检查是否达到最终深度，若未达到则继续钻孔，若达到则退刀并冷却刀具。
钻孔与退刀
在每次钻孔后，刀具需要快速退刀至安全位置，以冷却刀具并排屑。
退刀距离可以根据需要设定，例如每次退刀0.2毫米。
防止过切
在循环中添加判断条件，防止因深度计算错误导致过切。
例如，当钻孔深度达到或超过设定值时，跳出循环。
使用宏程序
将上述逻辑编写成宏程序，通过数控系统的宏程序功能实现深孔钻孔。
例如，使用FANUC系统的G73指令进行深孔加工，可以实现高效断屑和排屑。
```gcode
； 初始化参数
1 = -90.1 （钻孔总深度）
3 = 0 （平面等于 Z0）
； 循环控制
N10
3 = 3 - 3 （钻孔深度每次递减 3）
IF [3 LT 1] THEN
3 = 1 （强制赋值防止深度钻深）
2 = 3 + 3 + 0.2 （Z 每次的定位，每次定位距离上次钻孔深度偏移出来 0.2）
G0 Z 2 （程序 Z 定位）
G1 Z 3 F0.08 （钻孔路线）
G0 Z10 （快速退刀排削，冷却钻头）
IF [3 EQ 1] GOTO 20 （防止死循环，当钻孔深度到达跳出循环，跳转 N20）
GOTO 10 （绝对跳转到 N10 的地方执行 N10）
```
这个程序通过循环控制钻孔深度，每次钻深3毫米，然后退回加工起点，再快速进刀到上次加工深度，继续钻孔，直到达到总深度90.1毫米。在每次钻孔后，刀具快速退刀至安全位置，以冷却刀具并排屑。程序中还包含了防止过切的条件，确保加工过程的安全性。
建议在实际应用中，根据具体的机床型号和加工要求调整参数和循环逻辑，以达到最佳的加工效果。