
2350
OUTPUT
@E5100;"UPDD
ON"
2360
EXECUTE
"SING"
2370
!
2380
WAIT
Wait_check
2390
!
2400
OUTPUT
@E5100;"UPDD
OFF"
2410
OUTPUT
@E5100;"CHAN2"
2420
OUTPUT
@E5100;"UPDD
ON"
2430
EXECUTE
"SING"
2440
!
2450
GOSUB
Analysis
2460
GOSUB
Printing
2470
END
LOOP
2480
!
2490
RETURN
2500
!
2510
!
***************************************
2520
!
2530
Analysis:
!
2540
EXECUTE
"OUTPRESO?"
2550
Ci=READIO(8,0)
2560
Fr=READIO(8,1)
2570
RETURN
2580
!
2590
!
2600
Printing:
!
2610
CLEAR
SCREEN
2620
USING
"25A,4D.8D,6A";"RESONANT
FREQUENCY
";Fr/1.E+6;"
(MHz)"
2630
USING
"25A,5X,6D.D,6A";"RESONANT
RESISTANCE
";Ci;"
(ohm)"
2640
RETURN
2650
!
2660
!
2670
!
2680
!
***************
CALIBRATION
*******************
2690
!
2700
Pi_cal:
!
2710
!
2720
OUTPUT
@E5100;";DISAHIHB"
4480
!
4811
DISP
"Leave
fixture
open,then
press
'continue'."
4812
PAUSE
4820
OUTPUT
@E5100;"CLASS11A;*OPC?"
4830
ENTER
@E5100;Opc
4860
!
4871
DISP
"Connect
short
bar
,then
press
'continue'."
4872
PAUSE
4880
OUTPUT
@E5100;"CLASS11B;*OPC?"
4890
ENTER
@E5100;Opc
4920
!
4931
DISP
"Connect
load,then
press
'continue'."
4932
PAUSE
4940
OUTPUT
@E5100;"CLASS11C;*OPC?"
4950
ENTER
@E5100;Opc
4980
!
5070
OUTPUT
@E5100;"SAV1"
5080
DISP
""
5090
RETURN
5100
!
5190
END
G-8
Option
022
Summary of Contents for E5100A
Page 1: ...Agilent E5100A B Network Analyzer Programming Manual ...
Page 2: ......
Page 5: ...c Copyright 1995 1996 1997 1998 2000 2001 Agilent Technologies Japan Ltd ...
Page 8: ......
Page 36: ......
Page 46: ......
Page 48: ...Figure 3 1 Simpli ed Data Processing Flow 1 3 2 Data Processing and T ransfer ...
Page 58: ......
Page 76: ......
Page 112: ......
Page 232: ......
Page 246: ......
Page 250: ......
Page 299: ...110 END Waveform Analysis Commands D 49 ...
Page 302: ......
Page 322: ......
Page 350: ......
Page 352: ......
Page 362: ......
Page 368: ......
Page 372: ......