User`s guide

Table Of Contents
78 Chapter 4
Performing a Calibration
Sample Program
620 !
630 OUTPUT @Agte507x;"*CLS"
640 SELECT Num_of_ports
650 CASE 1
660 PRINT "Connect Port "&VAL$(Port(1))&" to ECal Module."
670 PRINT "Then push [Enter] key."
680 INPUT "",Buff$
690 OUTPUT @Agte507x;":SENS"&Ch$&":CORR:COLL:ECAL:SOLT1 ";Port(1)
700 CASE 2
710 PRINT "Connect Port "&VAL$(Port(1));
720 PRINT " and Port "&VAL$(Port(2))&" to ECal Module."
730 PRINT "Then push [Enter] key."
740 INPUT "",Buff$
750 OUTPUT @Agte507x;":SENS"&Ch$&":CORR:COLL:ECAL:SOLT2
";Port(1);",";Port(2)
760 END SELECT
770 PRINT "Executing ..."
780 OUTPUT @Agte507x;":SYST:ERR?"
790 ENTER @Agte507x;Err_no,Err_msg$
800 IF Err_no<>0 THEN
810 PRINT "Error occurred!!"
820 PRINT " No:";Err_no,"Description: "&Err_msg$
830 PRINT "ECAL INTERRUPT!!"
840 ELSE
850 PRINT "Done"
860 END IF
870 SUBEND