Mercurial > hg > smallbox

comparison Problems/generatePierreProblem.m @ 220:0d30f9074dd9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge
author luisf <luis.figueira@eecs.qmul.ac.uk>
date Wed, 11 Apr 2012 15:56:39 +0100
parents 9c418bea7f6a
children 8768cefe5753
comparison
equal deleted inserted replaced
165:775caafd5651 220:0d30f9074dd9
43 % ask for source file name 43 % ask for source file name
44 44
45 TMPpath=pwd; 45 TMPpath=pwd;
46 FS=filesep; 46 FS=filesep;
47 if ~ exist( 'src', 'var' ) || isempty(src) 47 if ~ exist( 'src', 'var' ) || isempty(src)
48 [pathstr1, name, ext, versn] = fileparts(which('SMALLboxSetup.m')); 48 [pathstr1, name, ext] = fileparts(which('SMALLboxSetup.m'));
49 cd([pathstr1,FS,'data',FS,'images']); 49 cd([pathstr1,FS,'data',FS,'images']);
50 [filename,pathname] = uigetfile({'*.png;'},'Select a source image'); 50 [filename,pathname] = uigetfile({'*.png;'},'Select a source image');
51 [pathstr, name, ext, versn] = fileparts(filename); 51 [pathstr, name, ext] = fileparts(filename);
52 data.srcname=name; 52 data.srcname=name;
53 src = imread(filename); 53 src = imread(filename);
54 src = double(src); 54 src = double(src);
55 end; 55 end;
56 56
57 % ask for target file name 57 % ask for target file name
58 58
59 if ~ exist( 'trg', 'var' ) || isempty(trg) 59 if ~ exist( 'trg', 'var' ) || isempty(trg)
60 [filename,pathname] = uigetfile({'*.png;'},'Select a target image'); 60 [filename,pathname] = uigetfile({'*.png;'},'Select a target image');
61 [pathstr, name, ext, versn] = fileparts(filename); 61 [pathstr, name, ext] = fileparts(filename);
62 data.trgname=name; 62 data.trgname=name;
63 trg = imread(filename); 63 trg = imread(filename);
64 trg = double(trg); 64 trg = double(trg);
65 end; 65 end;
66 cd(TMPpath); 66 cd(TMPpath);