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

Programming Examples SME
1038.6002.02 9D.2 E-11
3. Transmission of Instrument Setting Commands
Output frequency, output level and AM modulation are set in this example. The settings correspond to
the sample setting for first users in manual control. 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:INTERNAL1:FREQUENCY 3KHZ") ’Modulation frequency 3kHz
CALL IBWRT(generator%, "AM:SOURCE INT1") ’Modulation source LF generator 1
CALL IBWRT(generator%, "FREQUENCY:STEP 12500") ’Step width RF frequency 12.5kHz
REM
***********************************************************************
4. Switchover to Manual Control
REM -------- Switch instrument over to manual control -----------
CALL IBLOC(generator%) ’Set instrument to Local state
REM
***********************************************************************
5. Reading out Instrument Settings
The settings made in example 3 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:INT1:FREQ?") ’Request modulation frequency setting
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: "; AMfrequency$,
PRINT "Step width: "; stepwidth$
REM **********************************************************************