Keithley 2000 User Manual

'Example program to demonstrate taking readings on different
'scanner channels
'For QuickBASIC 4.5 and CEC PC488 interface card
'Edit the following line to where the QuickBASIC
'libraries are on your computer
'$INCLUDE: 'c:\qb45\ieeeqb.bi'
'Initialize the CEC interface as address 21
CALL initialize(21, 0)
'Reset controls in INIT, ARM;LAY1, ARM:LAY2, and TRIG subsystems
'and put trigger model in IDLE state, set function to DCV
CALL SEND(16, "*rst", status%)
'Close channel 1, take DC voltage reading
CALL SEND(16, "rout:clos (@1);:read?", status%)
reading$ = SPACE$(80)
CALL ENTER(reading$, length%, 16, status%)
PRINT reading$
'Close channel 2, take AC voltage reading
CALL SEND(16, "func 'volts:ac'", status%)
CALL SEND(16, "rout:clos (@2);:read?", status%)
reading$ = SPACE$(80)
CALL ENTER(reading$, length%, 16, status%)
PRINT reading$
'Close channel 3, take ohms reading
CALL SEND(16, "func 'res'", status%)
CALL SEND(16, "rout:clos (@3);:read?", status%)
reading$ = SPACE$(80)
CALL ENTER(reading$, length%, 16, status%)
PRINT reading$
Example Programs C-9

Keithley 2000 Specifications

General

Digits	6.5
DC Voltage Range	100 mV to 1000 V
AC Voltage Range	100 mV to 750 V
Resistance Range	100 Ω to 100 MΩ
Connectivity	IEEE-488 (GPIB)
Display Type	VFD