老式打孔程序通常遵循一定的格式和结构，以确保其可读性和可维护性。以下是一个示例程序，展示了如何编写一个老式打孔程序：
```gcode
； 打四孔程序
N0010 G92 X0 Y0 Z50 ； 设定工件坐标系
N0020 M03 主轴正转
N0030 G00 X0 Y0 ； 第一孔的位置
N0040 M98 L200 ； 调用子程序打孔
N0050 G00 X100 Y0 ； 快速移动到第二孔
N0060 M98 L200 ； 调用子程序打孔
N0070 G00 X100 Y50 ； 快速移动到第三孔
N0080 M98 L200 ； 调用子程序打孔
N0090 G00 X0 Y50 ； 快速移动到第四孔
N0100 M98 L200 ； 调用子程序打孔
N0110 M05 主轴停
N0120 G26 三轴同时回到参考点
N0130 M02 程序结束
```
解释
设定工件坐标系：
`G92 X0 Y0 Z50` 将工作台移动到指定的坐标系位置。
主轴正转：
`M03` 使主轴旋转。
移动到第一孔位置：
`G00 X0 Y0` 将刀具移动到第一个孔的中心位置。
调用子程序打孔：
`M98 L200` 调用子程序进行打孔，`L200` 表示子程序执行200次。
快速移动到其他孔：
通过 `G00` 指令快速移动到下一个孔的位置。
主轴停止：
`M05` 停止主轴旋转。
返回参考点：
`G26` 使三轴同时回到参考点。
程序结束：
`M02` 结束程序。
子程序示例
子程序可能如下所示：
```gcode
； 子程序：打孔
N0200 G00 Z0 ； 快速接近工件表面
N0210 G01 W-10 F60 ； 打孔，使用G01直线插补，F值为60
N0220 G00 W+10 ； 退出
N0230 G00 Z50 ； 快速抬起
N0240 M99 ； 子程序返回
```
建议
注释：
在程序中添加注释，解释每一步的操作，便于理解和维护。
格式化：
保持一致的缩进和格式，使程序易于阅读。
子程序：
将重复的代码块提取为子程序，提高代码的可重用性。
错误检查：
在关键步骤添加错误检查，确保程序运行的安全性。
通过遵循这些建议，可以编写出既好看又实用的老式打孔程序。