Agilent Technologies 75000 Series C - Manual (Page 73)

Test 2-10: Spurious/Non-Harmonic Distortion (cont’d)
Example Program
This program performs the Spurious/Non-harmonic Test.
10 ! RE-STORE "NON_HARM"
20 DIM Start_freq(1:9),Stop_freq(1:9),Max_ampl(1:9)
30 !
40 !---------- Set up I/O path and reset AFG ----------
50 ASSIGN @Afg TO 70910
!AFG I/O path
60 OUTPUT @Afg;"*RST;*CLS" !Reset AFG
70 !
80 !---------- Initialize variables ----------
90 Freq_out=1.0E+7
!Freq = 10 MHz
100 Dbm_out$="-5DBM" !Amplitude = -5dBm
110 !
120 DATA 100E3,10.5E6,21E6,31E6,41E6,51E6,75E6,100E6,125E6
130 READ Start_freq(*)
!Read start freqs
140 !
150 DATA 9.5E6,19E6,29E6,39E6,49E6,75E6,100E6,125E6,150E6
160 READ Stop_freq(*)
!Read stop freqs
170 !
180 !---------- Set up Spec Analyzer ----------
190 CLEAR SCREEN
200 PRINT "Set up Spectrum Analyzer:"
210 PRINT
220 PRINT " Ref Level = -5dBm"
230 PRINT " Resolution BW = 3 kHz"
240 PRINT " Video BW = 3 kHz"
250 PRINT
260 PRINT "Connect Spectrum Analyzer to AFG Output."
270 DISP "Press ’Continue’ when ready"
280 PAUSE
290 CLEAR SCREEN
300 !
310 !---------- Set up AFG ----------
320 OUTPUT @Afg;"*RST"
!Reset AFG
330 WAIT 1
340 OUTPUT @Afg;"FREQ "&VAL$(Freq_out)&";";
!Set frequency
350 OUTPUT @Afg;":VOLT "&Dbm_out$ !Set amplitude
360 OUTPUT @Afg;"OUTP:FILT:FREQ 10MHZ" !Enable 10MHz filter
370 OUTPUT @Afg;"OUTP:FILT ON"
380 OUTPUT @Afg;"INIT:IMM"
!Initiate
390 !
(Continued on next page)
Agilent E1445A Service Manual Verification Tests 71