The following VB Script example shows how to create an iTMSA measurement with Power Sweep. Click each link to see a detailed description of each command.
This VBScript (*.vbs) program can be run as a macro in the VNA. To do this, copy the following code into a text editor file such as Notepad and save on the VNA hard drive as Testset.vbs. Learn how to setup and run the macro.
dim app 'VNA App dim meas 'Measurement dim balancemeas dim balstimulus dim chan
set app = createobject("agilentpna835x.application") set chan = app.activechannel chan.SweepType = 2 ' Set the sweep type to power sweep
set meas = app.ActiveMeasurement set balancemeas = meas.BalancedMeasurement balancemeas.BalancedTopology.DUTTopology = 2 ' Bal-Bal topology balancemeas.BalancedStimulus.Mode = 1 ' Turn on true mode 'The PNA-X balanced port numbers are always (0)=Bal 1; (-1)=Bal2 chan.StartPowerEx(0) = -5 ' Set the balanced port 1 start power to -5 dbm chan.StopPowerEx(0) = 5 ' Set the balanced port 1 stop power to 5 dbm chan.StartPowerEx(-1) = -10 ' Set the balanced port 2 start power to -5 dbm chan.StopPowerEx(-1) = 0 ' Set the balanced port 2 stop power to 5 dbm |