-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathcombineAE33data.m
More file actions
51 lines (44 loc) · 1.82 KB
/
combineAE33data.m
File metadata and controls
51 lines (44 loc) · 1.82 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
function combineAE33Data
%Setting
StartDate = '2016-01-01';
StopDate = '2016-01-20';
FileNameStartStr = 'AE33_AE33-S03-00286_';
%Generate File Name
StartDateNum = datenum(StartDate,'yyyy-mm-dd');
StopDateNum = datenum(StopDate,'yyyy-mm-dd');
curDate = StartDateNum;
%fileNameArr = {[FileNameStartStr datestr(curDate,'yyyymmdd') '.dat']};
fileNameArr = {};
while curDate<StopDateNum & strcmp(datestr(curDate,'yyyymmdd'),datestr(StopDateNum,'yyyymmdd'))~=1
fileNameArr(size(fileNameArr,2)+1) = {[FileNameStartStr datestr(curDate,'yyyymmdd') '.dat']};
curDate = addtodate(curDate, 1, 'day');
end
%Combine
saveFileName = ['CombinedFrom' datestr(StartDateNum,'yyyymmdd') 'to' datestr(StopDate,'yyyymmdd') '.txt'];
AllFileName = dir();
AllFileName = AllFileName(3:end);
for i=1:size(fileNameArr,2)
disp(['Processing ' char(fileNameArr(i))]);
for j=1:size(AllFileName,1)
try
if strcmp(fileNameArr(i),AllFileName(j).name) == 1
%Read Data
fid = fopen(char(fileNameArr(i)),'r');
textscan(fid,'%s',8,'delimiter','\n','collectoutput',1);
readText=textscan(fid,'%s','delimiter','\n','collectoutput',0);
fclose(fid);
%Write Data
fid = fopen(saveFileName,'a');
for k=1:size(readText{1},1)
fprintf(fid,'%s\r\n',char(readText{1}{k}));
end
fclose(fid);
break;
end
catch
disp(['error on finding ' fileNameArr(i) ' when try ' AllFileName(j).name]);
end
end
end
disp('Finish');
end