Agilent Technologies n3306a, n3305a, n3304a, n3301a, n3303a, n3302a, n3300a manual Calibrating Range

B - Performance Test and Calibration

550PRINT TABXY(10,12);"Set power source to voltage and current settings from Table B-2"

560 PRINT TABXY(10,13);"for resistance range 1 - Point P2"

570DISP "Press Cont to continue resistance range 1 calibration"

580PAUSE

590OUTPUT @Ld;"CAL:LEV P2"

600CLEAR SCREEN

610PRINT TABXY(9,15);"CALIBRATING RESISTANCE RANGE 1 - P2 - 30 SECOND WAIT”

620WAIT 30

630INPUT "Measure voltage across current shunt - enter value in volts",Vp2

640Ip2=Vp2/Rshunt1

650INPUT "Measure voltage across +/- sense terminals and enter value in volts",Vt2

660Rp2=Vt2/Ip2

670OUTPUT @Ld;"CAL:DATA";Rp2

680OUTPUT @Ld;"INP:STAT OFF"

690!

700	!	********** CALIBRATING RANGE 2	******************
710	!
720	CLEAR SCREEN

730INPUT "Enter value of current shunt for range 2 in OHMS",Rshunt2

740PRINT TABXY(10,10);"You have entered ";Rshunt2;" ohms"

750INPUT "If correct enter 'Y' or press CONT, if wrong enter 'N' or 'n'",Y$

760IF UPC$(Y$)="Y" OR Y$="" THEN 780

770IF UPC$(Y$)="N" OR Y$="n" THEN 720

780CLEAR SCREEN

790!

800PRINT TABXY(10,12);"Set power source to voltage and current settings from"

810PRINT TABXY(10,13);"Table B-1 for resistance range 2 - Point P1"

820DISP "Press CONT when ready to calibrate resistance range 2"

830PAUSE

840CLEAR SCREEN

850PRINT TABXY(9,15);"CALIBRATING RESISTANCE RANGE 2 - P1 - 15 SECOND WAIT"

860OUTPUT @Ld;"INP:STAT ON"

870OUTPUT @Ld;"RES:RANG 20" !< resistance range 2 variable from table B-1

880OUTPUT @Ld;"CAL:LEV P1"

890WAIT 15

900INPUT "Measure voltage across current shunt - enter value in volts",Vp1

910Ip1=Vp1/Rshunt2

920INPUT "Measure voltage across +/- sense terminals and enter value in volts",Vt1

930Rp1=Vt1/Ip1

940OUTPUT @Ld;"CAL:DATA";Rp1

950!

960CLEAR SCREEN

970PRINT TABXY(10,12);"Set power source to voltage and current settings from Table B-2"

980PRINT TABXY(10,13);"for resistance range 2 - Point P2"

990DISP "Press Cont to continue resistance range 2 calibration"

1000 PAUSE

1010 OUTPUT @Ld;"CAL:LEV P2"

1020 CLEAR SCREEN

1030 PRINT TABXY(9,15);"CALIBRATING RESISTANCE RANGE 2 - P2 - 15 SECOND WAIT" 1040 WAIT 15

1050 INPUT "Measure voltage across current shunt - enter value in volts",Vp2 1060 Ip2=Vp2/Rshunt2

1070 INPUT "Measure voltage across +/- sense terminals and enter value in volts",Vt2

98