simulhope

 SiMulHopE : Simple Multi-Hops Emulator / Simulator of Multi-Hops Environments 

    - sets or removes the paths to the required functions
    - sets simulhope's home directory
    - launches the 


 $Id: simulhope.m,v 1.31 2004/07/15 11:41:52 dalai Exp $

0001 % SiMulHopE : Simple Multi-Hops Emulator / Simulator of Multi-Hops Environments
0002 %
0003 %    - sets or removes the paths to the required functions
0004 %    - sets simulhope's home directory
0005 %    - launches the
0006 %
0007 %
0008 % $Id: simulhope.m,v 1.31 2004/07/15 11:41:52 dalai Exp $
0009 
0010 function simulhope(rem)
0011 
0012 clear all; clc;
0013 
0014 dir = pwd;
0015 
0016 str{1} = [dir];
0017 str{2} = [dir '/simulhope'];
0018 str{3} = [dir '/simulhope/console'];
0019 str{4} = [dir '/simulhope/init'];
0020 str{5} = [dir '/simulhope/parameters'];
0021 str{6} = [dir '/simulhope/user'];
0022 str{7} = [dir '/simulhope/transmit'];
0023 str{8} = [dir '/simulhope/stat'];
0024 str{9} = [dir '/simulhope/plot'];
0025 str{10} = [dir '/simulhope/tools'];
0026 str{11} = [dir '/simulhope/export'];
0027 str{12} = [dir '/simulhope/hosts'];
0028 
0029 
0030 for j = 1:length(str)
0031     if (nargin == 0)
0032         addpath(str{j});
0033     else
0034         rmpath(str{j});
0035     end
0036 end
0037 
0038 if (nargin == 0)
0039 
0040 disp(dispconsole('|','=','|'));
0041 disp(dispconsole('|==','                      S  I  M  U  L ','H  O  P  E         v2.0','==|'));
0042 disp(dispconsole('|','=','|'));
0043 disp(dispconsole('|','simulhope home directory is',':',dir,'|'));
0044 disp(dispconsole('|','simulhope paths',':','set','|'));
0045 disp(dispconsole('|','-','|'));
0046 
0047 ui = input('| GUI(1), batch simulations(2), customed simulation(3) or stop (default) ? ','s');
0048 
0049 switch (ui)
0050     case '1'
0051         disp(dispconsole('|','user interface selected',':','GUI','|'));
0052         disp(dispconsole('|','-','|'));
0053         simulhope_gui(ui,dir);
0054     case '2'
0055         disp(dispconsole('|','user interface selected',':','batch mode','|'));
0056         disp(dispconsole('|','-','|'));
0057         simulhope_grid(ui,dir);
0058     case '3'
0059         disp(dispconsole('|','user interface selected',':','customed mode','|'));
0060         disp(dispconsole('|','-','|'));
0061         simulhope_grid(ui,dir);
0062     otherwise
0063         disp(dispconsole('|','simulhope',':','stopped','|'));
0064         disp(dispconsole('|','-','|'));
0065 end
0066 
0067 end