partie 1 : Compression :

 

Traitement RLE pour bloc en grayscale

function [codeG]=traitement_rle_gris(G,qualite)

%Générer le code RLE pour un bloc 8x8 (gris)

%DCT

G=double(G)-128;

Gdct=dct2dim (G);

%Quantification

Gquantifie=quantification (Gdct,qualite,0);

%Zigzag

Gzig=zigzag (Gquantifie);

%Encodage rle

Grle=encodage_rle (Gzig);

%Ajouter le 'e' qui marque la fin du code du bloc

for i=1:length(Grle)

    GGrle{i}= Grle(i);

end

codeG=[GGrle 'e'];