function varargout = main_window(varargin)
% MAIN_WINDOW M-file for main_window.fig
%      MAIN_WINDOW, by itself, creates a new MAIN_WINDOW or raises the existing
%      singleton*.
%
%      H = MAIN_WINDOW returns the handle to a new MAIN_WINDOW or the handle to
%      the existing singleton*.
%
%      MAIN_WINDOW('CALLBACK',hObject,eventData,handles,...) calls the local
%      function named CALLBACK in MAIN_WINDOW.M with the given input arguments.
%
%      MAIN_WINDOW('Property','Value',...) creates a new MAIN_WINDOW or raises the
%      existing singleton*.  Starting from the left, property value pairs are
%      applied to the GUI before main_window_OpeningFcn gets called.  An
%      unrecognized property name or invalid value makes property application
%      stop.  All inputs are passed to main_window_OpeningFcn via varargin.
%
%      *See GUI Options on GUIDE's Tools menu.  Choose "GUI allows only one
%      instance to run (singleton)".
%
% See also: GUIDE, GUIDATA, GUIHANDLES

% Edit the above text to modify the response to help main_window

% Last Modified by GUIDE v2.5 16-Mar-2010 17:36:34

% Begin initialization code - DO NOT EDIT
gui_Singleton = 1;
gui_State = struct('gui_Name',       mfilename, ...
                   'gui_Singleton',  gui_Singleton, ...
                   'gui_OpeningFcn', @main_window_OpeningFcn, ...
                   'gui_OutputFcn',  @main_window_OutputFcn, ...
                   'gui_LayoutFcn',  [] , ...
                   'gui_Callback',   []);
if nargin && ischar(varargin{1})
    gui_State.gui_Callback = str2func(varargin{1});
end

if nargout
    [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});
else
    gui_mainfcn(gui_State, varargin{:});
end
% E nd initialization code - DO NOT EDIT


% --- Executes just before main_window is made visible.
function main_window_OpeningFcn(hObject, eventdata, handles, varargin)
% This function has no output args, see OutputFcn.
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
% varargin   command line arguments to main_window (see VARARGIN)

% Choose default command line output for main_window
handles.output = hObject;

% Update handles structure
guidata(hObject, handles);

% UIWAIT makes main_window wait for user response (see UIRESUME)
% uiwait(handles.figure1);

assignin('base','Counter',1);           %Schreibt eine Zählvariable in den Workspace mit dem Wert 1
    
axes(handles.ax_bild);                  %Auswahl des Axis Objektes Bild
g=imread('strecke.jpg','jpg');          %Einlesen der Grafik als jpg
image(g); axis image;                   %Darstellen und entzerren der Grafik    
axis off;                               %Schaltet die Koordinaten Achsen ab
      
a=get(handles.sl_kr,'Max');             %Schreibt den max. Wert des kr-Sliders in a 
b=get(handles.sl_kr,'Min');             %Schreibt den min. Wert des kr-Sliders in b
c=(a+b)/2;                              %Berechnet den Mittelwert
set(handles.sl_kr,'Value',c);           %Setzt den Slider auf den Mittelwert

a=get(handles.sl_tn,'Max');             %Schreibt den max. Wert des Tn-Sliders in a 
b=get(handles.sl_tn,'Min');             %Schreibt den min. Wert des Tn-Sliders in b
c=(a+b)/2;                              %Berechnet den Mittelwert
set(handles.sl_tn,'Value',c);           %Setzt den Slider auf den Mittelwert

a=get(handles.sl_tv,'Max');             %Schreibt den max. Wert des Tv-Sliders in a 
b=get(handles.sl_tv,'Min');             %Schreibt den min. Wert des Tv-Sliders in b
c=(a+b)/2;                              %Berechnet den Mittelwert
set(handles.sl_tv,'Value',c);           %Setzt den Slider auf den Mittelwert

a=get(handles.sl_ks,'Max');             %Schreibt den max. Wert des Ks-Sliders in a 
b=get(handles.sl_ks,'Min');             %Schreibt den min. Wert des Ks-Sliders in b
c=(a+b)/2;                              %Berechnet den Mittelwert
set(handles.sl_ks,'Value',c);           %Setzt den Slider auf den Mittelwert

a=get(handles.sl_tt,'Max');             %Schreibt den max. Wert des Todzeitsliders in a 
b=get(handles.sl_tt,'Min');             %Schreibt den min. Wert des Todzeitsliders in b
c=(a+b)/2;                              %Berechnet den Mittelwert
set(handles.sl_tt,'Value',c);           %Setzt den Slider auf den Mittelwert

a=get(handles.sl_t1,'Max');             %Schreibt den max. Wert des T1-Sliders in a 
b=get(handles.sl_t1,'Min');             %Schreibt den min. Wert des T1-Sliders in b
c=(a+b)/2;                              %Berechnet den Mittelwert
set(handles.sl_t1,'Value',c);           %Setzt den Slider auf den Mittelwert

a=get(handles.sl_t2,'Max');             %Schreibt den max. Wert des T1-Sliders in a 
b=get(handles.sl_t2,'Min');             %Schreibt den min. Wert des T1-Sliders in b
c=(a+b)/2;                              %Berechnet den Mittelwert
set(handles.sl_t2,'Value',c);           %Setzt den Slider auf den Mittelwert

a=get(handles.sl_t3,'Max');             %Schreibt den max. Wert des T1-Sliders in a 
b=get(handles.sl_t3,'Min');             %Schreibt den min. Wert des T1-Sliders in b
c=(a+b)/2;                              %Berechnet den Mittelwert
set(handles.sl_t3,'Value',c);           %Setzt den Slider auf den Mittelwert


% --- Outputs from this function are returned to the command line.
function varargout = main_window_OutputFcn(hObject, eventdata, handles) 
% varargout  cell array for returning output args (see VARARGOUT);
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Get default command line output from handles structure
varargout{1} = handles.output;


% --- Executes on button press in pb_task.
function pb_task_Callback(hObject, eventdata, handles)
% hObject    handle to pb_task (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

set(handles.pb_sim,'Enable','on');        %Aktiviert den Simulationsbutton

zaehler=evalin('base','Counter');         %Liest den Zählerwert aus dem Worksspace

if (zaehler==1)                           %Vergleich des Zählerwertes und Start von Anweisungen
    
  %open aufgabe_1_1.fig;                   %Öffnet die 1. Aufgabe
    
  a=get(handles.sl_tt,'Value');           %Schreibt den Wert des Todzeitslieders in a
  b=[num2str(a),' s'];                    %Wandelt a in einen String
  set(handles.txt_wtt,'String',b);        %Schreibt den String ins Textfeld

  set(handles.sl_tt,'Enable','on');       %Aktiviert den Todzeitslider

  a=get(handles.sl_t1,'Value');           %Schreibt den Wert des T1-Slieders in a
  b=[num2str(a),' s'];                    %Wandelt a in einen String
  set(handles.txt_wt1,'String',b);        %Schreibt den String ins Textfeld

  set(handles.sl_t1,'Enable','on');       %Aktiviert den T1-Slider

  a=get(handles.sl_t2,'Value');           %Schreibt den Wert des T2-Slieders in a
  b=[num2str(a),' s'];                    %Wandelt a in einen String
  set(handles.txt_wt2,'String',b);        %Schreibt den String ins Textfeld

  set(handles.sl_t2,'Enable','on');       %Aktiviert den T2-Slider

  a=get(handles.sl_t3,'Value');           %Schreibt den Wert des T3-Slieders in a
  b=[num2str(a),' s'];                    %Wandelt a in einen String
  set(handles.txt_wt3,'String',b);        %Schreibt den String ins Textfeld

  set(handles.sl_t3,'Enable','on');       %Aktiviert den T3-Slider
  
  a=get(handles.sl_ks,'Value');           %Schriebt den Wert des Ks-Sliders in a
  b=[num2str(a),' s'];                    %Wandelt an in einen String
  set(handles.txt_wks,'String',b);        %Schreibt den String ins Textfeld
  
  set(handles.sl_ks,'Enable','on');       %Aktiviert den ks-Slider
  
elseif (zaehler==2)
    
    axes(handles.ax_bild);                    %Auswahl des Axis Objektes Bild
    g=imread('pid_regler.jpg','jpg');         %Einlesen der Grafik als jpg
    image(g); axis image;                     %Darstellen und entzerren der Grafik    
    axis off;                                 %Schaltet die Koordinaten Achsen ab
    
    set(handles.pa_regler,'Visible','on')     %Macht das Regler Panel sichtbar
    
    open aufgabe_2_1.fig;                     %Öffnet die 2. Aufgabe
  
    a=get(handles.sl_kr,'Value');             %Schriebt den Wert des Kr-Sliders in a
    b=[num2str(a),' s'];                      %Wandelt an in einen String
    set(handles.txt_wkr,'String','on');       %Schreibt den String ins Textfeld
  
    set(handles.sl_kr,'Enable','on');         %Aktiviert den Kr-Slider
  
    a=get(handles.sl_tv,'Value');             %Schriebt den Wert des Tv-Sliders in a
    b=[num2str(a),' s'];                      %Wandelt an in einen String
    set(handles.txt_wtv,'String','on');       %Schreibt den String ins Textfeld
  
    set(handles.sl_tv,'Enable','on');         %Aktiviert den Kr-Slider  
  
    a=get(handles.sl_tn,'Value');             %Schriebt den Wert des Tn-Sliders in a
    b=[num2str(a),' s'];                      %Wandelt an in einen String
    set(handles.txt_wtn,'String','on');       %Schreibt den String ins Textfeld
  
    set(handles.sl_tn,'Enable','on');         %Aktiviert den Kr-Slider
    
end

% --- Executes on button press in pb_sim.
function pb_sim_Callback(hObject, eventdata, handles)
% hObject    handle to pb_sim (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

zaehler=evalin('base','Counter');         %Liest den Zählerwert aus dem Worksspace

if (zaehler==1)                           %Vergleich des Zählerwertes und Start von Anweisungen

  a=get(handles.sl_tt,'Value');           %Liest den Wert aus dem Todzeitslider aus 
  assignin('base','tt',a);                %Schreibt den Wert in den Workspace

  a=get(handles.sl_t1,'Value');           %Liest den Wert aus dem T1-Slider aus 
  assignin('base','t1',a);                %Schreibt den Wert in den Workspace

  a=get(handles.sl_t2,'Value');           %Liest den Wert aus dem T2-slider aus 
  assignin('base','t2',a);                %Schreibt den Wert in den Workspace

  a=get(handles.sl_t3,'Value');           %Liest den Wert aus dem T3-Slider aus 
  assignin('base','t3',a);                %Schreibt den Wert in den Workspace
  
  a=get(handles.sl_ks,'Value');           %Liest den Wert aus dem Ks-Slider aus   
  assignin('base','ks',a);                %Schreibt den Wert in den Workspace 

  assignin('base','kr',0);                %Schreibt den Wert in den Workspace

  assignin('base','tn',1);                %Schreibt den Wert in den Workspace

  assignin('base','tv',0);                %Schreibt den Wert in den Workspace

  assignin('base','stoer',5);             %Schreibt den Wert in den Workspace

  assignin('base','soll',0);              %Schreibt den Wert in den Workspace

elseif (zaehler==2)
    
    a=get(handles.sl_tt,'Value');           %Liest den Wert aus dem Todzeitslider aus 
    assignin('base','tt',a);                %Schreibt den Wert in den Workspace

    a=get(handles.sl_t1,'Value');           %Liest den Wert aus dem T1-Slider aus 
    assignin('base','t1',a);                %Schreibt den Wert in den Workspace

    a=get(handles.sl_t2,'Value');           %Liest den Wert aus dem T2-slider aus 
    assignin('base','t2',a);                %Schreibt den Wert in den Workspace

    a=get(handles.sl_t3,'Value');           %Liest den Wert aus dem T3-Slider aus 
    assignin('base','t3',a);                %Schreibt den Wert in den Workspace
    
    a=get(handles.sl_ks,'Value');           %Liest den Wert aus dem Ks-Slider aus   
    assignin('base','ks',a);                %Schreibt den Wert in den Workspace
    
    a=get(handles.sl_kr,'Value');           %Liest den Wert aus dem Kr-Slider aus 
    assignin('base','kr',a);                %Schreibt den Wert in den Workspace

    a=get(handles.sl_tn,'Value');           %Liest den Wert aus dem Tn-slider aus 
    assignin('base','tn',a);                %Schreibt den Wert in den Workspace

    a=get(handles.sl_tv,'Value');           %Liest den Wert aus dem Tv-Slider aus 
    assignin('base','tv',a);                %Schreibt den Wert in den Workspace
    
    assignin('base','stoer',5);             %Schreibt den Wert in den Workspace

    assignin('base','soll',5);              %Schreibt den Wert in den Workspace
    
end;

regelstrecke;                                           %Öffnet das Simulinkmodell
set_param('regelstrecke','SimulationCommand','Start');  %Startet das Simulinkmodell
open simulation.fig;                                    %Öffnet das Simulationsfenster

set(handles.pb_forward,'Enable','on');                  %Aktiviert den Weiter Button


% --- Executes on button press in pb_forward.
function pb_forward_Callback(hObject, eventdata, handles)
% hObject    handle to pb_forward (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

zaehler=evalin('base','Counter');       %Liest den Zählerwert aus dem Worksspace     

if (zaehler==1)                         %Vergleich des Zählerwertes und Start von Anweisungen

  open aufgabe_1_2.fig;                 %Öffnet das Fenster mit der Tv und Tn Abfrage
  
elseif (zaehler==2)
    
    %open aufgabe_2_2.fig;              %Öffnet das Fenster mit den Fragen
    %zu Aufgabe 2
    
end;

zaehler=zaehler+1;                      %Setzt den Zähler einen Wert weiter
assignin('base','Counter',zaehler);     %Schreibt den Zählerwert in den Worksspace

    
  
function ed_stoer_Callback(hObject, eventdata, handles)
% hObject    handle to ed_stoer (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of ed_stoer as text
%        str2double(get(hObject,'String')) returns contents of ed_stoer as a double


% --- Executes during object creation, after setting all properties.
function ed_stoer_CreateFcn(hObject, eventdata, handles)
% hObject    handle to ed_stoer (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end



function ed_soll_Callback(hObject, eventdata, handles)
% hObject    handle to ed_soll (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of ed_soll as text
%        str2double(get(hObject,'String')) returns contents of ed_soll as a double


% --- Executes during object creation, after setting all properties.
function ed_soll_CreateFcn(hObject, eventdata, handles)
% hObject    handle to ed_soll (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end


% --- Executes on slider movement.
function sl_tt_Callback(hObject, eventdata, handles)
% hObject    handle to sl_tt (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider

a=get(handles.sl_tt,'Value');           %Schreibt den Wert des Todzeitslieders in a
b=[num2str(a),' s'];                    %Wandelt a in einen String
set(handles.txt_wtt,'String',b);        %Schreibt den String ins Textfeld


% --- Executes during object creation, after setting all properties.
function sl_tt_CreateFcn(hObject, eventdata, handles)
% hObject    handle to sl_tt (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background.
if isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor',[.9 .9 .9]);
end


% --- Executes on slider movement.
function sl_t1_Callback(hObject, eventdata, handles)
% hObject    handle to sl_t1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider

a=get(handles.sl_t1,'Value');           %Schreibt den Wert des T1-Slieders in a
b=[num2str(a),' s'];                    %Wandelt a in einen String
set(handles.txt_wt1,'String',b);        %Schreibt den String ins Textfeld


% --- Executes during object creation, after setting all properties.
function sl_t1_CreateFcn(hObject, eventdata, handles)
% hObject    handle to sl_t1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background.
if isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor',[.9 .9 .9]);
end


% --- Executes on slider movement.
function sl_t2_Callback(hObject, eventdata, handles)
% hObject    handle to sl_t2 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider

a=get(handles.sl_t2,'Value');           %Schreibt den Wert des T2-Slieders in a
b=[num2str(a),' s'];                    %Wandelt a in einen String
set(handles.txt_wt2,'String',b);        %Schreibt den String ins Textfeld


% --- Executes during object creation, after setting all properties.
function sl_t2_CreateFcn(hObject, eventdata, handles)
% hObject    handle to sl_t2 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background.
if isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor',[.9 .9 .9]);
end


% --- Executes on slider movement.
function sl_t3_Callback(hObject, eventdata, handles)
% hObject    handle to sl_t3 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider

a=get(handles.sl_t3,'Value');           %Schreibt den Wert des T3-Slieders in a
b=[num2str(a),' s'];                    %Wandelt a in einen String
set(handles.txt_wt3,'String',b);        %Schreibt den String ins Textfeld


% --- Executes during object creation, after setting all properties.
function sl_t3_CreateFcn(hObject, eventdata, handles)
% hObject    handle to sl_t3 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background.
if isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor',[.9 .9 .9]);
end


% --- Executes on slider movement.
function sl_kr_Callback(hObject, eventdata, handles)
% hObject    handle to sl_kr (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider

a=get(handles.sl_kr,'Value');             %Schriebt den Wert des Kr-Sliders in a
b=[num2str(a),' s'];                      %Wandelt an in einen String
set(handles.txt_wkr,'String',b);          %Schreibt den String ins Textfeld


% --- Executes during object creation, after setting all properties.
function sl_kr_CreateFcn(hObject, eventdata, handles)
% hObject    handle to sl_kr (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background.
if isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor',[.9 .9 .9]);
end


% --- Executes on slider movement.
function sl_tn_Callback(hObject, eventdata, handles)
% hObject    handle to sl_tn (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider

a=get(handles.sl_tn,'Value');             %Schriebt den Wert des Tn-Sliders in a
b=[num2str(a),' s'];                      %Wandelt an in einen String
set(handles.txt_wtn,'String',b);          %Schreibt den String ins Textfeld


% --- Executes during object creation, after setting all properties.
function sl_tn_CreateFcn(hObject, eventdata, handles)
% hObject    handle to sl_tn (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background.
if isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor',[.9 .9 .9]);
end


% --- Executes on slider movement.
function sl_tv_Callback(hObject, eventdata, handles)
% hObject    handle to sl_tv (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider

a=get(handles.sl_tv,'Value');             %Schriebt den Wert des Tv-Sliders in a
b=[num2str(a),' s'];                      %Wandelt an in einen String
set(handles.txt_wtv,'String',b);          %Schreibt den String ins Textfeld


% --- Executes during object creation, after setting all properties.
function sl_tv_CreateFcn(hObject, eventdata, handles)
% hObject    handle to sl_tv (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background.
if isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor',[.9 .9 .9]);
end


% --- Executes on slider movement.
function sl_ks_Callback(hObject, eventdata, handles)
% hObject    handle to sl_ks (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider

a=get(handles.sl_ks,'Value');             %Schriebt den Wert des Ks-Sliders in a
b=[num2str(a),' '];                       %Wandelt an in einen String
set(handles.txt_wks,'String',b);          %Schreibt den String ins Textfeld


% --- Executes during object creation, after setting all properties.
function sl_ks_CreateFcn(hObject, eventdata, handles)
% hObject    handle to sl_ks (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background.
if isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor',[.9 .9 .9]);
end