close all;\r
clear all;\r
+oldpath = addpath('./functions');\r
\r
% User dialog for the data directory used for files\r
\r
DirectoryName = get_data_dir();\r
\r
if DirectoryName == 0\r
+ path(oldpath);\r
return\r
end\r
\r
[Selected,OK] = listdlg('ListString',list,'ListSize',[200 500]);\r
SelectedDirectory = list(Selected)';\r
if isempty(SelectedDirectory)\r
+ path(oldpath);\r
return\r
end\r
nSelectedDirectory = numel(SelectedDirectory);\r
%}\r
\r
mask = load_mask();\r
+if (mask == 0)\r
+ path(oldpath);\r
+ return\r
+end\r
+\r
meter = load_meter();\r
+if (meter == 0)\r
+ path(oldpath);\r
+ return\r
+end\r
\r
FileType = '*.png';\r
\r
mn = menu('May the computation proceed with this mask?', 'Yes', 'No');\r
if (mn == 2)\r
close all\r
+ path(oldpath);\r
return\r
end\r
main_wb = waitbar(0, 'Whole processing progress');\r
\r
end\r
close(main_wb);\r
+path(oldpath);\r
clear all
+oldpath = addpath('./functions');
FileType = '*.png';
if (mask_file_name ~= 0)
imwrite(mask, [mask_path '/' mask_file_name], 'PBM', 'Encoding', 'raw');
end
+path(oldpath);
clear all
+oldpath = addpath('./functions');
last_path = get_last_path();
[filenames, path] = uigetfile([last_path '/*.mtr'], ...
if (mask_file_name ~= 0)
save_meter([meter_path '/' meter_file_name], meter)
end
+path(oldpath);
path = get_last_path();
[mask_file path] = uigetfile([path '/*.pbm'],...
'Select a mask for this batch');
+ if (mask_file == 0)
+ mask = 0;
+ return
+ end
mask = double(imread([path '/' mask_file]));
end
path = get_last_path();
[meter_file path] = uigetfile([path '/*.mtr'],...
'Select a meter for this batch');
+ if (meter_file == 0)
+ meter = 0;
+ return
+ end
coefs = readmatrix([path '/' meter_file], 'FileType', 'text');
meter = @(pix)polyval(coefs, pix);
end