主程序：
```
O0077
M33
T0202
G0X0. Z0.5
M31
M26
M98 P0066 L10
M00
M27
G4X1.
M05
M32
G28U0.W0.
O0066
G97 S20
M3
M34
G28 U0. W0.
M14
M00
G4 X2.
M15
M00
M26
G4 X2.
M27
G4 X1.
T0202
G0 X0. Z0.5
M26
M33
M99
```
子程序（P0066）：
```
G97 S20
M3
M34
G28 U0. W0.
M14
M00
G4 X2.
M15
M00
M26
G4 X2.
M27
G4 X1.
```
解释：
主程序
`O0077`：设置工作状态。
`M33`：选择工具。
`T0202`：选择刀具。
`G0X0. Z0.5`：将机床移动到初始位置。
`M31`：准备机床。
`M26`：开始自动送料。
`M98 P0066 L10`：调用子程序P0066，并执行10次。
`M00`：停止主轴。
`M27`：释放夹具。
`G4X1.`：快速移动到下一个位置。
`M05`：主轴速度切换。
`M32`：准备机床。
`G28 U0. W0.`：回到安全位置。
`O0066`：跳转到子程序P0066的起始位置。
`G97 S20`：设置进给速度。
`M3`和`M34`：循环执行子程序。
`M14`和`M15`：子程序结束，返回主程序。
`M26`：开始自动送料。
`M27`：释放夹具。
`M99`：结束自动送料。
子程序（P0066）
`G97 S20`：设置进给速度。
`M3`和`M34`：循环执行子程序。
`M14`和`M15`：子程序结束，返回主程序。
`M26`：开始自动送料。
`M27`：释放夹具。
这个实例展示了如何使用M98指令调用子程序来实现自动送料，并通过循环指令重复执行子程序，从而提高编程效率和代码的可维护性。