%0110(X,Y按行距增量进给)
N10 #10=100 毛坯X方向长度
N20 #11=70 毛坯Y方向长度
N30 #12=50 椭圆长轴
N40 #13=20 椭圆短轴
N50 #14=10 椭园台高度
N60 #15=2 行距步长
N70 G92 X0 Y0 Z[#13+20]
N80 G90G00X[#10/2] Y[#11/2] M03M07
N90 G01 Z0
N100 X[-#10/2]Y[#11/2]
N110 G17G01 X[-#10/2] Y[-#11/2]
N120 X[#10/2]
N130 Y[#11/2]
N140 #0=#10/2
N150 #1=-#0
N160 #2=#13-#14
N170 #5=#12*SQRT[1-#2*#2/#13/#13]
N180 G01 Z[#14]
N190 WHILE #0 GE #1
N200 IF ABS[#0] LT #5
N210 #3=#13*SQRT[1-#0*#0/[#12*#12]]
N220 IF #3 GT #2
N230 #4=SQRT[#3*#3-#2*#2]
N240 G01 Y[#4] F400
N250 G19 G03 Y[-#4] J[-#4] K[-#2]
N260 ENDIF
N270 ENDIF
N280 G01 Y[-#11/2] F400
N290 #0=#0-#15
N300 G01 X[#0]
N310 IF ABS[#0] LT #5
N320 #3=#13*SQRT[1-#0*#0/[#12*#12]]
N330 IF #3 GT #2
N340 #4=SQRT[#3*#3-#2*#2]
N350 G01 Y[-#4] F400
N360 G19 G02 Y[#4] J[#4] K[-#2]
N370 ENDIF
N380 ENDIF
N390 G01 Y[#11/2] F1500
N400 #0=#0-#15
N410 G01 X[#0]
N420 ENDW
N430 G00 Z[#13+20] M05
N440 G00 X0 Y0
N450 M05M09
N460 M02




