Agilent Technologies E1445A Manual de usuario Pagina 32

  • Descarga
  • Añadir a mis manuales
  • Imprimir
  • Pagina
    / 534
  • Tabla de contenidos
  • MARCADORES
  • Valorado. / 5. Basado en revisión del cliente
Vista de pagina 31
Typical BASIC
Example Program
The structure of an example program in BASIC is shown below. This
program enables output leveling by sweeping.
1 !RE-STORE"SWP_LEVL"
2 !This program enables output leveling over the 0 Hz to 10 MHz sweep.
3 !
10 !Assign I/O path between the computer and E1445A.
20 ASSIGN @Afg TO 70910
30 COM @Afg
40 !
50 !Set up error checking
60 ON INTR 7 CALL Errmsg
70 ENABLE INTR 7;2
80 OUTPUT @Afg;"*CLS"
90 OUTPUT @Afg;"*SRE 32"
100 OUTPUT @Afg;"*ESE 60"
110 !
120 !Call the subprograms
130 CALL Rst
140 CALL Swp_levl
150 !
160 WAIT .1 !allow interrupt to be serviced
170 OFF INTR 7
180 END
190 !
200 SUB Swp_levl
210 Swp_levl: !Subprogram which sets output leveling for sweeping from
220 !0 TO 10 MHz
230 COM @Afg
240 OUTPUT @Afg;"SOUR:FREQ1:MODE SWE;"; !sweep mode
250 OUTPUT @Afg;" :SOUR:FREQ1:STAR 0;"; !start frequency
260 OUTPUT @Afg;" :SOUR:FREQ1:STOP 10E6;"; !stop frequency
270 OUTPUT @Afg;" :SOUR:SWE:COUN INF;" !sweep count
280 OUTPUT @Afg;":SOUR:FUNC:SHAP SIN;"; !function
290 OUTPUT @Afg;":SOUR:VOLT:LEV:IMM:AMPL 5 V" !amplitude
300 OUTPUT @Afg;"OUTP1:FILT:LPAS:FREQ 10 MHZ" !filter cutoff frequency
310 OUTPUT @Afg;"OUTP1:FILT:LPAS:STAT ON" !enable output filter
320 OUTPUT @Afg;"INIT:IMM" !wait-for-arm state
330 SUBEND
340 !
350 SUB Rst
360 Rst: !Subprogram which resets the E1445.
370 COM @Afg
380 OUTPUT @Afg;"*RST;*OPC?" !reset the AFG
390 ENTER @Afg;Complete
400 SUBEND
410 !
420 SUB Errmsg
430 Errmsg: !Subprogram which displays E1445 programming errors
440 COM @Afg
Continued on Next Page
30 Getting Started Chapter 1
Vista de pagina 31
1 2 ... 27 28 29 30 31 32 33 34 35 36 37 ... 533 534

Comentarios a estos manuales

Sin comentarios