长100*φ50mm的45#钢的棒料为例.车简单的阶梯轴.（选工件坐标原点选工件右边，对刀自己应该知道吧，在此就不多说，图粘贴不上，不好意思。有不足之处请指教）G50X50Z50S600T11G00X48Z3G90X48Z-80F100X45X43Z-50X40X33Z-30X30M05M30
数控铣床椭圆宏程序编程
西门子：长半轴=45
短半轴=25
O0001
T1D1
N13G90G00X65Y0Z100.0 刀具运行到(65,0,100)的位置
N14S1000M03
N15G01Z-10F1000.0 刀具下到-10mm
N16#114=0 赋初始值
N18#112=45*COS[#114] 计算X坐标值
N20#113=25*SIN[#114] 计算Y坐标值
N22G01G42X[#112]Y[#113]D02F200.0走到第一点 N24#114=#114+1 变量#114增加一个角度步长
N26IF[#114LT361]GOTO18 条件判断#114是否小于361，满足则返回18
N28G01G40X65Y0 取消刀具补偿，回到(65,0)
N30G90G00Z100.0M05 快速抬刀
N32M30 程序结束
发那科：
长轴48，短轴36
程序如下：
O1001（主程序）
T0101
G94S700M03M08
G54
G00G43Z30
G90X40Y0
Z2
G01Z0F150
M98P120L9（去毛坯余量，每次切深2毫米）
G00Z3
M30
O120（毛坯余量子程序）
G91G01Z-2
G90
#103=360(角度变量初赋值)
N100 #104=18*COS[#103]（X坐标值变量）
#105=24*SIN[#103] （Y坐标值变量）
G41 X#104 Y#105 D01
#103=#103-1（角度增量-1）
IF[#103GE0]GOTO100（如果角度大于等于0，则返回执行循环）
G40G01X40Y0
M99
