Agilent Technologies 8719ET Programmer's Guide

7-28 Chapter7
Programming Examples
Measurement Calibration Examples
430 !
440 OUTPUT @Nwa;”CALIS111;” ! S11 1 port CAL initiated
450 !
460 ! Open reflection CAL
470 CALL Waitforkey(“CONNECT OPEN AT PORT 1 (REFLECTION PORT)”)
480 IF Kit=2 THEN
490 OUTPUT @Nwa;”CLASS11A;”
500 OUTPUT @Nwa;”OPC?;STANB;” ! Select the second standard, B
510 ELSE
520 OUTPUT @Nwa;”OPC?;CLASS11A;” ! Only one standard in class
530 END IF
540 ENTER @Nwa;Reply ! Read in the 1 returned
550 OUTPUT @Nwa;”DONE;” ! Finished with class standards
560 !
570 ! Short reflection CAL
580 CALL Waitforkey(“CONNECT SHORT AT PORT 1 (REFLECTION PORT)”)
590 IF Kit=2 THEN
600 OUTPUT @Nwa;”CLASS11B;”
610 OUTPUT @Nwa;”OPC?;STANB;” ! Select the second standard, B
620 ELSE
630 OUTPUT @Nwa;”OPC?;CLASS11B;” ! Only one standard in class
640 END IF
650 ENTER @Nwa;Reply ! Read in the 1 returned
660 OUTPUT @Nwa;”DONE;” ! Finished with class standards
670 !
680 ! Reflection load CAL
690 CALL Waitforkey(“CONNECT LOAD AT PORT 1 (REFLECTION PORT)”)
700 IF Kit=3 OR Kit=4 THEN
710 OUTPUT @Nwa;”CLASS11C;”
720 OUTPUT @Nwa;”OPC?;STANA;” ! Select the first standard, A
730 ELSE
740 OUTPUT @Nwa;”OPC?;CLASS11C;” ! Only one standard in class
750 END IF
760 ENTER @Nwa;Reply ! Read in the 1 returned
770 OUTPUT @Nwa;”DONE;” ! Finished with class standards
780 !
790 DISP “COMPUTING CALIBRATION COEFFICIENTS”
800 !
810 OUTPUT @Nwa;”OPC?;SAV1;” ! Save the ONE PORT CAL
820 ENTER @Nwa;Reply ! Read in the 1 returned
830 !
840 DISP “S11 1-PORT CAL COMPLETED. CONNECT TEST DEVICE.”
850 OUTPUT @Nwa;”MENUON;” ! Turn on the softkey menu
860 !
870 OUTPUT @Nwa;”OPC?;WAIT;” ! Wait for the analyzer to finish
880 ENTER @Nwa;Reply ! Read the 1 when complete
890 LOCAL @Nwa ! Release HP-IB control
900 !
910 END
920 !
930 ! **************************** Subroutines ******************************
940 !
950 Waitforkey: ! Prompt routine to read a keypress on the controller
960 SUB Waitforkey(Lab$)
970 ! Position and display text on the analyzer display
980 OUTPUT 717;”PG;PU;PA390,3700;PD;LB”;Lab$;”, PRESS ENTER WHEN READY;”&CHR$(3)
990 !
1000 DISP Lab$&” Press ENTER when ready”;! Display prompt on console

Agilent Technologies 8719ET Specifications

General

Brand	Agilent Technologies
Model	8719ET
Category	Measuring Instruments
Language	English