ylj_fileheader.m

来自「变压器局部放电实验数据处理matlab程序」· M 代码 · 共 39 行

function [changdu,zengyi,pianyi,jiange]=ylj_fileheader(filein)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%此函数用于读取wavepro7100的2进制文件头参数
%返回4个参数：采样长度，增益，偏移量，时间间隔
%ylj  2005.6.9
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
fid=fopen(filein);
z=fread(fid,367,'uchar');%将文件数据读入数组Z，   无符号数，z是十进制；

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
z1=dec2hex(z(75:-1:72));%将十进制的z(72:75)转换为16进制z1；
z2=strcat(z1(1,1),z1(1,2),z1(2,1),z1(2,2),z1(3,1),z1(3,2),z1(4,1),z1(4,2));%变为16进制字符串z2;
format short
z3=hex2dec(z2);%z3为采样点长度
changdu=z3;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%以上采样长度计算changdu

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%5
zengyi1=dec2hex(z(171:-1:168),2);%将十进制的z(168:171)转换为16进制zengyi1；
zengyi2=strcat(zengyi1(1,1),zengyi1(1,2),zengyi1(2,1),zengyi1(2,2),zengyi1(3,1),zengyi1(3,2),zengyi1(4,1),zengyi1(4,2));%变为16进制字符串zengyi2;
format long
zengyi3=ylj_hex2num(zengyi2);%
zengyi=zengyi3;%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%以上增益计算zengyi

pianyi1=dec2hex(z(175:-1:172),2);%将十进制的z(168:171)转换为16进制zengyi1；
pianyi2=strcat(pianyi1(1,1),pianyi1(1,2),pianyi1(2,1),pianyi1(2,2),pianyi1(3,1),pianyi1(3,2),pianyi1(4,1),pianyi1(4,2));%变为16进制字符串zengyi2;
format long
pianyi3=ylj_hex2num(pianyi2);%
pianyi=pianyi3;%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%以上偏移计算pianyi

jiange1=dec2hex(z(191:-1:188),2);%将十进制的z(168:171)转换为16进制zengyi1；
jiange2=strcat(jiange1(1,1),jiange1(1,2),jiange1(2,1),jiange1(2,2),jiange1(3,1),jiange1(3,2),jiange1(4,1),jiange1(4,2));%变为16进制字符串zengyi2;
format long
jiange3=ylj_hex2num(jiange2);%
jiange=jiange3;%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%以上间隔计算jiange
fclose(fid);