Agilent Technologies E1446A Car Amplifier User Manual


 
80 !E1445A error checking
90 ON INTR 16 CALL Errmsg
100 ENABLE INTR 16;32
110 OUTPUT @Afg72;"*CLS"
120 OUTPUT @Afg72;"*SRE 32"
130 OUTPUT @Afg72;"*ESE 60"
140 !
150 OUTPUT @Afg80;"*CLS"
160 OUTPUT @Afg80;"*SRE 32"
170 OUTPUT @Afg80;"*ESE 60"
180 !
190 !Reset and clear the E1445As
200 OUTPUT @Afg72;"*RST;*CLS;*OPC?"
210 ENTER @Afg72;Ready
220 !
230 OUTPUT @Afg80;"*RST;*CLS;*OPC?"
240 ENTER @Afg80;Ready
250 !
260 !Set up E1445A at logical address 72
270 OUTPUT @Afg72;"SOUR:ROSC:SOUR CLK10;"; !ref osc source
280 OUTPUT @Afg72;":SOUR:FREQ1:FIX 5E3;"; !frequency
290 OUTPUT @Afg72;":SOUR:FUNC:SHAP SIN;"; !function
300 OUTPUT @Afg72;":SOUR:VOLT:LEV:IMM:AMPL 1VPP;"; !amplitude
310 OUTPUT @Afg72;":OUTP:LOAD:AUTO ON;"; !couple load to impedance
320 OUTPUT @Afg72;":OUTP:IMP 50" !output impedance
330 !
340 !Set up E1445A at logical address 80
350 OUTPUT @Afg80;"SOUR:ROSC:SOUR CLK10;"; !ref osc source
360 OUTPUT @Afg80;":SOUR:FREQ1:FIX 100E3;"; !frequency
370 OUTPUT @Afg80;":SOUR:FUNC:SHAP SIN;"; !function
380 OUTPUT @Afg80;":SOUR:VOLT:LEV:IMM:AMPL 1VPP;"; !amplitude
390 OUTPUT @Afg80;":OUTP:LOAD:AUTO ON;"; !couple load to impedance
400 OUTPUT @Afg80;":OUTP:IMP 50" !output impedance
410 WAIT .1
420 OFF INTR 16
430 !
440 ! BEGIN E1446A CONFIGURATION
450 !
460 !Declare and initialize program variables
470 !
480 REAL In1_atten,In1_imped,In2_atten,In2_imped !input variables
490 REAL Out1_atten,Out1_imped,Out1_state !main output variables
500 REAL Out2_imped,Out3_imped !diff out variables
510 REAL Offset !DC offset variable
520 !
Continued on Next Page
Example Programs Register-Based Programming C-25