Service manual

Example: 4-Wire
Resistance
Adjustments
This example performs a 4-wire ohms resistance adjustment for a power
line reference frequency of 60 Hz. Change line 80 to OUTPUT
70903;"CAL:LFR 50" for 50 Hz operation. If a calibration error occurs, the
program displays the calibration error and prompts you to repeat the
adjustment (see Table 5-1 for a list of calibration errors).
1 ! 4-Wire Resistance Adjustments
10 OPTION BASE 1
20 DIM Range(3),Source(3)
30 DATA 2000, 16000, 1048576
40 READ Range(*)
50 DATA 1000, 10000, 1000000
60 READ Source(*)
70 OUTPUT 70903;"*RST" !Set autozero on and PLC 1
80 OUTPUT 70903;"CAL:LFR 60" !Set 60 Hz line ref frequency
90 FOR I=1 TO 3
100 Re_try: !
110 PRINT "1. Set Resistance Standard to";Source(I);"Ohms"
120 PRINT "2. Measure ACTUAL Resistance Standard value (in Ohms)"
130 PRINT "Enter ACTUAL Resistance Standard value (in
Ohms)",Ohms_actual
140 CLEAR SCREEN
150 OUTPUT 70903;"FUNC:FRES" !Set 4-wire ohms
160 OUTPUT 70903;"FRES:RANG ";Range(I)!Set resistance range
170 OUTPUT 70903;"CAL:VAL";Ohms_actual(I)!Set cal value
180 OUTPUT 70903;"CAL?" !Perform calibration
190 ENTER 70903;Cal_code
200 IF Cal_code <> 0 THEN
210 PRINT "Calibration Error";Cal_code;"with";Source(I);"Ohms input."
220 PRINT "Check source value/connections, then"
230 PRINT "Press Continue to repeat this adjustment"
240 PAUSE
250 CLEAR SCREEN
260 GOTO Re_try
270 ELSE
280 PRINT "Adjustment complete with";Source(I);"Ohms source"
290 PRINT "Press Continue for the next adjustment"
300 PAUSE
310 CLEAR SCREEN
320 END IF
330 NEXT I
340 PRINT "Resistance adjustments completed"
350 END
44 Adjustments Agilent E1411A/E1411B Service Manual