218
S:\agilent\8920\8920b\PRGGUIDE\BOOK\SECTIONS\ieee.sec
IEEE 488.2 Common Commands
Example program
10 OUTPUT 714;"*SRE 16" ! Enable SRQ on data available in
20 ! Output Queue (MAV bit)
30 ON INTR 7,15 CALL Srvice_interupt ! Set up interrupt
40 ENABLE INTR 7;2 ! Enable SRQ interrupts
50 OUTPUT 714;"DISP RFG;RFG:OUTP ’Dupl’;AMPL 0 dBm;FREQ 320 MHz;*OPC?"
60 LOOP ! Dummy loop to do nothing
70 DISP "I am in a dummy loop."
80 END LOOP
90 END
100 SUB Srvice_interupt
110 ENTER 714;Output_que_val ! Read the 1 returned by the *OPC?
120 ! query command
130 PRINT "All operations complete."
140 ! Note:
150 ! This interrupt service routine is not complete.
160 ! Refer to “Status Byte/Service Request Enable Register” in
170 !Status Reporting in the Agilent 8920B Programmer’s Guide .
180 SUBEND