www.gusucode.com > MATLAB雷达工具箱 > MATLAB雷达工具箱/MATLAB雷达工具箱/dbtlinkR1-3/dbtlinkversion.m
function versionNo = dbtlinkversion(dispOpt) %DBTLinkVERSION Prints on the screen or returns the number of this release of DBTLink. % %-------- %Synopsis: % % versionNo = dbtlinkversion(dispOpt) % %Description: % Prints on the screen or returns the version number of this release of DBTLink. % %Output and Input: % versionNo (StringT): The version number of this release of DBTLink. % dispOpt [D](StringT): Display options. % = 'n': Don't print on screen. % = 'p': Print on screen. % %-------- %Notations: % Data type names are shown in parentheses and they start with a capital % letter and end with a capital T. Data type definitions can be found in [1] % or by "help dbtdata". % [D] = This parameter can be omitted and then a default value is used. % When the [D]-input parameter is not the last used in the call, it must be % given the value [], i.e. an empty matrix. % ... = There can be more parameters. They are explained under respective % metod or choice. % %References: % %See Also: % ***************************************************************************** % * DBT, A Matlab Toolbox for Radar Signal Processing * % (c) FOA 1994-2000. See the file dbtright.m for copyright notice. % % Start : 990314 Svante Bj鰎klund (svabj). % Latest change: $Date: 2000/10/16 16:31:36 $ $Author: svabj $. % $Revision: 1.1 $ % ***************************************************************************** % ----------------------------------------------------------------------- % % The version number constant. % % This constant must be changed just before tagging a new release in DBT. % ----------------------------------------------------------------------- % %verNoVar = 'R2-18'; % ----------------------------------------------------------------------- % % Handle input parameters. % ----------------------------------------------------------------------- % if (nargin < 0) error('DBT-Error: To few input parameters.') end % ****************** Add missing input parameters ****************** if (nargin < 1) dispOpt = []; end % ****************** Default values ****************** if isempty(dispOpt) dispOpt = '-'; end%if % ****************** Error check input parameters ****************** % ----------------------------------------------------------------------- % % Do the work. % ----------------------------------------------------------------------- % versionFile = 'dbtlinkver.txt'; if (exist(versionFile) == 2) fid=fopen(versionFile); verNoVar = fgetl(fid); fclose(fid); else dbterror(['Version file', versionFile,' does not exist.']) end%if if ((((nargout > 0) & (dispOpt == 'p')))| ((nargout == 0) & (dispOpt ~= 'n'))) fprintf('DBT, A Matlab Toolbox for Radar Signal Processing, Release %s\n',verNoVar) end%if % ****************** Output parameters ****************** if (nargout > 0) versionNo = verNoVar; end%if