global data;
global j; % Fichier d'index j dans la liste des fichiers à traiter
global l; %Largeur de l'image finale

l=100;

t=dir ('pdflow_cloud*');

% lg:longueur de la liste
% r: rien --> valeur inutile
[lg, r]=size(t);
data=struct; % structure qui va contenir les informations

disp(['Il y a ' num2str(lg) ' images à générer']);

dimplot=4; % nombre d'image/ligne dans le plot
V=[]; % contiendra les vecteurs ZXY

for j=1:lg
    disp(['Image ' num2str(j) ': ' t(j).name]);

    % Calcul une image parraport au nom de fichier
    [S, SV]=NormImg(t(j).name, 320, 240);
    V=[V SV]; % fusion des vecteurs
    
    %affiche les images de cloud point
    subplot(floor(lg/dimplot)+1, dimplot, j); 
    imshow(S);
end
%%sauvegarde des données
data.('VG')=V;
save('Data.mat', 'data');