function[out1]=binaryzacja(im,x)
for i=1:256
if(i LUT(i)=0;
else
LUT(i)=255;
end
end
im(:,:)=LUT(im(:,:));
out1=double(im/255);
h5=CreateHistogram(im);// histogram obrazka zbiaryzowanego
figure();
plot(h5);
endfunction

function [out]=maska(m,im)
out=m.*double(im);
endfunction

global IPD_PATH;
RGB=ReadImage(IPD_PATH +'demos\teaset.png');
Image=RGB2Gray(RGB);
[h,w]=size(Image);

//binaryzacja
bin=binaryzacja(Image,175);// dla progu 150, dla wartości progu 175
// i 200 zmienić parametr liczbowy funkcji binaryzacji
//na odpowiednią wartość progu
out=maska(bin,Image);
figure();
ShowImage(bin,"Obrazek zbinaryzowany");
//obrazek zbinaryzowany + obrazek bazowy
h6=CreateHistogram(out);//histogram obrazka wyjściowego
figure();
plot(h6);
figure();
ShowImage(out,"Obrazek wyjściowy");


//Obrazek bazowy i jego histogram
//h1=CreateHistogram(Image);
//figure();
//plot(h1);
//figure();
//ShowImage(Image,"Obraz Bazowy");