例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 }0(.HMiGj
s<; kTReA
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： D$OUy}[2`.
P!*G"^0<
O0100（MAIN） gWZzOH*
G92 X80.0 Y40.0；设定坐标系 \as^z!<
M98 P0101；调用子程序P1 PE7D)!d
T
G93 X0.0 Y0.0；坐标平移 fSL' +l3
M50；切断丝 S.$/uDwo
G90 G00 X100.0 Y120.0；快速移动 <JyF 5
M60；穿丝 S7fX1y[
M98 P0102；调用子程序P2 >I ^_kBa
G93 X0.0 Y0.0；坐标平移 (uk-c~T !u
M50；切断丝 ow!NH,'Hy
G90 G00 X200.0 Y80.0；快速移动 FWJhi$\:D]
M60；穿丝 "N\tR[P!
M98 P0103；调用子程序P3 | @Mx? (
M30；程序结束 
子程序调用切割实例
BIM!4MHLA " F3M m O0101（P1）子程序P1
8U$(9X G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
"-U`E)]w*[ G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
]3/_?n-"` X0.0；到矩形右上角处
g
AZe&"K Y-40.0；到矩形右下角处
SJXA X-80.0；到矩形左下角处
j$u=7Z&E Y0.0；到矩形左上角处
3{j&J - X-40.0；到矩形上边中心处
"dN4EA&QJ Y-20.0；回到矩形的穿丝点（矩形切割的起点）
wP: w8O M99；子程序结束返回主程序
-T0@b8 HT:
p'Yyi O0102（P2）子程序P2
Ld?-Ik~fF> G93 X100.0 Y80.0；坐标平移三角形底边中间处
\ O#6H5F G90 G01 Y60.0；到三角形顶点处
f#mcW L1} X40.0 Y0.0；到三角形右下角处
MMYV8;c Y-40.0；到三角形左下角处
9jC> OZ0s X0 Y60.0；到三角形顶点处
ee+*&CT) Y40.0；回到三角形的穿丝点（三角形切割的起点）
VYj*LiR M99；子程序结束返回主程序
d77->FX2 `7))[._ O0103（P3）子程序P3
E7K(I ? G93 X200.0 Y80.0；坐标平移到圆心处
{f9jK@%Gy G90 G01 Y40.0； 到圆以上圆上一点
13X\PO'9 G02 J-40.0；顺时针切割圆
d;-/F b{4 G01 Y0.0； 回到圆心处
0';U3:=i, M99；子程序结束返回主程序
