Fanuc-CS机能-刮削程式-主轴变C轴转角度程式输出

DELL93H01

能否讨论一下，想以2D路径编程方式，后处理输出时自带主轴(C轴)转角度正交於切削路径。修改加入*arcrad$已可以带圆弧值，
4 I" M+ c' Z, e2 Xif plane$ = zero, *iout, *jout, kout, *arcrad$ #XY plane code - G17

讨论1：如何将*arcrad$圆弧值换算成angle值，及以180度来区分自带正负符号
2 k3 {  b2 Z2 z3 l9 l" t$ d

DELL93H01

目前修改的地方
0 J/ Y# j- B- v5 wfmt  "R" 2  arcrad$     #Arc Radius 修改成 fmt  "C" 2  arcrad$     #Arc Radius
9 z2 ~% M1 N% F9 i* I+ [. }
: S% g0 l8 |/ ^1 c( X8 v. Zif plane$ = zero, *iout, *jout, kout, *arcrad$ #XY plane code - G17 加入*arcrad$

. y0 e; d( R$ V, E# w得到的程式段
; \% o' |0 M3 f6 n3 h+ J  U
G2 X50. Y15. I0. J-10. C90.
: E5 |$ E! i$ X9 V: s6 lG1 Y-15.
3 X7 J9 k" \$ H3 F3 |G2 X40. Y-25. I-10. J0. C90.
% i. Z* g. ~+ @& H+ a0 u  cG1 X-40.
, p7 B1 X% j7 L! t, W9 U' o/ k5 z1 oG2 X-50. Y-15. I0. J10. C90.
G1 Y15.
+ m$ V% \7 B* Z) D' rG2 X-40. Y25. I10. J0. C90.
: E2 N1 m. l; U/ ]5 w切削路径错误
( f* A# V6 p/ ~' Y" F

DELL93H01

        #Arc output for IJK
7 a& E; |, G: i) v) C( l. V        # If you do NOT want to force out the I,J,K values,
8 }* C( B4 z* k* w- x: U2 ]        # remove the "*" asterisks on the *i, *j, *k 's below...
9 w3 \# J- a: {6 m2 M$ P        #
        #old#if plane$ = zero, *iout, *jout, kout #XY plane code - G17
        #
& B+ Q0 l% k8 d3 S' ?+ B0 @2 x& e3 k& ?3 ?        if plane$ = zero, *iout, *jout, kout, (" " if arcrad$ >= 0 else "-") + str(abs(arcrad$)) #XY plane code - G17
5 B9 `; n2 Q5 ?, M) }( r        #
        #
        #
, L$ H+ F8 j  Q8 k        if plane$ = one, iout, *jout, *kout  #YZ plane code - G19
        if plane$ = two, *iout, jout, *kout  #XZ plane code - G18
' x8 }1 y0 g: j- y- @, i        !i$, !j$, !k$
        ]
0 X) t7 j% b4 m9 {: e      else,
) {7 O, d7 |) q( t/ v8 q! J        [
        #Arc output for R
* [, F+ u7 s1 e8 U  N* U        if abs(sweep$)<=180 | (plane$ = 0 & arctype$ = five) | (plane$ = 1 & arctypeyz$ = five) |
# ]8 L) a2 q7 R# v* j          (plane$ = 2 & arctypexz$ = five), result = nwadrs(srad, arcrad$)
        else, result = nwadrs(srminus, arcrad$)
2 @% w$ v* b6 u8 l  T. [        *arcrad$
  E8 y) K& e- u; W/ j  U        ]
修改这样会出现标签未宣告及运算公式有误…

站在无人风口

这个再这里问大概率不会有人回复你的  

xinruyu369

可惜帮不上忙哦

DELL93H01

if plane$ = zero:
9 ?' [8 c. T5 j  *iout, *jout, kout, *arcrad$ #XY plane code - G17
  angle_degrees = arcrad * 180 / PI
  if arcrad >= 0:
' g- T0 f/ x/ f1 u7 p4 r# Y    sign = 1
  else:
    sign = -1
& L9 U& o/ S' s, h' y; M# e: W' @  signed_angle_degrees = angle_degrees * sign
% c( |2 x) q1 i3 S  J% L* ]
测试中