[求助]后处理有时候处理出来程序不带G54 有时候带G54不知道如何解决这个问题?

nt2256

以下是我的后处理
8 i' W8 ^+ F; V# x, J# p还有一把刀具加工程序时程序开头没有刀号(t)
0 p$ k; S9 M2 f% h6 S多把刀具加工时有刀号
" r+ L  ~8 x, ]" t9 N请问如何让处理出来的一把刀具加工程序有刀具号呢(t)？

% z& y  p% w( [2 k& _+ {% z* |# tool comment / manual entry section
# --------------------------------------------------------------------------
' j* ^/ z& P* n& Optoolcomment    #comment for tool
- q% |+ d6 V5 F6 t4 E/ A. }      tnote = t
+ ]. k3 v: |4 d      toffnote = tloffno
: {' I( _- Z) d+ x2 F$ @8 _5 z5 n      tlngnote = tlngno
6 ?1 a$ \/ e1 W# O+ l      #"(", pstrtool, *tnote, *toffnote, *tlngnote, *tldia, ")", e
, H; I% G7 ^4 W) X5 Y      "(",*tldia,")", e
0 I: C2 a& x- o; Ppstrtool          #comment for tool
      if strtool <> sblank,
        [
        strtool = ucase(strtool)
* S' Q) w+ I9 ]% T! c* o/ M        *strtool, " "
        ]
' s' K. p( b# x# U  b) npcomment          #comment from manual entry (must call pcomment2 if booleans)
      pcomment2
pcomment2         #comment from manual entry
0 s& {' Z5 e" O. u; r% }2 @      scomm = ucase (scomm)
      if gcode = 1007, "(", scomm, ")"
      else, "(", scomm, ")", e
* E. ~( Z: P, F! V  b+ c# --------------------------------------------------------------------------
" l: Z. i( b# T$ U, w( v+ n8 l- a# z# start of file and toolchange setup
# --------------------------------------------------------------------------
psof0             #start of file for tool zero                              
, @; c3 k& _- u' d& _1 R      psof
0 u$ s: R* A% y, s# V# y! Upsof              #start of file for non-zero tool number                 
      pcuttype
5 x7 N8 k; a  n9 w( Q4 W/ @      toolchng = one
      if ntools = one,
5 V  C$ ~4 y0 v& }4 H  p4 ]        [
; M6 `* M2 C' B0 k        #skip single tool outputs, stagetool must be on
1 H" A* c7 ?9 `: `& l/ K1 ~        stagetool = m_one
- I' B5 t0 c: o, ?- A4 T        !next_tool
' l/ d5 d& E+ e  G& R% \        ]
      "%", e
      *progno, e
      "(", sprogname, ")", e
$ Q; O* i5 _0 \) ?      "(", date, " ", time, ")", e
      pbld, n, *smetric, e         
      pbld, n, *sgcode, *sgplane, "g40", "g49", "g80",*sgabsinc,"g94", e
      sav_absinc = absinc         
      if mi1 <= one, #work coordinate system
; Q. b. C- X1 }! t. |        [
3 _; Q, T$ o. P. b0 z. p8 N& L        absinc = one
        #pfbld, n, sgabsinc, *sg28ref, "z0.", e
2 Z- R- u$ [5 `# n; _# n  f1 n$ g        #pfbld, n, *sg28ref, "x0.", e
7 j8 I9 t0 \; _8 a        #pfbld, n, "g92", *xh, *yh, *zh, e
9 ~. J! l, y0 ]% {0 [& c        absinc = sav_absinc
! R* k7 C" J; E1 D  d/ S3 o- D        ]
      pcom_moveb
      c_mmlt #multiple tool subprogram call
      ptoolcomment
      comment
0 V6 z% U# [# ]) r: ]( r% \7 E      pcan
+ t9 i# ]" I3 W3 |! m$ A0 A      if stagetool >= zero, pbld, n, *t, "m6", e
, P7 i- f+ N' ~      pbld, n, "/",scoolant
% \8 o- [* I" E# M      pindex
      if mi1 > one, absinc = zero
( N5 W1 ^! E% R  G      pcan1, pbld, n, *sgcode,*sgabsinc, pwcs, pfxout, pfyout,
      pcout, *speed, *spindle, pgear, strcantext, e
      pbld, n, "g43", *tlngno, pfzout, next_tool, e
, j5 `8 E+ {; v      absinc = sav_absinc
4 j1 Z0 A" F* P( t* H( a      pbld, n, "*2030=0.0"
. j$ y' z1 }' }# q      pbld, n, "*2031=0.0"
3 {) m$ G9 D6 R, }! ^      pcom_movea
% ~$ w+ z: }) ]+ `      toolchng = zero
      c_msng #single tool subprogram call
# {# ?3 {8 S1 [) @' e# V5 F                 
ptlchg0           #call from nci null tool change (tool number repeats)                              
. U. G. J0 p. {* Q- u  I% |' c& L/ u& x( W      pcuttype
      pcom_moveb
5 d; W  m) ^! L  t! r+ Z( }+ e      c_mmlt #multiple tool subprogram call
; V1 {" }" y/ y8 J2 L5 D2 s' p      comment
+ h/ [0 u2 \: |  s      pcan
9 G' O, p3 R& j8 g# }  {      pbld, n, sgplane, e         
. X9 R) A8 e8 L- j. N      pspindchng
      pbld, n, scoolant, e
      if mi1 > one & workofs <> prv_workofs,
        [
        sav_absinc = absinc
; b. U9 V- V. z6 R        absinc = zero
- X6 q' }! Q% `9 Z0 b1 B        pbld, n, sgabsinc, pwcs, pfxout, pfyout, pfzout, pfcout, e
. e; ~& g/ h, S( G: P1 v1 {        pe_inc_calc
        ps_inc_calc
3 T5 r1 L% n$ B/ I# r- C3 j        absinc = sav_absinc
* ^2 N) ^! K5 u+ A. Z1 B        ]
      if cuttype = zero, ppos_cax_lin
# F) Z4 f. m$ Z- Z5 Z( w0 \      if gcode = one, plinout
      else, prapidout
      pcom_movea
4 q5 y0 f2 L; C  U; W/ G/ V      c_msng #single tool subprogram call
; i. L; g7 F" Y4 @+ A! h7 u' eptlchg            #tool change                                                     
/ q& v, x& ~+ [' G6 r      pcuttype
1 J: D! @% V$ a7 ^  v* Y      toolchng = one
      if mi1 = one, #work coordinate system
        [
9 a) y- C" Q6 J( R3 E6 t: H        pfbld, n, *sg28ref, "x0.", "y0.", e
! r' }$ J  i; `5 Z6 P        pfbld, n, "g92", *xh, *yh, *zh, e
  I5 Q: O9 ~/ j: H        ]
      pbld, n, "m01", e
! J" X- [( Q" N4 E3 y1 e8 |      pcom_moveb
      c_mmlt #multiple tool subprogram call
      ptoolcomment
      comment
      pcan
      pbld, n, *t, "m6", e
      pbld, n, "/",scoolant
  b6 y% r" R* a$ r1 S: [$ ^      pindex
: U4 L& q  |- Y9 C# T      sav_absinc = absinc     
      if mi1 > one, absinc = zero
      pcan1, pbld, n, *sgcode, *sgabsinc, pwcs, pfxout, pfyout,
3 u4 I* t6 |! G, `4 T* b      pcout, *speed, *spindle, pgear, strcantext, e
      pbld, n, "g43", *tlngno, pfzout, next_tool, e
9 ^, h* z* {" i4 ~1 E9 o# F, h      pbld, n, "*2030=0.0"
      pbld, n, "*2031=0.0"
      absinc = sav_absinc
      pcom_movea
% d, Z6 {5 `- d. j      toolchng = zero
' }4 F( ]! P2 k( B6 H( {      c_msng #single tool subprogram call
pretract          #end of tool path, toolchange                  
' L' `+ y1 Y) @  O      sav_absinc = absinc         
      sav_coolant = coolant
1 K9 F  d$ c5 `# _) {7 W      coolant = zero
      #cc_pos is reset in the toolchange here
      cc_pos = zero
5 }; n0 b8 @% v* B      gcode = zero
      pbld, n, sccomp, *sm05, psub_end_mny, e
      pbld, n, scoolant, e
5 V5 Z& c2 J% R4 h4 w      absinc = one
      pbld, n, sgabsinc, sgcode, *sg28ref, "z0.", e
1 X# ~( v" c8 B' ?. F+ D, y/ C      
# I. F9 x2 F" o! m) r/ h- ^1 H      #pbld, n, *sg28ref, "x0.", "y0.", protretinc, e
9 Q3 b; r1 B  V5 L: z      absinc = sav_absinc         
      coolant = sav_coolant
         
/ @7 B& P/ a" K" N1 z* q* kprotretinc      #reset the c axis revolution counter
      if frc_cinit & rot_on_x,
        [
6 b+ }6 o& s! _2 R        rev = zero
, o- l, J+ p' X( P6 K  P        sav_rev = zero
        cabs = zero
5 b0 x7 l& Z- l) T& E        csav = zero
- M! w1 [; b9 E2 d! E& `        indx_out = zero
        if index, e, pindxcalc, pindex
; T% |* B0 {1 `        else, *cabs
        prvcabs = zero
; U+ [$ e' Z2 C: M: c' _/ q. m        !csav, !cabs
  M, `5 O' z. a/ O5 s6 ]2 Q$ B        ]
peof0             #end of file for tool zero                  
- h6 e2 \! O2 E: j% }( ?3 d- U1 A      peof
' y$ F$ O+ @, u) l& tpeof              #end of file for non-zero tool            
0 ]+ d7 `9 W5 e      pretract
8 S( m; t' F, {7 w( b, V$ p: h. V- I      comment
      #remove pound character to output first tool with staged tools
      #if stagetool = one, pbld, n, *first_tool, e
      pbld, n, *sg28ref,"y0.", protretinc, e
      n, "m30", e   
      mergesub
3 t; M8 |* x3 V      clearsub
" x5 T) A: @( N, Y      mergeaux
4 R3 @- c2 D' a" @% \      clearaux
) c' ?) ]3 P& a, o& o6 @      "%", e
pwcs              #g54+ coordinate setting at toolchange
  B5 l. H. a9 T& m7 d1 W. ~* }      if mi1 > one,
        [
' o9 z. `6 y1 I        sav_frc_wcs = force_wcs
$ l+ |( Y, v& P0 |" ?& k% o        if sub_level, force_wcs = zero
3 E# H3 M, A0 o. k) I0 I$ Q# H        if workofs <> prv_workofs | (force_wcs & toolchng),
+ @- @/ L9 a9 K& W8 _/ F8 _          [
          if workofs < 6,
            [
            g_wcs = workofs + 54
            ]
          else,
            [
- O9 q+ P, o( o( P            g_wcs = workofs + 104
# N5 c: C* l0 g' |  o9 {            ]
/ x% c5 J7 z2 C# N( s! }! \* |% r3 B          if workofs >= 0 & workofs <= 25, *g_wcs
! K0 p9 |0 H* r            else, "error - invalid work coordinate system", e
/ w9 I/ R- b6 Z& V3 ^- [          ]
        force_wcs = sav_frc_wcs
        !workofs
        ]
; u/ r8 d( I6 S9 }* B* G* G9 s- }         
pgear             #find spindle gear from lookup table
      if use_gear = one,
        [
        gear = frange (one, speed)
        *gear
        ]
- j* E' v4 i+ G2 G/ `, z+ K#toolchange setup
pspindchng      #spindle speed change
# t6 s5 e4 Y1 P  A& l. [" p      if prv_spdir2 <> spdir2 & prv_speed <> zero, pbld, n, *sm05, e
      if prv_speed <> speed | prv_spdir2 <> spdir2,
' ^1 h9 O/ Z8 E! q; e3 f. ]9 d& L% P        [
/ ^) j2 ]* f. a  a' W/ ]        if speed, pbld, n, *speed, *spindle, pgear, e
. E" J) h4 s5 ?, }5 W        ]
  ~  m5 J6 z9 Y6 j  f+ w  R      !speed, !spdir2
pspindle          #spindle speed calculations for rpm
! p2 a) n& l  ]$ K- v7 @% i      speed = abs(ss)
      if maxss = zero | maxss > max_speed, maxss = max_speed
# y! N6 ^1 U9 Q' D  n      #zero indicates spindle off (not a mistake)
* {( x7 c* t6 i7 |+ e/ }' E) C      if speed,
        [
2 ]8 Z  V& r8 T4 E1 b+ G        if speed > max_speed, speed = maxss
# \( Z+ B, y( Z6 r) T2 J9 z* c3 S* }        if speed < min_speed, speed = min_speed
        ]
      spdir2 = fsg3(spdir)

Admin

你的机器应该是haas的控制器.
8 M7 g; j: I$ p  _5 \, F. K

1. pwcs      #g54+ coordinate setting at toolchange
   ) z% V% i4 j9 L
2.   if mi1 > one,
   4 p. c$ f- q2 L# w" T" }" b
3.    &#91;
   
4.    sav_frc_wcs = force_wcs
   
5.    if sub_level, force_wcs = zero
   8 Z: w* A) o( `* [! {6 e8 ?
6.    if workofs <> prv_workofs | (force_wcs &amp; toolchng),
   
7.      &#91;
   
8.      if workofs < 6,
   
9.      &#91;
     X3 U3 I4 o6 A
10.      g_wcs = workofs + 54
    0 w' {( ^: G/ W. {+ X* Z2 n2 O
11.      ]
    5 l8 E8 O4 F  ]0 k, z; B3 B
12.      else,
    : [$ N8 V1 b# U
13.      &#91;
    
14.      g_wcs = workofs + 104
    7 h+ C! Z0 E; K/ ^4 A- Z: u* e& d
15.      ]
    & m1 I7 D9 T: u$ w' I# }, D& w) M$ f7 A
16.      if workofs >= 0 &amp; workofs <= 25, *g_wcs
    8 d. u" p/ ?# s# {- R7 B
17.      else, "error - invalid work coordinate system", e
    
18.      ]
    0 ]& \0 Y; ]2 h& T6 [/ V
19.    force_wcs = sav_frc_wcs
    
20.    !workofs
    
21.    ]

复制代码

改为

1. pwcs      #g54+ coordinate setting at toolchange
   , K6 r$ y* K4 M' Y
2.   if mi1 > one,
   
3.    &#91;
   
4.    sav_frc_wcs = force_wcs
   : a' B- B+ ?  Y0 @3 b
5.    if sub_level, force_wcs = zero
   
6.    if workofs <> prv_workofs | (force_wcs &amp; toolchng),
   3 _- T# N, f: x1 o
7.      &#91;
   4 W3 s7 J& Q4 d
8.      if workofs > 0 &amp; workofs < 7,
   
9.      &#91;
   8 O' r5 m0 v" B# g  i, O
10.      g_wcs = workofs + 53
    3 m# y2 X- e4 P& E+ @/ N
11.   *g_wcs
    
12.      ]
    
13.      else,
    / g% ]- t, M+ |- P: ?  R2 r
14.      &#91;
    # a) D. h, x3 ]; x
15.      if workofs > 7 &amp; workofs <= 25
    
16.      g_wcs = workofs + 104
    # N6 ^' G! B% g. ?0 n  Y
17.   *g_wcs
    
18.   ]
    7 `  e) ~3 ~/ s* E1 c6 T
19.      ]
    : G# l; e- f5 d, \) U; Z
20.    force_wcs = sav_frc_wcs
    # |, n0 _. L9 c
21.    !workofs
    3 U* n% U% I9 S: M3 m( F& A0 G
22.    ]

复制代码

Admin

上面我给出的代码还是会出现g53.每次写刀路时如下图设置即可完全解决
不要太依赖后处理.当然,后处理是可以做到和避免人为的疏忽,但养成一个良好的习惯是很有必要的.
如不想按上面的设置,请按如下修改.
) q7 _$ }% P( P; l" v" m& h3 O

1. 
   
2. g_wcs = workofs + 53
   & R! c% m0 a7 H; ?8 V) b5 G

复制代码

1 I0 @+ C% q8 A6 u* ~. y: D

1. 
   
2. g_wcs = workofs + 54
   + v4 E& |$ K& ~0 ^" c% \

复制代码

同时删除以下代码

1. 
   
2. workofs > 0
   " G3 o3 n& t3 z" Q' P6 j$ ^, Q

复制代码

nt2256

[p]感谢斑竹 不过用了之后报警 我先在每次处理程序前都重新计算一下刀路 说来也奇怪 这下处理后来的程序就带g54了 不知道是为什么。。。

[p]再次感谢斑竹~

若枫

[p]报警的错误信息放上来,就知道是什么问题了.

若枫

g_wcs = workofs + 54
这句话有问题。应该是
, |2 v- j, W) ^  g_wcs = workofs + 53

liuhaidong

回复 8# 若枫

9 n4 m4 K8 p: u. v
: h' N# V- _$ T$ u3 E2 A    当你在后处理出现第一段XY坐标的位置前加"G54"就行了，没必要加那么多的后处理语句。

liuhaidong

回复 9# liuhaidong

2 s" ]4 s. j' ]/ w* C: y: J$ V/ Y
    你想要加G54-G59均可，根据实际需求。

yanglinchu

回复  若枫
$ i7 s( z8 K* I7 P: \7 a: O( ^8 @
, d5 {' f3 e& q+ Z1 F% P  u
    当你在后处理出现第一段XY坐标的位置前加"G54"就行了，没必要加那么多的后处理语句。
, }: }  O2 y( G+ s% Z( ^9 a8 iliuhaidong 发表于 2011-6-15 14:18 http://postp.net/images/common/back.gif

    可行，但是不能从根本解决问题，比如大型的加工中心，换刀无数，谁都难保证少几个G54,忘记加，那就麻烦大了。我也遇到这个问题了，程序缺少G54，请若枫帮忙！

若枫

回复 11# yanglinchu

! [7 F& n: d1 V. k1 ^( w/ q% M
    都说了,这是刀路设置问题.后处理是可以生产G54,关键在于刀路.
还有这牙咬根据每个人的习惯去设定该后处理是可以做到一劳永逸的,但那是个固定的死东西,不方便与其他用G55,G56....设定
所以改变个人的编程习惯是最好的解决方法