To Next Page

To Previous Page

C-6 Calibration Programs

INPUT #2, S

RETURN

ErrCheck: ' Error check routine.

PRINT #1, "OUTPUT 24;:SYST:ERR?" ' Query error queue.

PRINT #1, "ENTER 24"

INPUT #2, E, Err$

IF E <> 0 THEN PRINT Err$: GOTO EndProg' Display error.

RETURN

ReadDMM: ' Get reading from DMM.

SLEEP 5

PRINT #1, "ENTER 22"

INPUT #2, Reading$

IF J = 2 AND Range = 3 THEN Reading$ = STR$(VAL(Reading$) / OneOhm)

RETURN

EndProg: ' Close files, end program.

BEEP: PRINT "Calibration aborted."

PRINT #1, "OUTPUT 24;:CAL:PROT:LOCK"

PRINT #1, "OUTPUT 24;*RST"

PRINT #1, "LOCAL 22 24"

END

VoltsInit: ' Calibration command lists.

DATA "*RST",":SOUR:FUNC VOLT",":SENS:CURR:PROT 0.1"

DATA ":SENS:CURR:RANG 0.1",":SOUR:VOLT:PROT:LEV MAX",":SYST:RSEN OFF"

DATA ":CAL:PROT:CODE 'KI002430'",":OUTP:STAT ON"

VoltsCal:

DATA ":SOUR:VOLT:RANG ",":SOUR:VOLT "

DATA ":CAL:PROT:SOUR ",":CAL:PROT:SENS ",":SOUR:VOLT 0.0"

DATA ":CAL:PROT:SOUR ",":CAL:PROT:SENS ",":SOUR:VOLT ",":CAL:PROT:SOUR "

DATA ":CAL:PROT:SENS ",":SOUR:VOLT 0.0",":CAL:PROT:SOUR "

CurrentInit:

DATA ":SOUR:FUNC CURR",":SENS:VOLT:PROT 20",":SENS:VOLT:RANG 20"

DATA ":OUTP:STAT ON"

CurrentCal:

DATA ":SOUR:CURR:RANG ",":SOUR:CURR ",":CAL:PROT:SOUR "

DATA ":CAL:PROT:SENS ",":SOUR:CURR 0.0",":CAL:PROT:SOUR ",":CAL:PROT:SENS "

DATA ":SOUR:CURR ",":CAL:PROT:SOUR ",":CAL:PROT:SENS "

DATA ":SOUR:CURR 0.0",":CAL:PROT:SOUR "

Keithley 2430 User Manual

Questions and Answers: