This VBScript program does the following:
Presets the analyzer, deleting the default trace
Create 2 windows
Create 2 Measurements
Feed the measurements to windows / traces
Change frequency ranges for channels
Select both measurements
Turn marker 1 ON for each measurement
The following notes explain the basic structure of the SCPI tree on the analyzer:
SOURce: and most SENSe: commands act on the channel that is specified in the command. Channel 1 is default if not specified.
Most DISPlay: commands act on the window and trace specified in the command. Window1 and Trace1 are default if not specified.
CALCulate: commands act on the selected measurement in the specified channel. Select the measurement for each channel using
CALCulate<channel number>:PARameter:SELect <meas name>. You can select one measurement in each channel.
See Traces, Channels, and Windows on the Analyzer
The SCPI commands in this example are sent over a COM interface using the SCPIStringParser object. You do NOT need a GPIB connection to run this example.
This VBScript (*.vbs) program can be run as a macro in the analyzer. To do this, copy the following code into a text editor file such as Notepad and save it on the analyzer hard drive as NewMeas.vbs. Learn how to setup and run the macro.
See Other SCPI Example Programs
' Create / Get the PNA application.
Set app = CreateObject("AgilentPNA835x.Application")
Set scpi = app.ScpiStringParser
'Preset the analyzer
'This command also deletes the default trace
scpi.execute "CALCulate1:PARameter:DEFine:EXT 'Meas1','S11'"
scpi.execute "CALCulate2:PARameter:DEFine:EXT 'Meas2','S21'"
' Turn on windows - creates if new
scpi.execute "DISPlay:WINDow1:STATE ON"
scpi.execute "DISPlay:WINDow2:STATE ON"
'Associate ("FEED") the measurement name('Meas1') to WINDow(1), and give the new TRACe a number(1).
scpi.execute "DISPlay:WINDow1:TRACe1:FEED 'Meas1'"
scpi.execute "DISPlay:WINDow2:TRACe2:FEED 'Meas2'"
'Change each channel's frequency range
scpi.execute "SENSe1:FREQuency:SPAN 1e9"
scpi.execute "SENSe2:FREQuency:SPAN 2e9"
'Select both measurements
scpi.execute "CALCulate1:PARameter:SELect 'Meas1'"
scpi.execute "CALCulate2:PARameter:SELect 'Meas2'"
'Turn marker 1 ON for each measurement
scpi.execute "CALCulate1:MARKer:STATe ON"
scpi.execute "CALCulate2:MARKer:STATE ON"