860 !---------- Subroutines ----------
870 Errmsg: !
880 BEEP
890 PRINT "ERROR DURING CALIBRATION -- CAL ABORTED."
900 CALL System_errs(@Afg,Syst_err)
910 STOP
920 RETURN
930 !
940 END
950 !
960 !---------- Subprograms ----------
970 Dmm_flat_rdg:SUB Dmm_flat_rdg(Freq,Rdg,INTEGER Dmm_setup)
980 COM @Afg,@Dmm,@Pwr_mtr
990 !
1000 IF Dmm_setup THEN
!If true, set up DMM
1010
!otherwise, skip setup
1020 DISP "Connect DMM to AFG Output, then press ’Continue’"
1030 PAUSE
1040 DISP
1050 OUTPUT @Dmm;"PRESET NORM;FUNC ACV;SETACV SYNC;TRIG HOLD"
1060 OUTPUT @Dmm;"RANGE 10;DELAY .1"
1070 WAIT 1
1080 END IF
1090 !
1100 OUTPUT @Dmm;"ACBAND "&VAL$(Freq*.9)&","&VAL$(Freq*1.1)
1110 WAIT .5
1120 OUTPUT @Dmm;"TRIG SGL"
1130 ENTER @Dmm;Rdg
1170 SUBEND
1180 !
1190 Pm_flat_rdg:SUB Pm_flat_rdg(Freq,Rdg,INTEGER Pm_setup)
1200 COM @Afg,@Dmm,@Pwr_mtr
1210 !
1220 IF Pm_setup THEN
!If true, then set up power meter
1230
!Otherwise skip setup
1240 DISP "Connect Power Meter to AFG Output, then press ’Continue’"
1250 PAUSE
1260 DISP
1270 OUTPUT @Pwr_mtr;"IP"
!Instrument preset
1280 OUTPUT @Pwr_mtr;"AU M4 WT"
!AUTO operation, RF power, watts
1290 WAIT .5
1300 Pm_setup=0
!Clear flag so that setup
1310
!is only performed once
1320 END IF
(Continued on Next Page
)
74 Adjustments
Chapter
3
Содержание 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 ...