Table of Contents
Advertisement
Example Program
10 ! RE-STORE "AC_FLAT"
20
!This program performs the AC flatness test for
30
!the HP E1340A Arbitrary Function Generator. An HP 3458A DMM
40
!and an HP 8902A Measuring Receiver are required.
50
!
60
COM @Afg,@Dmm,@Pwr_mtr
70
CLEAR SCREEN
80
!
90
!---------- Set up I/O paths ----------
100
ASSIGN @Afg TO 70910
110
ASSIGN @Dmm TO 722
120
ASSIGN @Pwr_mtr TO 714
130
!
140
!---------- Initialize variables ----------
150
Ampl_dbm=10
160
!
170
!---------- Perform test ----------
180
!
190
GOSUB Setup_afg
200
CALL Meas_flat
210
!
220
!---------- Quit ----------
230
!Reset instruments
240
OUTPUT @Afg;"*RST;*CLS"
250
OUTPUT @Pwr_mtr;"IP"
260
OUTPUT @Dmm;"RESET"
270
LOCAL @Dmm
280
LOCAL @Pwr_mtr
290
!
300
!Close I/O paths
310
ASSIGN @Afg TO *
320
ASSIGN @Dmm TO *
330
ASSIGN @Pwr_mtr TO *
340
STOP
350
!
360 Setup_afg:
370
OUTPUT @Afg;"*RST;*CLS"
380
OUTPUT @Afg;"FUNC SIN;";
390
OUTPUT @Afg;":VOLT "&VAL$(Ampl_dbm)&"DBM;";
400
OUTPUT @Afg;":OUTP:LOAD 50"
405
OUTPUT @Afg;"INIT:IMM"
410
RETURN
420
END
430
!
440
!******************** END OF MAIN PROGRAM ********************
450
!
460 Meas_flat:SUB Meas_flat
470
480
490
Chapter 2
!
COM @Afg,@Dmm,@Pwr_mtr
INTEGER Dmm_setup,Pm_setup,Num_points
!
(Continued on Next Page)
!AFG amplitude
!Sine
!Set amplitude
!50 ohm load
Verification Tests 43
Advertisement
Table of Contents
