3.2.5：增加坐标未设检测功能

若枫

3.2.5：增加坐标未设检测功能
+ a( ]7 r1 R5 H  m  c- G5 b在加工时程序中没有G54，G55...是非常危险的。这很容易造成撞机或是损坏产品，刀具，工装夹具等。
这时我们可以利用后处理来对刀路进行相关的检查，并达到提示用户的作用，可以有效的防止重大事故的发生。


mastercam V9.1代码
1.增加错误提示信息
4 }/ H. u" G5 c& T6 h8 f* p# Hsworkerror  "WARNING - WORK OFFSET IS INVALID"

: _9 y. K  g, N, f6 Y4 T4 d3 r2.增加发生错误时的后处理动作
p_real   #Remove Program
          exitpost
* _* k8 c2 X5 Z( S
3.更改Pwcs下面的代码。这个代码较多。只需要完整的替换即可
pwcs            #G54+ coordinate setting at toolchange
      if mi1 > one,
2 ~: N: Y6 u2 }4 O        [
& y. N* g( a0 u" ?2 o' c        sav_frc_wcs = force_wcs
: t6 Z* Z5 d( C9 _. f7 Y9 E        if sub_level > 0, force_wcs = zero
        if workofs <> prv_workofs | (force_wcs & toolchng),
          [
9 C$ T1 ^3 _* e1 `6 y+ \( W         if workofs > 0 & workofs < 7,
. _! n4 C- A6 W9 ~: N! f            [
            g_wcs = workofs + 53
3 c6 Y" D7 I9 v% J$ @            *g_wcs
            ]
5 d! B2 m+ X8 T          else,
            [
             if workofs > 6 & workofs < 55,
! |% U' r" E9 Y* I+ A# y             [
1 Q$ _& ^& S4 }& W            p_wcs = workofs - six
3 }9 S6 v; }( G* d) M              "G54.1", *p_wcs  #"G54.1",
: |" B2 c8 l( n) [9 G$ r            ]
; K7 e0 p" j( q: s: @' D          ]
        force_wcs = sav_frc_wcs
        !workofs
           if workofs  > 55,  result = mprint(sworkerror),"(ERROR)",e
- W5 t9 Y/ g0 X- h  Q$ m1 ^; w! M            [
            "(", sworkerror,")",e
            p_real
7 W% r. o) H. _' k8 I            ]
% W% v# F$ x# N0 D1 U           if workofs  < 1,  result = mprint(sworkerror),"(ERROR)",e
2 D' I8 \$ N- E# R" H& c( h6 G. ]           [
           "(", sworkerror,")",e
% M+ C4 k: T4 [2 ^, i           p_real
6 S' t: r$ L: Z           ]
. X! N, b+ U$ Z3 b/ j           ]
          ]
6 h# w, U# O9 v1 c8 z

2 I" K' b* A: y: `! w* b; X9 qmastercam X5代码
  ]; |: J! `& _4 n1.增加错误提示信息
sworkerror  : "WARNING - WORK OFFSET IS INVALID"

2.增加发生错误时的后处理动作
  K5 l% [/ x- pp_real   #Remove Program
          exitpost$

3 e" L/ N' ]0 w6 ]' o; n3.更改Pwcs下面的代码。这个代码较多。只需要完整的替换即可
# ]1 S' R/ V+ F8 ipwcs            #G54+ coordinate setting at toolchange
( o! @, B9 X/ n9 P! q1 U9 T' H      if mi1$ > one,
: Y; s  G# M, r2 g/ x        [
+ [9 M2 ?  u( f        sav_frc_wcs = force_wcs
        if sub_level$ > 0, force_wcs = zero
& ?& n# p8 d2 T0 }' l, U! w7 V        if workofs$ <> prv_workofs$ | (force_wcs & toolchng),
          [
  z1 L3 Z2 m) T- Y9 g         if workofs$ > 0 & workofs$ < 7,
+ d! U* Q( U9 m  L% ?            [
3 |( M9 f4 b- s            g_wcs = workofs$ + 53
            *g_wcs
            ]
          else,
- k. G& p! [+ ^3 ?            [
1 u$ B3 E5 B; D& g: f* i8 R6 H             if workofs$ > 6 & workofs$ < 55,
             [
# X8 a+ f- q/ e* S% v$ k            p_wcs = workofs$ - six
) i: ^3 Q) N; g9 o! u8 [              "G54.1", *p_wcs  #"G54.1",
            ]
/ ?* H& Z; ?4 U" R6 I4 C6 V+ ^- G          ]
        force_wcs = sav_frc_wcs
7 q. A& F* k+ o8 W5 s7 X        !workofs$
. \0 E' Y! {. `7 |# u8 x! W& j           if workofs$  > 55,  result = mprint(sworkerror),"(ERROR)",e$
1 l, c" w! ~4 l            [
. Q) l" i" Y+ Z            "(", sworkerror,")",e$
            p_real
; ^1 x' h! w- g  n+ N. [            ]
           if workofs$  < 1,  result = mprint(sworkerror),"(ERROR)",e$
           [
           "(", sworkerror,")",e$
           p_real
           ]
( g1 M  d" p# n& O* O           ]
3 {4 }7 N$ n0 v% t          ]

4.刀路设置如图
9 F: n9 ^5 r# J1 C/ a5 }( i确保该数值大于0小于54，否则在处理时将会报错，提示坐标未设或是未定义。
, ^2 P4 u. H* M0 _2 S3 M
1 U& z1 P1 }% j) M
4 _& P& \! m* A& h
$ b; ]/ S% I; G5.测试结果

ya574544187

学习了好资料

yjqytkhh

学习了，好资料

queede

学习学习学习