Performance Test and Calibration - B
RESISTANCE Calibration Program
10 ! This program calibrates the resistance mode
20! for load modules N3302A, N3303A, N3304A, N3305A and N3306A.
30!
40! last update 9/27/00
50!
60! The variables for the module to be calibrated must be inserted
70! in the program where a < variable > is encountered. See Table
80! for variables for the module you are calibrating.
90!
100! NOTE: Delete lines 1540 to 1940 for module Model N3303
110!
120! Edit the interface address on line 100 if different then 705
130!
140ASSIGN @Ld TO 705
150!
160OUTPUT @Ld;"*RST"
170OUTPUT @Ld;"CAL:STAT ON"
180OUTPUT @Ld;"FUNC RES"
190OUTPUT @Ld;"INP:STAT ON"
200!
210PRINT TABXY(10,8);"See figure
220PRINT TABXY(10,10);"Connect power leads to input terminals"
230PRINT TABXY(10,12);"Connect +/- sense to +/- input terminal"
240PRINT TABXY(10,14);"Connect one DVM to +/- sense terminals"
250PRINT TABXY(10,16);"Connect second DVM across current shunt"
260DISP "Press CONT when ready to continue"
270PAUSE
280!
290! ******** CALIBRATING RANGE 1 ****************
300!
310CLEAR SCREEN
320INPUT "Enter value of current shunt for range 1 in OHMS",Rshunt1
330PRINT TABXY(10,10);"You have entered ";Rshunt1;" ohms"
340INPUT "If correct enter 'Y' or press CONT, if wrong enter 'N' or 'n'",Y$
350IF UPC$(Y$)="Y" OR Y$="" THEN 370
360IF UPC$(Y$)="N" OR Y$="n" THEN 310
370CLEAR SCREEN
380!
390PRINT TABXY(10,12);"Turn on and set power source to voltage and current settings from"
400PRINT TABXY(10,13);"Table
410DISP "Press CONT when ready to calibrate resistance range 1"
420PAUSE
430CLEAR SCREEN
440PRINT TABXY(9,15);"CALIBRATING RESISTANCE RANGE 1 - P1 - 30 SECOND WAIT"
450OUTPUT @Ld;"RES:RANG 1"
460OUTPUT @Ld;"CAL:LEV P1"
470WAIT 30
480INPUT "Measure voltage across current shunt - enter value in volts",Vp1
490Ip1=Vp1/Rshunt1
500INPUT "Measure voltage across +/- sense terminals and enter value in volts",Vt1
510Rp1=Vt1/Ip1
520OUTPUT @Ld;"CAL:DATA";Rp1
530!
540CLEAR SCREEN
97