7-49
(5) Analog receiver measurement
<Example 3.5> Measuring the analog receiver
1) Project file: SMPL305.MAK
1 FORM3Ø5.FRM
2 INITØØ1.BAS Uses the code file of the initialization mod-
ule described in paragraph 7.2.2.
3 RESPØ1.BAS Uses the code file of the response reading
module described in paragraph 7.2.1 (2).
4 SETARX.BAS Code file of the parameter setting module
for analog RX measurement.
5 ARXMEAS.BAS Code file of the analog RX measurement
module.
6 VBIB.BAS
7 NIGLOBAL.BAS
8 ProjWinSize = 87, 394, 243, 136
9 ProjWinShow = 2
2) Form file: FORM305.FRM
The following procedures are added and described.
1 Sub Form_click()
2 Call initial_Gpib' Calls the GPIB initialization routine.
3 Call Set_ARX_parameter'
Calls the analog RX parameter setting rou-
tine.
4 Call ARX_Measure' Calls the analog RX measurement routine.
5 End Sub
3) Code module file: SETARX.BAS
1 '----------------------------
2 ' MT88Ø1C GPIB Sample Program
3 ' Set Analog RX Parameters
4 '----------------------------
5'
6'
7'
8 Sub Set_ARX_parameter ()
9'
1Ø Call ibwrt(Ans%, "SYS IS136")'
Selects IS-136 measuring system.
11 Call ibwrt(Ans%, "PNLMD SYSTEM")'
Moves to system setting screen.
12 Call ibwrt(Ans%, "RFINOUT MAIN")'
Uses Main Input/Output connector.
7.2 Sample Program (Example of Program Using Visual Basic)