Setup Receiver Leveling using SCPI

This VBScript program configures Receiver Leveling.

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 PNA. To do this, copy the following code into a text editor file such as Notepad and save it on the PNA hard drive as RxLev.vbs.  Learn how to setup and run the macro.

See all Recevier Leveling SCPI commands.

See Other SCPI Example Programs

Set pna = CreateObject("AgilentPNA835x.Application")

Set SCPI = pna.ScpiStringParser

'set source port

dim srcP

srcP = "1"

'Preset PNA

SCPI.Parse "SYST:PRES"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:ref 'R1'"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:tol 0.02"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:iter 10"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:fast OFF"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:ifbw 100"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:offs 0"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:safe:max 20"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:safe:max -100"

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec:safe ON"

'Last, enable receiver leveling

SCPI.Parse "sour1:pow" + srcP + ":alc:mode:rec ON"