Test 2-1: DC Zeros (cont’d)
Example Program (cont’d)
440 PRINT
460 FOR Filter=0 TO 2
470 SELECT Filter
480 CASE 0 !No filter
490 OUTPUT @Afg;"OUTP:FILT OFF"
500 Filter$="NONE"
510 CASE 1 !250KHZ filter
520 OUTPUT @Afg;"OUTP:FILT:FREQ 250KHZ"
530 OUTPUT @Afg;"OUTP:FILT ON"
540 Filter$="250 kHz"
550 CASE 2 !10MHZ filter
560 OUTPUT @Afg;"OUTP:FILT:FREQ 10MHZ"
570 OUTPUT @Afg;"OUTP:FILT ON"
580 Filter$="10 MHz"
590 END SELECT
600 !
610 FOR I=1 TO 9 !Loop through atten’s
620 OUTPUT @Afg;":VOLT "&VAL$(Vout(I)) !Set AFG amplitude
630 PRINT Attn(I),Fil ter$,Vout(I)
640 !
650 DISP "Record DMM reading, then press ’Continue’"
660 PAUSE
670 DISP
680 NEXT I !Next attenuation
690 PRINT
700 NEXT Filter !Next filter
710 !
720 OUTPUT @Afg;"*RST;*CLS" !Reset AFG
730 END
740 !
750 SUB Def_seq_zeros
760 COM @Afg
770 OUTPUT @Afg;"LIST:SEGM:SEL ZEROS" !Segment name
780 OUTPUT @Afg;"LIST:SEGM:DEF 8" !Segment length
790 OUTPUT @Afg;"LIST:SEGM:VOLT 0,0,0,0,0,0,0,0" !Voltage points
800 !
810 OUTPUT @Afg;"LIST:SSEQ:SEL DC_ZEROS" !Sequence name
820 OUTPUT @Afg;"LIST:SSEQ:DEF 1" !# of segments
830 OUTPUT @Afg;"LIST:SSEQ:SEQ ZEROS" ! Segment list
840 SUBEND
Agilent E1445A Service Manual Verification Tests 37