常见的后处理检测功能

miyuki

1.转速检测,包括最大和最小转速
if { $mom_spindle_speed == 0.0 } {
#MOM_output_literal " ( ZERO SPINDLE SPEED PROGRAMMED )"
6 K% `0 h, E# a/ l5 K4 i6 v, H #MOM_output_literal " M00 "
! X7 t  Z) ]8 _& W  O* @ set mom_spindle_speed 20. ;# dodge div.by zero in tap
set errmes "\n\n *** Spindle Speed Not set    ***\n***  IN OPERATION   $mom_operation_name  ***\n\n"
  MOM_abort "$errmes"

最大转速
9 X: `* \* E# c  V4 Xif { $mom_spindle_speed > 10000 } {
6 \1 l4 r( C# `* j! n, t set errmes "\n\n *** Spindle Speed Over Max 10000    ***\n***  IN OPERATION   $mom_operation_name  ***\n\n"
  MOM_abort "$errmes"

最小转速
5 m+ }5 P- p: r- r" jif { $mom_spindle_speed < 50  } {
% j5 M9 n# N" G; T set errmes "\n\n *** Spindle Speed Under Min 50    ***\n***  IN OPERATION    $mom_operation_name  ***\n\n"
  MOM_abort "$errmes"

4.刀具号未设置检测等..
- L; m& J6 ^& s3 Z  Bif { $mom_tool_number  == 0.0 } {
+ R) l$ _% y' _& W+ J #MOM_output_literal " ( TOOL ZERO PROGRAMMED ) "
. }9 K: D. ]5 F- g; }7 T #MOM_output_literal " M00 "
; ]) M% q& R6 F7 ~" T set errmes "\n\n *** Tool Number Not set    ***\n***  IN OPERATION $mom_operation_name  ***\n\n"
  MOM_abort "$errmes"
3.进给检测
! A5 c* t6 B# `' z/ f( Y, m( @4.钻孔的安全平面检测
% r6 t; E5 b& b/ S5 D
以下主要是钻孔的一些常用检测功能
global mom_cycle_retract_mode   
global mom_clearance_plane_usage  
9 `& g( j' p6 j% mglobal mom_clearance_plane_status  
global mom_operation_name
global mom_cycle_cam
' q+ F" z5 z9 c  xset alarm 0
! C) D* O5 l8 _' vset em "\n\n OPERATION : $mom_operation_name  \n\n  "
if { $mom_cycle_retract_mode != "AUTO" } {
& z  A* p5 s, a incr alarm
. b5 v6 }" U% f; s4 H% Y! D set tt "\n\n RTCTO Mode not set to AUTO \n\n "
  set em $em$tt  
* p+ t9 N6 G% \5 s   }
if { $mom_clearance_plane_status != 1 } {
0 ~- B  J  Q+ u/ B' t incr alarm
set tt "\n\n Clearance Plane not Defined and Active \n\n "
7 d0 P2 m0 }, k, V  set em $em$tt  
) D4 h4 l5 H4 S3 V5 G7 I   }
% Q  C7 X# g0 w" G7 ~; \if { $mom_clearance_plane_usage != 1 } {
incr alarm
set tt "\n\n Clearance Plane not set to Start and End \n\n "
& h- R& @8 D2 j  set em $em$tt  
   }

if {[ info exists mom_cycle_cam ]} {
- d' z. Y+ N% E% |# r: v1 x   if { $mom_cycle_cam > 0 } {
% P" `( V6 |( q' p  incr alarm
/ s; O- R' O& o# r& ]. B- o  set tt "\n\n Illegal CAM setting in canned cycle \n Set Spindle Speed on Feedrate Dialog \n\n "
   set em $em$tt  
      }
8 b8 ^1 Q$ n" r- `1 w0 s    }  
8 O2 b0 t+ j! e" |! c+ @4 [7 Bif { $alarm > 0 } { MOM_abort $em }
}

miyuki

以下主要讲的进给数度的检测功能,在刀具没有设置进给参数时,可以有效的检测出是哪个*作/刀具没有设置进给
6 i  F( i9 T' c8 e, @
) Y% u; b7 B) I; V以下是代码
% |1 B' X/ Q  s4 H6 p- c! ^
5 }. U. O1 U% I( }' W' oglobal mom_motion_type mom_operation_name mom_programmed_feed_rate
' e4 {  n# I, R% }3 P  y8 {
' t# V* k! ^0 lif { $mom_motion_type != "RAPID" } {  return }
$ K! ^% |  z- f
if { $mom_programmed_feed_rate != 0 } {
   set err "\n\n\n *** ILLEGAL RAPID FEEDRATE IN $mom_operation_name *** "
9 c" r1 i5 b- f1 j3 k5 x$ J   set err " $err  \n\n\n *** RAPID FEEDRATE SET TO $feed *** "
+ Z# R" i+ P) j: {   set err " $err \n *** SHOULD BE SET TO 0 IN THIS POST *** "
$ ?2 t6 c  g* f0 o* N0 J- y7 U+ l   set err "$err \n \n \n "
' Q! O7 T, J+ f, e  N( I
2 [9 p7 w& P0 U! f" w8 \5 Q$ q, c( s MOM_abort $err
  L; i7 W: _# S4 ~* {7 X7 m}

full_bloom

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

jialingjiang

回复 1# miyuki
谢谢分享！

SS1268

声明:

( J6 Y3 j, s& x# O( E3 {ug后处理检测常用检测功能是本人论坛首次发出,在国内也是首法者,也是原创者,转载没有些明出处(大家可去http://postp.net查阅资料)
1 n. A4 s3 O2 B, b+ w) J* r
) {  C- l$ R7 g2 k7 v9 j
9 z" q4 _4 W- w3 q" S' Y
7 V; D5 Q, Z5 {9 ~# a( C转载不可耻,可耻在于删除了转载出处.