...
function kuva=Ekvalisaattori(kuvaI)
%ekvalisoi eli tasoittaa uint8 kuvan koko kahdeksan bitin alueelle
u8=uint8(I);
Maksimi=max(max(kuvau8));%haetaan suurin arvo kuvamatriisista
Minimi=min(min(kuvau8));%haetaan pienin arvo
kuva=kuvau8-Minimi;%otetaan alta tyhjät pois
Kerroin=255/(Maksimi-Minimi); %muodostetaan "kirkastuskerroin" matriisille
kuva=kuva .*Kerroin;%kerrotaan jokainen "pikseli" erikseen function end
end