Agilent Technologies Infiniium DCA User Manual

2-35
Sample Programs
BASIC Programming Examples
620 !
630 ! Enable Standard Event Status Enable Register:
640 ! enable bit 4 - Command Error - value 32
650 ! bit 1 - Query Error - value 4
660 OUTPUT @Scope;"*ESE 36"
670 SUBEND
680 !
690 !
700 !
710 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
720 !
730 !
740 ! Subprogram name: Create_srq
750 ! Parameters: none
760 ! Return value: none
770 ! Description: This routine will send an illegal command to the scope to
780 ! show how to detect and handle an SRQ. A query is sent to
790 ! the scope which is then followed by another command causing
800 ! a query interrupt error. An illegal command header is then
810 ! sent to demonstrate how to handle multiple errors in the error queue.
820 !
830 !
840 !
850 SUB Create_srq
860 COM /Io/@Scope,Interface
870 DIM Buf$[256]
880 OUTPUT @Scope;":CHANnel2:DISPlay?"
890 OUTPUT @Scope;":CHANnel2:DISPlay OFF" !send query interrupt
900 OUTPUT @Scope;":CHANnel:DISPlay OFF" !send illegal header
910 ! Do some stuff to allow time for SRQ to be recognized
920 !
930 OUTPUT @Scope;"*IDN?" !Request IDN to verify communication
940 ENTER @Scope;Buf$ !NOTE: There is a leading zero to this query response
950 PRINT !which represents the response to the interrupted query above
960 PRINT Buf$
970 PRINT
980 SUBEND
990 !
1000 !
1010 !
1020 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
1030 !
1040 !
1050 ! Subprogram name: Srq_handler
1060 ! Parameters: none
1070 ! Return value: none
1080 ! Description: This routine verifies the status of the SRQ line. It then checks
1090 ! the status byte of the scope to determine if the scope caused the
1100 ! SRQ. Note that using a SPOLL to read the status byte of the scope
1110 ! clears the SRQ and allows another to be generated. The error queue
1120 ! is read until all errors have been cleared. All event registers and
1130 ! queues, except the output queue, are cleared before control is returned
1140 ! to the main program.
1150 !
1160 !
1170 !

Agilent Technologies Infiniium DCA Specifications

General

Brand	Agilent Technologies
Model	Infiniium DCA
Category	Test Equipment
Language	English