Rohde & Schwarz SML01 - Transmission of Instrument Setting Commands; Switchover to Manual Control; Reading out Instrument Settings

Programming Examples R&S®SML / R&S®SMV03
1090.3123.12 E-6 7.2
Transmission of Instrument Setting Commands
Output frequency, output level and AM modulation are set in this example. By analogy to the step width
setting of the rotary knob, the step width is additionally set for the alteration of the RF frequency in the
case of UP and DOWN.
REM -------- Instrument setting commands -------------
CALL IBWRT(generator%, "FREQUENCY 250E6") 'RF Frequency 250 MHz
CALL IBWRT(generator%, "POWER -10") 'Output power -10 dBm
CALL IBWRT(generator%, "AM 80") 'AM with modulaton index of 80%
CALL IBWRT(generator%, "AM:INTERNAL:FREQUENCY 3KHZ")
'Modulation frequency 3kHz
CALL IBWRT(generator%, "AM:SOURCE INT") 'Modulation source LF generator
CALL IBWRT(generator%, "FREQUENCY:STEP 12000")
'Step width RF frequency 12 kHz
REM
***********************************************************************
Switchover to Manual Control
REM -------- Switch instrument over to manual control -------
CALL IBLOC(generator%) 'Set instrument to Local state
REM
***********************************************************************
Reading out Instrument Settings
The settings made in the example above are read out here. The abbreviated commands are used.
REM --------- Reading out instrument settings -------------
RFfrequency$ = SPACE$(20) 'Provide text variables with 20 characters
CALL IBWRT(generator%, "FREQ?") 'Request frequency setting
CALL IBRD(generator%, RFfrequency$) 'Read value
RFlevel$ = SPACE$(20) 'Provide text variables with 20 characters
CALL IBWRT(generator%, "POW?") 'Request level setting
CALL IBRD(generator%, RFlevel$) 'Read value
AMmodulationdepth$ = SPACE$(20) 'Provide text variables with 20 characters
CALL IBWRT(generator%, "AM?") 'Request setting of modulation depth
CALL IBRD(generator%, AMmodulationdepth$)'Read value
AMfrequency$ = SPACE$(20) 'Provide text variables with 20 characters
CALL IBWRT(generator%, "AM:INT:FREQ?") 'Request setting of modulation frequency
CALL IBRD(generator%, AMfrequency$) 'Read value
Stepwidth$ = SPACE$(20) 'Provide text variables with 20 characters
CALL IBWRT(generator%, "FREQ:STEP?") 'Request step width setting
CALL IBRD(generator%, Stepwidth $) 'Read value
REM -------- Display values on the screen -------------
PRINT "RF frequency: "; RFfrequency$,
PRINT "RF level: "; RFlevel$,
PRINT "AM modulationdepth: "; AMmodulationdepth$,
PRINT "AM frequency: "; AMfrequenz$,
PRINT "Step width: "; stepwidth$
REM*************************************************************************