R&S FSQ Signal Analyzer - Rohde & Schwarz

R&S FSQ Remote Control – Programming Examples
More Complex Programming Examples
status = viWrite(analyzer, "CALC:LIM:ACP:ACH:RES?", 21, retCnt)
'Query result of
status = viRead(analyzer, result$, 100, retCnt)
'limit check
'--------- Read out result ---------------------------------
Print "Result Limit Check: "; result$
END SUB
REM ************************************************************************
7.3.4 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 FSQ default setting --------------------------
CALL SetupStatusReg
'Set status register
status = viWrite(analyzer, "*RST", 4, retCnt)
'Reset instrument
status = viWrite(analyzer, "INIT:CONT OFF", 13, retCnt)
'Single sweep
status = viWrite(analyzer, "SYST:DISP:UPD ON", 16, retCnt)
'ON: display on
'OFF: off
'--------- Configure R&S FSQ for OBW for GSM --------------status
= viWrite(analyzer, "FREQ:CENT 935.2MHz", 18, retCnt)
'Set frequency
status = viWrite(analyzer, "CALC:MARK:FUNC:POW:SEL OBW", 26, retCnt)
'OBW measurement on
status = viWrite(analyzer, "SENS:POW:ACH:BAND 200KHZ", 24, retCnt)
'Channel bandwidth 200 kHz
status = viWrite(analyzer, "SENS:POW:BWID 95PCT", 19, retCnt)
'Percentage of power
status = viWrite(analyzer, "SENS:POW:ACH:PRES OBW", 21, retCnt)
'Set frequency and
status = viWrite(analyzer, "SENS:POW:ACH:PRES:RLEV;*WAI", 27, retCnt)
'Optimize reference level
status = viWrite(analyzer, "SENS:POW:NCOR OFF", 17, retCnt)
'Noise correction
'OFF: switch off
'ON: switch on
'--------- Perform measurement and query results -----------status
= viWrite(analyzer, "INIT;*WAI", 9, retCnt)
'Perform sweep with sync
status = viWrite(analyzer, "CALC:MARK:FUNC:POW:RES? OBW", 27, retCnt)
7.16 Operating Manual 1313.9681.12 - 01