Rohde & Schwarz R&S FSL3 - Page 1634

Using Marker and Delta Marker R&S FSL
1300.2519.12 7.6 E-11
Evaluation of Event Status Register
REM –––––– Subroutine for evaluating the Event Status Register ––––––––––––
Public SUB Esrread()
Esr$ = SPACE$(20) 'Preallocate blanks to text
'variable
CALL InstrWrite(analyzer, "*ESR?") 'Read ESR
CALL InstrRead(analyzer, Esr$)
IF (VAL(Esr$) AND 1) > 0 THEN Debug.Print "Operation complete"
IF (VAL(Esr$) AND 2) > 0 THEN Debug.Print "Request Control"
IF (VAL(Esr$) AND 4) > 0 THEN Debug.Print "Query Error"
IF (VAL(Esr$) AND 8) > 0 THEN Debug.Print "Device dependent error"
IF (VAL(Esr$) AND 16) > 0 THEN
Debug.Print "Execution Error; Program aborted"
'Output error message
STOP 'Stop software
END IF
IF (VAL(Esr$) AND 32) > 0 THEN
Debug.Print "Command Error; Program aborted"
'Output error message
STOP 'Stop software
END IF
IF (VAL(Esr$) AND 64) > 0 THEN Debug.Print "User request"
IF (VAL(Esr$) AND 128) > 0 THEN Debug.Print "Power on"
END SUB
REM
**********************************************************************
Using Marker and Delta Marker
Shape Factor Measurement (using n dB down)
The n–dB–down function of the R&S FSL is used twice to determine the shape factor of a filter (ratio of
bandwidths at 60 dB and 3 dB below the filter maximum).
The following example is again based on a signal with a level of –30 dBm at 100 MHz. The shape factor
is determined for the 30 kHz resolution bandwidth. The default setting of the R&S FSL is used for
measurements (SetupInstrument).
REM ************************************************************************
Public Sub ShapeFactor()
result$ = Space$(100)
'––––––––– R&S FSL default setting ––––––––––––––––––––––––––––––––––––––––
CALL SetupInstrument 'Default setting
CALL InstrWrite(analyzer,"INIT:CONT OFF") 'Single sweep