wavsave.asv

大学时候跟导师做的一个暂态电磁场数据分析的程序

function wavsave(filename,singalval,pulse)
% wavsave(filename,segoffset,len,singalval,pulse)
% File save,Optional choosing 
l=length(pulse);
if l>3
    fp=fopen([filename,'_.txt'],'w');
    fprintf(fp,'脉冲群【%7d，%7d】 群间隔：%6d div,群单个脉冲最大振幅%3.3f div\n',pulse');
    fprintf(fp,['\n最大振幅高于门槛值:',num2str(singalval),'div  的脉冲群共计有',num2str(l),'个。']);
    fclose(fp);
    disp(['...结果已保存在',filename,'.txt！']);
else
    disp(' ......保存失败！');
end