annotate aim-mat/tools/getargument.m @ 4:537f939baef0 tip

various bug fixes and changed copyright message
author Stefan Bleeck <bleeck@gmail.com>
date Tue, 16 Aug 2011 14:37:17 +0100
parents 20ada0af3d7d
children
rev   line source
tomwalters@0 1 % tool
tomwalters@0 2 %
tomwalters@0 3 % INPUT VALUES:
tomwalters@0 4 %
tomwalters@0 5 % RETURN VALUE:
tomwalters@0 6 %
tomwalters@0 7 %
bleeck@3 8 % (c) 2011, University of Southampton
bleeck@3 9 % Maintained by Stefan Bleeck (bleeck@gmail.com)
bleeck@3 10 % download of current version is on the soundsoftware site:
bleeck@3 11 % http://code.soundsoftware.ac.uk/projects/aimmat
bleeck@3 12 % documentation and everything is on http://www.acousticscale.org
bleeck@3 13
tomwalters@0 14
tomwalters@0 15 function str=getargument(source,search)
tomwalters@0 16 % usage: str=getargument(source,search)
tomwalters@0 17 % searchs in the pairs of parameters 'param','value' for the argument and returns the value as string
tomwalters@0 18 % source must be a even number of input parameters
tomwalters@0 19
tomwalters@0 20 % for compatibility with old version
tomwalters@0 21 if ~isfield(source,'name')
tomwalters@0 22 nr=size(source,2); % so many pairs
tomwalters@0 23 for i=1:nr
tomwalters@0 24 param=source(i);
tomwalters@0 25 if strcmp(param,search)
tomwalters@0 26 str= source(i+1);
tomwalters@0 27 return
tomwalters@0 28 end
tomwalters@0 29 end
tomwalters@0 30 str{1}='';
tomwalters@0 31 return
tomwalters@0 32
tomwalters@0 33 else
tomwalters@0 34
tomwalters@0 35 % new version is much more elegant
tomwalters@0 36 nr=size(source.name,2); % so many pairs
tomwalters@0 37 for i=1:nr
tomwalters@0 38 param=source.name{i};
tomwalters@0 39 if strcmp(param,search)
tomwalters@0 40 str=source.argument{i};
tomwalters@0 41
tomwalters@0 42 % if the argument is put into "[]" then remove them
tomwalters@0 43 return
tomwalters@0 44 end
tomwalters@0 45 end
tomwalters@0 46 end
tomwalters@0 47 str='';
tomwalters@0 48 return
tomwalters@0 49
tomwalters@0 50