编写铣削内螺纹的程序需要遵循一定的步骤和规范，以下是一个基本的内螺纹铣削程序示例：
初始化
```
G90 G00 G54 G43 H1 X0 Y0 Z10.
M3 S5000
```
`G90`：绝对坐标系
`G00`：快速定位到起始点
`G54`：设置工件坐标系
`G43`：工件高度补偿
`H1`：选择工件坐标系
`X0 Y0 Z10.`：将刀具初始位置设置在工件外部，Z轴初始位置为10mm
`M3`：主轴正转
`S5000`：主轴转速5000转/分钟
刀具定位到要求深度
```
G01 Z-（TO THREAD DEPTH）
F1000
```
`G01`：直线插补
`Z-（TO THREAD DEPTH）`：Z轴向下移动到螺纹深度
`F1000`：进给速度1000mm/min
切削内螺纹
```
G01 G91 G41 D01 X（A/2） Y-（A/2） Z0
F---（F 按照实际要求调整）
G03 X（A/2） Y（A/2） R（A/2） Z（1/8 PITCH）
G03 X0 Y0 I-（A） J0 Z（螺距 PITCH）
G03 X-（A/2） Y（A/2） R（A/2） Z（1/8 PITCH）
```
`G01`：直线插补
`G91`：相对坐标系
`G41`：直径补偿
`D01`：直径
`X（A/2） Y-（A/2） Z0`：刀具中心定位到螺纹中心
`F---`：进给速度（根据实际情况调整）
`G03`：螺旋插补
`X（A/2） Y（A/2） R（A/2） Z（1/8 PITCH）`：螺旋插补参数
`I-（A） J0`：螺旋插补的起始角度
`Z（螺距 PITCH）`：螺旋插补的终止高度
`G03 X-（A/2） Y（A/2） R（A/2） Z（1/8 PITCH）`：另一段螺旋插补
退刀并返回起始位置
```
G01 G40 X-（A/2） Y-（A/2） Z0
G90 G0 Z50.
```
`G01`：直线插补
`G40`：取消直径补偿
`X-（A/2） Y-（A/2） Z0`：刀具退回到螺纹中心
`G90`：绝对坐标系
`G0 Z50.`：刀具返回起始高度
其他注意事项
确保刀具直径和螺纹直径匹配，并进行适当的补偿。
根据实际加工需求调整进给速度和切削深度。
使用合适的刀具和刀片，确保加工质量和刀具寿命。
在编程前，进行模拟加工和程序审核，确保无误。
以上是一个基本的内螺纹铣削程序示例，具体参数需要根据实际情况进行调整。对于更复杂的螺纹加工，可能需要使用专业的CAM软件进行辅助设计。