
General program instructions
1.
With the power off, connect the Model 2000 and the calibrator to the IEEE-488 interface
of the computer. Be sure to use shielded IEEE-488 cables for bus connections.
2.
Turn on the computer, the Model 2000, and the calibrator. Allow the Model 2000 and the
calibrator to warm up for at least one hour before performing calibration.
3.
Make sure the Model 2002 is set for a primary address of 16. (Use the front panel GPIB
key to check or change the address.)
4.
Make sure the calibrator primary address is at its factory default setting of 4.
5.
Make sure that the computer bus driver software (CECHP.EXE) is properly initialized.
6.
Enter the QBasic editor, and type in the program below. Check thoroughly for errors,
then save it using a convenient filename.
NOTE
The program assumes a default calibration code of KI002000. If the calibration code
has been changed, modify the :CAL:PROT:CODE parameter accordingly.
7.
Run the program, and follow the prompts on the screen to perform calibration.
Program C-1 Model 2000 calibration program
' Model 2000 calibration program for use with the Fluke 5700A calibrator.
' Rev. 1.0, 10/18/94
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 4 16"
' Put 2000, 5700A in remote.
PRINT #1, "CLEAR"
' Send DCL.
PRINT #1, "OUTPUT 16;:SYST:PRES;*CLS"
' Initialize 2000.
PRINT #1, "OUTPUT 16;*ESE 1;*SRE 32"
' Enable OPC and SRQ
PRINT #1, "OUTPUT 4;*RST;*CLS;STBY"
' Reset 5700A calibrator.
PRINT #1, "OUTPUT 4;CUR_POST NORMAL"
' Normal current output.
C$ = ":CAL:PROT:"
' 2000 partial command header.
'
CLS
' Clear CRT.
PRINT "Model 2000 Multimeter Comprehensive Calibration Program"
PRINT #1, "OUTPUT 16;:CAL:PROT:CODE 'KI002000'"' Send KI002000 cal code.
PRINT #1, "OUTPUT 16;:CAL:PROT:INIT"
' Initiate calibration.
GOSUB ErrCheck
RESTORE CmdList
'
FOR I = 1 TO 25
' Loop for all cal points.
READ Msg$, Cmd$
' Read message, cal strings.
SELECT CASE I
' Select cal sequence.
CASE 1, 2
PRINT Msg$
GOSUB KeyCheck
CASE 3
PRINT "Connect calibrator to INPUT and SENSE jacks."
PRINT "Wait 3 minutes."
GOSUB KeyCheck
PRINT #1, "OUTPUT 4;EXTSENSE OFF"
PRINT #1, "OUTPUT 4;"; Msg$
PRINT #1, "OUTPUT 4;OPER"
Calibration Program
C-3
Содержание 2000
Страница 1: ...Model 2000Multimeter Calibration Manual A G R E A T E R M E A S U R E O F C O N F I D E N C E ...
Страница 10: ...1 Performance Verification ...
Страница 23: ...2 Calibration ...
Страница 45: ...3 Calibration CommandReference ...
Страница 65: ...A Specifications ...
Страница 76: ...A 12 Specifications ...
Страница 77: ...B Error Messages ...
Страница 80: ...C Calibration Program ...