fid=fopen('battery.txt');
i=1;
while 1
            tline = fgetl(fid);
            if ~ischar(tline), break, end
year(i)=str2num(tline(9:12));
mo(i)=str2num(tline(13:14));
day(i)=str2num(tline(15:16));
hour(i)=str2num(tline(18:19));
min(i)=str2num(tline(21:22));
%t(i)=datenum(year,mo,day,hour,min,0)-datenum(2002,1,1);
H(i)=str2num(tline(35:38));
i=i+1;
end
fclose(fid);
tm=datenum(year,mo,day,hour,min,0);
save Bat_2004  tm H;