function set_uicontrol

MW = figure('MenuBar','none',...
                    'Name','Beispiel',...
                    'NumberTitle','off',...
                    'Toolbar','none',...
                    'Visible','on',...
                    'Units','normalized',...
                    'Position',[.375,.375,.25,.25]);
btg = uibuttongroup('Parent',MW,...
                    'Title','Select a button',...
                    'Position',[0,.8,1,.2]);
uicontrol(btg,'Style','radiobutton','String','1',...
          'Units','normalized','pos',[0,0,.25,1]);
uicontrol(btg,'Style','radiobutton','String','2',...
          'Units','normalized','pos',[.25,0,.25,1]);
uicontrol(btg,'Style','radiobutton','String','3',...
          'Units','normalized','pos',[.5,0,.25,1])
uicontrol(btg,'Style','radiobutton','String','4',...
          'Units','normalized','pos',[.75,0,.25,1])
set(btg,'SelectedObject',[]);
set(btg,'SelectionChangeFcn',@select);

ckb = uipanel('Parent',MW,...
              'Position',[0,.4,1,.2]);
uicontrol(ckb,'Style','checkbox','String','1',...
          'Units','normalized','pos',[0,0,1/8,1]);
uicontrol(ckb,'Style','checkbox','String','2',...
          'Units','normalized','pos',[1/8,0,1/8,1]);
uicontrol(ckb,'Style','checkbox','String','3',...
          'Units','normalized','pos',[2/8,0,1/8,1]);
uicontrol(ckb,'Style','checkbox','String','4',...
          'Units','normalized','pos',[3/8,0,1/8,1]);
uicontrol(ckb,'Style','checkbox','String','5',...
          'Units','normalized','pos',[4/8,0,1/8,1]);
uicontrol(ckb,'Style','checkbox','String','6',...
          'Units','normalized','pos',[5/8,0,1/8,1]);
uicontrol(ckb,'Style','checkbox','String','7',...
          'Units','normalized','pos',[6/8,0,1/8,1]);
uicontrol(ckb,'Style','checkbox','String','8',...
          'Units','normalized','pos',[7/8,0,1/8,1]);

 function select(source,eventdata)

    switch get(get(source,'SelectedObject'),'String')
         case '1'
             set(findobj('Style','checkbox'),'Value',0);
             set(findobj('Style','checkbox','String','2','-or',...
               'Style','checkbox','String','3'),'Value',1);
             % Hier müssen dann noch die Variablen die sich hinter den
             % Objekten befinden auf die entsprechenden Werte gesetzt
             % werden!
         case '2'
             set(findobj('Style','checkbox'),'Value',0);
             set(findobj('Style','checkbox','String','3','-or',...
               'Style','checkbox','String','5'),'Value',1);
             % Hier müssen dann noch die Variablen die sich hinter den
             % Objekten befinden auf die entsprechenden Werte gesetzt
             % werden!
         case '3'
             set(findobj('Style','checkbox'),'Value',0);
             set(findobj('Style','checkbox','String','2','-or',...
               'Style','checkbox','String','6','-or',...
               'Style','checkbox','String','7','-or',...
               'Style','checkbox','String','8'),'Value',1);
             % Hier müssen dann noch die Variablen die sich hinter den
             % Objekten befinden auf die entsprechenden Werte gesetzt
             % werden!
         case '4'
             set(findobj('Style','checkbox'),'Value',0);
             set(findobj('Style','checkbox','String','1','-or',...
               'Style','checkbox','String','2','-or',...
               'Style','checkbox','String','6','-or',...
               'Style','checkbox','String','7'),'Value',1);
             % Hier müssen dann noch die Variablen die sich hinter den
             % Objekten befinden auf die entsprechenden Werte gesetzt
             % werden!
     end
     
 end % of select

end % of "set_uicontrol"