Retro style photo effects

I want to say that the effect of nostalgic style is very easy to achieve, just a few words, there is nothing to say.
1%Retro style filter2 clear All;3 close all;4[Filename,pathname] = Uigetfile ('*.jpg','Open an Image File');5IMG =Imread ([PathName FileName]);6 Figure , Imshow (IMG);7IMG =Double(IMG);8Rimg = IMG (:,:,1);9Gimg = IMG (:,:,2);TenBimg = IMG (:,:,3); One[x, Y] =size (rimg); ARIMG0 =0.393* Rimg +0.769* Gimg +0.189*bimg; -GIMG0 =0.349* Rimg +0.686* Gimg +0.168*bimg; -BIMG0 =0.272* Rimg +0.534* Gimg +0.131*bimg; the  fori =1: x -      forj =1: Y -         if(Rimg0 (I, J) >255) -Rimg0 (i, j) =255; + End -         if(Gimg0 (I, J) >255) +Gimg0 (i, j) =255; A End at         if(Bimg0 (I, J) >255) -Bimg0 (i, j) =255; - End - End - End -IMG (:,:,1) =Rimg0; inIMG (:,:,2) =Gimg0; -IMG (:,:,3) =Bimg0; toFigure, Imshow (Uint8 (IMG));

Retro style photo effects