Agilent Technologies 75000 Series C, E1445A Agilent E1445A Service Manual Adjustments 115

Skew DAC Adjustment Procedure (cont’d)
Example Program (cont’d)
1690 Meas_2nd_harm:SUB Meas_2nd_harm(Readi ng)
1700 COM @Afg,@Analyzer,Secure_code$
1710 OUTPUT @Analyzer;"TS;E1" !Find peak
1720 OUTPUT @Analyzer;"MA" !Measure amplitude
1730 ENTER @Analyzer;Reading
1740 SUBEND
1750 !
1760 Read_skew_con:SUB Read_skew_con (IN TEG E R S kew_cal_con)
1770 COM @Afg,@Analyzer,Secure_code$
1780 ALLOCATE Id$[50]
1790 !
1800 OUTPUT @Afg;"*IDN?"
1810 ENTER @Afg;Id$
1820 IF POS(Id$,"A.01.00") THEN
1830 Skew_cal_con=128
1840 SUBEXIT
1850 END IF
1860 !
1870 STATUS @A fg,3;Address
1880 !
1890 OUTPUT @Afg;"CAL:SEC:STAT OFF,"&Secure_cod e$
1900 OUTPUT @Afg;"CAL:DATA:SKEW?"
1910 ASSIGN @Afg TO Address;FORMAT OFF
1920 ENTER @Afg USING "3A,1(W)";Dummy$[1,3 ],Skew_cal_con
1930 ASSIGN @Afg TO Address
1940 OUTPUT @Afg;"CAL:SEC:STAT ON"
1950 SUBEND
Agilent E1445A Service Manual Adjustments 115