Programming
Programming Examples
Programming Examples
Example 1 | Example 1 is applicable to CW measurements. | ||
1001 | ! |
|
|
1002 | ! |
|
|
1003 | ! |
|
|
1004 | Example_1:! |
|
|
1005 | ! |
|
|
1006 | ! This example shows how to make | ||
1007 | ! measurements using the HP 85330A and the FAST DATA modes of the HP 8530A | ||
1008 | ! Microwave Receiver. |
|
|
1009 | ! |
|
|
1010 | ! It uses the HP BASIC/WS TRANSFER command to read data from the receiver | ||
1011 | ! The HP BASIC command ENTER may also be used. | ||
1012 | ! |
|
|
1013 | INTEGER Data_f1(1:32000,0:2) BUFFER | ! DATA FROM RECEIVER IN FORMAT FORM1. | |
1014 | DIM Err_str$[128] |
|
|
1015 | ! |
|
|
1016 | Build_table:! |
|
|
1017 | ! |
|
|
1018 | ALLOCATE REAL Exp_tbl(0:255) |
| |
1019 | ! |
|
|
1020 | ! Build the FORM1 to FORM3 coversion table. During the FAST DATA | ||
1021 | ! aquisition from the HP 8530A data translation is need to conver the | ||
1022 | ! 6 bytes read from the receiver to a data point consiting of a | ||
1023 | ! real and imaginary pair. |
| |
1024 | ! |
|
|
1025 |
|
| |
1026 | FOR N=0 TO 126 |
|
|
1027 | Exp_tbl(N+1)=Exp_tbl(N)+Exp_tbl(N) |
| |
1028 | NEXT N |
|
|
1029 |
|
| |
1030 | FOR N=128 TO 254 |
|
|
1031 | Exp_tbl(N+1)=Exp_tbl(N)+Exp_tbl(N) |
| |
1032 | NEXT N |
|
|
1033 | ! |
|
|
1034 | Set_vars:! |
|
|
1035 | ! |
|
|
1036 | ! Set variables |
|
|
1037 | ! |
|
|
1038 | Scu_addr=0 |
| ! SCU address |
85330A Multiple Channel Controller |