Calibration and Verification
Calibration
3
3-19
1.023 MATH M[17] = MEM
# Apply nominal -DC Current to A40
1.024 IEEE OUT -3.2999mA, 0HZ; OPER; *OPC?[I][GTL]
1.025 IEEE [D5000][GTL]
1.026 ACMS G
1.027 5790 A SH N 2W
1.028 MATH M[17] = (ABS(MEM) + M[17]) / 2
1.029 IEEE OUT .33mA, 0HZ; OPER; *OPC?[I][GTL]
1.030 IEEE [D15000][GTL]
1.031 ACMS G
1.032 5790 A SH N 2W
1.033 MATH M[18] = MEM
# Apply nominal -DC Current to A40
1.034 IEEE OUT -.33mA, 0HZ; OPER; *OPC?[I][GTL]
1.035 IEEE [D5000][GTL]
1.036 ACMS G
1.037 5790 A SH N 2W
1.038 MATH M[18] = (ABS(MEM) + M[18]) / 2
1.039 IEEE OUT 3mA, 0HZ; OPER; *OPC?[I][GTL]
1.040 IEEE [D15000][GTL]
1.041 ACMS G
1.042 5790 A SH N 2W
1.043 MATH M[19] = MEM
# Apply nominal -DC Current to A40
1.044 IEEE OUT -3mA, 0HZ; OPER; *OPC?[I][GTL]
1.045 IEEE [D5000][GTL]
1.046 ACMS G
1.047 5790 A SH N 2W
1.048 MATH M[19] = (ABS(MEM) + M[19]) / 2
1.049 IEEE CAL_START MAIN,AI; *OPC?[I][GTL]
1.050 IEEE CAL_NEXT; *OPC?[I][GTL]
1.051 HEAD Calibrating 3.2999mA @ 100Hz
# cal_next is required for initial start.
# after sending AIG330U if you send cal_next 5520A tries to
# start the cal at that time.
# 3.2999mA @ 100Hz
1.052 IEEE *CLS;OPER; *OPC?[I][GTL]
1.053 IEEE [D5000][GTL]
1.054 ACMS G
1.055 5790 A SH N 2W
# Calculate difference between the average value of both polarities of DC
# Current and the applied AC Current.
1.056 MATH M[21] = 0.0032999 - (.0032999 * (1 - (MEM / M[17])))
# Determine measurement frequency to retrieve correct AC-DC difference value.
1.057 IEEE OUT?[I$][GTL]
1.058 MATH M[2] = FLD(MEM2,5,",")
Figure 3-9. Sample MET/CAL Program (cont)