Table of Contents
Advertisement
111
HP E1340A High Speed Operation
80
OUTPUT @Afg;"*CLS"
90
OUTPUT @Afg;"*SRE 32"
100
OUTPUT @Afg;"*ESE 60"
110
!
120
!Call the subprogram which resets the AFG.
130
CALL Rst
140
!
150
!Set AFG parameters
160
OUTPUT @Afg;"SOUR:FREQ:FIX 1E3;";!frequency
170
OUTPUT @Afg;":SOUR:FUNC:SHAP USER;";!function
180
OUTPUT @Afg;":SOUR:VOLT:LEV:IMM:AMPL 5.11750V"!scale
190
!
200
!Call subprogram which defines waveform segment A (ramp wave).
210
CALL Ramp_wave
220
!
230
!Select output sequence and initiate waveform
240
OUTPUT @Afg;"SOUR:FUNC:USER A"
250
OUTPUT @Afg;"INIT:IMM"
260
!
270
WAIT .1
!allow interrupt to be serviced
280
OFF INTR 8
290
END
300
!
310
SUB Ramp_wave
320 Ramp_wave: !Subprogram which defines ramp waveform
330
COM @Afg,Waveform(*)
340
FOR I=2048 TO -2047 STEP -1!calculate waveform points as dac
350
Waveform(2049-I)=((I*.0024426)/.0025)+2048
360
NEXT I
370
!
380
OUTPUT @Afg;"SOUR:ARB:DAC:SOUR INT"!dac data source
390
OUTPUT @Afg;"SOUR:LIST:SEGM:SEL A"!select segment name
400
OUTPUT @Afg;"SOUR:LIST:SEGM:VOLT:DAC ";Waveform(*)
410
SUBEND
420
!
430
SUB Rst
500
SUB Errmsg
amplitude
!wait-for-arm state
codes
(internal)
!load ampl points
Chapter 6
Advertisement
Table of Contents
