Agilent Technologies 35670A Manual page 743

Dynamic signal analyzer gpib programming
Hide thumbs Also See for 35670A:
Table of Contents

Advertisement

420
SELECT (Res)
430
CASE 100
440
Max_i=255
450
CASE 200
460
Max_i=511
470
CASE 400
480
Max_i=1023
490
CASE 800
500
Max_i=2047
510
CASE ELSE
520
PRINT "ILLEGAL MEASUREMENT RESOLUTION"
530
PAUSE
540
END SELECT
550
!
560
!
570
REDIM D(Max_i)
580
!
590
Dt=Res/Span/(Max_i+1)
600
FOR T=0 TO 1
610
FOR I=0 TO Max_i
620
D(I)=D(I)+SIN(2*PI*Tones(T)*I*Dt)
630
NEXT I
640
NEXT T
650
!
660
!
670
IF Device=800
680
OUTPUT @Analyzer;"DISP:FORM QUAD; PROG LOW"
690
ELSE
700
OUTPUT @Analyzer;"DISP:FORM ULOW;"
710
END IF
720
!
730
FOR I=0 TO 9
740
PRINT D(I)
750
NEXT I
760
!
770
!
780
OUTPUT @Analyzer;"FORM:DATA REAL, 64"
790
!
800
!
810
OUTPUT @Analyzer;"CALC1:FEED 'XTIM:VOLT 1';*WAI"
820
!
830
!
850
!
850
!
860
OUTPUT @Analyzer;"TRAC:DATA D1,TRAC1;*WAI"
870
!
880
!
890
OUTPUT @Analyzer;"TRAC:DATA D1,#0";
900
OUTPUT @Analyzer_bin;D(*)
910
OUTPUT @Analyzer;CHR$(10) END
Program listing continues on page F-7.
THEN
Example Programs
ARBSRC
F-5

Advertisement

Table of Contents
loading

Table of Contents