Komplexere Programmbeispiele
CALL InstrWrite(analyzer,"CALC:MATH:STAT OFF")
CALL InstrWrite(analyzer,"DET1 RMS")
CALL InstrWrite(analyzer,"DET2:AUTO ON")
CALL InstrWrite(analyzer,"DET3:AUTO ON")
CALL InstrWrite(analyzer,"DET4:AUTO ON")
CALL InstrWrite(analyzer,"DET5:AUTO ON")
CALL InstrWrite(analyzer,"DET6:AUTO ON")
'––––––––– Bandwidths and sweep time –––––––––––––––––––––––––––––––––––––––
CALL InstrWrite(analyzer,"BAND:RES 100KHz")
CALL InstrWrite(analyzer,"BAND:VID 1MHz")
CALL InstrWrite(analyzer,"SWE:TIME 100ms")
END SUB
REM ************************************************************************
Marker und Deltamarker verwenden
Die Marker werden für die Markierung von Punkten auf Messkurven, zum Auslesen von
Messergebnissen und für die schnelle Auswahl eines Anzeigebereichs benutzt.
Marker-Suchfunktionen, Begrenzung des Suchbereichs
Das folgende Beispiel geht von einem AM-modulierten Signal bei 100 MHz mit folgenden
Eigenschaften aus:
• Trägersignalpegel:
• NF-Frequenz:
• Modulationsgrad:
Marker 1 und dann Deltamarker 2 werden auf die höchsten Maxima der Messkurve gesetzt.
Dann werden die Frequenz und der Pegel gelesen. Für die nachfolgenden Messungen
kann die Grundeinstellung des Geräts für Messungen (SetupInstrument) verwendet werden.
REM ************************************************************************
Public Sub MarkerSearch()
Dim retCount as Long
result$ = Space$(100)
CALL SetupInstrument
'––––––––– Peak search without search range limits––––––––––––––––––––––––––
CALL InstrWrite(analyzer,"INIT:CONT OFF")
CALL InstrWrite(analyzer,"CALC:MARK:PEXC 6DB")
CALL InstrWrite(analyzer,"CALC:MARK:STAT ON")
1300.2519.61
-30 dBm
100 kHz
50 %
'Trace difference off
'Detector Trace1
'Detector Trace2
'Detector Trace3
'Detector Trace4
'Detector Trace5
'Detector Trace6
'Resolution bandwidth (*)
'Video bandwidth
'Sweep time
'Default Setting
'Switch to single sweep
'Define peak excursion
6.12
R&S FSL
(*)
(*)
(*)
(*)
(*)
(*)
(*)
(*)
D-3