常见的后处理检测功能

miyuki

1.转速检测,包括最大和最小转速
2 \6 [) u5 y2 S2 F( E& o# Hif { $mom_spindle_speed == 0.0 } {
0 X, [. B& q! T- s2 F #MOM_output_literal " ( ZERO SPINDLE SPEED PROGRAMMED )"
#MOM_output_literal " M00 "
% p  f# ~% H( c  N9 }; [ set mom_spindle_speed 20. ;# dodge div.by zero in tap
$ J- J& ?5 V) a5 g" l set errmes "\n\n *** Spindle Speed Not set    ***\n***  IN OPERATION   $mom_operation_name  ***\n\n"
1 ^5 v6 e9 }0 [$ T+ u8 Y/ h* y. H, I  MOM_abort "$errmes"

* P' }6 R+ ^( a9 ^$ z0 J最大转速
0 V) j. C1 v: s5 ?/ j; Dif { $mom_spindle_speed > 10000 } {
set errmes "\n\n *** Spindle Speed Over Max 10000    ***\n***  IN OPERATION   $mom_operation_name  ***\n\n"
9 U9 q4 ]! G! {4 k4 s! R  MOM_abort "$errmes"
' D! H/ _1 C" E) ?; h( H
. w- p# l9 B: M/ ~最小转速
if { $mom_spindle_speed < 50  } {
: S2 [: E" P0 n4 R9 d7 x( X set errmes "\n\n *** Spindle Speed Under Min 50    ***\n***  IN OPERATION    $mom_operation_name  ***\n\n"
  MOM_abort "$errmes"
' X, P( _5 S9 _( G- ?3 K
, T) I# R# K) u& p  t! _4.刀具号未设置检测等..
if { $mom_tool_number  == 0.0 } {
  ]" D6 u6 m: d1 y #MOM_output_literal " ( TOOL ZERO PROGRAMMED ) "
+ t- v; D8 ^9 p2 M3 {2 |; C #MOM_output_literal " M00 "
  u7 c; |8 l/ E5 s7 R set errmes "\n\n *** Tool Number Not set    ***\n***  IN OPERATION $mom_operation_name  ***\n\n"
  MOM_abort "$errmes"
/ P8 M) |" O/ g) z2 p$ ?' m3 [3.进给检测
6 V( E+ n3 g" u8 C4.钻孔的安全平面检测

以下主要是钻孔的一些常用检测功能
3 r. j1 S; A+ E. ]9 mglobal mom_cycle_retract_mode   
global mom_clearance_plane_usage  
global mom_clearance_plane_status  
6 ]$ m" Z3 T& b$ \, ^. N* \global mom_operation_name
global mom_cycle_cam
# E3 k2 A1 h1 T( K6 jset alarm 0
set em "\n\n OPERATION : $mom_operation_name  \n\n  "
if { $mom_cycle_retract_mode != "AUTO" } {
; B+ w/ O" B3 S6 _' h$ P0 E incr alarm
4 K8 z* i  S2 ^# S, W set tt "\n\n RTCTO Mode not set to AUTO \n\n "
  set em $em$tt  
) v% r( b5 i7 o+ K* ~8 `# _   }
if { $mom_clearance_plane_status != 1 } {
% m" K0 q4 d8 r" G2 H incr alarm
set tt "\n\n Clearance Plane not Defined and Active \n\n "
$ b, i3 |9 `% s: R3 y  set em $em$tt  
   }
- r) v6 i4 H# E* Y1 v1 ^if { $mom_clearance_plane_usage != 1 } {
incr alarm
3 `( c6 \0 y% S# g) w: w set tt "\n\n Clearance Plane not set to Start and End \n\n "
  set em $em$tt  
   }
+ b; Y3 {1 C( T: G5 Z$ U/ D2 j  H
( l' i4 ~) Z! cif {[ info exists mom_cycle_cam ]} {
7 N9 R5 b$ y) O2 f8 L7 ?( F! o   if { $mom_cycle_cam > 0 } {
; c! T; s( t3 f  incr alarm
- w% X: I/ J0 R' ?$ D  set tt "\n\n Illegal CAM setting in canned cycle \n Set Spindle Speed on Feedrate Dialog \n\n "
   set em $em$tt  
      }
    }  
( T; r4 d  y2 W% w, V0 J2 s; xif { $alarm > 0 } { MOM_abort $em }
}

miyuki

以下主要讲的进给数度的检测功能,在刀具没有设置进给参数时,可以有效的检测出是哪个*作/刀具没有设置进给

, n, `! [+ {9 x2 R0 S以下是代码
7 O& N; e9 K6 q3 j; O- [3 T& L
& S- L& B" }% {8 x" K; }, F, Pglobal mom_motion_type mom_operation_name mom_programmed_feed_rate

+ [  }2 F) Y5 X$ B+ O4 q+ x% }if { $mom_motion_type != "RAPID" } {  return }

if { $mom_programmed_feed_rate != 0 } {
   set err "\n\n\n *** ILLEGAL RAPID FEEDRATE IN $mom_operation_name *** "
   set err " $err  \n\n\n *** RAPID FEEDRATE SET TO $feed *** "
   set err " $err \n *** SHOULD BE SET TO 0 IN THIS POST *** "
  @# o3 L/ H" @% B! G% m   set err "$err \n \n \n "

MOM_abort $err
: Y+ {/ `1 A& N: P}

full_bloom

楼主,你好,能不能写一个fanuc系统旋转轴转动之前的气动松开,和旋转之后的气动锁紧功能代码写出来.十分感谢！还有就是一把刀具被多个操作连续调用，强制每个操作输出刀具号，刀具补偿号，应该怎么修改。如有疑问qq：574736535

jialingjiang

回复 1# miyuki
) C1 q' |' _& E0 `5 a* p谢谢分享！

SS1268

声明:
: n) H9 W) V* ^/ w$ y  K+ U. q  v
4 \3 z% c# D' r: ?& I1 `6 [. {+ Dug后处理检测常用检测功能是本人论坛首次发出,在国内也是首法者,也是原创者,转载没有些明出处(大家可去http://postp.net查阅资料)
, q' U7 r: ]# w$ ~  Z0 M$ w

9 n# k2 `& p  p/ d. ^7 l% o$ L
; ]) Q/ ]9 @% k; Q: F转载不可耻,可耻在于删除了转载出处.