Keithley 7001, Instruction Manual, Page: 47 / 353

Getting Started
3-22
A couple of important points:
1. The path pointer can only move down. It cannot be
moved up a level.
2. Each new message (line) must begin with the root
command.
3. Any time one or more query commands are includ-
ed in a program message, the Model 7001 must be
addressed to talk to send the response message to
the computer.
3.7.6 Programming examples
The following programming examples are written in
Hewlett-Packard BASIC 4.0 programming language.
The programs assume that the Model 7001 is set to pri-
mary address 7.
Programming example #1

closing and opening
channels
The following program will close channels 1, 3, 4, 5,
and 6 of slot 1, and then open them after a short delay:
10 OUTPUT 707; “*RST;:open all”
20 OUTPUT 707; “:clos (@ 1!1, 1!3:1!6)”
30 OUTPUT 707; “:clos:stat?”
40 ENTER 707; A$
50 PRINT A$
60 WAIT 3
70 OUTPUT 707; “:open (@ 1!1, 1!3:1!6)”
80 END
Line 10 Opens any channels that are closed.
Line 20 Close channels 1, 3, 4, 5, and 6 of slot 1.
Line 30 Request the closed channels.
Line 40 Address 7001 to talk.
Line 50 Display closed channels.
Line 60 Three second delay.
Line 70 Open the channels specified in the channel
list.
Programming example #2

manual scanning
The following program will configure the Model 7001
to perform an infinite number of manual scans of 10
channels for slot 1:
10 OUTPUT 707; “:syst:pres”
20 OUTPUT 707; “:scan (@1!1:1!10)”
30 OUTPUT 707; “:init”
40 END
Line 10 Return 7001 to :SYSTem:PRESet default con-
figuration (scan count = infinite, channel
count = 10 channels, channel control source =
manual).
Line 20 Define scan list.
Line 30 Take 7001 out of idle state.
When the above program is run, the scan will arm
(ARM indicator on) and then wait for front panel STEP
key presses to control the channel scan. After taking the
Model 7001 out of remote (press LOCAL key), each
press of the STEP key will scan the next channel in the
scan list.
Programming example #3

bus trigger controlled
scan
The program in Example #2 is modified so that the
channel scan will be controlled by bus triggers (*TRG
or GET):
10 OUTPUT 707; “:syst:pres”
20 OUTPUT 707; “:scan (@1!1:1!10)”
25 OUTPUT 707; “:trig:sour bus”
30 OUTPUT 707; “:init”
40 END
Line 10 Return 7001 to :SYSTem:PRESet default con-
figuration (scan count = infinite, channel
count = 10 channels, channel control source =
manual).
Line 20 Define scan list.
Line 25 Program channel control source for bus trig-
gers.
Line 30 Take 7001 out of idle state.
When the above program is run, the scan will arm and
then wait for bus triggers to control the channel scan.
Any of the following two programming statements can
be used to provide a bus trigger:
OUTPUT 707; “*TRG”
TRIGGER 707
Every time one of the above statements is executed, a
bus trigger will occur causing the next channel in the
scan list to be scanned.
Artisan Scientific - Quality Instrumentation ... Guaranteed | (888) 88-SOURCE | www.artisan-scientific.com