Section 7 Sample Programs
7-20
(5) RF power measurement (average power measurement)
<Example 2.5> Measuring RF power and reading average power.
1) Project file: SMPL205.MAK
1 FORM2Ø5.FRM
2 INITØØ1.BAS Uses file of the initialization module in
paragraph 7.2.2.
3 RESPØ1.BAS Uses code file of the response read module
in paragraph 7.2.1 (2).
4 SETTX.BAS This is the code file of the parameter set-
ting module for TX measurement in para-
graph 7.2.3 (1).
5 SGOUT.BAS This is the code file of the SG output con-
trol module in paragraph 7.2.1 (2).
6 RFPWRØ1.BAS This is the code file of the RF power mea-
surement module.
7 VBIB.BAS
8 NIGLOBAL.BAS
9 ProjWinSize=87,394,243,136
1Ø ProjWinShow=2
2) Form file: FORM205.FRM
The following procedures are added and described.
1 Sub Form_click ()
2 Call initial_gpib' Calls GPIB initialization routine.
3 Call Set_TX_parameter'
Calls TX parameter setting routine.
4 Call SG_out(1)' Calls test signal output routine.
5 Call RF_power1' Calls RF power measurement routine.
6 Call SG_out(Ø)' Calls test signal output routine.
7 End Sub
3) Code module file: RFPWR01.BAS
1 '----------------------------
2 ' MT88Ø1C GPIB Sample Program
3 ' RF power measurement(1)
4 '----------------------------
5'
6'
7'
8 Sub RF_power1 ()
9 Dim sbuf As String * 4Ø
1Ø '
11 Call ibwrt(Ans%, "MEAS RFPWR")'
Moves to RF power measurement screen.
To Next Page