% on efface tout
clear all

% défauts
langue=1;	% anglais
nbmax=Inf;	% tous les nombres

% écran

fig=figure('Name','Les carrés alphamagiques',...
		   'Numbertitle','off',...
		   'resize','off',...
		   'position',[20 320 400 100]);
uicontrol(...
		   'string','Choisissez une langue:',...
		   'style','text',...
		   'position',[20 60 170 20]);
p_langue=uicontrol(...
		   'style','popup',...
           'string','Anglais|Français|Romand',...
		   'position',[200 20 100 60]);
uicontrol(...
		   'string','Nombre max (Inf=tous):',...
		   'style','text',...
		   'position',[20 20 170 20]);
e_nombre=uicontrol(...
		   'style','edit',...
		   'string','Inf',...
		   'position',[200 20 100 20]);
b_go=uicontrol(...		
           'style','push',...
		   'string','Go',...
		   'position',[320 20 60 20],...
		   'callback',['langue=get(p_langue,''value'');',...
		              'nbmax=str2num(get(e_nombre,''string''));',...
					  'calcAlpha(langue,nbmax)']);
b_fermer=uicontrol(...		
           'style','push',...
		   'string','Fermer',...
		   'position',[320 60 60 20],...
		   'callback','close all');		  
		   



