![Agilent Technologies 8156A Скачать руководство пользователя страница 133](http://html.mh-extra.com/html/agilent-technologies/8156a/8156a_operating-and-programming-manual_2868603133.webp)
132
Programming Examples
Example 2 - Status Registers and Queues
9.2 Example 2 - Status Registers and Queues
Function
This program sends a commands and queries typed in by the user.
The contents of the status byte and the standard event status register
are displayed. These registers are updated for each new command,
and each time a Service ReQuest (SRQ) occurs. The number of the
most recent error, and the most recent contents of the output queue
is also displayed.
Listing
10
!--------------------------------------------------
20
!
30
! Agilent 8156A Programming Example 2
40
!
50
! Status Structure, and a useful self learning tool
60
!
70
!--------------------------------------------------
80
!
90
! Declarations and initializations
100
!
110
INTEGER Value,Bit,Quot,Xpos,Ypos
120
DIM Inp$[100]
130
DIM A$[300]
140
Att=728
150
ON INTR 7 GOSUB Pmm_srq
160
!
170
! Mask the registers
180
!
190
OUTPUT Att;"*SRE 248;*ESE 255"
The *SRE 248 command enables bits 7 (Operation Status Summary), 5 (ESB), 4 (MAV), and 3
(Questionable Status Summary) in the status byte (bit 6 (SRQ) cannot be disabled in this
register). The *ESE 255 command enables all of the bits in the Event Status Register.
200
!
210
! Set up the screen
220
!
230
CLEAR SCREEN
240
PRINT TABXY(40,3);"Status Byte"
250
PRINT TABXY(4,1);"
OPS SRQ ESB MAV QUE"
260
PRINT TABXY(4,2);" +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+"
270
PRINT TABXY(4,3);" :
:
:
:
:
:
:
:
:"
280
PRINT TABXY(4,4);" +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+"
290
PRINT TABXY(4,5);"
^"
300
PRINT TABXY(4,6);"
:"
310
PRINT TABXY(4,7);" +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+"
320
PRINT TABXY(4,8);" :
OR
:"
330
PRINT TABXY(4,9);" +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+"
Artisan Technology Group - Quality Instrumentation ... Guaranteed | (888) 88-SOURCE | www.artisantg.com
Содержание 8156A
Страница 11: ...Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 27: ...26 List of Tables Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 130: ...9 9 Programming Examples Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 142: ...A A Installation Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 156: ...B B Accessories Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 157: ...156 Accessories Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 164: ...C C Specifications Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 165: ...164 Specifications Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 174: ...D D Performance Tests Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 248: ...E E Cleaning Information Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 274: ...F F Error messages Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...
Страница 275: ...274 Error Messages Artisan Technology Group Quality Instrumentation Guaranteed 888 88 SOURCE www artisantg com ...