No BSD License
%script menu0 %ce menu peut tre modifi et utilis sans peine format compact; text = str2mat('1 : excution script1',... '2 : excution script2',... '3 : coucou',... 'autre : quitte'); cmd = str2mat('script1',... % script1.m doit exister 'script2',... % script2.m doit exister 'disp(''coucou''); pause'); nbopt = size(cmd, 1); while 1 clc; % efface la fentre de commande disp(text); x = input(' votre choix : '); if (x > nbopt) | (x < 1) break; end; eval(cmd(x,:)); end; disp('bye folks');
Contact us at files@mathworks.com