Example Program
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 paths ----------
50 ASSIGN @Afg TO 70910
!AFG I/O path
60 !
70 !---------- INITIALIZE VARIABLES ----------
80 Freq_out=1.0E+7
!Freq = 10 MHz
90 Dbm_out$="10DBM"
!Ampl = 10 dBm
100 !
110 DATA 1E6,10.5E6,21E6,31E6,41E6,51E6,75E6,100E6,125E6
120 READ Start_freq(*)
!Read start freqs
130 !
140 DATA 9.5E6,19E6,29E6,39E6,49E6,75E6,100E6,125E6,150E6
150 READ Stop_freq(*)
!Read stop freqs
160 !
170 !---------- Set up Spec Analyzer ----------
180 CLEAR SCREEN
190 PRINT "Set up Spectrum Analyzer:"
200 PRINT
210 PRINT " Ref Level = 10 dBm"
220 PRINT " Resolution BW = 3 kHz"
230 PRINT " Video BW = 3 kHz"
240 PRINT
250 PRINT "Connect Spectrum Analyzer to AFG Output."
260 DISP "Press ’Continue’ when ready"
270 PAUSE
280 CLEAR SCREEN
290 !
300 !---------- Set up AFG ----------
310 OUTPUT @Afg;"*RST;*CLS"
!Reset AFG
320 WAIT 1
330 OUTPUT @Afg;"FREQ "&VAL$(Freq_out)&";";
!Set frequency
340 OUTPUT @Afg;":VOLT "&Dbm_out$
!Set amplitude
350 OUTPUT @Afg;"INIT:IMM"
!Initiate
360 !
370 !---------- Perform test ----------
380 FOR I=1 TO 9
390 CLEAR SCREEN
400 PRINT "Set Spectrum Analyzer Start Freq to: ";Start_freq(I);"Hz"
410 PRINT "Set Spectrum Analyzer Stop Freq to: ";Stop_freq(I);"Hz"
420 PRINT "Measure the amplitude of the highest peak."
430 PRINT
440 INPUT "Enter amplitude (in dBm):",Peak_ampl
450 PRINT "Result =";Peak_ampl-VAL(Dbm_out$);"dBc"
!Calculate result in dBc
460 DISP "Press ’Continue’ when ready"
470 PAUSE
480 DISP
490 NEXT I
500 !
510 END
56 Verification Tests
Chapter 2
Содержание E1340A
Страница 6: ...Notes 6 HP E1340A Arbitrary Function Generator Service Manual ...
Страница 8: ......
Страница 10: ...Notes 12 What s in this Manual HP E1340A Service Manual ...
Страница 18: ...Notes 20 General Information Chapter 1 ...
Страница 74: ...Notes 76 Adjustments Chapter 3 ...
Страница 78: ...Notes 80 Replaceable Parts Chapter 4 ...
Страница 104: ...Notes 106 Verification Tests C Programs Appendix A ...