280 | ! |
|
290 | !Set up amplifier |
|
300 | OUTPUT @Afg;"INP1:IMP 75" | !input impedance |
310 | OUTPUT @Afg;"INP1:ATT 4" | !input attenuation (dB) |
320 | OUTPUT @Afg;"OUTP2:IMP 50" | !main output impedance |
330 | OUTPUT @Afg;"OUTP2:ATT 0" | !main output attenuation (dB) |
340 | ! |
|
350 | OUTPUT @Afg;"INIT:IMM" | !E1445A |
360SUBEND
370!
380SUB Rst
390Rst: !Subprogram which resets the E1445 and E1446
400COM @Afg
410 OUTPUT @Afg;"*RST;*OPC?" !reset the AFG
420ENTER @Afg;Complete
430SUBEND
440!
450SUB Errmsg
460Errmsg: !Subprogram which displays E1445/E1446 programming errors
470COM @Afg
480DIM Message$[256]
490!Read AFG status byte register and clear service request bit
500B=SPOLL(@Afg)
510!End of statement if error occurs among coupled commands
520OUTPUT @Afg;""
530OUTPUT @Afg;"ABORT" !abort output waveform
540REPEAT
550OUTPUT @Afg;"SYST:ERR?" !read AFG error queue
560ENTER @Afg;Code,Message$
570PRINT Code,Message$
580UNTIL Code=0
590STOP
600SUBEND
Setting Input
Impedance
(Agilent E1405B
Commander)
This program uses the same commands and sequence as previously described, except for the OUTPut[1] commands shown below:
6. Set the amplifier output impedance.
OUTPut[1]:IMPedance <impedance>
7. Set the amplifier output attenuation.
OUTPut[1]:ATTenuation <attenuation>
Setting the Input Impedance | Programming the Agilent E1446A |