例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 %s P C3L
]WR+>)ERb
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： A#M#JI-Y
S Y>i@s+ML
O0100（MAIN） /c' 3I
G92 X80.0 Y40.0；设定坐标系 m619bzFlB
M98 P0101；调用子程序P1 @ B
%m,Mx
G93 X0.0 Y0.0；坐标平移 lrB@n?hk
M50；切断丝 K,bv\j;f
G90 G00 X100.0 Y120.0；快速移动 v~e@:7d i
M60；穿丝 5:/
zbt\C
M98 P0102；调用子程序P2 $cEl6(66iX
G93 X0.0 Y0.0；坐标平移 fs+l
M50；切断丝 rM# jxAb
G90 G00 X200.0 Y80.0；快速移动 >[B}eS>
M60；穿丝 (f ^WC,
M98 P0103；调用子程序P3 ?r0#{x~
M30；程序结束 
子程序调用切割实例
akHcN]sa2 w'z ?1M(* O0101（P1）子程序P1
B~QX{ G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
b|U&{I>TH G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
fu'iG7U M X0.0；到矩形右上角处
]4-lrI1# Y-40.0；到矩形右下角处
\c3zK|^ X-80.0；到矩形左下角处
(m80is l Y0.0；到矩形左上角处
r,X5@ / X-40.0；到矩形上边中心处
$ r)+7i Y-20.0；回到矩形的穿丝点（矩形切割的起点）
( iM"ug2 M99；子程序结束返回主程序
< gB>j\: S453oG" O0102（P2）子程序P2
90L, . G93 X100.0 Y80.0；坐标平移三角形底边中间处
e WzD'3h^ G90 G01 Y60.0；到三角形顶点处
&54fFyJF X40.0 Y0.0；到三角形右下角处
6I GUp
Y-40.0；到三角形左下角处
w^Qb9vT a8 X0 Y60.0；到三角形顶点处
Wc [@, Y40.0；回到三角形的穿丝点（三角形切割的起点）
H((!
BRl M99；子程序结束返回主程序
c;c'E&9P] ~L(=-B`Ow O0103（P3）子程序P3
u}Vc2a,WV G93 X200.0 Y80.0；坐标平移到圆心处
,g2|8>sJP G90 G01 Y40.0； 到圆以上圆上一点
/3->TS G02 J-40.0；顺时针切割圆
hNs970i G01 Y0.0； 回到圆心处
HKr") K% M99；子程序结束返回主程序
