I give the user 2 seconds to change it to MM after the estop is hit or it estops the sytem again.
Dim Inch_mode As Boolean
Dim Estopped As Boolean
Estopped = GetOEMLED(800)
Inch_mode = GetOEMLED(801)
'Is the sytem estopped already
MESSAGE "Went Into Inch Mode:"&i
'Give the user time to change to mm?