常见的后处理检测功能

miyuki

1.转速检测,包括最大和最小转速
+ c* D& n& _' n: z0 d  b# _if { $mom_spindle_speed == 0.0 } {
* E+ w+ w/ X( l, b$ c #MOM_output_literal " ( ZERO SPINDLE SPEED PROGRAMMED )"
#MOM_output_literal " M00 "
set mom_spindle_speed 20. ;# dodge div.by zero in tap
+ v' S. ^2 U8 Q, u" |. s2 W set errmes "\n\n *** Spindle Speed Not set    ***\n***  IN OPERATION   $mom_operation_name  ***\n\n"
) H) _- j# Z3 O% }8 z  MOM_abort "$errmes"

8 n! E1 j) I/ \最大转速
if { $mom_spindle_speed > 10000 } {
$ o+ o  S8 m2 {/ j3 Q, ^& u) q! v set errmes "\n\n *** Spindle Speed Over Max 10000    ***\n***  IN OPERATION   $mom_operation_name  ***\n\n"
1 P/ x( m8 v) V) H5 G" m  MOM_abort "$errmes"
5 D' ~! E0 d1 w
6 l# p8 K, p& I: _* D最小转速
0 U# S9 |& U. i' F9 |* |if { $mom_spindle_speed < 50  } {
5 K' V- ~) t9 I set errmes "\n\n *** Spindle Speed Under Min 50    ***\n***  IN OPERATION    $mom_operation_name  ***\n\n"
  MOM_abort "$errmes"

4.刀具号未设置检测等..
9 d& A/ H# R+ E' \* Dif { $mom_tool_number  == 0.0 } {
* F5 A5 \0 O4 b6 \ #MOM_output_literal " ( TOOL ZERO PROGRAMMED ) "
#MOM_output_literal " M00 "
' t  w, z$ {: e4 Q. X set errmes "\n\n *** Tool Number Not set    ***\n***  IN OPERATION $mom_operation_name  ***\n\n"
  MOM_abort "$errmes"
% r9 a) o' Z% y3.进给检测
4.钻孔的安全平面检测

$ I: E2 K2 X! ]- \1 p- H- @以下主要是钻孔的一些常用检测功能
global mom_cycle_retract_mode   
# U" }9 }- T  b' _3 i/ A, Mglobal mom_clearance_plane_usage  
: q' g' T9 i' Lglobal mom_clearance_plane_status  
9 \3 v+ h5 A  w' K4 Uglobal mom_operation_name
global mom_cycle_cam
set alarm 0
  I5 w. E! m# V* e: Oset em "\n\n OPERATION : $mom_operation_name  \n\n  "
if { $mom_cycle_retract_mode != "AUTO" } {
incr alarm
set tt "\n\n RTCTO Mode not set to AUTO \n\n "
  set em $em$tt  
   }
if { $mom_clearance_plane_status != 1 } {
incr alarm
set tt "\n\n Clearance Plane not Defined and Active \n\n "
" O4 K' ~! r9 c* }( x" D5 A/ }0 S  set em $em$tt  
   }
5 F- K: A# z1 y& ]! x, f. v2 {& cif { $mom_clearance_plane_usage != 1 } {
incr alarm
set tt "\n\n Clearance Plane not set to Start and End \n\n "
6 O$ ^& f! m, _# U0 z  set em $em$tt  
   }

if {[ info exists mom_cycle_cam ]} {
   if { $mom_cycle_cam > 0 } {
% r. F  T) U& `* }) j* g  incr alarm
  set tt "\n\n Illegal CAM setting in canned cycle \n Set Spindle Speed on Feedrate Dialog \n\n "
   set em $em$tt  
      }
    }  
+ M# N* n0 |: s5 Fif { $alarm > 0 } { MOM_abort $em }
  D$ W6 F2 V' D+ j}

miyuki

以下主要讲的进给数度的检测功能,在刀具没有设置进给参数时,可以有效的检测出是哪个*作/刀具没有设置进给
3 Z. f: i4 O2 [3 b" T3 I) `: M
以下是代码
  z# K9 Q3 f+ ^) L& j- k
2 A% M" U9 s  Z" g0 Dglobal mom_motion_type mom_operation_name mom_programmed_feed_rate
0 {! L/ ]  t  H: |) D5 A
% l# o9 ^4 }8 @. H* T* H& Dif { $mom_motion_type != "RAPID" } {  return }
. X! u% w" ?7 w* \0 [( U
. E5 j. C: j) _if { $mom_programmed_feed_rate != 0 } {
   set err "\n\n\n *** ILLEGAL RAPID FEEDRATE IN $mom_operation_name *** "
' I% X9 z5 M0 B& G! C, E   set err " $err  \n\n\n *** RAPID FEEDRATE SET TO $feed *** "
6 n& H( d- G/ }+ x/ r   set err " $err \n *** SHOULD BE SET TO 0 IN THIS POST *** "
   set err "$err \n \n \n "
$ q, P$ @( s2 s8 D8 T3 a  y
6 L( N7 Y( I1 }2 Y# J MOM_abort $err
& _6 a7 ^1 T/ P& q% a}

full_bloom

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

jialingjiang

回复 1# miyuki
谢谢分享！

SS1268

声明:

% Q9 T1 I* y4 e" l+ ~ug后处理检测常用检测功能是本人论坛首次发出,在国内也是首法者,也是原创者,转载没有些明出处(大家可去http://postp.net查阅资料)

* M% I7 m, F- Z

转载不可耻,可耻在于删除了转载出处.