1330 OUTPUT @Pwr_mtr;VAL$(Freq/1.E+6)&"MHZ"
!Expected frequency
1340 OUTPUT @Pwr_mtr;"T3"
!Trigger power meter w/settling
1350 ENTER @Pwr_mtr;Rdg
!Get reading
1360 !
1370 Rdg=SQRT(ABS(Rdg)*50)
!Convert from watts to volts
1390 SUBEND
1400 !
1410 SUB Corr_factor(Corr_factor)
1420 !Measure output at 100 kHz with Power Meter & DMM to get correction factor
1430 COM @Afg,@Dmm,@Pwr_mtr
1440 INTEGER Setup
1450 Setup=1
1450 Xover_freq=1.E+5
1470 !
1480 !Set up AFG for 1 V peak, 100 kHz sine
1490 OUTPUT @Afg;"VOLT 1VPK;";
1500 OUTPUT @Afg;":FREQ "&VAL$(Xover_freq)
1510 OUTPUT @Afg;"INIT:IMM"
1520 !
1530 !Measure output with Power Meter and DMM
1540 Pm_flat_rdg(Xover_freq,Pm_rdg,1)
1550 Dmm_flat_rdg(Xover_freq,Dmm_rdg,1)
1560 Corr_factor=Dmm_rdg/Pm_rdg
1570 OUTPUT @Afg;"*RST;*CLS"
1580 SUBEND
1590 !
1600 SUB System_errs(@Path,INTEGER Err)
1610 DIM Message$[255]
1620 INTEGER Code
1630 !
1640 Err=0
1650 REPEAT
1660 OUTPUT @Path;"SYST:ERR?"
1670 ENTER @Path;Code,Message$
1680 IF Code THEN
1690 Err=1
1700 PRINT Code,Message$
1710 END IF
1720 UNTIL NOT Code
1730 SUBEND
Chapter 3
Adjustments 75
Содержание 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 ...