Create an iTMSA Measurement
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 PNA. To do this, copy the following code into a text editor file such as Notepad and save on the PNA hard drive as Testset.vbs. Learn how to setup and run the macro.
|
dim app 'PNA 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 |