Keithley TEC SourceMeter 2510, Service Manual, Page: 113 / 120

C-4 Calibration Program Models 2510 and 2510-AT
Program C-1 Model 2510 calibration program
‘ Model 2510 calibration program for use with Keithley 2002 DMM.
‘ 2510 primary address = 15. 2002 primary address = 16.
OPEN “IEEE” FOR OUTPUT AS #1 ‘ Open IEEE-488 output path.
OPEN “IEEE” FOR INPUT AS #2 ‘ Open IEEE-488 input path.
PRINT #1, “INTERM CRLF” ‘ Set input terminator.
PRINT #1, “OUTTERM LF” ‘ Set output terminator.
PRINT #1, “REMOTE 15 16” ‘ Put 2510, 2002 in remote.
PRINT #1, “OUTPUT 15;*RST” ‘ Initialize 2510.
PRINT #1, “OUTPUT 15;*CLS” ‘ Clear 2510 status.
PRINT #1, “OUTPUT 15;*ESE 1;*SRE 32” ‘ Enable OPC and SRQ.
PRINT #1, “OUTPUT 16;:SYST:PRES” ‘ Initialize 2002.
PRINT #1, “OUTPUT 16;:FORM:ELEM READ” ‘ 2002 reading data only.
‘
‘ Replace nominal resistor values below with characterized values.
R$ = “1” ‘ 1 ohm value.
R$(1) = “100” ‘ 100 ohm value.
R$(2) = “1e3” ‘ 1k ohm value
R$(3) = “1e4” ‘ 10k ohm value.
R$(4) = “1e5” ‘ 100k ohm value.
‘
CLS
PRINT “Model 2510 Calibration Program”
GOSUB KeyCheck
PRINT #1, “OUTPUT 15;:CAL:PROT:CODE ‘KI002510’”
J = 1
FOR I = 1 TO 46
READ Cmd$
SELECT CASE I
CASE 1
PRINT “Connect DMM INPUT to 2510 OUTPUT terminals.”
GOSUB KeyCheck
CASE 3, 4, 6, 7, 9, 10, 39, 41
GOSUB ReadDMM
Cmd$ = Cmd$ + Reading$
CASE 12
PRINT “Connect 1 ohm resistor to OUTPUT terminals.”
GOSUB KeyCheck
CASE 13
Cmd$ = Cmd$ + R$
CASE 19, 22, 25, 28, 32, 35
IF I = 32 THEN J = 1
PRINT “Connect “; R$(J); “ ohm resistor to INPUT terminals.”
GOSUB KeyCheck
Cmd$ = Cmd$ + R$(J)
J = J + 1
2510-902-01 (E - Mar 2010)(Service).book Page 4 Tuesday, March 16, 2010 1:04 PM