Agilent Technologies Infiniium DCA User Manual

2-34
Sample Programs
BASIC Programming Examples
60 !
70 !
80 COM /Io/@Scope,Interface
90 COM /Variables/Temp
100 CALL Initialize
110 CALL Setup_srq
120 ON INTR Interface CALL Srq_handler !Set up routine to handle interrupt
130 ENABLE INTR Interface;2 !Enable SRQ Interrupt for Interface
140 CALL Create_srq
150 CALL Close
160 END
170 !
180 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
190 !
200 ! BEGIN SUBPROGRAMS
210 !
220 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
230 !
240 !
250 ! Subprogram name: Initialize
260 ! Parameters: none
270 ! Return value: none
280 ! Description: This routine initializes the interface and the scope.
290 ! The instrument is reset to a known state and the interface is
300 ! cleared. System headers are turned off to allow faster throughput
310 ! and immediate access to the data values requested by the queries.
320 !
330 !
340 SUB Initialize
350 COM /Io/@Scope,Interface
360 ASSIGN @Scope TO 707
370 Interface=7
380 RESET Interface
390 CLEAR @Scope
400 OUTPUT @Scope;"*RST"
410 OUTPUT @Scope;"*CLS"
420 OUTPUT @Scope;":SYSTem:HEADer OFF"
430 OUTPUT @Scope;":AUToscale"
440 SUBEND
450 !
460 !
470 !
480 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
490 !
500 ! Subprogram name: Setup_srq
510 ! Parameters: none
520 ! Return value: none
530 ! Description: This routine sets up the scope to generate Service Requests.
540 ! It sets the Service Request Enable Register Event Status Bit
550 ! and the Standard Event Status Enable REgister to allow SRQs on
560 ! Command or Query errors.
570 !
580 !
590 SUB Setup_srq
600 COM /Io/@Scope,Interface
610 OUTPUT @Scope;"*SRE 32" !Enable Service Request Enable Registers - Event Status bit

Agilent Technologies Infiniium DCA Specifications

General

Brand	Agilent Technologies
Model	Infiniium DCA
Category	Test Equipment
Language	English