车床喇叭孔的程序编制需要使用数控编程语言，以下是一个简单的数控车床钻孔编程代码示例，用于编制喇叭孔的程序：
```
G90 // 设置坐标系为绝对坐标系
G54 // 设置工件坐标系
G0 X0 Y0 Z0 // 快速定位到原点
T01 M06 // 切换到刀具01，并执行刀具换位
S1000 // 设置主轴转速为1000转/分钟
M03 // 启动主轴正转
G43 H01 // 刀具长度补偿，H01表示刀具01的长度补偿号
G98 G83 Z-30 R2 F200 // 进行钻孔循环，Z-30表示钻孔深度，R2表示每次进给返回时的Z轴位置，F200表示进给速度为200mm/分钟
G80 // 取消循环钻孔
G00 Z0 // Z轴快速抬起到原点位置
M05 // 停止主轴
M30 // 程序结束并重置机床
```
这个程序包括了以下步骤：
1. 设置坐标系为绝对坐标系（G90）。
2. 设置工件坐标系（G54）。
3. 快速定位到原点（G0 X0 Y0 Z0）。
4. 切换到刀具01，并执行刀具换位（T01 M06）。
5. 设置主轴转速为1000转/分钟（S1000）。
6. 启动主轴正转（M03）。
7. 刀具长度补偿（G43 H01）。
8. 进行钻孔循环，包括快速下刀、钻孔、快速抬刀等（G98 G83 Z-30 R2 F200）。
9. 取消循环钻孔（G80）。
10. Z轴快速抬起到原点位置（G00 Z0）。
11. 停止主轴（M05）。
12. 程序结束并重置机床（M30）。
请根据具体的加工要求和机床功能调整上述程序中的参数。如果需要更精确的喇叭孔加工，可能还需要使用更复杂的宏程序或CAD/CAM软件进行辅助设计。