Keithley 237

APPENDIXD
Controller
Programs
+
IBM
PC/XT/AT or
PS/2
with IOtech Driver488 Software
Introduction
Driver488 software is
an
IEEE-488
driver
for IBM PC
and
compatible computers.
When
combined
with
an
IEEE-488 interface board,
the
package
can
control devices
from languages including BASIC, Pascal, Fortran,
and
C.
Driver488 software is compatible with:
•
IOtech GP488B
or
GP488/2
boards
• National Instruments GPIB-PC,
PCIT,
PCIIA,
or
PCill
boards
• Capital
Equipment
#01000-00300
board
•
mM
GPm
Adapter
The following GWBASIC
program
sends
a
command
string
to
the Model236
/237/238
and
displays
the
instru-
ment
response
on
the CRT.
The
computer
must
be
equipped
with
an
IEEE-488 interface
board,
the
DOS
3.00
(or later) operating system,
and
a
language
with
DOS
I/
0
capability. Driver488 controller software
must
be
in-
stalled
and
configured
as
described
in
the
instruction
manual.
PROGRAM
10 OPEN "\DEV\IEEEOUT" FOR OUTPUT
AS
#1
20 IOCTL#l,
"BREAK''
D-6
30 PRINT#l,"RESET"
40 OPEN
"\DEV\IEEEIN"
FOR
INPUT AS #2
50 PRINT#l,"FILL
ERROR"
60
LINE INPUT "COMMAND
STRING:
II
,A$
70
IF LEN(A$)=0
THEN
130
80
PRINT
#!,"OUTPUT
16;" +A$
90
PRINT #l,''ENTER 16"
100
LINE INPUT#2,B$
110
PRINTB$
120
GOT060
130 END
+
Directions
1.
Using
the
front
panel
menu
feature, set
the
primary
address
of
the
Model236/237
/238
to 16.
2.
With
power
off, connect
the
Model236/237
/238
to
the
IEEE-488 interface installed
in
the
mM
comput-
er.
3.
Type
in
GWBASIC
on
the
computer
and
get
into the
Microsoft interpretive BASIC language.
4.
Enter
the
lines
below
using
the
return
key
after each
line.
5.
Run
the
program
and
type
in
the
desired
command
string
at
the COMMAND
STRING
prompt.
For ex-
ample,
to
view
the
instrument
model
number
and
firmware revision,
type
in
UOX
and
press the
return
key.
The
Model236
/237/238
firmware revision, e.g.
236A01,
will
then
appear
on
the
computer
display. A
single line
of
data
(NSDCV+OO.OOOE+OO,BOOOO)
will
appear
for
DOCs
that
have
no
response.
COMMENTS
'
Open
file for
output
'Reset
'
Open
file for
input
' Enable SEQUENCE
error
detect
'
Prompt
for
and
get
DOCs
' Check for
null
'Address
236/237/238
to
listen,
send
DOCs
'Address236/237/238totalk
'
Get
response
' Display response string
'Repeat