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

DELL93H01

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

讨论1：如何将*arcrad$圆弧值换算成angle值，及以180度来区分自带正负符号

DELL93H01

目前修改的地方
fmt  "R" 2  arcrad$     #Arc Radius 修改成 fmt  "C" 2  arcrad$     #Arc Radius
. r6 h% l0 e2 v) a# k7 j$ h; j
if plane$ = zero, *iout, *jout, kout, *arcrad$ #XY plane code - G17 加入*arcrad$
4 l9 x$ r6 w$ L% N
得到的程式段
. ~, v# I6 S( R3 N2 p9 R+ j
G2 X50. Y15. I0. J-10. C90.
G1 Y-15.
G2 X40. Y-25. I-10. J0. C90.
G1 X-40.
G2 X-50. Y-15. I0. J10. C90.
- N5 q8 U% z$ {& xG1 Y15.
1 F& @3 ^% p2 Q0 o, c# tG2 X-40. Y25. I10. J0. C90.
切削路径错误

DELL93H01

( m9 _0 E0 g+ k5 x! H. A        #Arc output for IJK
& R7 v! T& e! }' N( p5 |/ m* {6 V        # If you do NOT want to force out the I,J,K values,
        # remove the "*" asterisks on the *i, *j, *k 's below...
7 u  j5 C6 ^1 v# a* ]        #
- Z; q1 x0 E: X8 f2 S        #old#if plane$ = zero, *iout, *jout, kout #XY plane code - G17
        #
        if plane$ = zero, *iout, *jout, kout, (" " if arcrad$ >= 0 else "-") + str(abs(arcrad$)) #XY plane code - G17
+ v! s0 E2 G6 z) j: T  V; _        #
3 L7 r; T; M6 ]4 U        #
        #
% s3 @9 ^4 M4 \# {7 t        if plane$ = one, iout, *jout, *kout  #YZ plane code - G19
+ k6 q5 m$ X7 k7 {4 V        if plane$ = two, *iout, jout, *kout  #XZ plane code - G18
& E+ X% n1 s" ^, B        !i$, !j$, !k$
        ]
      else,
2 x7 N- l" ?4 w! I& p, L        [
1 P4 e: T5 e, w' x* J        #Arc output for R
( n+ A/ |& s( N7 l% ], i% H' u( x+ |        if abs(sweep$)<=180 | (plane$ = 0 & arctype$ = five) | (plane$ = 1 & arctypeyz$ = five) |
          (plane$ = 2 & arctypexz$ = five), result = nwadrs(srad, arcrad$)
        else, result = nwadrs(srminus, arcrad$)
$ P% w7 w- h$ \* T        *arcrad$
1 I9 v' |4 n9 p) X! G        ]
修改这样会出现标签未宣告及运算公式有误…

站在无人风口

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

xinruyu369

可惜帮不上忙哦

DELL93H01

if plane$ = zero:
  *iout, *jout, kout, *arcrad$ #XY plane code - G17
5 `& v. f: W! r% P- h) I% N  angle_degrees = arcrad * 180 / PI
  if arcrad >= 0:
    sign = 1
( Z$ ^8 d+ x' U" w; A' O9 ]  else:
: |( |: i+ c3 R    sign = -1
  signed_angle_degrees = angle_degrees * sign
3 [5 a5 d! _1 N. Y9 y' M
测试中