Filter
Top Products
Verification and Calibration - B
77
Figure B-2. Calibration Program Listing (Sheet 1 of 3)
10 !
20 ! AC Source calibration program Rev B.00.00
30 !
40 ASSIGN @Ac TO 705
50 !
60 PRINT TABXY(5,5),"This program will calibrate the 6811B/12B/13B AC Power Solutions."
70 PRINT TABXY(5,7),"Equipment requirements are: Agilent3458A or equivalent DVM"
80 PRINT TABXY(37,8),"0.01 ohm <200ppm Current Shunt"
90 PRINT TABXY(37,9),"20 ohm >1800 watt power resistor for all models"
100 PRINT TABXY(37,10),"1 ohm >100 watt impedance resistor"
110 PRINT TABXY(37,11),"30:1 <50ppm Ratio Transformer"
120 PRINT TABXY(3,13),"Ratio Transformer is required to when calibrating to MIL-STD-45662A. If the"
130 PRINT TABXY(2,14),"ratio transformer is not used the measurement uncertainty must be recalculated."
140 !
150 DISP "Press CONT to continue"
160 PAUSE
170 CLEAR SCREEN
180 PRINT TABXY(15,5),"1. Turn the AC Source off"
190 PRINT TABXY(15,7),"2. Disconnect all loads"
200 PRINT TABXY(15,9),"3. Connect the 3458A to the rear terminal block"
210 PRINT TABXY(15,11),"4. Set the 3458A to DC VOLTS"
220 PRINT TABXY(15,13),"5. Turn on the AC Source"
230 !
240 DISP "Press CONT to begin DC OFSET and DC GAIN calibration"
250 PAUSE
260 CLEAR SCREEN
270 PRINT TABXY(25,5),"CALIBRATING VOLTAGE OFFSET"
280 PRINT TABXY(20,7),"There are 4 points to be calibrated"
290 OUTPUT @Ac;"CAL:STATE ON"
300 OUTPUT @Ac;"CAL:VOLT:OFFS"
310 OUTPUT @Ac;"CAL:LEV P1"
320 WAIT 10
330 INPUT "Enter DC offset voltage reading from DVM",Off_p1
340 PRINT TABXY(25,9),"Point 1 entered"
350 OUTPUT @Ac;"CAL:DATA";Off_p1
360 OUTPUT @Ac;"CAL:LEV P2"
370 WAIT 10
380 INPUT "Enter DC offset voltage reading from DVM",Off_p2
390 PRINT TABXY(25,11),"Point 2 entered"
400 OUTPUT @Ac;"CAL:DATA";Off_p2
410 OUTPUT @Ac;"CAL:LEV P3"
420 WAIT 10
430 INPUT "Enter DC offset voltage reading from DVM",Off_p3
440 PRINT TABXY(25,13),"Point 3 entered"
450 OUTPUT @Ac;"CAL:DATA";Off_p3
460 OUTPUT @Ac;"CAL:LEV P4"
470 WAIT 10
480 INPUT "Enter DC offset voltage reading from DVM",Off_p4
490 PRINT TABXY(25,15),"Point 4 entered"
500 OUTPUT @Ac;"CAL:DATA";Off_p4
510 WAIT 3
520 CLEAR SCREEN
530 PRINT TABXY(25,5),"CALIBRATING DC VOLTAGE GAIN"
540 PRINT TABXY(20,7),"There are 3 points to be calibrated"
550 OUTPUT @Ac;"CAL:VOLT:DC"