[SnakeD0ct0r]

I myself do not like sequence numbers throught my programs, however I do like one at the start of an operation. I use the tool offset number for the N#, not the tool number. I do this because the first time I use a tool it would be T01 H01, but the second time I use it it I would change the offset number, T01 H31. I find it easier to search the program by offset number. The following is a command you can cut and paste into your post that will give you N offset # and tool description at the beginning of an operation.

#=============================================================
proc PB_CMD_announce_tool { } {
#=============================================================
# -------------------------------------------------------
# PB_CMD_announce_tool
#
# Issues operator display message for tool change
# - uses TOOL CATALOG NUMBER field if present, else
# tool parent object name
#
# Bind somewhere in the AUTO TOOL CHANGE event
# -------------------------------------------------------

global mom_tool_adjust_register
global mom_sys_control_out mom_sys_control_in
global mom_tool_number mom_tool_catalog_number mom_tool_name

# set up some variables so that control OUT and IN can be
# used as needed in output blocks:
# - CONTROL OUT = ${co}
# - CONTROL IN = ${ci}
set co $mom_sys_control_out; set ci $mom_sys_control_in

if { $mom_tool_catalog_number!="" } {
set tnam [string toupper $mom_tool_catalog_number]
} else {
set tnam [string toupper $mom_tool_name]
}

MOM_output_text "N$mom_tool_adjust_register ${co}TOOL NO. $mom_tool_number - $tnam${ci}"
}