采用刀具半径左补偿，数控程序如下；
N0010 G54S1500 M03／设工件零点于O点，主轴正转1500r／min
N0020 G90G00Z50.／抬刀至安全高度
N0030 X0Y0．./刀具快进至(0，0，50)
N0040 Z2.／刀具快进至(0，0，2)
N0050 G01Z-3.F50.／刀具以切削进给到深度-3mm处
N0060 G41X20.Y14.F150.／建立刀具半径左补偿O—A
N0070 Y62./直线插补A—B
N0080 G02X44.Y86.I24.JO／圆弧插补B—C
N0090 G01X96．/直线插补C——D
N0100 G03X120.Y62.I24.J0／圆弧插补D—E
N0110 G01Y40./直线插补E—F
N0120 X100.Y14./直线插补F—G
N0130 X20./直线插补G一A
N0140 G40XOY0／取消刀具半径补偿A一O
N0150 G00Z100．／Z向快速退刀
N0160 M02／程序结束