Agilent Technologies 4294A Service Manual Page 187

  • Download
  • Add to my manuals
  • Print
  • Page
    / 518
  • Table of contents
  • BOOKMARKS
  • Rated. / 5. Based on customer reviews
Page view 186
13 187
Application Sample Programs
Basic Measurement
1. Chapter Title
2. Chapter Title 13. Application Sample
4. Chapter Title
5. Chapter Title
Programs
Lines 600 to 630 Performs a single sweep and waits for its completion.
Lines 670 to 700 Executes the auto scale on trace A and trace B to automatically set the
scale parameters so that waveforms fit on the screen.
Lines 740 to 760 Searches for the minimum value (self-resonant point) on trace A using
the marker.
Lines 780 to 860 Reads out the measurement parameter value (impedance) and the
sweep parameter value (frequency) at the marker on trace A and
displays them.
Lines 880 to 890 Prompts the user to determine whether to perform a measurement
again. If the
[y] key and the [Enter] key are pressed, returns to the
DUT connection part (line 570).
Example 13-1 Measuring the self-resonant point of a capacitor
10 DIM Adapter$[9],Meas_para$[5],Swp_para$[9],Swp_type$[9]
20 DIM Bw$[9],Fmt_a$[9],Fmt_b$[9],Spl_disp$[9]
30 DIM Buff$[9],Inp_char$[9]
40 REAL Start,Stop,Imp_val,Freq_val
50 INTEGER Scode,Result
60 CLEAR SCREEN
70 !
80 IF SYSTEM$("SYSTEM ID")="HP4294A" THEN
90 ASSIGN @Hp4294a TO 800
100 Scode=8
110 ELSE
120 ASSIGN @Hp4294a TO 717
130 Scode=7
140 END IF
150 !
160 Adapter$="OFF"
170 Meas_para$="IMPH"
180 Swp_para$="FREQ"
190 Swp_type$="LOG"
200 Start=100
210 Stop=1.0E+8
220 Bw$="2"
230 Fmt_a$="LOGY"
240 Fmt_b$="LINY"
250 Spl_disp$="ON"
260 !
270 ! Measurement Setting
280 !
290 OUTPUT @Hp4294a;"E4TP "&Adapter$
300 OUTPUT @Hp4294a;"PRES"
310 OUTPUT @Hp4294a;"MEAS "&Meas_para$
320 OUTPUT @Hp4294a;"SWPP "&Swp_para$
330 OUTPUT @Hp4294a;"SWPT "&Swp_type$
340 OUTPUT @Hp4294a;"STAR ";Start
350 OUTPUT @Hp4294a;"STOP ";Stop
360 OUTPUT @Hp4294a;"BWFACT "&Bw$
370 !
380 ! Fixture Compensation (Open/Short)
390 !
400 OUTPUT @Hp4294a;"ESNB 256"
410 OUTPUT @Hp4294a;"*SRE 4"
420 Result=FNFixt_comp(@Hp4294a,Scode,"Open")
430 IF Result<>0 THEN Prog_end
440 Result=FNFixt_comp(@Hp4294a,Scode,"Short")
450 IF Result<>0 THEN Prog_end
Page view 186
1 2 ... 182 183 184 185 186 187 188 189 190 191 192 ... 517 518

Comments to this Manuals

No comments