function varargout = Infofenster(varargin)
stoffwerte

% INFOFENSTER Application M-file for Infofenster.fig
%    FIG = INFOFENSTER launch Infofenster GUI.
%    INFOFENSTER('callback_name', ...) invoke the named callback.

% Last Modified by GUIDE v2.0 15-May-2006 13:49:25

if nargin == 0  % LAUNCH GUI

	fig = openfig(mfilename,'reuse');

	% Use system color scheme for figure:
	set(fig,'Color',get(0,'defaultUicontrolBackgroundColor'));

	% Generate a structure of handles to pass to callbacks, and store it. 
	handles = guihandles(fig);
	guidata(fig, handles);

	if nargout > 0
		varargout{1} = fig;
	end

elseif ischar(varargin{1}) % INVOKE NAMED SUBFUNCTION OR CALLBACK

	try
		if (nargout)
			[varargout{1:nargout}] = feval(varargin{:}); % FEVAL switchyard
		else
			feval(varargin{:}); % FEVAL switchyard
		end
	catch
		disp(lasterr);
	end

end


%| ABOUT CALLBACKS:
%| GUIDE automatically appends subfunction prototypes to this file, and 
%| sets objects' callback properties to call them through the FEVAL 
%| switchyard above. This comment describes that mechanism.
%|
%| Each callback subfunction declaration has the following form:
%| <SUBFUNCTION_NAME>(H, EVENTDATA, HANDLES, VARARGIN)
%|
%| The subfunction name is composed using the object's Tag and the 
%| callback type separated by '_', e.g. 'slider2_Callback',
%| 'figure1_CloseRequestFcn', 'axis1_ButtondownFcn'.
%|
%| H is the callback object's handle (obtained using GCBO).
%|
%| EVENTDATA is empty, but reserved for future use.
%|
%| HANDLES is a structure containing handles of components in GUI using
%| tags as fieldnames, e.g. handles.figure1, handles.slider2. This
%| structure is created at GUI startup using GUIHANDLES and stored in
%| the figure's application data using GUIDATA. A copy of the structure
%| is passed to each callback.  You can store additional information in
%| this structure at GUI startup, and you can change the structure
%| during callbacks.  Call guidata(h, handles) after changing your
%| copy to replace the stored original so that subsequent callbacks see
%| the updates. Type "help guihandles" and "help guidata" for more
%| information.
%|
%| VARARGIN contains any extra arguments you have passed to the
%| callback. Specify the extra arguments by editing the callback
%| property in the inspector. By default, GUIDE sets the property to:
%| <MFILENAME>('<SUBFUNCTION_NAME>', gcbo, [], guidata(gcbo))
%| Add any extra arguments after the last argument, before the final
%| closing parenthesis.


% Einlesen der Stoffwerte

% --------------------------------------------------------------------
function varargout = Brennstoffluft_Callback(h, eventdata, handles, varargin)
global Brennstoffluft     %Brennstoff-Luftverhältnis global definiert für die Berechnung in RadTurbmain
Brennstoffluft = str2double(get(handles.Brennstoffluft,'String'));   %Eingabe in Feld erforderlich

% Eingabe bei Dezimalen mit Punkt, nicht mit Komma
[mB_mV] = (Brennstoffluft)
%Bei Eingabe eines nichtnumerischen Wertes erfolgt Fehlermeldung
user_entry = str2double(get(h,'string'));
if isnan(user_entry)
    errordlg('you must enter a numeric value','Bad Input','modal')
end

% --------------------------------------------------------------------
function varargout = RgasLuft_Callback(h, eventdata, handles, varargin)
global Rgas_Luft MOTOR_FLAG
Rgas_Luft(MOTOR_FLAG)
R_Luft = Rgas_Luft(MOTOR_FLAG)
global R_Luft

set(handles.RgasLuft,'String',...
    eval('R_Luft'));
RgasLuft = str2double(get(handles.RgasLuft,'String'));

%Bei Eingabe eines nichtnumerischen Wertes erfolgt Fehlermeldung
user_entry = str2double(get(h,'string'));
if isnan(user_entry)
    errordlg('you must enter a numeric value','Bad Input','modal')
end

% --------------------------------------------------------------------
function varargout = RgasAbgas_Callback(h, eventdata, handles, varargin)
global Rgas_Abgas MOTOR_FLAG R_exh
Rgas_Abgas(MOTOR_FLAG)
R_exh = Rgas_Abgas(MOTOR_FLAG)
RgasAbgas = str2double(get(handles.RgasAbgas,'String'));

%Bei Eingabe eines nichtnumerischen Wertes erfolgt Fehlermeldung
user_entry = str2double(get(h,'string'));
if isnan(user_entry)
    errordlg('you must enter a numeric value','Bad Input','modal')
end
% --------------------------------------------------------------------
function varargout = CpVedit_Callback(h, eventdata, handles, varargin)
global CpV MOTOR_FLAG cpm_V
CpV(MOTOR_FLAG)
cpm_V = CpV(MOTOR_FLAG)
CpVedit = str2double(get(handles.CpVedit,'String'));

%Bei Eingabe eines nichtnumerischen Wertes erfolgt Fehlermeldung
user_entry = str2double(get(h,'string'));
if isnan(user_entry)
    errordlg('you must enter a numeric value','Bad Input','modal')
end
% --------------------------------------------------------------------
function varargout = CpTedit_Callback(h, eventdata, handles, varargin)
global CpT MOTOR_FLAG cpm_T
CpT(MOTOR_FLAG)
cpm_T = CpT(MOTOR_FLAG)    
CpTedit = str2double(get(handles.CpTedit,'String'));
if isnan('String')
    [CPM_t] = eval('cpm_T')
    set(handles.CpTedit,'String',...
        num2str(CPM_t));
end

%Bei Eingabe eines nichtnumerischen Wertes erfolgt Fehlermeldung
user_entry = str2double(get(h,'string'));
if isnan(user_entry)
    errodlg('you must enter anumeric value','Bad Input','modal')
end
% --------------------------------------------------------------------
function varargout = KapVedit_Callback(h, eventdata, handles, varargin)
global KapV MOTOR_FLAG kappa_V
KapV(MOTOR_FLAG)
kappa_V = KapV(MOTOR_FLAG)
KapVedit = str2double(get(handles.KapVedit,'String'));

%Bei Eingabe eines nichtnumerischen Wertes erfolgt Fehlermeldung
user_entry = str2double(get(h,'string'));
if isnan(user_entry)
    errordlg('you must enter a numeric value','Bad Input','modal')
end
% --------------------------------------------------------------------
function varargout = KapTedit_Callback(h, eventdata, handles, varargin)
global KapT MOTOR_FLAG kappa_T
KapT(MOTOR_FLAG)
kappa_T = KapT(MOTOR_FLAG)
if (get(h,''))
    [KAPPA_t] = eval('kappa_T')
    set(handles.KapTedit,'String',...
        num2str(kappa_T));
end    
KapTedit = str2double(get(handles.KapTedit,'String'));

%Bei Eingabe eines nichtnumerischen Wertes erfolgt Fehlermeldung
user_entry = str2double(get(h,'string'));
if isnan(user_entry)
    errordlg('you must enter a numeric value','Bad Input','modal')
end
% --------------------------------------------------------------------
function varargout = pushbutton1_Callback(h, eventdata, handles, varargin)
%Drücken des OK-Button
close
RadTurb_main2



% --------------------------------------------------------------------
function varargout = pushbutton2_Callback(h, eventdata, handles, varargin)
%Drücken des Zurück-Button
close
Eingabemaske



% --------------------------------------------------------------------
function varargout = checkbox1_Callback(h, eventdata, handles, varargin)
if (get(h,'Value') == get(h,'Max'))
else
end
set(handles.Brennstoffluft,'String',...
    num2str(get(handles.checkbox1,'Min')));

% --------------------------------------------------------------------
function varargout = checkbox2_Callback(h, eventdata, handles, varargin)
global R_Luft 

if (get(h,'Value') == get(h,'Max'))
    
set(handles.RgasLuft,'String',...
    num2str(get(handles.checkbox2,'Min')));
else
    [rluft] = eval('R_Luft')
    set(handles.RgasLuft,'String',...
    num2str(rluft));
end
% --------------------------------------------------------------------
function varargout = checkbox3_Callback(h, eventdata, handles, varargin)
global R_exh 
if (get(h,'Value') == get(h,'Max'))
set(handles.RgasAbgas,'String',...
    num2str(get(handles.checkbox3,'Min')));
else
    [r_EXH] = eval('R_exh')
    set(handles.RgasAbgas,'String',...
      num2str(r_EXH));
end
% --------------------------------------------------------------------
function varargout = checkbox4_Callback(h, eventdata, handles, varargin)
global cpm_V  

if (get(h,'Value') == get(h,'Max'))   
set(handles.CpVedit,'String',...
    num2str(get(handles.checkbox4,'Min')));
else
    [CPM_v] = eval('cpm_V')
    set(handles.CpVedit,'String',...
        num2str(CPM_v));
end
% --------------------------------------------------------------------
function varargout = checkbox5_Callback(h, eventdata, handles, varargin)
global cpm_T 

if (get(h,'Value') == get(h,'Max'))    
set(handles.CpTedit,'String',...
    num2str(get(handles.checkbox5,'Min')));
else
    [CPM_t] = eval('cpm_T')
    set(handles.CpTedit,'String',...
        num2str(CPM_t));
end
% --------------------------------------------------------------------
function varargout = checkbox6_Callback(h, eventdata, handles, varargin)
global kappa_V 
if (get(h,'Value') == get(h,'Max'))
set(handles.KapVedit,'String',...
    num2str(get(handles.checkbox6,'Min')));
else
    [KAPPA_v] = eval('kappa_V')
    set(handles.KapVedit,'String',...
        num2str(kappa_V));
end
% --------------------------------------------------------------------
function varargout = checkbox7_Callback(h, eventdata, handles, varargin)
global kappa_T 
if (get(h,'Value') == get(h,'Max'))
set(handles.KapTedit,'String',...
    num2str(get(handles.checkbox7,'Min')));
else
    [KAPPA_t] = eval('kappa_T')
    set(handles.KapTedit,'String',...
        num2str(kappa_T));
end





