例：在一塊平板上加工6個邊長為10mm的等邊三角形，每邊的槽深為-2mm，工件上表面為Z向零點。其程式的編制就可以採用呼叫子程式的方式來實現(程式設計時不考慮刀具補償)。

設定G54：X＝-400，Y＝-100，Z＝-50。

主程式：

O10

N 10 G54 G90 G01 Z40 F2000 //進入工件加工座標系

N20 M03 S800 //主軸啟動

N30 G00 Z3 //快進到工件表面上方

N40 G01 X 0 Y8.66 //到1#三角形上頂點

N50 M98 P20 //調20號切削子程式切削三角形

N60 G90 G01 X30 Y8.66 //到2#三角形上頂點

N70 M98 P20 //調20號切削子程式切削三角形

N80 G90 G01 X60 Y8.66 //到3#三角形上頂點

N90 M98 P20 //調20號切削子程式切削三角形

N100 G90 G01 X 0 Y -21.34 //到4#三角形上頂點

N110 M98 P20 //調20號切削子程式切削三角形

N120 G90 G01 X30 Y -21.34 //到5#三角形上頂點

N130 M98 P20 //調20號切削子程式切削三角形

N140 G90 G01 X60 Y -21.34 //到6#三角形上頂點

N150 M98 P20 //調20號切削子程式切削三角形

N160 G90 G01 Z40 F2000 //抬刀

N170 M05 //主軸停

N180 M30 //程式結束

子程式：

O20

N10 G91 G01 Z -2 F100 //在三角形上頂點切入（深）2mm

N20 G01 X -5 Y-8.66 //切削三角形

N30 G01 X 10 Y 0 //切削三角形

N40 G01 X 5 Y 8.66 //切削三角形

N50 G01 Z 5 F2000 //抬刀

N60 M99 //子程式結束