Agilent Technologies 8719ES, Руководство программиста

Страница: 408 / 541

Chapter 7 7-45
Programming Examples
Measurement Calibration Examples
1410 !
1420 ! Now download and let analyzer compute the full 2-port error
1430 ! correction.
1440 !
1450 ! First select the calibration type desired.
1460 !
1470 OUTPUT @Nwa;”CALIFUL2;”
1480 !
1490 ! Turn off the beep indicating standard done.
1500 !
1510 OUTPUT @Nwa;”BEEPDONEOFF;”
1520 !
1530 ! Set up for the reflection standards.
1540 !
1550 OUTPUT @Nwa;”REFL;”
1560 !
1570 ! Input the forward ‘open’ standard’s raw array. For all of
1580 ! these, the analyzer is first taking a “dummy” measurement, goes
1590 ! into hold, then the computer downloads the data using an
1600 ! INPUCALC command which overwrites the “dummy” data with the raw
1610 ! array gathered previously.
1620 !
1630 OUTPUT @Nwa;”OPC?;CLASS11A;”
1640 ENTER @Nwa;Reply
1650 OUTPUT @Nwa;”INPUCALC01”,Array01(*)
1660 !
1670 ! Input the forward ‘short’ standard’s raw array.
1680 !
1690 OUTPUT @Nwa;”OPC?;CLASS11B;”
1700 ENTER @Nwa;Reply
1710 OUTPUT @Nwa;”INPUCALC02”,Array02(*)
1720 !
1730 ! Input the forward ‘load’ standards’s raw array.
1740 !
1750 IF Is_8753 THEN
1760 OUTPUT @Nwa;”OPC?;CLASS11C;”
1770 ELSE
1780 OUTPUT @Nwa;”CLASS11C;OPC?;STANA;”
1790 END IF
1800 ENTER @Nwa;Reply
1810 OUTPUT @Nwa;”INPUCALC03”,Array03(*)
1820 !
1830 ! Input reverse ‘open’.
1840 !
1850 OUTPUT @Nwa;”OPC?;CLASS22A;”
1860 ENTER @Nwa;Reply
1870 OUTPUT @Nwa;”INPUCALC07”,Array07(*)
1880 !
1890 ! Input reverse ‘short’.
1900 !
1910 OUTPUT @Nwa;”OPC?;CLASS22B;”
1920 ENTER @Nwa;Reply
1930 OUTPUT @Nwa;”INPUCALC08”,Array08(*)
1940 !
1950 ! Input reverse ‘load’.
1960 !
1970 IF Is_8753 THEN
1980 OUTPUT @Nwa;”OPC?;CLASS22C;”