Keithley 2000 User Manual

'Example program to demonstrate the reading buffer
'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 and put trigger model in IDLE state
CALL SEND(16, "*rst", status%)
'Reset STATus subsystem (not affected by *RST)
CALL SEND(16, "stat:pres;*cls", status%)
CALL SEND(16, "stat:meas:enab 512", status%)'enable BFL
CALL SEND(16, "*sre 1", status%)'enable MSB
CALL SEND(16, "trig:coun 20", status%)
'TRACe subsystem is not affected by *RST
CALL SEND(16, "trac:poin 20", status%)
CALL SEND(16, "trac:feed sens1;feed:cont next", status%)
'Start everything
CALL SEND(16, "init", status%)
'Initialize reading$ while the 2000 is busy taking readings
reading$ = SPACE$(4000)
WaitSRQ:
IF (NOT(srq%)) THEN GOTO WaitSRQ
CALL SPOLL(16, poll%, status%)
IF (poll% AND 64)=0 THEN GOTO WaitSRQ
CALL SEND(16, "stat:meas?", status%)
CALL ENTER(S$, length%, 16, status%)
CALL SEND(16, "form:elem read,unit" status%)
CALL SEND(16, "trac:data?", status%)
CALL ENTER(reading$, length%, 16, status%)
PRINT reading$
NOTE To repeat buffer storage, send the following command and then repeat the steps fol-
lowing the
‘Start everything
comment in the above example.
CALL SEND(16, "feed:cont next", status%)
Example Programs C-7

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