®
R&S
FSVA/FSV
De esta forma, se realizan dos mediciones con configuraciones de nivel diferen-
tes en el siguiente ejemplo. Primero, se utiliza un nivel de referencia alto en la
frecuencia de portadora, y a continuación un nivel de referencia bajo en la fre-
cuencia del tercer armónico.
La configuración predeterminada del R&S FSVA/FSV para mediciones ("Setu-
pInstrument") también se utiliza aquí como un punto de inicio, después del cual
se realizan adaptaciones.
REM *************************************************************************
Public Sub RefFixed()
Dim retCount as Long
CALL SetupInstrument
'--------- Measuring the reference point ----------------------------------
CALL InstrWrite(analyzer,"INIT:CONT OFF")
'Switch to single sweep
CALL InstrWrite(analyzer,"CALC:MARK:PEXC 6DB")
'Define peak excursion
CALL InstrWrite(analyzer,"CALC:MARK:STAT ON")
'Activate marker 1
CALL InstrWrite(analyzer,"CALC:MARK:TRAC 1")
'Set marker 1 to trace 1
CALL InstrWrite(analyzer,"INIT;*WAI")
CALL InstrWrite(analyzer,"CALC:MARK:MAX")
'Set marker 1 to 100 MHz
CALL InstrWrite(analyzer,"CALC:DELT:FUNC:FIX ON")
'Define reference point
'----- Setting frequency, level and bandwidth for measuring harmonics ------
CALL InstrWrite(analyzer,"FREQ:CENT 400MHz;Span 1MHz")
'Set freq of 3rd harmonic
CALL InstrWrite(analyzer,"BAND:RES 1kHz")
'Set suitable RBW
CALL InstrWrite(analyzer,"SWEEP:TIME:AUTO ON")
'Couple sweep time
CALL InstrWrite(analyzer,"INP:ATT:AUTO ON")
'Select more sensitive level setting
CALL InstrWrite(analyzer,"DISP:WIND:TRAC:Y:RLEV -50dBm")
CALL InstrWrite(analyzer,"INIT;*WAI")
CALL InstrWrite(analyzer,"CALC:DELT:MAX;X:REL?;Y?")
'Read delta marker
result$ = Space$(100)
CALL InstrRead(analyzer, result$, 100, retCount)
'Read frequency and level
Debug.Print "Deltamarker 1: "; result$
END SUB
REM ***********************************************************************
Guía de inicio rápido 1321.3066.10 ─ 03
Breve introducción al control remoto
Ejemplos de programación detallados
'Default setting
'Perform sweep with sync
'Perform sweep with sync
170