Operating instructions

R&S ESCI More Complex Programming Examples
1166.6004.12 7.15 E-1
Using Marker and Delta Marker
Marker Search Functions, Limitation of Search Range
The example below is based on an AM-modulated signal at 100 MHz with the following characteristics:
Carrier signal level: –30 dBm
AF frequency: 100 kHz
Modulation depth: 50 %
Marker 1 and delta marker 2 are set one after the other to the highest maxima of the measurement
curve and then the frequency and level are read out. The default setting of the R&S ESCI can be used
for the following measurements (SetupInstrument).
REM ************************************************************************
Public Sub MarkerSearch()
result$ = Space$(100)
CALL SetupInstrument 'Default setting
'--------- Peak search without search limit --------------------------------
CALL IBWRT(receiver%,"INIT:CONT OFF") 'Switch to single sweep
CALL IBWRT(receiver%,"CALC:MARK:PEXC 6DB") 'Define peak excursion
CALL IBWRT(receiver%,"CALC:MARK:STAT ON") 'Switch on Marker 1
CALL IBWRT(receiver%,"CALC:MARK:TRAC 1") 'Assign Marker 1 to Trace 1
CALL IBWRT(receiver%,"INIT;*WAI") 'Perform sweep with sync
CALL IBWRT(receiver%,"CALC:MARK:MAX;X?;Y?") 'Marker to peak; read out
CALL IBRD(receiver%, result$) 'frequency and level
Print "Marker 1: ";result$
CALL IBWRT(receiver%,"CALC:DELT2:STAT ON;MAX;MAX:LEFT")
'Switch on delta marker 2
'Peak and then Next Peak Left
CALL IBWRT(receiver%,"CALC:DELT:MODE ABS") 'Delta marker2 frequency output
'absolute
CALL IBWRT(receiver%,"CALC:DELT2:X?;Y?") 'Delta marker 2 - read out
'frequency and level
CALL IBRD(receiver%, result$)
Print "Delta 2: ";result$
'--------- Peak search with search limit in x direction --------------------
CALL IBWRT(receiver%,"CALC:MARK:X:SLIM:STAT ON;LEFT 0Hz;RIGHt 100.05MHz")
'Search limit on and set below
'LF on the right side
CALL IBWRT(receiver%,"CALC:DELT3:STAT ON;MAX;MAX:RIGHt")
'Delta marker 3 on
'Peak and then Next Peak Right
CALL IBWRT(receiver%,"CALC:DELT3:X?;Y?") 'Delta marker 3; Read out
'frequency and level, both must
CALL IBRD(receiver%, result$) 'have the value 0
Print "Delta 3: ";result$