Agilent Technologies Multiple Channel Controller 85330A - Manual (Page 103)

85330A Multiple Channel Controller 6-29
Programming
Programming Examples
Example 3 Example 3 applies to measurements where the 85330A controls the sources,
using Fast Source Control mode
.
1001 !
1002 ! RE-SAVE “EX3”
1003 !
1004 Example_3:!
1005 !
1006 ! This example shows how to make multi-frequency, multi-channel
1007 ! measurements using the HP 85330A and the FAST DATA modes of the HP 8530A
1008 ! Microwave Receiver. In this mode the sources are setup by the computer
1009 ! rather than under control of the HP 8530A microwave receiver.
1010 !
1011 ! It uses the HP BASIC/WS TRANSFER command to read data from the receiver
1012 ! The HP BASIC command ENTER may also be used.
1013 !
1014 DIM Err_str$[128]
1015 INTEGER Data_f1(1:32000,0:2) BUFFER ! DATA FROM RECEIVER IN FORMAT FORM1.
1016 !
1017 Build_table:!
1018 !
1019 ALLOCATE REAL Exp_tbl(0:255)
1020 !
1021 ! Build the FORM1 to FORM3 coversion table. During the FAST DATA
1022 ! aquisition from the HP 8530A data translation is need to conver the
1023 ! 6 bytes read from the receiver to a data point consiting of a
1024 ! real and imaginary pair.
1025 !
1026 Exp_tbl(0)=2^(-15)
1027 FOR N=0 TO 126
1028 Exp_tbl(N+1)=Exp_tbl(N)+Exp_tbl(N)
1029 NEXT N
1030 Exp_tbl(128)=2^(-143)
1031 FOR N=128 TO 254
1032 Exp_tbl(N+1)=Exp_tbl(N)+Exp_tbl(N)
1033 NEXT N
1034 !
1035 Set_vars:!
1036 !
1037 ! Set variables
1038 !
1039 Scu_addr=0 ! SCU address
1040 Chan_start=1 ! First Channel
1041 Chan_stop=4 ! Last Channel
1042 Chan_pts=(Chan_stop-Chan_start)+1 ! Number of channels
1043 Switch_start=Scu_addr*100+Chan_start ! Starting SWITCH ADDRESS
1044 Switch_stop=Scu_addr*100+Chan_stop ! Ending SWITCH ADDRESS