长轴锥度的编程可以通过G代码和M代码来实现，以下是一个常用的数控锥度编程示例：
设置绝对坐标系和起始点
```
G00 G90 G54 X0 Y0
```
设置主轴转速
```
M03
```
定位刀具并设定刀具长度偏移
```
G43 H01 Z50
```
快速下刀到起切点
```
G01 Z-20 F200
```
直线插补刀具到加工起点
```
G01 X100 Y100 F100
```
以半径为100的圆弧插补画出锥面
```
G03 X0 Y0 R100
```
直线插补刀具到加工终点
```
G01 X200 Y200 F100
```
快速抬刀
```
G01 Z-50
```
停止主轴
```
M05
```
程序结束
```
M30
```
基于G代码的数控锥度加工编程示例
定义起点和终点坐标
```
G00 X0.0 Y0.0 Z0.0
G01 X10.0 Y10.0 Z-30.0 F100.0
```
设定切削参数
```
T01
```
选择刀具号码
```
G43 H01
```
设定工具长度补偿
```
```
设定进给速度和切削速度
```
F200.0
S1500
```
开始加工锥度
```
G01 Z-40.0
G02 X20.0 Z-60.0 I10.0 J0.0
```
精车程序
```
G01 X20.0 G1Z0.F0.3 G1X50W-30F0.12 G0U1Z1 X120.Z130.
```
利用三角函数模仿G71路线来粗车锥度
工艺定制
夹持直径50，以左端面定位。
选用90度外圆车刀。
角度为26.6度。
公式计算
角度对边=临边*TAN[26.6](临边已知等于30)
角度临边=对边/TAN[26.6](对边已知为(50-20)/2)
程序注释
O0001 M3S1000G99 T101M08 G0X50.Z10. Z1. 1=50（锥度大头） 2=20（锥度小头） 3=3（每刀吃刀量）
N101=1-3（计算出每刀的X值）
IF[1LT2]THEN1=2（强制赋值防止X过切）
4=[1-2]/2/TAN[26.6](利用三角函数算出每次Z方向需要车削的长度)
G0X1（X定位）
G1Z-[4-0.5]F0.15（轴向车削，减去0.5是因为留0.5余量精加工）
G0U1.Z1.（退刀）
IF[1EQ2]GOTO20（防止死循环）
IF[1GE2]GOTO10（如果X没有到达尺寸，跳转N10继续循环）
N20