|  | 
 
 发表于 2025-8-16 11:26:14
|
显示全部楼层 
| 借花献佛 
 #=============================================================
 proc PB_CMD_F250_abort { } {
 #=============================================================
 #F250 报警 该定制命令放在---刀轨开始
 global feed
 global mom_operation_name
 global mom_tool_name
 
 if {$feed == 250} {
 set mdm [MOM_display_message 操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】进给F250.可能为软件默认值,是否继续后处理? 警告 W 继续 中止]
 }
 if {[info exists mdm] && $mdm == 2} {
 MOM_abort "\n\n操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】进给 为 软件默认 F250.     , 请修改后再后处理!\n\n"
 }
 
 }
 
 #=============================================================
 proc PB_CMD_S0_abort { } {
 #=============================================================
 #S0 报警
 #该定制命令放在---刀轨开始
 global mom_spindle_speed
 global mom_operation_name
 global mom_tool_name
 
 if { $mom_spindle_speed == 0 } {
 MOM_output_to_listing_device "**************************************************************
 操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】的主轴转数为S0,请修改后再后处理!
 **************************************************************"
 MOM_display_message 操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】的主轴转数为S0,请修改后再后处理!
 
 set errmes "\n\n【刀具:$mom_tool_name】在操作【$mom_operation_name】的主轴转数为S0,请修改后再后处理! \n\n"
 MOM_abort "$errmes"
 
 }
 }
 
 #=============================================================
 proc PB_CMD_S1061_abort { } {
 #=============================================================
 #S1061 报警
 #该定制命令放在---刀轨开始
 global mom_spindle_speed
 global mom_operation_name
 global mom_tool_name
 
 
 if { $mom_spindle_speed == 1061 } {
 MOM_output_to_listing_device "**************************************************************
 操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】的主轴转数为软件默认S1061,请修改后再后处理!
 **************************************************************"
 MOM_display_message 操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】的主轴转数为软件默认S1061,请修改后再后处理!
 
 set errmes "\n\n 【刀具:$mom_tool_name】在操作【$mom_operation_name】的主轴转数为软件默认S1061,请修改后再后处理! \n\n"
 MOM_abort "$errmes"
 
 }
 }
 
 
 #=============================================================
 proc PB_CMD_T0_abort { } {
 #=============================================================
 #T0 报警
 #该定制命令放在---刀轨开始
 global mom_tool_number
 global mom_operation_name
 global mom_tool_name
 
 if { $mom_tool_number == 0 } {
 MOM_output_to_listing_device "**************************************************************
 操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】的刀号是T0,请修改后再后处理!
 **************************************************************"
 MOM_display_message 操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】的刀号是T0,请修改后再后处理!
 
 set errmes "\n\n 【刀具:$mom_tool_name】在操作【$mom_operation_name】的刀号是T0,请修改后再后处理! \n\n"
 MOM_abort "$errmes"
 
 }
 }
 
 
 #=============================================================
 proc PB_CMD_T_H_abort { } {
 #=============================================================
 #刀具号T与刀具补偿号H不一致 报警
 #该定制命令放在---刀轨开始
 global mom_spindle_speed
 global mom_tool_adjust_register
 global mom_tool_number
 global mom_operation_name
 global mom_tool_name
 
 if { $mom_tool_number != "$mom_tool_adjust_register" } {
 set mdm [MOM_display_message 操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】刀具号T与刀具补偿号H不一致,继续请【确定】! 警告 W 确定 取消]
 }
 if {[info exists mdm] && $mdm == 2} {
 MOM_abort "\n\n操作提示您:【刀具:$mom_tool_name】在操作【$mom_operation_name】刀具号与刀具补偿号H不一致,请修改后再后处理!\n\n"
 }
 }
 
 
 | 
 |