%% Importazione dati dal simulatore DesignBuilder

%importazione dati dal simulatore DesignBuilder, è utile salvare tali dati
%direttamente nella directory dedicata, una procedura automatica porterebbe
%ad errori appena cambio directory.

function [nomi,date,dati] = importaDesign(file,graph,camp)

%leggendo il file .xls i dati vengono tabulati bene, mentre con .csv sono
% convertite in celle.

[num, txt, raw] = xlsread(file);

campioni=camp;

%essendo che i dati luogo sono forniti dal simulatore con 1 campione per
%ora (e non 6 come le temperature), devo interpolare per uniformare le
%dimensioni delle matrici.

if size(num)<campioni
   for i=1:size(num,2)
    num1(:,i)=interp(num(:,i),6);
   end
   num=num1;
end

%memorizzo i dati in vettori, l'uso di celle si è rivelato complicato.
nomi=txt(1,2:end);
date=txt(3:end,1);
dati=num;

%% plottaggio
    if graph==1
        t=0:length(dati)-1;
        figure;
        plot(t,dati);
        grid on;
        hold on;
        %sarebbe da convertire in minuti t*30
        xlabel('n campioni');
        % ylabel(udm(2));
        ylabel('°C')
        axis ([0 length(dati)-1 0 40]);
        %al titolo viene tolta l'estensione .csv e gli underscore eventuali
        titolo = strrep(file, '_', ' ');
        title(titolo(1:end-4));
        legend(nomi);
        %settare manualmente la data di inizio esperimenti\simulazioni!
        %non riesco a passarlo come parametro a myfunction. Ho lasciato l'anno
        %per tenere presente che il database di DesignBuilder è del 2002!
        dcm_obj = datacursormode(gcf);
        set(dcm_obj,'UpdateFcn',@myfunction)
    else

    end
end
