Agilent Technologies 4294A Programming Manual page 225

Lines 460 to 500
Lines 520 to 600
Lines 640 to 650
Lines 670 to 700
Lines 720
Lines 730 to 750
Lines 760 to 880
Lines 890 to 970
Lines 990 to 1010 Sets the trace A display format to Fmt_a$, and then executes the auto
Lines 1020 to 1040 Sets the trace B display format to Fmt_b$, and then executes the auto
Lines 1060 to 1070 Prompts the user to determine whether to perform a measurement
Example 13-5 Measurement controlling oscillator level
10
20
30
40
50
60
70
80
90
100
110
120
130
140
150
160
170
180
190
200
210
220
13
Turns on the manual sweep function and the level monitor function,
and sets the oscillator level mode to Power_mode$.
According to the oscillator level mode, substitutes the command name
for reading the level monitor value, the range (lower limit and upper
limit) of level setting into the variables: Command$, Range_l, and
Range_u, respectively.
Prompts the user to connect a DUT, and waits for a press of the
key after the connection.
Displays header for list of measurement results, and substitutes the
format to display the measurement results into the variable: Img$.
Sets the measurement point.
Sets the initial setting to control the oscillator level.
Until the difference between the test signal level (target) and the
monitor level is less than the variable: Err_limit, iterates setting and
monitoring, and updating the oscillator level. (maximum number of
iteration times is the variable: Iteration.)
Reads out the measurement results and displays them according to
Img$.
scale on trace A to automatically set the scale parameters so that
waveforms fit on the screen.
scale on trace B to automatically set the scale parameters so that
waveforms fit on the screen.
again. If the key and the
[y]
DUT connection part (line 570).
DIM Adapter$[9],Meas_para$[9],Pow_mode$[9],Swp_type$[9]
DIM Fmt_a$[9],Fmt_b$[9],Buff$[9],Inp_char$[9],Img$[50]
REAL Start,Stop,Level,Data_a(1:2),Data_b(1:2)
REAL Err_limit,Range_l,Range_u
INTEGER Scode,Nop,Iteration,Result
CLEAR SCREEN
!
IF SYSTEM$("SYSTEM ID")="HP4294A" THEN
ASSIGN @Hp4294a TO 800
Scode=8
ELSE
ASSIGN @Hp4294a TO 717
Scode=7
END IF
!
Adapter$="OFF"
Meas_para$="IMPH"
Swp_type$="LOG"
Start=1.0E+3
Stop=1.0E+7
Nop=21
Fmt_a$="LOGY"
Application Sample Programs
Measurement controlling oscillator level
key are pressed, returns to the
[Enter]
[Enter]
225