您好，以下是广数数控车床A类宏程序螺纹编程的示例：
O0001（螺纹加工程序）
G21 G40 G50 G80 G90
G00 X0 Z0
T0101 M6
S1000 M3
G97 S1000
G94
M08
G00 X30 Z5
M98 P1000 L5
G00 X100 Z100
M30
O1000（子程序）
G00 G90 G54 X2.5 Z5
G97 S1000 M03
G94
G76 P010060 Q0.1 R0.1 K0.1
G00 Z5
M99
说明：
- O0001是主程序，O1000是子程序。
- G21表示以毫米为单位进行编程。
- G40表示取消半径补偿。
- G50表示取消刀具长度补偿。
- G80表示取消循环。
- G90表示以绝对坐标系进行编程。
- G00 X0 Z0表示将刀具移动到坐标系原点。
- T0101 M6表示选择刀具，并将其装入主轴中。
- S1000 M3表示设置主轴转速为1000转/分钟，并将主轴启动。
- G97 S1000表示以转速为1000转/分钟进行切削。
- G94表示以每分钟进给量为毫米进行编程。
- M08表示打开冷却液。
- G00 X30 Z5表示将刀具移动到30毫米的位置，并将其置于距离工件表面5毫米的位置。
- M98 P1000 L5表示执行子程序1000，重复5次。
- G00 X100 Z100表示将刀具移动到坐标系（100,100）的位置。
- M30表示程序结束。
- 子程序O1000中，G90 G54表示以绝对坐标系和工件坐标系进行编程。
- G00 X2.5 Z5表示将刀具移动到（2.5,5）的位置。
- G97 S1000 M03表示以转速为1000转/分钟进行切削。
- G76 P010060 Q0.1 R0.1 K0.1表示以P010060为螺纹代号，Q0.1为进给量，R0.1为切削深度，K0.1为切削宽度进行螺纹加工。
- G00 Z5表示将刀具移动到距离工件表面5毫米的位置。
- M99表示子程序结束。
