Skew DAC Adjustment Procedure (cont’d)
Example Program
10 ! RE-STORE "SKEW_CAL"
20 COM @Afg,@Analyzer,Secure_code$[20]
30 INTEGER Dac_bits,Dac_word,Min_word,Max_word,Step_size,Harmonic
40 INTEGER Loc_min,Cal_word,Search_loop,Ma x_search_loop,Filter,Skew_con
50 DIM Id$[50]
60 !
70 !---------- Assig n I/O paths ----------
80 ASSIGN @Afg TO 70910
90 ASSIGN @Analyzer TO 718
100 !
110 !---------- Check firmware rev ----------
120 !Rev A.01.00 does not support this cal procedure
130 OUTPUT @Afg;"*IDN?"
140 ENTER @Afg;Id$
150 !
160 IF POS(Id$,"A.01.00") THEN
170 PRINT "This rev does not support skew DAC calibration."
180 STOP
190 END IF
200 !
210 !---------- Initia lize variables ----------
220 Secure_code$="E1445A" !AFG security code
230 Harmonic=2 !Harmonic to be minimized
240 Filter=0 !No filter
250 Freq=4.E+6 !AFG frequency (Hz)
260 Amp_in_dbm=11 !AFG amplitude (dBm)
270 Search_span$=VAL$(Freq*Harmonic*4.00E-4 ) !Initial Spec Analyzer span
280 Test_span$="2000" !Span used for measurements
290 !
300 Dac_bits=8
310 Start_step_size=16
320 Step_size=Start_step_size
330 Max_search_loop=4
340 Dac_word=2^(Dac_bits-1) !Initial Dac_word
350 Max_word=2^(Dac_bits) !Initial max
360 Min_word=0 !Initial min
370 !
380 !---------- Test c onnections ----------
390 PRINT "Connect Spectrum Analyzer to AFG Ouput."
400 DISP "Press ’Continue’ when ready"
410 PAUSE
420 CLEAR SCREEN
430 !
(Continued on next page)
Agilent E1445A Service Manual Adjustments 111