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

若枫

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

5 s9 f+ N( e1 O, ~9 H4 y
mastercam V9.1代码
1.增加错误提示信息
: }( u+ k5 Y8 k  _0 [& ysworkerror  "WARNING - WORK OFFSET IS INVALID"
7 Z. ]) M2 ?  U2 o$ }6 U9 C
2.增加发生错误时的后处理动作
/ ^8 L4 ^7 P. N, [) ~  W" Z0 {p_real   #Remove Program
' |. a5 j1 J  Y" G+ }$ |          exitpost
  m, O/ a9 G% E6 g6 |/ o
# Y( D2 `8 @& }  q3.更改Pwcs下面的代码。这个代码较多。只需要完整的替换即可
: J' C, `- }4 o. E/ X, @8 ]8 C/ Qpwcs            #G54+ coordinate setting at toolchange
/ Y" k, \" T1 Y7 g1 A      if mi1 > one,
        [
5 E: P8 D! S/ c; L/ E; F- _( T/ s" j        sav_frc_wcs = force_wcs
        if sub_level > 0, force_wcs = zero
/ T% ?# H9 D+ }: a        if workofs <> prv_workofs | (force_wcs & toolchng),
2 S2 g) x( L+ s5 b5 e" c" j          [
% y8 K) y' x' p  o# G         if workofs > 0 & workofs < 7,
            [
            g_wcs = workofs + 53
! p9 R0 R: M7 Z! q& t            *g_wcs
- ~/ W* X  `& Z6 G" a% s5 d            ]
          else,
- x6 `0 A: e! t+ b! y& ^            [
             if workofs > 6 & workofs < 55,
             [
            p_wcs = workofs - six
              "G54.1", *p_wcs  #"G54.1",
+ u5 @6 ^* ?; I$ _8 f            ]
9 v* z# ^( S5 _7 D3 g% ]2 X+ `          ]
7 X3 ^) m. R6 |8 ]        force_wcs = sav_frc_wcs
/ S  T6 {. V+ X' \" l) f        !workofs
           if workofs  > 55,  result = mprint(sworkerror),"(ERROR)",e
            [
) [+ b" J, U! q            "(", sworkerror,")",e
            p_real
            ]
3 V5 H: ~0 l6 C* G! O           if workofs  < 1,  result = mprint(sworkerror),"(ERROR)",e
           [
% c& e" o+ P: M           "(", sworkerror,")",e
           p_real
           ]
           ]
          ]


mastercam X5代码
1.增加错误提示信息
5 M% s: l2 A7 Q) isworkerror  : "WARNING - WORK OFFSET IS INVALID"

4 l1 a' N! H6 S$ u* V2.增加发生错误时的后处理动作
p_real   #Remove Program
          exitpost$
2 e, [+ D. l5 ~$ B5 [- N! ?
3.更改Pwcs下面的代码。这个代码较多。只需要完整的替换即可
pwcs            #G54+ coordinate setting at toolchange
      if mi1$ > one,
' X8 a- p( G9 o* O# `        [
4 X' M- u: F* p        sav_frc_wcs = force_wcs
        if sub_level$ > 0, force_wcs = zero
        if workofs$ <> prv_workofs$ | (force_wcs & toolchng),
  W! ^, |4 L- |4 k  \1 u          [
         if workofs$ > 0 & workofs$ < 7,
            [
            g_wcs = workofs$ + 53
- f8 p$ f8 @+ ~2 O0 @0 ]2 I            *g_wcs
5 ]) L+ h5 n. m$ q% X            ]
4 J, j/ f" |" q+ V# W          else,
) h" `1 H8 b. J- E3 m            [
             if workofs$ > 6 & workofs$ < 55,
             [
' V! S" R0 f) D8 t            p_wcs = workofs$ - six
( Q8 Y  K  t* n# h              "G54.1", *p_wcs  #"G54.1",
1 Q. B' x) t/ B. a% b            ]
3 Q; t1 |9 y/ b9 C" q" P          ]
" |$ Y8 G6 p9 U6 Y- @4 G        force_wcs = sav_frc_wcs
        !workofs$
. [& ^9 @$ O2 Z5 f# E5 _' X+ J           if workofs$  > 55,  result = mprint(sworkerror),"(ERROR)",e$
            [
( S* U: v6 F2 H0 S2 r: g            "(", sworkerror,")",e$
$ A5 P* h, @+ m; r            p_real
            ]
) o; l! C) d9 N( T% W           if workofs$  < 1,  result = mprint(sworkerror),"(ERROR)",e$
" x- e- u2 {9 A7 B' D           [
; _4 H% a  p4 x8 k6 ?) j- }           "(", sworkerror,")",e$
           p_real
           ]
& I) \+ K6 \1 |: M2 ]           ]
          ]

4.刀路设置如图
确保该数值大于0小于54，否则在处理时将会报错，提示坐标未设或是未定义。
% t+ i" ]# e; H- O, U) Z

$ f% B+ ~& C4 `$ n- B* @) Z
% b: T7 }5 W; t  c* g$ X! P- c5.测试结果

ya574544187

学习了好资料

yjqytkhh

学习了，好资料

queede

学习学习学习