例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 ZYl-p]\*y
$w";*">:0
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： ur~Tql
@@&@}IQcR1
O0100（MAIN） On2Vf*G@|
G92 X80.0 Y40.0；设定坐标系 z$8e6 *
M98 P0101；调用子程序P1 }R(0[0NQe-
G93 X0.0 Y0.0；坐标平移 sTYuwna~
M50；切断丝 ^G7n#
G90 G00 X100.0 Y120.0；快速移动 i no 7!T`
M60；穿丝 o%N0K
M98 P0102；调用子程序P2 gOES2
4$2
G93 X0.0 Y0.0；坐标平移 ] 6i_d
M50；切断丝 YDZ1@N}^B
G90 G00 X200.0 Y80.0；快速移动 m\}\RnZu
M60；穿丝 |RvpEy7 6
M98 P0103；调用子程序P3 fd,}YAiX
M30；程序结束 
子程序调用切割实例
Gr"2G,,VI ^~YmLI4 O0101（P1）子程序P1
Js^r]= \F' G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
f4aD0.K.g| G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
x9{Sl[2& X0.0；到矩形右上角处
^c[CyZ:a Y-40.0；到矩形右下角处
(`uC"M Lk X-80.0；到矩形左下角处
T^= Ee?e Y0.0；到矩形左上角处
u1pYlu9IW X-40.0；到矩形上边中心处
4%c7#AX[T Y-20.0；回到矩形的穿丝点（矩形切割的起点）
J4K|KS7
M99；子程序结束返回主程序
.@/z-Og Xg S*DBY~pZy O0102（P2）子程序P2
l66ipgw_^I G93 X100.0 Y80.0；坐标平移三角形底边中间处
yW6[Fp w G90 G01 Y60.0；到三角形顶点处
Sj]T{3mi X40.0 Y0.0；到三角形右下角处
ui#1 +p3G Y-40.0；到三角形左下角处
yrK--C8 X0 Y60.0；到三角形顶点处
Ik@Q@ T" Y40.0；回到三角形的穿丝点（三角形切割的起点）
6&xW9' 6b: M99；子程序结束返回主程序
Jj^<:t5{rN >/OXC+=^4 O0103（P3）子程序P3
[#3Cg%V G93 X200.0 Y80.0；坐标平移到圆心处
Q+%m+ /Zq G90 G01 Y40.0； 到圆以上圆上一点
Q,M/R6i- G02 J-40.0；顺时针切割圆
~M9 n <kmE G01 Y0.0； 回到圆心处
5)SZd) M99；子程序结束返回主程序
