dispconsole

 uniformizes display for the console mode version

  INPUT
   1 -> line
   2 -> border
   3 -> border-line-border
   4 -> text (text,start)
   5 -> text-text-text-text-border

  OUTPUT
   output      uniformized display for the terminal


 $Id: dispconsole.m,v 1.2 2004/05/15 22:47:19 dalai Exp $

0001 % uniformizes display for the console mode version
0002 %
0003 %  INPUT
0004 %   1 -> line
0005 %   2 -> border
0006 %   3 -> border-line-border
0007 %   4 -> text (text,start)
0008 %   5 -> text-text-text-text-border
0009 %
0010 %  OUTPUT
0011 %   output      uniformized display for the terminal
0012 %
0013 %
0014 % $Id: dispconsole.m,v 1.2 2004/05/15 22:47:19 dalai Exp $
0015 
0016 function output = dispconsole(varargin)
0017 
0018 % standard linux console width
0019 width = 80;
0020 
0021 for i=1:nargin
0022     if isempty(varargin{i})
0023         varargin{i} = ' ';
0024     end
0025 end 
0026 
0027 symb = cell2mat(varargin);
0028 
0029 output = repmat(char(32),1,width);
0030 
0031 if nargin == 1
0032     output = [repmat(symb(1,:),1,width/length(symb(1,:)))];
0033 end
0034 
0035 if nargin == 2
0036     output(1:length(varargin{1})) = varargin{1};
0037     output(width-length(varargin{2})+1:width) = varargin{2};
0038 end
0039 
0040 
0041 if nargin == 3
0042     output = dispconsole(varargin{2});
0043     output(1:length(varargin{1})) = varargin{1};
0044     output(width-length(varargin{3})+1:width) = varargin{3};
0045 end
0046 
0047 if nargin == 4
0048     output = dispconsole(varargin{1},' ',varargin{4});
0049     output(length(varargin{1})+1:length(varargin{1})+length(varargin{2})) = varargin{2};
0050     output(width/2+1:width/2+length(varargin{3})) = varargin{3};
0051 end
0052 
0053 if nargin == 5
0054     output = dispconsole(varargin{1},' ',varargin{5});
0055     output(length(varargin{1})+2:length(varargin{1})+length(varargin{2})+1) = varargin{2};
0056     output(3*width/4) = varargin{3};
0057     output(3*width/4+2:3*width/4+length(varargin{4})+1) = varargin{4};
0058 end