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

DELL93H01

能否讨论一下，想以2D路径编程方式，后处理输出时自带主轴(C轴)转角度正交於切削路径。修改加入*arcrad$已可以带圆弧值，
if plane$ = zero, *iout, *jout, kout, *arcrad$ #XY plane code - G17
/ O; \4 f+ j/ Y
讨论1：如何将*arcrad$圆弧值换算成angle值，及以180度来区分自带正负符号
# P" {( P% e: _% ?

DELL93H01

目前修改的地方
fmt  "R" 2  arcrad$     #Arc Radius 修改成 fmt  "C" 2  arcrad$     #Arc Radius

2 D2 d5 j7 F: Dif plane$ = zero, *iout, *jout, kout, *arcrad$ #XY plane code - G17 加入*arcrad$
0 A3 u" ^& U9 H0 k5 h' E- e
7 c/ y! z- j6 P& {; b& }得到的程式段

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.
G1 Y15.
G2 X-40. Y25. I10. J0. C90.
4 H0 t' P: c+ c5 x0 P0 _  Q切削路径错误
  g6 L" g7 O; [

DELL93H01

. W- O8 S; _  \) N        #Arc output for IJK
        # If you do NOT want to force out the I,J,K values,
2 [: I- Y- e, H; w* w2 w1 S        # remove the "*" asterisks on the *i, *j, *k 's below...
        #
* K$ \  ]! T3 d$ a4 v/ J; D        #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
7 g/ e# m3 Y/ q; S* ~8 v        #
        #
* w9 M8 ]9 Y: x, C8 \        #
        if plane$ = one, iout, *jout, *kout  #YZ plane code - G19
5 S* r$ n7 c7 c0 i: U$ O8 v4 Q        if plane$ = two, *iout, jout, *kout  #XZ plane code - G18
        !i$, !j$, !k$
3 f  @, g8 S7 R4 _5 J        ]
      else,
6 [9 Z/ U" F) ^: |, h" K7 K        [
        #Arc output for R
6 e' m  t( J# f% R+ }  B6 O6 o4 Y+ `        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$)
        *arcrad$
5 C4 b$ b& j( ]; o) a        ]
修改这样会出现标签未宣告及运算公式有误…

站在无人风口

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

xinruyu369

可惜帮不上忙哦

DELL93H01

if plane$ = zero:
6 U  v& ~5 ~, w* ~; m# v( ]1 W0 `  *iout, *jout, kout, *arcrad$ #XY plane code - G17
  angle_degrees = arcrad * 180 / PI
6 l$ ~- p$ U  c9 P/ m% z2 b- K  if arcrad >= 0:
    sign = 1
  else:
/ V6 K5 [0 i3 Q/ e; I5 g8 J    sign = -1
  signed_angle_degrees = angle_degrees * sign

测试中