ok had a look to your macro code.
it is not specific for imperial but there are a couple of DRO's witch Need to be set
via Screen Input.
here is the code where i made some comment's
'Macro M501 - Tool #1
'An OemLed(825) must be added to settings page
'Place a Tool Holder in Bay 1 orientated properly
'Attach the grounding aligator clip leads to the bottom of the Tool Holder and the zero plate
'Place a cylindrical probe in the a Tool Holder and mount in Tool Changer
'*****************************************************
'TPS all these values have to be set via screen dro's
'*****************************************************
LIFT = GetOemDRO(1093)
CLEARANCE = GetUserDRO(1094)
PROBEFEED = GetUserDRO(1095)
MOVEFEED = GetUserDRO(1096)
Call SetOemDRO(800,0)
Call SetOemDRO(801,0)
Code "G91 G01 Z-.10 F" & PROBEFEED 'Sets Feed speed
While IsMoving ()
Sleep 200
Wend
'****************************************************************************
'TPS dro 1109 has to be set via screen dro it is the probing depth of z-axis
'****************************************************************************
Code "G91 G31 Z" & GetUserDRO(1109) 'probing move, can set the feed rate here as well as how far to move
While IsMoving ()
Sleep 200
Wend
Code "G4 P0.5"
'****************************************************************************
'TPS dro 1092 has to be set via screen dro it is the overrun of z-axis
'****************************************************************************
PROBEDEPTH = GetOemDRO(85) + GetUserDRO(1092)
ZUP = GetOemDRO(85) + LIFT
Code "G90 G53 G0 Z" & ZUP 'Move Z to clearance height
While IsMoving ()
Sleep 200
Wend
XVAL = GetOemDRO(83) 'Get current Machine X value
YVAL = GetOemDRO(84) 'Get current Machine y value
XPLUSS = XVAL + CLEARANCE 'Add clearance value to get probing point location
XMINUSS = XVAL - CLEARANCE 'Subtract clearance value to get probing point location
YPLUSS = YVAL + CLEARANCE 'Add clearance value to get probing point location
YMINUSS = YVAL - CLEARANCE 'Subtract clearance value to get probing point location
'1ST PROBE POINT
Code "G90 G53 G1 Y" & YPLUSS &"F" &MOVEFEED 'Move to upper Y axis probe location
Code "G53 G1 Z" &PROBEDEPTH
'****************************************************************************
'TPS G90 G31 Y0.0 does not make sense, probing distance is zero
'****************************************************************************
Code "G90 G31 Y0.0 F" &PROBEFEED 'Move probe till contact with side of Tool Holder
While IsMoving() 'wait while it happens
Sleep 200
Wend
Code "G4 P0.5"
YUPPER = GetOemDRO(84) 'Get current Machine Y value
Code "G90 G53 G0 Z" & ZUP 'Move Z to clearance height
While IsMoving ()
Sleep 200
Wend
'2ND PROBE POINT
Code "G90 G53 G1 Y" & YMINUSS & "F" &MOVEFEED 'Move to lower Y axis probe location
Code "G53 G1 Z" &PROBEDEPTH
'****************************************************************************
'TPS G90 G31 Y0.0 does not make sense, probing distance is zero
'****************************************************************************
Code "G90 G31 Y0.0 F" &PROBEFEED 'Move probe till contact with side of Tool Holder
While IsMoving() 'wait while it happens
Sleep 200
Wend
Code "G4 P0.5"
YLOWER = GetOemDRO(84) 'Get current Machine Y value
YCENTER = (YUPPER + YLOWER)/2
Code "G90 G53 G0 Z" & ZUP 'Move Z to clearance height
While IsMoving ()
Sleep 200
Wend
'3RD PROBE POINT
Code "G90 G53 G1 X" & XMINUSS & "Y" & YCENTER & "F" &MOVEFEED 'Move to left X axis probe location
Code "G53 G1 Z" &PROBEDEPTH
'****************************************************************************
'TPS G90 G31 X0.0 does not make sense, probing distance is zero
'****************************************************************************
Code "G90 G31 X0.0 F" &PROBEFEED 'Move probe till contact with side of Tool Holder
While IsMoving() 'wait while it happens
Sleep 200
Wend
Code "G4 P0.5"
XLEFT = GetOemDRO(83) 'Get current Machine X value
Code "G90 G53 G0 Z" & ZUP 'Move Z to clearance height
While IsMoving ()
Sleep 200
Wend
'4TH PROBE POINT
Code "G90 G53 G1 X" & XPLUSS & "F" &MOVEFEED 'Move to right X axis probe location
Code "G53 G1 Z" &PROBEDEPTH
'****************************************************************************
'TPS G90 G31 X0.0 does not make sense, probing distance is zero
'****************************************************************************
Code "G90 G31 X0.0 F" &PROBEFEED 'Move probe till contact with side of Tool Holder
While IsMoving() 'wait while it happens
Sleep 200
Wend
Code "G4 P0.5"
XRIGHT = GetOemDRO(83) 'Get current Machine X value
Code "G90 G53 G0 Z" & ZUP 'Move Z to clearance height
While IsMoving ()
Sleep 200
Wend
XCENTER = (XLEFT + XRIGHT)/2
Call SetUserDro(1101,XCENTER)
Call SetUserDro(1111,YCENTER)
Code "G90 G53 G1 X" & XCENTER & "Y" & YCENTER & "F" &MOVEFEED 'Move to center of tool holder