huicanyi 发表于 2025-8-16 10:09:43

求教添加刀号和补偿刀号不一致报警功能

怎么添加在论坛找了代码 添加定制命令后   还是不会报警   求教

tombai691019 发表于 2025-8-16 10:46:05

本帖最后由 tombai691019 于 2025-8-16 10:53 编辑

这几天后处理也是出现了这个问题，加了一个，试用OK。分享给你。

白色治愈之风 发表于 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
}
   if { && $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
}
if { && $mdm == 2} {
MOM_abort "\n\n操作提示您:【刀具：$mom_tool_name】在操作【$mom_operation_name】刀具号与刀具补偿号H不一致,请修改后再后处理！\n\n"
}
}

李阿龙123 发表于 2025-8-16 13:36:28

刀具号T与刀具补偿号H不一致 报警:victory:
页: [1]
查看完整版本: 求教添加刀号和补偿刀号不一致报警功能