Agilent Technologies 75000 Series C, E1445A 28 Verification Te sts Agilent E1445A Serv ice Manual

Functional Verification
Example Program (cont’d)
890 Reset_afg
900 !
910 CLEAR SCREEN
920 PRINT "REF IN/MARKER OUT TEST"
930 PRINT
940 !
950 !Test connections
960 PRINT "Connect Scope to ’Marker Out’ on the E1445A."
970 PRINT "Connect Command Module ’Clk Out’ to ’Ref/Sample In’ on the E1445A."
980 PRINT
990 Wait_for_cont
1000 !
1010 !Perform test
1020 OUTPUT @Afg;"ROSC:SOUR EXT" !External ref osc source
1030 OUTPUT @Afg;"MARK:FEED ""ROSC""" !Marker source is ’ROSC’
1040 OUTPUT @Afg;"INIT:IMM" !Initiate
1050 !
1060 PRINT "Verify that the scope shows a 10 MHz squarewave ."
1070 Wait_for_cont
1080 SUBEND
1090 !
1100 SUB Start_arm
1110 COM @Afg,@Cmd_mod,INTEGER Done
1120 !
1130 Reset_afg
1140 !
1150 CLEAR SCREEN
1160 PRINT "START ARM TEST"
1170 PRINT
1180 !
1190 !Test connections
1200 PRINT "Connect Scope to the E1445A Output."
1210 PRINT "Connect Command Module ’Trig Out’ to ’Start Arm In’ on the E 1445A."
1220 PRINT
1230 Wait_for_cont
1240 !
1250 !Set Command Module’s ’TRIG OUT’ to 0V (E1405 uses neg log ic)
1260 OUTPUT @Cmd_mod;"OUTP:EXT:LEV 1"
1270 !
1280 !Perform test
1290 OUTPUT @Afg;"FREQ 1E6;"; !Set freq to 1 MHz
1300 OUTPUT @Afg;":VOLT 4VPP" !Set amplitude
1310 OUTPUT @Afg;"ARM:LAY2:SOUR EXT" !Start Arm source is EXT
1320 OUTPUT @Afg;"INIT:IMM" !Initiate
1330 !
(Continued on next page)
28 Verification Te sts Agilent E1445A Serv ice Manual