main_path = 'D:\\workspace\\haar_train\\tougue\\';
main_path_1 = 'D:\\workspace\\haar_train\\';
train_path = [main_path_1, 'info.txt'];
fid=fopen(train_path,'w');
fclose(fid);
dat = dir( main_path );
icount = 0;
for j = 1 : length( dat )
% If maindir(i) is not a dir, skip
if( isequal( dat( j ).name, '.' )||...
isequal( dat( j ).name, '..'))
continue;
end
icount = icount + 1;
end
%fid=fopen(train_path,'a+');
%fprintf(fid,'%d 1\n',icount);
%fclose(fid);
for j = 1 : length( dat )
% If maindir(i) is not a dir, skip
if( isequal( dat( j ).name, '.' )||...
isequal( dat( j ).name, '..'))
continue;
end
datapath = fullfile( main_path, dat( j ).name, '');
ss = size(strfind(datapath, 'Thumbs.db', 'ForceCellOutput',false));
if(ss(1) == 0)
datapath = fullfile( main_path, dat( j ).name, '');
if(1)
img=imread(datapath);
tt = (size(img));
%tt(1) = 96;
%tt(2) = 160;
%img1 = imresize(img, [tt(1) tt(2)]);
end
%clear img;
%imwrite(img1, datapath);
fid=fopen(train_path,'a+');
fprintf(fid,'tougue/%s 1 0 0 %d %d\n',dat( j ).name, tt(2)-1, tt(1)-1);
fclose(fid);
end
end
%neg
main_path = 'D:\\workspace\\haar_train\\other\\';
train_path = [main_path_1, 'infofile.txt'];
fid=fopen(train_path,'w');
fclose(fid);
dat = dir( main_path );
icount = 0;
for j = 1 : length( dat )
%for j = 1 : 5000
% If maindir(i) is not a dir, skip
if( isequal( dat( j ).name, '.' )||...
isequal( dat( j ).name, '..'))
continue;
end
icount = icount + 1;
end
%fid=fopen(train_path,'a+');
%fprintf(fid,'%d 1\n',icount);
%fclose(fid);
%for j = 1 : length( dat )
for j = 1 : 5000
% If maindir(i) is not a dir, skip
if( isequal( dat( j ).name, '.' )||...
isequal( dat( j ).name, '..'))
continue;
end
datapath = fullfile( main_path, dat( j ).name, '');
ss = size(strfind(datapath, 'Thumbs.db', 'ForceCellOutput',false));
if(ss(1) == 0)
datapath = fullfile( main_path, dat( j ).name, '');
img=imread(datapath);
tt = (size(img));
fid=fopen(train_path,'a+');
fprintf(fid,'%s%s\n','D:/workspace/haar_train/other/',dat( j ).name);
fclose(fid);
end
end
main_path_1 = 'D:\\workspace\\haar_train\\';
train_path = [main_path_1, 'info.txt'];
fid=fopen(train_path,'w');
fclose(fid);
dat = dir( main_path );
icount = 0;
for j = 1 : length( dat )
% If maindir(i) is not a dir, skip
if( isequal( dat( j ).name, '.' )||...
isequal( dat( j ).name, '..'))
continue;
end
icount = icount + 1;
end
%fid=fopen(train_path,'a+');
%fprintf(fid,'%d 1\n',icount);
%fclose(fid);
for j = 1 : length( dat )
% If maindir(i) is not a dir, skip
if( isequal( dat( j ).name, '.' )||...
isequal( dat( j ).name, '..'))
continue;
end
datapath = fullfile( main_path, dat( j ).name, '');
ss = size(strfind(datapath, 'Thumbs.db', 'ForceCellOutput',false));
if(ss(1) == 0)
datapath = fullfile( main_path, dat( j ).name, '');
if(1)
img=imread(datapath);
tt = (size(img));
%tt(1) = 96;
%tt(2) = 160;
%img1 = imresize(img, [tt(1) tt(2)]);
end
%clear img;
%imwrite(img1, datapath);
fid=fopen(train_path,'a+');
fprintf(fid,'tougue/%s 1 0 0 %d %d\n',dat( j ).name, tt(2)-1, tt(1)-1);
fclose(fid);
end
end
%neg
main_path = 'D:\\workspace\\haar_train\\other\\';
train_path = [main_path_1, 'infofile.txt'];
fid=fopen(train_path,'w');
fclose(fid);
dat = dir( main_path );
icount = 0;
for j = 1 : length( dat )
%for j = 1 : 5000
% If maindir(i) is not a dir, skip
if( isequal( dat( j ).name, '.' )||...
isequal( dat( j ).name, '..'))
continue;
end
icount = icount + 1;
end
%fid=fopen(train_path,'a+');
%fprintf(fid,'%d 1\n',icount);
%fclose(fid);
%for j = 1 : length( dat )
for j = 1 : 5000
% If maindir(i) is not a dir, skip
if( isequal( dat( j ).name, '.' )||...
isequal( dat( j ).name, '..'))
continue;
end
datapath = fullfile( main_path, dat( j ).name, '');
ss = size(strfind(datapath, 'Thumbs.db', 'ForceCellOutput',false));
if(ss(1) == 0)
datapath = fullfile( main_path, dat( j ).name, '');
img=imread(datapath);
tt = (size(img));
fid=fopen(train_path,'a+');
fprintf(fid,'%s%s\n','D:/workspace/haar_train/other/',dat( j ).name);
fclose(fid);
end
end