Keithley 237

Programming
Example
+
SECTlON3
IEEE-488
Reference
latches
and
remains
so
until
the
U1
error
status
word
or
U9
warning
status
word
is read. These
status
words
define
the
nature
of
the
error
or
warning.
10
20
30
40
50
60
70
80
90
100
110
120
130
140
150
DIM
Error$[50]
REMOTE716
OUTPUT 716;"M32,0X"
OUTPUT 716;"H1X"
S=SPOLL
(716)
IF
NOT
BIT(S,5)
THEN
50
PRINT
"B7
B6
B5
B4
B3 B2
B1
BO"
FOR 1=7
TO
0
STEP
-1
PRINT BIT(S,I);
NEXT I
PRINT
OUTPUT
716;''U1X"
ENTER 716;Error$
PRINT Error$
END
+
!
Dimension
string
for
error
!
Program
for SRQ
on
error
!
Program
illegal
option
!
Serial poll
the
236/237/238
!
Wait
for SRQ
to
occur
!
Label
the
bit
positions
!
Loop
eight
times
!
Print
the
bit
positions
3-43