Operating instructions

More Complex Programming Examples R&S ESCI
1166.6004.12 7.28 E-1
Occupied Bandwidth Measurement
In the following example, the bandwidth is to be found in which 95% of the power of a GSM signal is
contained. Signal frequency is 935,2 MHz; channel bandwidth is 200 kHz.
REM ************************************************************************
Public Sub OBW()
result$ = Space$(100)
'--------- R&S ESCI default setting ----------------------------------------
-----
CALL SetupStatusReg 'Set status register
CALL IBWRT(receiver%,"*RST") 'Reset instrument
CALL IBWRT(receiver%,"INIT:CONT OFF") 'Single sweep
CALL IBWRT(receiver%,"SYST:DISP:UPD ON") 'ON: display on
'OFF: off
'--------- Configure R&S ESCI for OBW for GSM -----------------------------
CALL IBWRT(receiver%,"FREQ:CENT 935.2MHz") 'Set frequency
CALL IBWRT(receiver%,"CALC:MARK:FUNC:POW:SEL OBW") 'OBW measurement on
CALL IBWRT(receiver%,"SENS:POW:ACH:BAND 200KHZ") 'Channel bandw. 200 kHz
CALL IBWRT(receiver%,"SENS:POW:BWID 95PCT") 'Percentage of power
CALL IBWRT(receiver%,"SENS:POW:ACH:PRES OBW") 'Set frequency and
CALL IBWRT(receiver%,"SENS:POW:ACH:PRES:RLEV") 'optimize reference level
CALL IBWRT(receiver%,"SENS:POW:NCOR OFF") 'Noise correction
'OFF: switch off
'ON: switch on
'--------- Perform measurement and query results ---------------------------
CALL IBWRT(receiver%,"INIT;*WAI") 'Perform sweep with sync
CALL IBWRT(receiver%,"CALC:MARK:FUNC:POW:RES? OBW") 'Query result
CALL IBRD(receiver%, result$)
Print result$
END SUB
REM
************************************************************************