螺拴孔循环宏程序编程实例

 Ｏ1119；
 N10 G65 H01 P#100 Q#0 I＝0；
 N20 G65 H22 P#101 Q#504 IE＝┃N┃；
 N30 G65 H04 P#102 Q#100 R360000；
 N40 G65 H05 P#102 Q#102 R#504 θI＝A＋360°×I/N ；
 N50 G65 H02 P#102 Q#503 R#102；
 N60 G65 H32 P#103 Q#502 R#102 X I＝X I＋R·C%S(θI)；
 N70 G65 H02 P#103 Q#500 R#103；
 N80 G65 H31 P#104 Q#502 R#102 Y I＝Y I＋R·SIN(θI)；
 N90 G65 H02 P#104 Q#501 R#104；
 N100 G90 G00 X#103 Y#104；              第I个孔定位。
 N110 M10；                  输出孔加工M代码。
 N120 G65 H02 P#100 Q#100 R1 I＝I＋1；
 N130 G65 H84 P-200 Q#100 R#101；      当I＜IE 时, 转到N200 加工IE个孔。
 N140 M99
　　
 用户宏程序的主程序实例如下:
 Ｏ0119；
 N10 G65 H01 P#500 Q100000 ；        X0=100MM
 N20 G65 H01 P#501 Q-200000；       Y0=-200MM
 N30 G65 H01 P#502 Q100000 ；        R=100MM 
 N40 G65 H01 P#503 Q20000 ；         A=20° 
 N50 G65 H01 P#504 Q12 ；           N=12  反时针转
 N60 G92 X0 Y0 Z0；
 N70 M98 P1119；                      调用用户宏程序
 N80 M30 ；
用MDI 也可以设定#500～#504。此时上述程序中的G65 程序段就不需要了。