西门子808D数控系统支持多种平面切削循环，以下是一个使用N95循环程序的示例：
程序步骤
T1D*：准备工件，将刀具移动到起始位置。
G0X42Z5：将刀具移动到X轴42毫米，Z轴5毫米的位置。
G1X0Z0：将刀具移动到X轴0毫米，Z轴0毫米的位置。
G3X24.25Z-7CR=14：执行钻孔循环，X轴移动24.25毫米，Z轴移动-7毫米，切削半径为14毫米。
G1X32Z-15：将刀具移动到X轴32毫米，Z轴-15毫米的位置。
W-10：刀具退后10毫米。
G2W-18CR=15：执行第二段钻孔循环，W轴退后18毫米，切削半径为15毫米。
G1W-5：刀具退后5毫米。
X34Z-58：将刀具移动到X轴34毫米，Z轴-58毫米的位置。
退出程序：结束加工。
其他方法
直接输入子程序名字：在主程序中直接调用子程序。
CALL 子程序名字：使用CALL指令调用子程序。
外部调用 EXCALL 子程序名字：通过外部调用指令调用子程序。
示例程序结构
```plaintext
主程序名MAIN（）
T01：准备刀具和工件
M6：主轴停止
D1：主轴正转
G54：设置工件坐标系
G90：绝对坐标系
G0 X0 Y0 S1000：快速移动到起始位置
M3：主轴启动
A01：调用子程序
M30：程序结束
```
子程序A01示例
```plaintext
子程序名A01
T01：准备刀具和工件
M6：主轴停止
D1：主轴正转
G54：设置工件坐标系
G90：绝对坐标系
G0 X0 Y0 S1000：快速移动到起始位置
M3：主轴启动
T1D*：准备工件
G0X42Z5：移动刀具到X轴42毫米，Z轴5毫米
G1X0Z0：移动刀具到X轴0毫米，Z轴0毫米
G3X24.25Z-7CR=14：执行钻孔循环
G1X32Z-15：移动刀具到X轴32毫米，Z轴-15毫米
W-10：刀具退后10毫米
G2W-18CR=15：执行第二段钻孔循环
G1W-5：刀具退后5毫米
X34Z-58：移动刀具到X轴34毫米，Z轴-58毫米
M30：程序结束
```
建议
确保所有坐标系和参数设置正确，以避免加工错误。
在实际应用中，可能需要根据具体的工件和加工要求调整循环参数。
调试程序时，可以先在模拟环境中进行验证，确保加工效果符合预期。