function data (zpusob, soubor, oblast)

% data('xlsread','data.xls','r1c1:r1c12')
% data('ddeinit','data.xls','r1c1:r1c12')

if strcmpi(soubor,'')
    error('Je potreba zadat nazev souboru! Napr.: data.xls')
end
if strcmpi(oblast,'')
    error('Je potreba zadat oblast dat! Napr.: r1c2:r1c13')
end
 
switch zpusob
    case 'ddeinit'
        spojeni=ddeinit('excel','data.xls');
        hodnoty=ddereq(spojeni, oblast);
    case 'xlsread'
        hodnoty=xlsread('data.xls');
    otherwise
        error('Zadej zpusob nacteni dat: ddeinit || xlsread');      
end
 
aprox_poly([1:length(hodnoty)], hodnoty, 2);

end