在广数车床编程中，子程序的编程可以通过以下步骤进行：
确定子程序的功能和输入输出参数
明确子程序需要完成的具体功能。
确定子程序接受的输入数据类型和格式。
确定子程序的输出数据类型和格式。
编写子程序的算法
根据子程序的功能，设计相应的算法逻辑。
确保算法能够正确实现子程序的功能。
编写子程序的函数头
定义子程序的函数名。
声明输入参数和输出参数的类型。
编写子程序的函数体
在函数体中实现算法逻辑。
使用输入参数和输出参数进行编程。
对子程序进行测试
编写测试用例，检查子程序是否能够正确实现功能。
验证子程序的输出结果是否正确。
优化子程序
根据测试结果，优化子程序的算法和代码。
提高程序的效率和可靠性。
```广数编程语言
； 子程序名： INNER_HOLE_DRILL
； 功能： 钻削内孔
； 输入参数：
； - 内孔直径： D （单位： mm）
； - 钻削深度： H （单位： mm）
； 输出参数：
； - 钻削状态： STATUS （0： 完成， 1： 失败）
SUBroutine INNER_HOLE_DRILL （D, H, STATUS）
； 初始化钻削状态为完成
STATUS = 0
； 检查内孔直径是否大于0
IF D <= 0 THEN
STATUS = 1
RETURN
ENDIF
； 执行钻削操作
； 这里可以添加具体的钻削代码，例如移动刀具、切削等
； 钻削完成后，更新状态为完成
STATUS = 0
END subroutine
```
在主程序中调用这个子程序时，可以使用以下格式：
```广数编程语言
； 主程序
CALL INNER_HOLE_DRILL（19, 13, STATUS）
IF STATUS = 0 THEN
PRINT "内孔加工完成"
ELSE
PRINT "内孔加工失败"
ENDIF
```
通过这种方式，你可以在广数编程中实现模块化和重复使用代码，提高编程效率和可维护性。