请教西门子840D铣椭圆的程序。急用

figoa008

写错了一句，把R10=R7*R8改成R10=R7*R6

figoa008

R1=100(长半轴)  R2=80(短半轴)
' C* _) @/ u& d3 L& C7 tR3=20(刀具半径) R4=300(跟椭圆精度和大小，可改大或改小，越大越逼近椭圆理论值)
- j' U- b; Z( G( ?& _: p& O, dR5=360     R6=R5/R4  R7=0
3 U# V& V) }0 ^* w' AR8=R1+R3   R9=R2+R3
6 {5 o8 S$ ~3 l/ L& D! BG0Z100
M3S1000
! ~5 j9 S) i0 T) S+ HY0X150(开到安全距离)
3 W5 B8 I! o3 p5 m; V5 ]6 QZ-3
MR:R7=R7+1
& `9 p7 [0 o. N4 oR10=R7*R6
G95G90G01F1
X=R8*COS(R10) Y=R8*SlN(R10)
ⅠF R7<=R4 GOTOB MR
. W/ r% f. G/ h5 d# t. SG0Z100
6 y4 C+ i6 B7 r/ o9 sM30
% X3 d; t& m9 W7 k& V1 E零点偏置、坐标旋转、Z轴循环进刀自己加。
$ S# O; C# d6 ]5 P2 l' ^( t- A2 W
3 L9 N) u( E7 [% w+ v( o  M2 s
补充内容 (2019-5-24 07:39):
Y=R8*SⅠN(R10)改成Y=R9*SⅠN(R10)，否则铣成圆了。

figoa008

Y=R8*SlN(R10)改成Y=R9*SlN(R10)

figoa008

pama 发表于 2011-8-19 13:32
! T+ s  }% c& P% j那位高手能帮我解释一下椭圆的参数方程是怎么得来的。X=a*cos() y=b*sin().我自己没想明白

椭圆的参数方程，高中数学里面有。