Agilent Technologies 6834B, 6814B, 6843A manual Figure B-2.Calibration Program Listing Sheet 2 of

Verification and Calibration - B

700PRINT TABXY(15,10),"CALIBRATING OVERVOLTAGE PROTECTION"

710OUTPUT @Ac;"CAL:VOLT:PROT"

720PRINT TABXY(30,15),"WAIT"

730WAIT 30

740OUTPUT @Ac;"CAL:SAVE"

750OUTPUT @Ac;"CAL:STATE OFF"

760CLEAR SCREEN

770PRINT TABXY(15,5),"1. Turn off the AC Source"

780PRINT TABXY(15,7),"2. Connect the current shunt and load resistor, see fig.B-1"

790PRINT TABXY(15,9),"3. Connect the 3458A across the current shunt"

800PRINT TABXY(15,11),"4. Set the 3458A to AC rms VOLTS"

810PRINT TABXY(15,13),"5. Turn on the AC Source"

820!

830DISP "Press CONT to begin Current Program and Measurement calibration"

840PAUSE

850CLEAR SCREEN

860PRINT TABXY(22,5),"CALIBRATING CURRENT POGRAMMING"

870PRINT TABXY(20,7),"There are 2 points to be calibrated"

880OUTPUT @Ac;"CAL:STATE ON"

890OUTPUT @Ac;"CAL:CURR:AC"

900OUTPUT @Ac;"CAL:LEV P1"

910WAIT 10

920INPUT "Enter AC rms current ( DVM reading divided by shunt resistance )",Ai_p1

930PRINT TABXY(25,9),"Point 1 entered"

940OUTPUT @Ac;"CAL:DATA";Ai_p1

950OUTPUT @Ac;"CAL:LEV P2"

960WAIT 10

970INPUT "Enter AC rms current ( DVM reading divided by shunt resistance )",Ai_p2

980PRINT TABXY(25,11),"Point 2 entered"

990OUTPUT @Ac;"CAL:DATA";Ai_p2

1000 WAIT 3

1010 CLEAR SCREEN

1020 !

1030 ! Only include lines 1030 - 1340 if calibrating Agilent 6843 1040 !

1050 PRINT TABXY(22,5),"CALIBRATING CURRENT MEASUREMENT (Agilent 6843A ONLY)"

1060 PRINT TABXY(20,7),"There are 2 points to be calibrated"

1070 OUTPUT @Ac;"CAL:CURR:MEAS"

1080 OUTPUT @Ac;"CAL:LEV P1"

1090 WAIT 10

1100 INPUT "Enter AC rms current ( DVM reading divided by shunt resistance )",Am_p1 1110 PRINT TABXY(25,9),"Point 1 entered"

1120 OUTPUT @Ac;"CAL:DATA";Am_p1

1130 OUTPUT @Ac;"CAL:LEV P2"

1140 WAIT 10

1150 INPUT "Enter AC rms current ( DVM reading divided by shunt resistance )",Am_p2 1160 PRINT TABXY(25,11),"Point 2 entered"

1170 OUTPUT @Ac;"CAL:DATA";Am_p2

1180 WAIT 3

1190 CLEAR SCREEN

1200 OUTPUT @Ac;"CAL:SAVE"

1210 OUTPUT @Ac;"CAL:STATE OFF"

1220 PRINT TABXY(15,5),"1. Turn off the AC Source"

1230 PRINT TABXY(15,7),"2. Disconnect all equipment from the AC Source"

1240 PRINT TABXY(15,9),"3. Connect the 1 ohm impedance resistor, see fig.B-1" 1250 PRINT TABXY(15,11),"4. Turn on the AC Source"

1260 !

1270 DISP "Press CONT to begin Output Impedance calibration"

1280 PAUSE

1290 PRINT TABXY(15,10),"CALIBRATING OUTPUT IMPEDANCE (Agilent 6843A ONLY)"

1300 OUTPUT @Ac;"CAL:STATE ON"

1310 OUTPUT @Ac;"CAL:IMP"

1320 PRINT TABXY(30,15),"WAIT"

1330 WAIT 30

1340 !

1350 OUTPUT @Ac;"CAL:SAVE"

1360 OUTPUT @Ac;"CAL:STATE OFF"

1370 CLEAR SCREEN

1380 PRINT TABXY(25,10),"CALIBRATION COMPLETE"

1390 END

Figure B-2. Calibration Program Listing (Sheet 2 of 2)

69