帮忙改下MA9.1后处理，螺旋下刀

sdafew000

1 b" c$ x. h2 j
不知道后处理哪个参数不对，处理出来螺旋下刀是直线，程序太长了。
还有这个后处理我把第四轴改成B轴了，不是联动的情况下，在B轴转动前一行，加个M11;转动之后加个M10；
# --------------------------------------------------------------------------
# General Output Settings
* v! f- d# ~* h( \% }" S, c" O# --------------------------------------------------------------------------
sub_level   : 1     #Enable automatic subprogram support
breakarcs   : 2     #Break arcs, 0 = no, 1 = quadrants, 2 = 180deg. max arcs
arcoutput   : 1     #0 = IJK, 1 = R no sign, 2 = R signed neg. over 180
6 Q; V- ^) b1 Karctype     : 2     #Arc center 1=abs, 2=St-Ctr, 3=Ctr-St, 4=unsigned inc.
do_full_arc : 0     #Allow full circle output? 0=no, 1=yes
helix_arc   : 2     #Support helix arc output, 0=no, 1=all planes, 2=XY plane only
arccheck    : 3     #Check for small arcs, convert to linear
- }" t. ~2 e  a$ m3 n- x; Iatol        : .01   #Angularity tolerance for arccheck = 2
ltol        : .002  #Length tolerance for arccheck = 1
$ |/ y1 k, n. x: lvtol        : .0001 #System tolerance
5 Y  J& w% s& Y) Dmaxfeedpm   : 500   #Limit for feed in inch/min
ltol_m      : .05   #Length tolerance for arccheck = 1, metric

sdafew000

顶自己一下

sdafew000

http://postp.net/viewthread.php?tid=6538      
6 ^, p4 U( M7 v/ ^4 h4 B4轴夹紧松开

sdafew000

晕，我改了一天一夜，最后发现是软件设置问题，螺旋渐降斜插，设置打断成若干直线了。。。

若枫

回复 1# sdafew000
& s7 S: z4 r4 R% O$ {

3 u+ _8 K; ?8 s' H    你的后处理不支持螺旋程序，智慧输出G1线段，缺少相应的代码。

# E4 s) w# x' J, {3 I替换你的原有的即可
. n% @8 G" {1 w1 G' r. n
& j* U1 a& p3 Y' m% hpcirout         #Output to NC of circular interpolation
+ z9 J+ _+ l% R! m1 }$ Y* @$ X      if full_arc_flg,
        [
        if plane = zero, result = force(xabs,yabs)   #force coordinate on full arc              
  J4 o* _& }+ k+ @        if plane = one,  result = force(yabs,zabs)   #force coordinate on full arc              
% `2 K# o. p+ i5 k6 O- a        if plane = two,
* n, W- ^/ S7 @5 O$ r+ j          [
          result = force(xabs,xabs)   #force coordinate on full arc              
/ v/ ~5 L- F9 P4 i5 j* }7 l          result = force(zabs,zabs)   #force coordinate on full arc              
          ]
        ]
6 @) [. C' ]. ?" f. Y      if hel_2100 = one, pcirout2
      else, pcirout1
3 A+ b( w$ O2 k4 s: g
pcirout1        #Output to NC of circular interpolation
* b# ?4 B9 L  W      pcan1, pbld, sgcode, sgabsinc, pccdia,
        pxout, pyout, pzout, pcout, parc, feed, strcantext, scoolant, e
        
9 z0 j3 x6 T2 e" I$ f# Vfmt  "K" 2  lead        #Helical lead
hel_2100    : no   #Acramatic 2100 style helical moves, 0=no, 1=yes

# T& |+ i" ]6 R) l  r: ]8 H- l& ?, H% `pcirout2        #Output to NC of circular interpolation
      if (plane = zero & fmtrnd(zinc)<>0)
       | (plane =  one & fmtrnd(xinc)<>0)
. w2 t+ Z& r7 Y/ I+ h7 S       | (plane =  two & fmtrnd(yinc)<>0), phelout
4 Q4 Q9 V9 T" S      else, pcirout1
0 ^" s6 `5 z. Q/ D5 s1 l
phelout         #Output to NC of helical interpolation
      if plane = zero,
        [
        result = nwadrs(strk, lead)
        lead = abs(zinc/sweep*360)
        ]
      if plane = one,
        [
        result = nwadrs(stri, lead)
" Z9 f8 C' `& ~+ m( w* f        lead = abs(xinc/sweep*360)
# n0 `4 O  o; T6 c4 D" o- X        ]
: j$ v& j, o* }7 ^      if plane = two,
, G$ J$ P( A/ o        [
) x& p6 u% p5 t! D9 Q% \        result = nwadrs(strj, lead)
- ~$ V, ^% w4 K+ Q  h8 m        lead = abs(yinc/sweep*360)
        ]
- W5 o7 K- P. P" _      pcan1, pbld, `sgfeed, sgplane, sgcode, sgabsinc, pccdia,
* N4 a6 v% `% J# Q. C        pxout, pyout, pzout, *lead, pcout, parc, feed, strcantext, scoolant, e

huamanyi

实在是太复杂了啊，不知道怎么改