Keithley 2430

C-8 Calibration Programs
LINE INPUT #2, Data$
PRINT Data$
Range = Range * 10
IF Range > 9 AND Range < 11 THEN Range = 3
LOOP WHILE Range <= 3
PRINT #1, "OUTPUT 24;:CAL:PROT:LOCK" ' Lock out calibration.
PRINT #1, "OUTPUT 24;*RST"
PRINT #1, "LOCAL 24"
CLOSE
END