RGB=imread('br.jpg');
I1=rgb2gray(RGB);
mov1=moviein(10);
 for i=1:10
     h=[i i+1 i;i-1 i-1 i-1;i-2 i-3 i-2]
     I2=filter2(h,I1);
     imshow(I2,[]),colorbar
      mov(:,i)=getframe;
         end;
         movie(mov1,2);
pause(9.933);
imshow(I2,[]),colorbar
disp('Howz the movie Dr Lakaemper!!')