读取MICAPS tlogp格式数据

daveryjl

%read upper plot data from micaps,Read diamond 5 format
%利用三角插值方法，计算指定层上的高度
function [Pointv,pn]=ReadTlogPData(filename,Pointxy,ps)
%filename 文件名称　存放文件名称，全路径文件名
%Pointxy  点的结构　存放站号，经、纬度，Pointxy().stcode,Pointxy().lon,Pointxy().lat
%Pointv   返回的点数据(cell)，存放点的站号，经、纬度，要素值；　pn返回的站点数量
%tlogpv   存放文件中所有站点的站号、经纬度以及所有层次的要素值
infile=fopen(filename,'r');
if infile==-1
    pn=-1;
    Pointv=0;
    return;
end
fseek(infile,0,'eof');
fsize=ftell(infile);
if fsize==0
    pn=-1;
    Pointv=0;
    fclose(infile);
    return;
else
    fseek(infile,0,'bof');
end

香草拿铁

赞！！！！！！

刀客白刃

你好，请问你这个脚本有没有范例

Ｏrz

看起来不错