
Programming
Examples
2853
LOOP
2855
STATUS
@Buffer,4;Data_pointer
2857
!!
SINCE
WE
ARE
MAKING
TWO
MEASUREMENTS
AT
A
TIME,
THE
DISPLAY
IS
ONLY
UPDATED
WHEN
2859
!!
THE
DATA
POINTER
IS
POINTING
TO
THE
END
OF
A
NEW
PAIR
OF
MEASUREMENTS.
THIS
2861
!!
TECHNIQUE
SKIPS
A
LOT
OF
DATA
DURING
FAST
MEASUREMENTS,
BUT
ALLOWS
THE
DISPLAY
2863
!!
TO
KEEP
UP
WITH
THE
DATA
FLOW.
2865
IF
Data_pointer
MOD
12=0
THEN
2867
IF
Data_pointer>Old_pointer
THEN
2869
Old_pointer=Data_pointer
2871
!!
2873
!!!
THE
FOLLOWING
LOOP
CONVERTS
TWO
MEASUREMENTS
FROM
THE
8530
COMPRESSED
FORMAT
2875
!!!
TO
BASIC
COMPLEX
VALUES.
IT
THEN
CALCULATES
THE
MAGNITUDE
AND
PHASE
OF
EACH
2877
!!!
MEASUREMENT
AND
UPDATES
THE
DISPLAY
2879
!!
2881
FOR
Param_pointer=1
TO
2
2883
Data_pointer=Old_pointer-6*(2-Param_pointer)
2885
Exp=Exp_tbl(BINAND(Data_buffer(Data_pointer/2),255))
2887
Data_set(Param_pointer)=CMPLX(Data_buffer(Data_pointer/2- 1)*Exp,Data_buffer
(Data_pointer/2-2)*Exp)
2889
Log_mag(Param_pointer)=20*LGT(ABS(Data_set(Param_pointer) ))
2891
Phase(Param_pointer)=ARG(Data_set(Param_pointer))
2893
OUTPUT
Display$
USING
"""|"",2(2X,S3D.2D,2X,""|""),#";Log_mag(Param_pointer),
Phase(Param_pointer)
2895
TABXY(1+25*(Param_pointer-1),17),Display$
2897
NEXT
Param_pointer
2899
Data_pointer=Old_pointer
2901
!!
2903
!!
NOW
THE
CURRENT
MEASUREMENT
COUNT
2905
!!
2907
TABXY(5+25*(Param_pointer-1),17);Data_pointer/12+5000*Rep s
2909
END
IF
2911
END
IF
2913
EXIT
IF
Data_pointer/12=5000
!
THE
BUFFER
IS
RE-INITIALIZED
TO
PREVENT
OVERFLOW
2915
END
LOOP
2917
Reps=Reps+1
2919
ASSIGN
@Buffer
TO
*
2921
END
LOOP
2923
Finished:
!
2925
DISP
"CLEARING
I/O
CHANNEL
AND
RE-SETTING
8530A"
2927
ABORTIO
@A8530_data
!
TURN
OFF
THE
TRANSFER
2929
ASSIGN
@Buffer
TO
*
2931
OUTPUT
@A8530_control;"SING"
!
TURN
OFF
FAST
MUX
MODE
2933
OUTPUT
@A8530_control;"RECA8"
!
PUT
8530A
IN
STANDARD
STATE
2935
FOR
N=0
TO
9
2937
OFF
KEY
N
2939
NEXT
N
2941
WAIT
1
2943
ABORT
7
2945
CLEAR
7
2947
LOCAL
@A8530_control
!
PUT
8530A
IN
LOCAL
2949
DISP
""
2951
SUBEXIT
2953
Build_table:
!
USED
FOR
DATA
CONVERSION
2955
!
2957
Exp_tbl(0)=2^(-15)
HP-IB
Programming
18-59
Содержание 8530A
Страница 9: ......
Страница 31: ......
Страница 34: ...General Information Figure 1 2 Antenna Measurement Setup Using an HP 85310A GeneralInformation 1 3 ...
Страница 51: ......
Страница 65: ......
Страница 81: ......
Страница 83: ......
Страница 84: ...5 Menus Block Chapter Contents Calibration Domain Display Markers MenusBlock 5 1 ...
Страница 85: ...5 2 Menus Block ...
Страница 90: ...Calibration Requirements Figure 5 1 Cal and Cal Type Menus MenusBlock 5 7 ...
Страница 93: ...Antenna Calibration 5 10 MenusBlock ...
Страница 167: ......
Страница 195: ......
Страница 201: ......
Страница 209: ......
Страница 249: ......
Страница 281: ......
Страница 411: ......
Страница 419: ...Glossary Glossary 8 ...
Страница 439: ......