例46：小手柄的数控车床加工
Ｏ0046；
N10 G50X100Z100； （对刀点，也是换刀点）
N20 T0101M03S600F0.2M08； （F0.2是每转进给量）
N30 G00X32Z2；
N40 G01Z0；
N50 X-1；
N60 G00X32Z2；
N70 G73U7R5；
N80 G73P90Q150U0.5F0.2；
N90 G01X0F0.2；
N100 Z0；
N110 G03X22.29Z-18.161R12.48；(12,48保证SR25的公差值)
N120 G02X20.169Z-43.001R30；
N130 G02X25Z-46.245R8；
N140 G03X27.983Z-49.368R4； (27.983保证Φ28的公差值)
N150 G01Z-60；
N160 G04X120； （暂停，复位，测量，设定摩耗补偿量）
N170 M03S1000； （把光标移到M03下方，按起动按钮，精加工外圆）
N180 G00X100Z100；
N190 T0202；
N200 G70P90Q150；
N210 G00X100Z100；
N220 S500T0303； （切断）
N230 G00X32Z-（57.975+切槽刀宽）；(57.975保证58长度的公差值)
N240 G01X-1F0.05；
N250 G00X32；
N260 G00X100Z100；
N270 M05M09；
N280 M30；
%
例47：长手柄的数控车床加工
Ｏ0047；
N10 G50X100Z100； （对刀点，也是换刀点）
N20 T0101M03S600F0.2M08；
N30 G00X32Z2；
N40 G01Z0F0.2；
N50 X-1；
N60 G00X32Z2；
N70 G73U8R5；
N80 G73P90Q140U0.5F0.2；
N90 G01X0F0.2；
N100 G01Z0；
N110 G03X9.226Z-2.505R5.5；
N120 G03X18.39Z-50.348R51.987；(R51.987保证Φ26的尺寸公差)
N130 G02X18.983Z-73.602R30；(18.983保证Φ19的尺寸公差)
N140 G01Z-81；
N150 G04X100； (暂停、按复位按钮、停车测量，把测得的值与图纸尺寸比较，把两N160 M03S1000； 者之差作为摩耗输入系统，把光标移到M03下，重新起动)
N170 G00X100Z100；
N180 T0202；
N190 G70P90Q140；
N200 G00X100Z100；
N210 T0303S500； (换03号切槽刀，切断)
N220 G00X32Z-（79.975+切槽刀宽度）； (79.975保证长度80尺寸公差)
N230 G01X-1F0.05；
N240 G00X32； (先退X方向)
N250 G00X100Z100；
N260 M05M09；
N270 M30；
例48：轴类零件1的数控车床加工
Ｏ0048；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X32Z2；
N40 G01Z0；
N50 X-1；
N60 G00X32Z2；
N70 G73U9.5R6；
N80 G73P90Q150U0.5F0.2；
N90 G01X23.981F0.2；
N100 Z-1.82；
N110 G03X22Z-4.056R3；
N120 G02X17.38Z-19.142R12；
N130 G03X18.7Z-34.3R16；
N140 G02X23.981Z-44.874R8.5；
N150 G01Z-50；
N160 G00X100Z100；
N170 T0202S1000；
N180 G70P90Q150；
N190 G00X100Z100；
N200 T0303S500；
N210 G00X32Z-(47.925+切槽刀宽)；
N220 G01X-1F0.05；
N230 G00X32；
N240 G00X100Z100；
N250 M05M09；
N260 M30；
例49：轴类零件2的数控车床加工
Ｏ0049；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X-1；
N60 G00X42Z2；
N70 G73U11.32R8；
N80 G73P90Q160U0.5F0.2；
N90 G01X22F0.2；
N100 Z0；
N110 X23.984Z-1；
N120 Z-10；
N130 G02X24Z-25R10；
N140 G01X28.9.Z-42；
N150 G03X32.Z-60.97R17.98；
N160 Z-67；
N170 G00X100Z100；
N180 T0202S1000；
N190 G70P90Q160；
N200 G00X100Z100；
N210 T0303S400；
N220 G00X42Z-(64.975+切槽刀宽)；
N230 G01X-1F0.05；
N240 G00X42；
N250 G00X100Z100；
N260 M05M09；
N270 M30；
例50：轴类零件3的数控车床加工
Ｏ0050；
N10 G50X100Z100；
N20 T0101M03S650M08F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X-1；
N60 G71U2R1；
N70 G71P80Q150U0.5F0.2；
N80 G01Z0；
N90 G03X16Z-8R8；
N100 G01X20；
N110 Z-28；
N120 X23.984Z-48；
N130 Z-53；
N140 X37.98；
N150 Z-70；
N160 S1000；
N170 G70P90Q150；
N180 G00X100Z100；
N190 T0404S300；
N200 G00X42Z-28；（假设切槽刀宽4mm）
N210 G01X16F0.05；
N220 G04X0.5；
N230 G00X42；
N240 G01Z-63F0.2；
N250 X34F0.05；
N250 G04X0.5；
N260 G00X42；
N270 G01Z-62F0.2；
N280 X34F0.05；
N290 G04X0.5；
N300 G00X42；
N310 G00X100Z100；
N320 T0202；
N330 G00X25Z-4；
N340 G92X19.1Z-27F2.5；
N350 X18.5；
N360 X18.0；
N370 X17.6；
N380 X17.3；
N390 X17.3；
N400 X17.3；
N410 G00X100Z100；
N420 G00X42Z2；
N430 T0404；
N440 G00X42Z-71.975；
N450 G01X-1F0.05；
N460 G00X42；
N470 G00X100Z100；
N480 M05M09；
N490 M30；
例51：盘类零件1的数控车床加工
Ｏ0051；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X-1
N60 G00X42Z2；
N70 X15；
N80 G00X42Z2；
N90 G71U2R1；
N100 G71P110Q160U0.5F0.2；
N110 G01X28；
N120 Z0；
N130 X30Z-1；
N140 Z-20；
N150 G03X37.98Z-24R4；
N160 G01Z-41；
N170 G00X100Z100；
N180 S1000；
N190 G70P110Q160；
N200 G00X100Z100；
N210 T0303S600F0.2；
N220 G00X15Z2；
N230 G71U1R0.5；
N240 G71P250Q300U-0.5F0.2；
N250 G01X26；
N260 Z0；
N270 X24.045Z-1；
N280 Z-4.125；
N290 X20；
N300 X18Z-42；（Z 的尺寸字不得超过钻孔深度）
N310 S1000；
N320 G70P250Q300；
N330 G00X100；
N340 Z100；
N350 T0404S300；
N360 G00X42Z-20；（假设切槽刀宽4mm）
N370 G01X26F200；
N380 G04X0.5；
N390 G00X50；
N400 G00X100；
N410 Z100；
N420 T0101S600；
N430 G00X32Z-14；
N440 G01X30F0.2；
N450 X26Z-16；
N460 X34；
N470 G00X100；
N480 Z100；
N490 T0202；
N500 G00X34Z4；
N510 G92X29.3Z-16F0.75；
N520 X29.1；
N530 X29.03；
N540 X29.03；
N550 X29.03；
N560 G00X100Z100；
N570 T0404S400F0.2；
N580 G00X42Z-79.975；（假设切槽刀宽4mm）
N590 G001X15 F0.05；
N600 G00X42；
N610 G00X100Z100；
N620 M05M09；
N630 M30；
例52：盘类零件2的数控车床加工
Ｏ0052；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X15；
N60 G00X42Z2；
N70 G71U2R1；
N80 G71P90Q130U0.5F0.2；
N90 G01X30；
N100 Z0；
N110 X33Z-10；
N120 X36Z-10.5；
N130 Z-44；
N140 G00X100；
N150 Z100；
N160 T0303；
N170 G00X15Z2；
N180 G71U1R0.5；
N190 G71P200Q250U-0.5F0.2；
N200 G01X26.017；
N210 Z-10.5；
N220 X22Z-17.5；
N230 Z-28；
N240 G03X18.014Z-32.899R7；
N250 Z-44；
N260 S1000；
N270 G70P200Q250；
N280 G00Z100；
N290 X100；
N300 T0101；
N310 G70P90Q130；
N320 G00X100Z100；
N330 T0404S400；
N340 G00X42Z-42；
N350 G01X30F0.05；
N360 G04X0.5；
N370 G00X38；
N380 G00X100；
N390 Z100；
N400 T0202S200；
N410 G00X38Z6；
N420 G92X35Z-40F2；
N430 X34.4；
N440 X34；
N450 X33.6；
N460 X33.48；
N470 X33.4；
N480 X33.4；
N490 G00X100Z100；
N500 T0404S300；
N510 G00X38Z-45.975；
N520 G01X16F0.05；
N530 G00X100；
N540 Z100；
N550 M05M09；
N560 M30；
例53：盘类零件3的数控车床加工
Ｏ0053；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X42Z2；
N40 G01Z0F0.2；
N50 X15；
N60 G00X42Z2；
N70 G73U7R4；
N80 G73P90Q170U0.5F0.2；
N90 G01X28F0.2；
N100 Z0；
N110 X30Z-1；
N120 Z-10；
N130 X26Z-12；
N140 Z-22.775；
N150 G02X30.8Z-28R7；
N160 G01X37.981Z-48；
N170 Z-55；
N180 G00X100；
N190 Z100；
N200 T0303；
N210 G00X15Z4；
N220 G71U1R0.5；
N230 G71P240Q270U-0.5F0.2；
N240 G01X22F0.2；
N250 Z0；
N260 X18Z-10；
N270 Z-55；
N280 S1000；
N290 G70P240Q270；
N300 NG00Z100；
N310 X100；
N320 T0101；
N330 G00X42Z2；
N340 G70P90Q170；
N350 G00X100；
N360 Z100；
N370 T0202S300；
N380 G00X34Z4；
N390 G92X29.3Z-14F0.75；
N400 X29.1；
N410 X29.03；
N420 X29.03；
N430 G00X100；
N440 Z100；
N450 T0404；
N460 G00X42Z-53.975；
N470 G01X15F0.05；
N480 G00X100；
N490 Z100；
N500 M05M09；
N510 M30；
例54：螺纹类零件1的数控车床加工
Ｏ0054；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X15；
N60 G00X42Z2；
N70 G71U2R1
N80 G71P90Q140U0.5F0.2；
N90 G01X32；
N100 Z0；
N110 X36Z-2；
N120 Z-36；
N130 X37.9905；
N140 Z-47；
N150 G00X100；
N160 Z100；
N170 S1000；
N180 G70P90Q140；
N190 G00X100Z100；
N200 T0303S600；
N210 G00X15Z2；
N220 G71U1R0.5；
N230 G71P240Q300U-0.5F0.2；
N240 G00X28；
N250 Z0；
N260 X26.026Z-1；
N270 Z-15；
N280 G03X22Z-19R5；
N290 G02X18Z-23R5；
N300 G01Z-50；
N310 G70P240Q300；
N320 G00Z100；
N330 X100；
N340 T0404S300；
N350 G00X42Z2；
N360 G01Z-36F0.2；
N370 X31；
N380 G04X0.5；
N390 G01X40；
N400 X-32；
N410 X31；
N420 G04X0.5；
N430 G01X40；
N440 G00X100；
N450 Z100；
N460 T0202S300F0.2；
N470 G00X40Z6；
N480 G92X35.1Z-30F1.5；
N490 X34.5；
N500 X33.9；
N510 X33.5；
N520 X33.4；
N530 X33.4；
N540 X33.4；
N550 Z4.5；（Ｚ轴方向移过一个螺距1.5mm）
N560 G92X35.1Z-30F1.5；
N570 X34.5；
N580 X33.9；
N590 X33.5；
N600 X33.4；
N610 X33.4；
N620 X33.4；
N630 G00X100；
N640 Z100；
N650 T0404S500；
N660 G00X42Z-48.975；
N670 G01X15F0.05；
N680 G00X100；
N690 Z100；
N700 M05M09；
N710 M30；
例55：螺纹类零件2的数控车床加工
O0055；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X32Z2；
N40 G01Z0F0.2；
N50 X-1；
N60 G00X32Z2；
N70 G71U2R1；
N80 G71P90Q150U0.5F0.2；
N90 Z0；
N100 X16Z-0.5；
N110 Z-14；
N120 X20Z-27；
N130 G02X25.394Z-46.634R15；
N140 G03X27.983Z-50R5；
N150 G01Z-59；
N160 S1000；
N170 G70P90Q150；
N180 G00X100Z100；
N190 T0404S500；
N200 G00X30Z-14；
N210 G01X12F0.05；
N220 G04X0.5；
N230 G00X30；
N240 G00X100Z100
N250 T0202S300；
N260 G00X20Z4；
N270 G92X15Z-12F2；
N280 X14.4；
N290 X14；
N300 X13.6；
N310 X13.48；
N320 X13.4；
N330 X13.4；
N340 X13.4；
N350 X13.4；
N360 G00X100Z100；
N370 G00X32Z-59.975；
N380 G01X-1F0.05；
N390 G00X100；
N400 Z100；
N410 M05M09；
N420 M30；
例56：螺纹类零件3的数控车床加工
Ｏ0056；
N10 G50X100Z100；
N20 T0101M03S600F0.2 M08；
N30 G00X42Z2；
N40 G01Z0F0.2；
N50 G01X-1；
N60 G00X42Z2；
N70 G73U8R5；
N80 G73P90Q110U0.5F0.2；
N90 G01X31.552F0.2；
N100 G01Z0；
N110 G03X30.91Z-43R69.982；
N120 G00X100Z100；
N130 S1000；
N140 G90P110Q20；
N150 G00X100Z100；
N160 T0303；
N170 G00X16Z2；
N180 G71U1R0.5；
N190 G71P200Q230U-0.5F0.2；
N200 G01X22.84；
N210 Z-16；
N220 X17.982Z-36；
N230 Z-44；
N240 S1000；
N250 G70P200Q230；
N260 G00Z100；
N270 X100；
N280 T0505S500；（假定内槽刀宽为4mm）
N290 G01X16Z2F0.2；
N300 G01Z-16；
N310 G01X26F0.05；
N320 G04X1；
N330 G01X15F0.2；
N340 G00Z-14；
N350 G01X26F0.05；
N360 G04X1；
N370 G00X15；
N380 Z2；
N390 G00X100Z100；
N400 T0202S200；
N410 G00X18Z4；
N420 G92X22.84Z-14F1.5；
N430 X23.34；
N440 X23.74；
N450 X24；
N460 X24；
N470 X24；
N480 G00Z100；
N490 X100；
N500 T0404；
N510 G00X42Z-45.975； (假定外槽刀的宽度是4mm)
N520 G01X15F0.05；
N530 G00X42；
N540 G00X100Z100；
N550 M05M09；
N560 M30；
例57：螺纹类零件4的数控车床加工
Ｏ0057；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G0X42Z2；
N40 G01Z0；
N50 X15；
N60 G0X42Z2；
N70 G73U4R2；
N80 G73P90Q120U0.5F0.2；
N90 G01X16；
N100 Z0；
N110 G03X31.982Z-20.494R18.981；
N120 G01X42；
N130 S1000；
N140 G70P90Q120；
N150 G00X100Z100；
N160 T0303S600；
N170 G00X15Z4；
N180 G71U1R0.5；
N190 G71P200Q230U-0.5F0.2；
N200 G01X26.017；
N210 Z-5；
N220 X16.046Z-20.494；
N230 Z-48；
N240 S1000；
N250 G70P200Q230；
N260 G00Z100；
N270 X100；
N280 T0202S200；
N290 G00X15Z4；
N300 G92X16.846Z-42F1.5；
N310 X17.446；
N320 X17.746；
N330 X17.946；
N340 X18；
N350 G00Z100；
N360 X100；
N370 T0404S400；
N380 G00X42Z-43.975；
N390 G01X16F0.05；
N400 G00X42；
N410 G00X100Z100；
N420 M5M09；
N430 M30；
例58：二件套的编程实例
Ｏ0058；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X-1；
N60 G00X42Z2；
N70 G71U2R1
N80 G71P90Q150U0.5F0.1；
N90 G01Z0；
N100 X15；
N110 X16Z-1；
N120 Z-6.311；
N130 G03X28.914Z-15R15；
N140 G01X37.947；
N150 G03X23.324Z-29R19；
N160 S1200；
N170 G70P90Q150；
N180 G00X100Z100；
N190 T0202S400；
N200 G00X42Z-33；
N210 G01X-1F0.02；
N220 G00X100；
N230 Z100；
N240 M05M09；
N250 M02；
工件2的加工程序：
Ｏ1058；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X14；
N60 G00X42Z2；
N70 G73U8.338R6
N80 G73P90Q110U0.5F0.1；
N90 G01X38；
N100 Z0；
N110 G03X16.018Z-15R19；
N120 S1200；
N130 G70P90Q110；
N140 G00X100Z100；
N150 T0202S600；
N160 G00X14Z2；
N170 G71U2R1；
N180 G71P190Q220U-0.5F0.1；
N190 G01X28.284；
N200 Z0；
N210 G03X16Z-7.689R15；
N220 G01Z-16；
N230 S1200；
N240 G70P190Q220；
N250 G00X100Z100；
N260 T0303S300；
N270 G00X42Z-19；
N280 G01X15F0.05；
N290 G00X100；
N300 Z100；
N310 M05M09；
N320 M02；
例59：用FANUC系统的子程序指令对等宽槽进行编程。
Ｏ0059；
N10 G50X100Z100；
N20 T0101M03M08S300F0.5； （1号刀是切槽刀，刀宽2mm）
N30 G00X32 Z-12；
N40 M98P11059；
N50 G00X32Z-20；
N60 M98P11059；
N70 G00X32 Z-32；
N80 M98P11059；
N90 G00X32 Z-40；
N100 M98P11059；
N110 M05M09；
N120 M02；
Ｏ1059；
N10 G01U-12F0.05；
N20 G04X1；
N30 G00U12；
N40 M99；
例60：加工不等距槽的工件
Ｏ0060；
N10G50X100Z100；
N20T0101M03M08S600F0.2；
N30G00X30Z-14；
N40M98P11060；
N50G00W-19；
N60M98P11060；
N70G00W-12；
N80M98P11060；
N90G00X100；
N100Z100；
N110M05M09；
N120M02；
Ｏ1060；
N180G01U-12；
N190G00U12；
N200M99；
例61：加工阀芯
(FANUC系统)
Ｏ0061；（主程序）
N5 G50 X100 Z100； Ｏ1061；(子程序)
N10 T0101M3S600M08F0.2； N10 G1U-24F0.05；
N20 G0X38Z2； N20 G4X0.5；
N30 G1Z0F0.2； N30 G0U24；
N40 X-1； N40 W-6；
N50 G0X38Z2； N50 M99；
N60 G71UI.5R0.5；
N70 G71P80Q130U0.5F0.2；
N80 G1X0F0.08；
N90 Z0；
N100 G3X18．958Z-12R8.979；
N110 G1Z-47；
N120 X26Z-53；
N130 Z-60；
N140 S1200；
N150 G70P80Q130；
N160 G0X100Z100；
N170 T0404S300；
N180 G0X38Z-15；
N190 M98P61061；
N200 G0X100Z100；
N210 M5M09；
N220 M30；
Ｏ2061；(主程序)
G50 X100 Z100；
N10 T0101M3S600M08F0.2；
N20 G0X38Z2；
N30 G1Z0F0.2；
N40 X12；
N50 G0X38Z2；
N60 G1X30F0.2；
N70 Z-20；
N80 G0X100Z100；
N90 T0303；
N100 G0X13Z2；
N110 G71U1R0.5；
N120 G71P130Q190U-0.5F0.2；
N130 G1X26F0.08；
N140 Z0；
N150 X24Z-1；
N160 X17Z-18.5；
N170 Z-24.5；
N180 X15；
N190 Z-27；
N200 S800；
N210 G70P130Q190；
N220 G0X100Z100；
N230 M05M09；
N240 M30；
例62：加工外锥螺纹
Ｏ0062；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X32Z2；
N40 G71U2R1；
N50 G71P60Q90U0.5F0.2；
N60 G01X20；
N70 Z0；
N80 X25Z-32；
N90 Z-44；
N100 S1000；
N110 G70P60Q90；
N120 G00X100Z100；
N130 T0202S300；
N140 G00X30Z4；
N150 G92X24Z-36I-2.5F2；
N160 X23.4；
N170 X23；
N180 X22.6；
N190 X22.48；
N200 X22.4；
N210 X22.4；
N220 X22.4；
N230 X22.4；
N240 G00X100Z100；
N250 M05M09；
N260 M02；
例63：加工内锥螺纹
Ｏ0063；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X52Z2；
N40 G71U2R1；
N50 G71P60Q80U0.5F0.2；
N60 G01X50；
N70 Z0；
N80 Z-50；
N90 S1000；
N100 G70P60Q80；
N110 G00X100Z100；
N120 T0202S600；
N130 G00X16Z4；
N140 G71U2R1；
N150 G71P160Q180U-0.5F0.2；
N160 G01X40；
N170 Z0；
N180 X30Z-50；
N190 S1000；
N200 G70P160Q180；
N210 G00Z100；
N220 X100；
N230 T0303S300；
N240 G00X25Z4；
N250 G92X29Z-50I5F2；
N260 X28.4；
N270 X28；
N280 X27.6；
N290 X27.48；
N300 X27.4；
N310 X27.4；
N320 X27.4；
N330 X27.4；
N340 G00Z100；
N350 X100；
N360 M05M09；
N370 M02；
例64：加工非圆曲线四分之一的椭圆
Ｏ0064；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X36Z2；
N40 G71U2R1；
N50 G71P60Q80U0.1F0.2；
N60 G01X9；
N70 Z0；
N80 X35Z-12.4785；
N90 G00X100Z100；
N100 G00X36Z2；
N110 G71U2R1；
N120 G71P130Q150U0.1F0.2；
N130 G01X27.3172；
N140 Z-8．5624；
N150 X35Z-25；
N160 S1000；
N170 G70P60Q80；
N180 G70P130Q150；
N190 G00X100Z100；
N200 T0202S800；
N210 G00X36Z2；
N220 G01X0F0.2；
N230 Z0；
N240 G03X15.1992Z-3R11.1464；
N250 G03X20.7976Z-6R18.151；
N260 G01X24.588Z-9；
N270 X26.068X-10.5；
N280 X27.333Z-12；
N290 X28.413Z-13.5；
N300 X29.328Z-15；
N310 X30.094Z-16.5；
N320 X30.72Z-18；
N330 X31.216Z-19.5；
N340 X31.588Z-21；
N350 X31.84Z-22.5；
N360 X31.974Z-24；
N370 X32Z-25；
N380 G00X100Z100；
N390 M05M09；
N400 M02；
例65：对整个椭圆进行用户宏程序编程
Ｏ0065；
N10 G00X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X52Z82；
N40 G65P1065L1A50B80C80D0K1；
N50 G00X100；
N60 Z100；
N70 M05M09；
N80 M02；
宏程序
Ｏ1065；
N10 #5=#1*SQRT[1-#2#2/#3#3]；
N20 G01X#5Z#2F0.2；
N30 #2=#2-#6；
N40 IF[#2GT#7]GOTO10；
N50 M99；
其中A、B、C、D、K分别代表#1、#2、#3、#7、#6
例66：用户宏程序编制抛物线
Ｏ0066；
N10 #1=0；
N20 #2=0；
N30 G01 X[#1] Z{-[#2]} F1000；
N40 #1=[#1]+0.008；
N50 #2=[#1]×[#1]/8；
N60 #3=[#1]；
N70 IF {[#3] LE [16]} GOTO 30；
N80 G00 Z0；
N90 M02；
例67：用宏程序编制钻孔复合循环程序
Ｏ0067；
#1=-33；（钻孔起点距终点的距离）
#2=8； （第一刀钻孔深度）
#3=2； （钻孔深度递减量）
#4=4； （停顿时间）
#5=2； （最小钻孔深度）
#6=0；
N10 G00Z[-[#6-1]]；
N20 G01Z[-[#2+1]]F100；
N30 G04X[#4]；
N40 #6=#2+#6；
N50 G00Z[#6]；
N60 G04X[#4]；
N70 #2=#2-#3；
N80 #7=ABS[#1]-#6；
N90 IF#2GT#5GOTO11；
N100 #2=#5；
N110 IF#7GT#5GOTO1；
N120 G01Z[-[#7+1]]F100；
N130 G00Z[#6+#7]；
N140 M02；
Ｏ0046；
N10 G50X100Z100； （对刀点，也是换刀点）
N20 T0101M03S600F0.2M08； （F0.2是每转进给量）
N30 G00X32Z2；
N40 G01Z0；
N50 X-1；
N60 G00X32Z2；
N70 G73U7R5；
N80 G73P90Q150U0.5F0.2；
N90 G01X0F0.2；
N100 Z0；
N110 G03X22.29Z-18.161R12.48；(12,48保证SR25的公差值)
N120 G02X20.169Z-43.001R30；
N130 G02X25Z-46.245R8；
N140 G03X27.983Z-49.368R4； (27.983保证Φ28的公差值)
N150 G01Z-60；
N160 G04X120； （暂停，复位，测量，设定摩耗补偿量）
N170 M03S1000； （把光标移到M03下方，按起动按钮，精加工外圆）
N180 G00X100Z100；
N190 T0202；
N200 G70P90Q150；
N210 G00X100Z100；
N220 S500T0303； （切断）
N230 G00X32Z-（57.975+切槽刀宽）；(57.975保证58长度的公差值)
N240 G01X-1F0.05；
N250 G00X32；
N260 G00X100Z100；
N270 M05M09；
N280 M30；
%
例47：长手柄的数控车床加工
Ｏ0047；
N10 G50X100Z100； （对刀点，也是换刀点）
N20 T0101M03S600F0.2M08；
N30 G00X32Z2；
N40 G01Z0F0.2；
N50 X-1；
N60 G00X32Z2；
N70 G73U8R5；
N80 G73P90Q140U0.5F0.2；
N90 G01X0F0.2；
N100 G01Z0；
N110 G03X9.226Z-2.505R5.5；
N120 G03X18.39Z-50.348R51.987；(R51.987保证Φ26的尺寸公差)
N130 G02X18.983Z-73.602R30；(18.983保证Φ19的尺寸公差)
N140 G01Z-81；
N150 G04X100； (暂停、按复位按钮、停车测量，把测得的值与图纸尺寸比较，把两N160 M03S1000； 者之差作为摩耗输入系统，把光标移到M03下，重新起动)
N170 G00X100Z100；
N180 T0202；
N190 G70P90Q140；
N200 G00X100Z100；
N210 T0303S500； (换03号切槽刀，切断)
N220 G00X32Z-（79.975+切槽刀宽度）； (79.975保证长度80尺寸公差)
N230 G01X-1F0.05；
N240 G00X32； (先退X方向)
N250 G00X100Z100；
N260 M05M09；
N270 M30；
例48：轴类零件1的数控车床加工
Ｏ0048；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X32Z2；
N40 G01Z0；
N50 X-1；
N60 G00X32Z2；
N70 G73U9.5R6；
N80 G73P90Q150U0.5F0.2；
N90 G01X23.981F0.2；
N100 Z-1.82；
N110 G03X22Z-4.056R3；
N120 G02X17.38Z-19.142R12；
N130 G03X18.7Z-34.3R16；
N140 G02X23.981Z-44.874R8.5；
N150 G01Z-50；
N160 G00X100Z100；
N170 T0202S1000；
N180 G70P90Q150；
N190 G00X100Z100；
N200 T0303S500；
N210 G00X32Z-(47.925+切槽刀宽)；
N220 G01X-1F0.05；
N230 G00X32；
N240 G00X100Z100；
N250 M05M09；
N260 M30；
例49：轴类零件2的数控车床加工
Ｏ0049；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X-1；
N60 G00X42Z2；
N70 G73U11.32R8；
N80 G73P90Q160U0.5F0.2；
N90 G01X22F0.2；
N100 Z0；
N110 X23.984Z-1；
N120 Z-10；
N130 G02X24Z-25R10；
N140 G01X28.9.Z-42；
N150 G03X32.Z-60.97R17.98；
N160 Z-67；
N170 G00X100Z100；
N180 T0202S1000；
N190 G70P90Q160；
N200 G00X100Z100；
N210 T0303S400；
N220 G00X42Z-(64.975+切槽刀宽)；
N230 G01X-1F0.05；
N240 G00X42；
N250 G00X100Z100；
N260 M05M09；
N270 M30；
例50：轴类零件3的数控车床加工
Ｏ0050；
N10 G50X100Z100；
N20 T0101M03S650M08F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X-1；
N60 G71U2R1；
N70 G71P80Q150U0.5F0.2；
N80 G01Z0；
N90 G03X16Z-8R8；
N100 G01X20；
N110 Z-28；
N120 X23.984Z-48；
N130 Z-53；
N140 X37.98；
N150 Z-70；
N160 S1000；
N170 G70P90Q150；
N180 G00X100Z100；
N190 T0404S300；
N200 G00X42Z-28；（假设切槽刀宽4mm）
N210 G01X16F0.05；
N220 G04X0.5；
N230 G00X42；
N240 G01Z-63F0.2；
N250 X34F0.05；
N250 G04X0.5；
N260 G00X42；
N270 G01Z-62F0.2；
N280 X34F0.05；
N290 G04X0.5；
N300 G00X42；
N310 G00X100Z100；
N320 T0202；
N330 G00X25Z-4；
N340 G92X19.1Z-27F2.5；
N350 X18.5；
N360 X18.0；
N370 X17.6；
N380 X17.3；
N390 X17.3；
N400 X17.3；
N410 G00X100Z100；
N420 G00X42Z2；
N430 T0404；
N440 G00X42Z-71.975；
N450 G01X-1F0.05；
N460 G00X42；
N470 G00X100Z100；
N480 M05M09；
N490 M30；
例51：盘类零件1的数控车床加工
Ｏ0051；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X-1
N60 G00X42Z2；
N70 X15；
N80 G00X42Z2；
N90 G71U2R1；
N100 G71P110Q160U0.5F0.2；
N110 G01X28；
N120 Z0；
N130 X30Z-1；
N140 Z-20；
N150 G03X37.98Z-24R4；
N160 G01Z-41；
N170 G00X100Z100；
N180 S1000；
N190 G70P110Q160；
N200 G00X100Z100；
N210 T0303S600F0.2；
N220 G00X15Z2；
N230 G71U1R0.5；
N240 G71P250Q300U-0.5F0.2；
N250 G01X26；
N260 Z0；
N270 X24.045Z-1；
N280 Z-4.125；
N290 X20；
N300 X18Z-42；（Z 的尺寸字不得超过钻孔深度）
N310 S1000；
N320 G70P250Q300；
N330 G00X100；
N340 Z100；
N350 T0404S300；
N360 G00X42Z-20；（假设切槽刀宽4mm）
N370 G01X26F200；
N380 G04X0.5；
N390 G00X50；
N400 G00X100；
N410 Z100；
N420 T0101S600；
N430 G00X32Z-14；
N440 G01X30F0.2；
N450 X26Z-16；
N460 X34；
N470 G00X100；
N480 Z100；
N490 T0202；
N500 G00X34Z4；
N510 G92X29.3Z-16F0.75；
N520 X29.1；
N530 X29.03；
N540 X29.03；
N550 X29.03；
N560 G00X100Z100；
N570 T0404S400F0.2；
N580 G00X42Z-79.975；（假设切槽刀宽4mm）
N590 G001X15 F0.05；
N600 G00X42；
N610 G00X100Z100；
N620 M05M09；
N630 M30；
例52：盘类零件2的数控车床加工
Ｏ0052；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X15；
N60 G00X42Z2；
N70 G71U2R1；
N80 G71P90Q130U0.5F0.2；
N90 G01X30；
N100 Z0；
N110 X33Z-10；
N120 X36Z-10.5；
N130 Z-44；
N140 G00X100；
N150 Z100；
N160 T0303；
N170 G00X15Z2；
N180 G71U1R0.5；
N190 G71P200Q250U-0.5F0.2；
N200 G01X26.017；
N210 Z-10.5；
N220 X22Z-17.5；
N230 Z-28；
N240 G03X18.014Z-32.899R7；
N250 Z-44；
N260 S1000；
N270 G70P200Q250；
N280 G00Z100；
N290 X100；
N300 T0101；
N310 G70P90Q130；
N320 G00X100Z100；
N330 T0404S400；
N340 G00X42Z-42；
N350 G01X30F0.05；
N360 G04X0.5；
N370 G00X38；
N380 G00X100；
N390 Z100；
N400 T0202S200；
N410 G00X38Z6；
N420 G92X35Z-40F2；
N430 X34.4；
N440 X34；
N450 X33.6；
N460 X33.48；
N470 X33.4；
N480 X33.4；
N490 G00X100Z100；
N500 T0404S300；
N510 G00X38Z-45.975；
N520 G01X16F0.05；
N530 G00X100；
N540 Z100；
N550 M05M09；
N560 M30；
例53：盘类零件3的数控车床加工
Ｏ0053；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X42Z2；
N40 G01Z0F0.2；
N50 X15；
N60 G00X42Z2；
N70 G73U7R4；
N80 G73P90Q170U0.5F0.2；
N90 G01X28F0.2；
N100 Z0；
N110 X30Z-1；
N120 Z-10；
N130 X26Z-12；
N140 Z-22.775；
N150 G02X30.8Z-28R7；
N160 G01X37.981Z-48；
N170 Z-55；
N180 G00X100；
N190 Z100；
N200 T0303；
N210 G00X15Z4；
N220 G71U1R0.5；
N230 G71P240Q270U-0.5F0.2；
N240 G01X22F0.2；
N250 Z0；
N260 X18Z-10；
N270 Z-55；
N280 S1000；
N290 G70P240Q270；
N300 NG00Z100；
N310 X100；
N320 T0101；
N330 G00X42Z2；
N340 G70P90Q170；
N350 G00X100；
N360 Z100；
N370 T0202S300；
N380 G00X34Z4；
N390 G92X29.3Z-14F0.75；
N400 X29.1；
N410 X29.03；
N420 X29.03；
N430 G00X100；
N440 Z100；
N450 T0404；
N460 G00X42Z-53.975；
N470 G01X15F0.05；
N480 G00X100；
N490 Z100；
N500 M05M09；
N510 M30；
例54：螺纹类零件1的数控车床加工
Ｏ0054；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X15；
N60 G00X42Z2；
N70 G71U2R1
N80 G71P90Q140U0.5F0.2；
N90 G01X32；
N100 Z0；
N110 X36Z-2；
N120 Z-36；
N130 X37.9905；
N140 Z-47；
N150 G00X100；
N160 Z100；
N170 S1000；
N180 G70P90Q140；
N190 G00X100Z100；
N200 T0303S600；
N210 G00X15Z2；
N220 G71U1R0.5；
N230 G71P240Q300U-0.5F0.2；
N240 G00X28；
N250 Z0；
N260 X26.026Z-1；
N270 Z-15；
N280 G03X22Z-19R5；
N290 G02X18Z-23R5；
N300 G01Z-50；
N310 G70P240Q300；
N320 G00Z100；
N330 X100；
N340 T0404S300；
N350 G00X42Z2；
N360 G01Z-36F0.2；
N370 X31；
N380 G04X0.5；
N390 G01X40；
N400 X-32；
N410 X31；
N420 G04X0.5；
N430 G01X40；
N440 G00X100；
N450 Z100；
N460 T0202S300F0.2；
N470 G00X40Z6；
N480 G92X35.1Z-30F1.5；
N490 X34.5；
N500 X33.9；
N510 X33.5；
N520 X33.4；
N530 X33.4；
N540 X33.4；
N550 Z4.5；（Ｚ轴方向移过一个螺距1.5mm）
N560 G92X35.1Z-30F1.5；
N570 X34.5；
N580 X33.9；
N590 X33.5；
N600 X33.4；
N610 X33.4；
N620 X33.4；
N630 G00X100；
N640 Z100；
N650 T0404S500；
N660 G00X42Z-48.975；
N670 G01X15F0.05；
N680 G00X100；
N690 Z100；
N700 M05M09；
N710 M30；
例55：螺纹类零件2的数控车床加工
O0055；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X32Z2；
N40 G01Z0F0.2；
N50 X-1；
N60 G00X32Z2；
N70 G71U2R1；
N80 G71P90Q150U0.5F0.2；
N90 Z0；
N100 X16Z-0.5；
N110 Z-14；
N120 X20Z-27；
N130 G02X25.394Z-46.634R15；
N140 G03X27.983Z-50R5；
N150 G01Z-59；
N160 S1000；
N170 G70P90Q150；
N180 G00X100Z100；
N190 T0404S500；
N200 G00X30Z-14；
N210 G01X12F0.05；
N220 G04X0.5；
N230 G00X30；
N240 G00X100Z100
N250 T0202S300；
N260 G00X20Z4；
N270 G92X15Z-12F2；
N280 X14.4；
N290 X14；
N300 X13.6；
N310 X13.48；
N320 X13.4；
N330 X13.4；
N340 X13.4；
N350 X13.4；
N360 G00X100Z100；
N370 G00X32Z-59.975；
N380 G01X-1F0.05；
N390 G00X100；
N400 Z100；
N410 M05M09；
N420 M30；
例56：螺纹类零件3的数控车床加工
Ｏ0056；
N10 G50X100Z100；
N20 T0101M03S600F0.2 M08；
N30 G00X42Z2；
N40 G01Z0F0.2；
N50 G01X-1；
N60 G00X42Z2；
N70 G73U8R5；
N80 G73P90Q110U0.5F0.2；
N90 G01X31.552F0.2；
N100 G01Z0；
N110 G03X30.91Z-43R69.982；
N120 G00X100Z100；
N130 S1000；
N140 G90P110Q20；
N150 G00X100Z100；
N160 T0303；
N170 G00X16Z2；
N180 G71U1R0.5；
N190 G71P200Q230U-0.5F0.2；
N200 G01X22.84；
N210 Z-16；
N220 X17.982Z-36；
N230 Z-44；
N240 S1000；
N250 G70P200Q230；
N260 G00Z100；
N270 X100；
N280 T0505S500；（假定内槽刀宽为4mm）
N290 G01X16Z2F0.2；
N300 G01Z-16；
N310 G01X26F0.05；
N320 G04X1；
N330 G01X15F0.2；
N340 G00Z-14；
N350 G01X26F0.05；
N360 G04X1；
N370 G00X15；
N380 Z2；
N390 G00X100Z100；
N400 T0202S200；
N410 G00X18Z4；
N420 G92X22.84Z-14F1.5；
N430 X23.34；
N440 X23.74；
N450 X24；
N460 X24；
N470 X24；
N480 G00Z100；
N490 X100；
N500 T0404；
N510 G00X42Z-45.975； (假定外槽刀的宽度是4mm)
N520 G01X15F0.05；
N530 G00X42；
N540 G00X100Z100；
N550 M05M09；
N560 M30；
例57：螺纹类零件4的数控车床加工
Ｏ0057；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G0X42Z2；
N40 G01Z0；
N50 X15；
N60 G0X42Z2；
N70 G73U4R2；
N80 G73P90Q120U0.5F0.2；
N90 G01X16；
N100 Z0；
N110 G03X31.982Z-20.494R18.981；
N120 G01X42；
N130 S1000；
N140 G70P90Q120；
N150 G00X100Z100；
N160 T0303S600；
N170 G00X15Z4；
N180 G71U1R0.5；
N190 G71P200Q230U-0.5F0.2；
N200 G01X26.017；
N210 Z-5；
N220 X16.046Z-20.494；
N230 Z-48；
N240 S1000；
N250 G70P200Q230；
N260 G00Z100；
N270 X100；
N280 T0202S200；
N290 G00X15Z4；
N300 G92X16.846Z-42F1.5；
N310 X17.446；
N320 X17.746；
N330 X17.946；
N340 X18；
N350 G00Z100；
N360 X100；
N370 T0404S400；
N380 G00X42Z-43.975；
N390 G01X16F0.05；
N400 G00X42；
N410 G00X100Z100；
N420 M5M09；
N430 M30；
例58：二件套的编程实例
Ｏ0058；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X-1；
N60 G00X42Z2；
N70 G71U2R1
N80 G71P90Q150U0.5F0.1；
N90 G01Z0；
N100 X15；
N110 X16Z-1；
N120 Z-6.311；
N130 G03X28.914Z-15R15；
N140 G01X37.947；
N150 G03X23.324Z-29R19；
N160 S1200；
N170 G70P90Q150；
N180 G00X100Z100；
N190 T0202S400；
N200 G00X42Z-33；
N210 G01X-1F0.02；
N220 G00X100；
N230 Z100；
N240 M05M09；
N250 M02；
工件2的加工程序：
Ｏ1058；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X42Z2；
N40 G01Z0；
N50 X14；
N60 G00X42Z2；
N70 G73U8.338R6
N80 G73P90Q110U0.5F0.1；
N90 G01X38；
N100 Z0；
N110 G03X16.018Z-15R19；
N120 S1200；
N130 G70P90Q110；
N140 G00X100Z100；
N150 T0202S600；
N160 G00X14Z2；
N170 G71U2R1；
N180 G71P190Q220U-0.5F0.1；
N190 G01X28.284；
N200 Z0；
N210 G03X16Z-7.689R15；
N220 G01Z-16；
N230 S1200；
N240 G70P190Q220；
N250 G00X100Z100；
N260 T0303S300；
N270 G00X42Z-19；
N280 G01X15F0.05；
N290 G00X100；
N300 Z100；
N310 M05M09；
N320 M02；
例59：用FANUC系统的子程序指令对等宽槽进行编程。
Ｏ0059；
N10 G50X100Z100；
N20 T0101M03M08S300F0.5； （1号刀是切槽刀，刀宽2mm）
N30 G00X32 Z-12；
N40 M98P11059；
N50 G00X32Z-20；
N60 M98P11059；
N70 G00X32 Z-32；
N80 M98P11059；
N90 G00X32 Z-40；
N100 M98P11059；
N110 M05M09；
N120 M02；
Ｏ1059；
N10 G01U-12F0.05；
N20 G04X1；
N30 G00U12；
N40 M99；
例60：加工不等距槽的工件
Ｏ0060；
N10G50X100Z100；
N20T0101M03M08S600F0.2；
N30G00X30Z-14；
N40M98P11060；
N50G00W-19；
N60M98P11060；
N70G00W-12；
N80M98P11060；
N90G00X100；
N100Z100；
N110M05M09；
N120M02；
Ｏ1060；
N180G01U-12；
N190G00U12；
N200M99；
例61：加工阀芯
(FANUC系统)
Ｏ0061；（主程序）
N5 G50 X100 Z100； Ｏ1061；(子程序)
N10 T0101M3S600M08F0.2； N10 G1U-24F0.05；
N20 G0X38Z2； N20 G4X0.5；
N30 G1Z0F0.2； N30 G0U24；
N40 X-1； N40 W-6；
N50 G0X38Z2； N50 M99；
N60 G71UI.5R0.5；
N70 G71P80Q130U0.5F0.2；
N80 G1X0F0.08；
N90 Z0；
N100 G3X18．958Z-12R8.979；
N110 G1Z-47；
N120 X26Z-53；
N130 Z-60；
N140 S1200；
N150 G70P80Q130；
N160 G0X100Z100；
N170 T0404S300；
N180 G0X38Z-15；
N190 M98P61061；
N200 G0X100Z100；
N210 M5M09；
N220 M30；
Ｏ2061；(主程序)
G50 X100 Z100；
N10 T0101M3S600M08F0.2；
N20 G0X38Z2；
N30 G1Z0F0.2；
N40 X12；
N50 G0X38Z2；
N60 G1X30F0.2；
N70 Z-20；
N80 G0X100Z100；
N90 T0303；
N100 G0X13Z2；
N110 G71U1R0.5；
N120 G71P130Q190U-0.5F0.2；
N130 G1X26F0.08；
N140 Z0；
N150 X24Z-1；
N160 X17Z-18.5；
N170 Z-24.5；
N180 X15；
N190 Z-27；
N200 S800；
N210 G70P130Q190；
N220 G0X100Z100；
N230 M05M09；
N240 M30；
例62：加工外锥螺纹
Ｏ0062；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X32Z2；
N40 G71U2R1；
N50 G71P60Q90U0.5F0.2；
N60 G01X20；
N70 Z0；
N80 X25Z-32；
N90 Z-44；
N100 S1000；
N110 G70P60Q90；
N120 G00X100Z100；
N130 T0202S300；
N140 G00X30Z4；
N150 G92X24Z-36I-2.5F2；
N160 X23.4；
N170 X23；
N180 X22.6；
N190 X22.48；
N200 X22.4；
N210 X22.4；
N220 X22.4；
N230 X22.4；
N240 G00X100Z100；
N250 M05M09；
N260 M02；
例63：加工内锥螺纹
Ｏ0063；
N10 G50X100Z100；
N20 T0101M03S600M08F0.2；
N30 G00X52Z2；
N40 G71U2R1；
N50 G71P60Q80U0.5F0.2；
N60 G01X50；
N70 Z0；
N80 Z-50；
N90 S1000；
N100 G70P60Q80；
N110 G00X100Z100；
N120 T0202S600；
N130 G00X16Z4；
N140 G71U2R1；
N150 G71P160Q180U-0.5F0.2；
N160 G01X40；
N170 Z0；
N180 X30Z-50；
N190 S1000；
N200 G70P160Q180；
N210 G00Z100；
N220 X100；
N230 T0303S300；
N240 G00X25Z4；
N250 G92X29Z-50I5F2；
N260 X28.4；
N270 X28；
N280 X27.6；
N290 X27.48；
N300 X27.4；
N310 X27.4；
N320 X27.4；
N330 X27.4；
N340 G00Z100；
N350 X100；
N360 M05M09；
N370 M02；
例64：加工非圆曲线四分之一的椭圆
Ｏ0064；
N10 G50X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X36Z2；
N40 G71U2R1；
N50 G71P60Q80U0.1F0.2；
N60 G01X9；
N70 Z0；
N80 X35Z-12.4785；
N90 G00X100Z100；
N100 G00X36Z2；
N110 G71U2R1；
N120 G71P130Q150U0.1F0.2；
N130 G01X27.3172；
N140 Z-8．5624；
N150 X35Z-25；
N160 S1000；
N170 G70P60Q80；
N180 G70P130Q150；
N190 G00X100Z100；
N200 T0202S800；
N210 G00X36Z2；
N220 G01X0F0.2；
N230 Z0；
N240 G03X15.1992Z-3R11.1464；
N250 G03X20.7976Z-6R18.151；
N260 G01X24.588Z-9；
N270 X26.068X-10.5；
N280 X27.333Z-12；
N290 X28.413Z-13.5；
N300 X29.328Z-15；
N310 X30.094Z-16.5；
N320 X30.72Z-18；
N330 X31.216Z-19.5；
N340 X31.588Z-21；
N350 X31.84Z-22.5；
N360 X31.974Z-24；
N370 X32Z-25；
N380 G00X100Z100；
N390 M05M09；
N400 M02；
例65：对整个椭圆进行用户宏程序编程
Ｏ0065；
N10 G00X100Z100；
N20 T0101M03M08S600F0.2；
N30 G00X52Z82；
N40 G65P1065L1A50B80C80D0K1；
N50 G00X100；
N60 Z100；
N70 M05M09；
N80 M02；
宏程序
Ｏ1065；
N10 #5=#1*SQRT[1-#2#2/#3#3]；
N20 G01X#5Z#2F0.2；
N30 #2=#2-#6；
N40 IF[#2GT#7]GOTO10；
N50 M99；
其中A、B、C、D、K分别代表#1、#2、#3、#7、#6
例66：用户宏程序编制抛物线
Ｏ0066；
N10 #1=0；
N20 #2=0；
N30 G01 X[#1] Z{-[#2]} F1000；
N40 #1=[#1]+0.008；
N50 #2=[#1]×[#1]/8；
N60 #3=[#1]；
N70 IF {[#3] LE [16]} GOTO 30；
N80 G00 Z0；
N90 M02；
例67：用宏程序编制钻孔复合循环程序
Ｏ0067；
#1=-33；（钻孔起点距终点的距离）
#2=8； （第一刀钻孔深度）
#3=2； （钻孔深度递减量）
#4=4； （停顿时间）
#5=2； （最小钻孔深度）
#6=0；
N10 G00Z[-[#6-1]]；
N20 G01Z[-[#2+1]]F100；
N30 G04X[#4]；
N40 #6=#2+#6；
N50 G00Z[#6]；
N60 G04X[#4]；
N70 #2=#2-#3；
N80 #7=ABS[#1]-#6；
N90 IF#2GT#5GOTO11；
N100 #2=#5；
N110 IF#7GT#5GOTO1；
N120 G01Z[-[#7+1]]F100；
N130 G00Z[#6+#7]；
N140 M02；
