[Firstimagename,ImageFolder]=uigetfile('*.bmp','OpenFirstImage');cd(ImageFolder);%Pointposition=findstr(Firstimagename,'.');image1=imread(fullfile(ImageFolder,Firstimagename));image=image1;j=1;%disp('shurum');% m1=input('m:');% disp('shurun');%n1=input('n:');[m1,n1]=size(image);p=[1:n1];whilej<=n1image1=image(:,j);i=1;sum=0;whilei