®
R&S
FSVA/FSV
CR&S FSVan$ = SPACE$(20)
CALL InstrWrite(analyzer, "FREQ:SPAN?")
'Request span
CALL InstrRead(analyzer, CR&S FSVan$, 20, retCount)
'Read value
RLlevel$ = SPACE$(20)
CALL InstrWrite(analyzer, "DISP:TRAC:Y:RLEV?")
'Request ref level setting
CALL InstrRead(analyzer, RLlevel$, 20, retCount)
'Read value
REM --------- Displaying values in the Immediate window --------------------
Debug.Print "Center frequency: "; CFfrequency$,
Debug.Print "Span:
Debug.Print "Reference level:
END SUB
REM*************************************************************************
7.1.6
Posicionar y leer marcadores
REM -------- Example of marker function -----------------------------------
PUBLIC SUB ReadMarker()
Dim retCount as Long
CALL InstrWrite(analyzer, "CALC:MARKER ON;MARKER:MAX")
'Activate marker 1 and search for peak
MKmark$ = SPACE$(30)
CALL InstrWrite(analyzer, "CALC:MARK:X?;Y?")
'Query frequency and level
CALL InstrRead(analyzer, MKmark$, 30, retCount)
'Read value
REM --------- Displaying values in the Immediate window -------------------
Debug.Print "Marker frequency/level "; MKmark$,
END SUB
REM ************************************************************************
7.1.7
Sincronización de comandos
Los métodos de sincronización utilizados en el siguiente ejemplo se describen en
el manual de operación en CD, capítulo "Remote Control - Basics", (Control
remoto - Información básica), sección "Command Sequence and Command
Synchronization" (Secuencia de comandos y sincronización de comandos).
REM --------- Commands for command synchronization ------------------------
PUBLIC SUB SweepSync()
Dim retCount as Long
Guía de inicio rápido 1321.3066.10 ─ 03
Breve introducción al control remoto
Pasos básicos para la programación por control remoto
'Provide text variable (20 characters)
'Provide text variable (20 characters)
"; CR&S FSVan$,
"; RLlevel$,
'Provide text variable (30 characters)
162