
%  


%   This software is protected by german copyright and international treaties.             
%   Copyright 2004 Markus Junghöfer & Peter Peyk. All Rights Reserved.                     
%                                                                                          
%   THIS SOFTWARE AND DOCUMENTATION IS PROVIDED "AS IS," AND COPYRIGHT HOLDERS MAKE        
%   NO REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO,    
%   WARRANTIES OF MERCHANTABILITY OR FITNESS FOR ANY PARTICULAR PURPOSE OR THAT THE USE    
%   OF THE SOFTWARE OR DOCUMENTATION WILL NOT INFRINGE ANY THIRD PARTY PATENTS, COPYRIGHTS,
%   TRADEMARKS OR OTHER RIGHTS. COPYRIGHT HOLDERS WILL NOT BE LIABLE FOR ANY DIRECT,       
%   INDIRECT, SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF ANY USE OF THE SOFTWARE      
%   OR DOCUMENTATION.   

clear all;
global selectfilemonitor faktorstring anzahlfaktoren            

faktorstring = cell(1);
anzahlfaktoren = 1;

a = figure('Color',[0.8 0.8 0.8], ...
    'Name','Selectitems', ...
    'Menubar','none',...
	'Position',[170 492 595 180], ...
	'Tag','Fig1',...
    'NumberTitle','off');
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.9 0.8 0.3], ...
	'Position',[0 0 500 500], ...
	'Style','frame', ...
	'Tag','Frame1');


addbutton = uicontrol('Parent',a, ...
	'Units','points', ...
	'Position',[250 35 25 45], ...
	'String','-->', ...
     'Enable','off',...
	'Tag','addbutton');

faktorenanzahledit = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[15 95 75 15], ...
	'Style','edit', ...
    'String','',...
    'Callback','[faktorstring]=selupdatefaktorstufenmenu;',...
	'Tag','faktorenedit');
faktorauswahl = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[110 95 85 15], ...
	'String','faktor1', ...
    'Enable','off',...
	'Style','popupmenu', ...
	'Tag','faktorauswahl', ...
	'Value',1);
stufenedit = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[215 95 60 15], ...
    'Callback','updatestufen;',...
    'enable','off',...
	'Style','edit', ...
    'String','1',...
	'Tag','stufenedit');
label = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.9 0.8 0.3], ...
	'HorizontalAlignment','left', ...
	'Position',[15 65 100 15], ...
	'String','Vergleiche mit a =', ...
	'Style','text', ...
	'Tag','StaticText2');


vergleichemonitor = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[290 35 110 75], ...
	'Style','listbox', ...
    'enable','off',...
	'Tag','vergleichemonitor', ...
	'Value',1);
loeschenbutton = uicontrol('Parent',a, ...
	'Units','points', ...
	'Position',[290 10 110 15], ...
    'enable','off',...
	'String','löschen', ...
	'Tag','loeschenbutton');
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.9 0.8 0.3], ...
	'HorizontalAlignment','left', ...
	'Position',[15 10 40 15], ...
	'String','Sourcfile:', ...
	'Style','text', ...
	'Tag','StaticText2');
selectfilemonitor = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'HorizontalAlignment','left', ...
	'Position',[65 10 90 15], ...
    'String','file',...
	'Style','text', ...
	'Tag','selectfilemonitor');
filewaehlenbutton = uicontrol('Parent',a, ...
	'Units','points', ...
	'Position',[170 10 105 15], ...
	'String','wählen', ...
    'Callback','[filepath, filename]=selfilewaehlen(selectfilemonitor);', ...
	'Tag','filewaehlenbutton');
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.9 0.8 0.3], ...
	'HorizontalAlignment','left', ...
	'Position',[15 110 60 15], ...
	'String','Faktoren:', ...
	'Style','text', ...
	'Tag','StaticText2');
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.9 0.8 0.3], ...
	'HorizontalAlignment','left', ...
	'Position',[110 110 76 15], ...
	'String','Auswahl:', ...
	'Style','text', ...
	'Tag','StaticText2');
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.9 0.8 0.3], ...
	'HorizontalAlignment','left', ...
	'Position',[215 110 30 15], ...
	'String','Stufen:', ...
	'Style','text', ...
	'Tag','StaticText2');
operatorpopup = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[110 35 40 15], ...
	'String',[' = ';' > ';' < ';'n#='],...
    'enable','off',...
	'Style','popupmenu', ...
	'Tag','operatorpopup', ...
	'Value',1);
alphapopup = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[110 65 40 15], ...
	'String',['0.050';'0.001'],...
    'enable','off',...
	'Style','popupmenu', ...
	'Tag','alphapopup', ...
	'Value',1);
auflabel = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.9 0.8 0.3], ...
	'Position',[150 65 20 15], ...
    'enable','off',...
	'String','auf',...
	'Style','text', ...
	'Tag','auflabel', ...
	'Value',1);

dimensionauswahl = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[170 65 70 15], ...
	'String','dimension', ...
	'Style','popupmenu', ...
    'Enable','off',...
	'Tag','dimensionauswahl', ...
	'Value',1);
cell1auswahl = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[15 35 75 15], ...
	'String','cell1', ...
	'Style','popupmenu', ... 
    'Enable','off',...
	'Tag','cell1auswahl', ...
	'Value',1);
cell2auswahl = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[170 35 70 15], ...
	'String','cell2', ...
	'Style','popupmenu', ...
    'Enable','off',...
	'Tag','cell2auswahl', ...
	'Value',1);

haureinbutton = uicontrol('Parent',a, ...
	'Units','points', ...
	'Position',[410 10 30 75], ...
    'enable','off',...
    'Style','pushbutton',...
    'String','go!',...
	'Tag','haureinbutton', ...
	'Value',1);

nouse = uicontrol('Parent',a, ...
	'Units','points', ...
	'Position',[410 95 30 15], ...
    'enable','off',...
    'Style','edit',...
    'String','nouse',...
	'Tag','nouse', ...
	'Value',1);