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

若枫

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


0 K+ o* u# O1 I( _mastercam V9.1代码
4 L* }, R' o: e" a" b& c1.增加错误提示信息
/ I! n4 J5 f; }2 V! osworkerror  "WARNING - WORK OFFSET IS INVALID"
8 B# }) W, l& u' E
2.增加发生错误时的后处理动作
: j1 F" H. h1 F. k1 {p_real   #Remove Program
          exitpost

3.更改Pwcs下面的代码。这个代码较多。只需要完整的替换即可
3 @& X6 m. C/ t6 u4 W  d4 ]' upwcs            #G54+ coordinate setting at toolchange
      if mi1 > one,
        [
) p" ?5 X' Z0 v2 a; D6 y        sav_frc_wcs = force_wcs
        if sub_level > 0, force_wcs = zero
1 r, W! Q. d9 j        if workofs <> prv_workofs | (force_wcs & toolchng),
          [
         if workofs > 0 & workofs < 7,
            [
            g_wcs = workofs + 53
# m- h& c/ Y& u& C            *g_wcs
+ r0 @# Z) |6 Z2 G  M7 ^) g# l( c2 q& g            ]
          else,
% }, g8 }; M1 v  _5 \            [
& w0 p1 Z& ^( {- L, l" `$ \  m( b             if workofs > 6 & workofs < 55,
             [
            p_wcs = workofs - six
; P: z! R2 F: ^6 b. |5 g7 v8 G              "G54.1", *p_wcs  #"G54.1",
            ]
          ]
        force_wcs = sav_frc_wcs
        !workofs
           if workofs  > 55,  result = mprint(sworkerror),"(ERROR)",e
& ~# n# `1 L: `. R' X, `. \' x' D            [
            "(", sworkerror,")",e
            p_real
            ]
           if workofs  < 1,  result = mprint(sworkerror),"(ERROR)",e
           [
           "(", sworkerror,")",e
/ Z, M. O0 m6 o& l% b3 l           p_real
, f  ?* }# h/ ^           ]
) ]- e6 q  r) I" i' c) `           ]
          ]
5 }9 t, m3 e" D. L7 H5 @1 r

mastercam X5代码
5 B8 V: Q- G1 p$ J# y( ^! F: ^1.增加错误提示信息
sworkerror  : "WARNING - WORK OFFSET IS INVALID"

2.增加发生错误时的后处理动作
0 B( n5 v8 ^4 R# R  `p_real   #Remove Program
! q! J" I1 w& {8 |- m; I          exitpost$
2 D6 z6 V0 q* j& }8 \
8 M5 [1 ?/ d. D0 \3.更改Pwcs下面的代码。这个代码较多。只需要完整的替换即可
, Q; I0 c7 R- J* v4 ?+ ~pwcs            #G54+ coordinate setting at toolchange
      if mi1$ > one,
* V3 O" v" R1 y        [
        sav_frc_wcs = force_wcs
' e8 i! c, t- B! {        if sub_level$ > 0, force_wcs = zero
        if workofs$ <> prv_workofs$ | (force_wcs & toolchng),
, X: w5 P; ]9 j  d: q: W% V% J          [
         if workofs$ > 0 & workofs$ < 7,
/ Q# I9 x( i! R8 x& `! W6 a            [
            g_wcs = workofs$ + 53
            *g_wcs
, A8 G- j9 `; ?. H* @+ \            ]
) j) m# P' ]* c& f! W0 M, V' @          else,
5 m1 I/ ]# o1 L            [
4 s3 A$ F7 Z. [4 x             if workofs$ > 6 & workofs$ < 55,
/ Z5 ]- X! ^1 j* ]! s" i             [
            p_wcs = workofs$ - six
" a& u& c0 X4 _! I8 G: R1 M) [              "G54.1", *p_wcs  #"G54.1",
            ]
3 v6 R4 ~4 q4 v          ]
9 o" P* _  {# I) M7 ^- `        force_wcs = sav_frc_wcs
        !workofs$
# E9 u$ t8 f1 |' k) h1 k           if workofs$  > 55,  result = mprint(sworkerror),"(ERROR)",e$
            [
            "(", sworkerror,")",e$
% d/ A8 Z9 Y3 l) z- G            p_real
            ]
  X# _  b! E$ X. W9 E8 U7 k% ~; r           if workofs$  < 1,  result = mprint(sworkerror),"(ERROR)",e$
* G  {2 o1 Q5 r1 F5 `7 s% h) d           [
5 X; V6 ~1 b3 Y9 I6 V3 H$ E4 G           "(", sworkerror,")",e$
, L, O# k  u' n, l$ h1 I. z           p_real
$ {" _/ u# W0 N: j2 B           ]
( w) w1 B' d* `9 N2 K           ]
  Q5 O. j# G  p. Y& C/ u' x+ J, f          ]

4.刀路设置如图
确保该数值大于0小于54，否则在处理时将会报错，提示坐标未设或是未定义。
; \3 {3 O7 v# P2 ?" _. Q, O6 r0 n


- |- e8 d8 \) x0 }8 i5.测试结果

ya574544187

学习了好资料

yjqytkhh

学习了，好资料

queede

学习学习学习