Agilent Technologies 8719ES, Programmer'S Manual

Page: 409 / 541

7-46 Chapter 7
Programming Examples
Measurement Calibration Examples
1990 ELSE
2000 OUTPUT @Nwa;”CLASS22C;OPC?;STANA;”
2010 END IF
2020 ENTER @Nwa;Reply
2030 OUTPUT @Nwa;”INPUCALC09”,Array09(*)
2040 !
2050 ! Tell analyzer that reflection measurements done.
2060 !
2070 OUTPUT @Nwa;”REFD;”
2080 DISP “COMPUTING REFLECTION CALIBRATION COEFFICIENTS”
2090 !
2100 ! Now start the transmission standard downloads.
2110 !
2120 OUTPUT @Nwa;”TRAN;”
2130 !
2140 ! Now input the forward transmission raw arrays.
2150 !
2160 OUTPUT @Nwa;”OPC?;FWDT;”
2170 ENTER @Nwa;Reply
2180 OUTPUT @Nwa;”INPUCALC06”,Array06(*)
2190 !
2200 OUTPUT @Nwa;”OPC?;FWDM;”
2210 ENTER @Nwa;Reply
2220 OUTPUT @Nwa;”INPUCALC05”,Array05(*)
2230 !
2240 ! Now input the reverse transmission arrays.
2250 !
2260 !DISP “MEASURING REVERSE TRANSMISSION”
2270 OUTPUT @Nwa;”OPC?;REVT;”
2280 ENTER @Nwa;Reply
2290 OUTPUT @Nwa;”INPUCALC12”,Array12(*)
2300 !
2310 OUTPUT @Nwa;”OPC?;REVM;”
2320 ENTER @Nwa;Reply
2330 OUTPUT @Nwa;”INPUCALC11”,Array11(*)
2340 !
2350 ! Tell analyzer that transmission inputs done.
2360 !
2370 OUTPUT @Nwa;”TRAD”
2380 !
2390 ! Omitting isolation for this example. Could be easily
2400 ! incorporating by using method shown for tranmission and
2410 ! reflection.
2420 !
2430 OUTPUT @Nwa;”ISOL;”
2440 OUTPUT @Nwa;”OMII;” !IF ISOLATION CAL NOT DESIRED
2450 ! Here’s how to download isolation. Un-comment these lines.
2460 !
2470 !OUTPUT @Nwa;”OPC?;REVI;” ! reverse isolation term
2480 !ENTER @Nwa;Reply
2490 !OUTPUT @Nwa;”INPUCALC10”,Array10(*)
2500 !
2510 !OUTPUT @Nwa;”OPC?;FWDI;” ! forward isolation term
2520 !ENTER @Nwa;Reply
2530 !OUTPUT @Nwa;”INPUCALC04”,Array04(*)
2540 !
2550 ! Tell analyzer that done with isolation measurements.
2560 !