HP 8904A - Page 65

Model 8904A Operation
10 !
20
30
!
40 DIM Error$[250]
50 Select_code=7
60 H pi b_address=726
70 Mask=67
80 OUTPUT Hpib-address;"SM",Mask
90 !
100 !
110 ON INTR 7 GOT0 Service-request
120 ENABLE INTR Select_code;2
130 OUTPUT Hpib-address;"APE
1 VL"
140
150
!
160 Service-request:
170 Status-byte=SPOLL(H pib-address)
180 SELECT Status-byte
190 CASE =65
200 Errors$="HP-lB Programming Error"
21
0 CASE =66
220 Errors$="Timebase Out Of Lock"
230 CASE ELSE
240 Errors$=""
250 END SELECT
260 PRINT Error$
270 END
! EXAMPLE PROGRAM OF STATUS BYTE USE FOR HP 8904A
! HP-IB address of HP 8904A.
! User defined mask value.
! Send mask to HP 8904A, this
mask allows SRQ, timebase out
of lock 81 HPlB errors.
! When SRQ, goto service routine.
! ' Enable computer SRQ interrupt.
! HPlB programming error to
! demonstrate an SRQ response.
! Routine to check status byte.
! Get status byte.
! Determine error type.
Select-code 7 indicates HP-IB as the source. The 2 is this computer's code that tells it to allow on SRQ
interrupt.
Figure 3-13. Sample Program for Using Status Byte Information
3-33
Artisan Technology Group - Quality Instrumentation ... Guaranteed | (888) 88-SOURCE | www.artisantg.com