雷达数据读取

%读数据一个基数据共4028个径向，每个径向2432字节，共976096字节。
[FileNamePathName] = uigetfile（‘*.*A‘‘选择需要读入的数据文件‘）;%选择数据
fid=fopen（strcat（PathNameFileName）‘r‘）;
A = fread（fid‘uchar‘）;
B=zeros（24324028）;%预先分配内存给大型数据，否则放在for循环中分配很慢。
for a=1:4028
    b=1:2432;
    B（ba）=A（b+（a-1）*2432）;
end  
%XLSWRITE（‘C:\MATLAB701\work\myworkbook.xls‘B）;
%C=B（:1:100）;
%B2=B（1:24321200:1300）
switch B（731）
    case 11
        phi=[0.500.501.451.452.403.354.305.256.27.58.710121416.719.5]
    case 21
        phi=[0.500.501.451.452.403.354.306.009.0014.619.5]
    case 31
        phi=[0.500.501.501.502.502.503.504.50]
    case 32
        phi=[0.500.502.503.504.50]
end
f1=1;
g1=zeros（4028460）;
h1=zeros（4028460）;
i1=zeros（4028460）;
j1=zeros（4028460）;
for a1=1:4028
    b1=B（45a1）+256*B（46a1）;%仰角序数
    c1=（B（37a1）+256*B（38a1））/8*180/4096*2*pi/360;%方位角
    d1=B（55a1）+256*B（56a1）;%径向库
    if d1==0
       continue
    end
    for e1=1:460
        g1（a1e1）=phi（b1）*2*pi/360;%仰角
        h1（a1e1）=c1;%方位角
        i1（a1e1）=0.5+e1-1;%径向
%反射率
    if e1>d1
    j1（a1e