例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 X o{ Ce%L
|MT g KEsn
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： Y:*mAv;&
VY~WkSi[<
O0100（MAIN） >N+e c_D^
G92 X80.0 Y40.0；设定坐标系 'fawpU|h
M98 P0101；调用子程序P1 Dzc 4J66
G93 X0.0 Y0.0；坐标平移 %o+bO}/9
M50；切断丝 X3X~`~bAD
G90 G00 X100.0 Y120.0；快速移动 9r\8 !R
M60；穿丝 $0iz;!w
M98 P0102；调用子程序P2 <~X=6
G93 X0.0 Y0.0；坐标平移 =NyzX&H6
M50；切断丝 N-K .#5
G90 G00 X200.0 Y80.0；快速移动 $T ]1<3\G
M60；穿丝 <fs2;
M98 P0103；调用子程序P3 J>X aQfzwU
M30；程序结束 
子程序调用切割实例
LF*3Iw|v < m UDx
n O0101（P1）子程序P1
= eTI@pN` G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
MeP U`M-- G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
Ldt7?Y(V( X0.0；到矩形右上角处
&v3r#$Hj[
Y-40.0；到矩形右下角处
#; }IHAR X-80.0；到矩形左下角处
7{az %I$h Y0.0；到矩形左上角处
YfF&: "-NU X-40.0；到矩形上边中心处
gEU)UIJ Y-20.0；回到矩形的穿丝点（矩形切割的起点）
_Y\@{T;^Zb M99；子程序结束返回主程序
~]c^v'k rv|k8 O0102（P2）子程序P2
^b>E_u G93 X100.0 Y80.0；坐标平移三角形底边中间处
Nk}Hvg* ( G90 G01 Y60.0；到三角形顶点处
UY%@i X40.0 Y0.0；到三角形右下角处
d'Gv \i&e Y-40.0；到三角形左下角处
3S'V>: X0 Y60.0；到三角形顶点处
) : Q5u6 Y40.0；回到三角形的穿丝点（三角形切割的起点）
%z8@; M99；子程序结束返回主程序
_2f}WY3S Q
7B)t;^ O0103（P3）子程序P3
$V`O%Sz G93 X200.0 Y80.0；坐标平移到圆心处
B;W=61d G90 G01 Y40.0； 到圆以上圆上一点
Z4h P G02 J-40.0；顺时针切割圆
as
o8 G01 Y0.0； 回到圆心处
>k _Z]J6Pd M99；子程序结束返回主程序
