Agilent Technologies E1446A Car Amplifier User Manual


 
40 COM @Afg,@Amp
50 !
60 !Set up error checking
70 ON INTR 7 CALL Errmsg
80 ENABLE INTR 7;2
90 OUTPUT @Afg;"*CLS"
100 OUTPUT @Afg;"*SRE 32"
110 OUTPUT @Afg;"*ESE 60"
120 !
130 OUTPUT @Amp;"*CLS"
140 OUTPUT @Amp;"*SRE 32"
150 OUTPUT @Amp;"*ESE 60"
160 !
170 !Call the subprograms
180 Rst
190 Offset
200 !
210 WAIT .1 !allow interrupt to be serviced
220 OFF INTR 7
230 END
240 !
250 SUB Offset
260 Offset: !Subprogram which sets up the E1445A and E1446A
270 COM @Afg,@Amp
280 OUTPUT @Afg;"SOUR:FREQ1:FIX 1E3;"; !frequency
290 OUTPUT @Afg;":SOUR:FUNC:SHAP SIN;"; !function
300 OUTPUT @Afg;":SOUR:VOLT:LEV:IMM:AMPL .4VPP;"; !amplitude
310 OUTPUT @Afg;":OUTP:LOAD:AUTO ON;"; !couple load to impedance
320 OUTPUT @Afg;":OUTP:IMP 50" !impedance
330 !
340 !Set up the Agilent E1446A
350 OUTPUT @Amp;"INP1:IMP 50" !input impedance
360 OUTPUT @Amp;"INP1:ATT 20" !input attenuation (dB)
370 OUTPUT @Amp;"OUTP1:IMP 50;"; !main output impedance
380 OUTPUT @Amp;":OUTP1:ATT 0;"; !main output attenuation (dB)
390 OUTPUT @Amp;":SOUR:VOLT:LEV:IMM:OFFS 8" !DC offset
400 !
410 OUTPUT @Afg;"INIT:IMM" !E1445A wait-for-arm state
420 SUBEND
430 !
440 SUB Rst
450 Rst: !Subprogram which resets the E1445A and E1446A
460 COM @Afg,@Amp
470 OUTPUT @Afg;"*RST;*OPC?" !reset the AFG
480 ENTER @Afg;Complete
490 OUTPUT @Amp;"*RST;*OPC?" !reset the AFG
Continued on Next Page
2-24 Programming the Agilent E1446A Setting DC Voltage Offsets