i need code for this steps help me plz

[Pawel Jastrzebski]

If you had a crack at the code, the community can probably help you out with the bits you got stuck with but I'm afraid no one is going to write a full-blown application/code for you.

[shivu shetty]

i have that code but its not giving clear edges.plz suggest me some modifications for below code

[shivu shetty]

if true
  % code
end[FileName,PathName] = uigetfile('*.*','Select the image file');
nomfich=[PathName,FileName];
ima=imread(nomfich);
%sx=size(ima);
ima = imresize(ima, [400 400]);
HSV=rgb2hsv(ima);
H=HSV(:,:,1);
S=HSV(:,:,2);
V=HSV(:,:,3);

[hca1,hch1,hcv1,hcd1] = dwt2(H,'bior1.3'); [sca1,sch1,scv1,scd1] = dwt2(S,'bior1.3'); [vca1,vch1,vcv1,vcd1] = dwt2(V,'bior1.3');

SE = strel('disk',0); hch1 = imdilate(hch1,SE,8); hcv1 = imdilate(hcv1,SE,8); hcd1 = imdilate(hcd1,SE,8); sch1 = imdilate(sch1,SE,8); scv1 = imdilate(scv1,SE,8); scd1 = imdilate(scd1,SE,8); vch1 = imdilate(vch1,SE,8); vcv1 = imdilate(vcv1,SE,8); vcd1 = imdilate(vcd1,SE,8);

LH=hch1+hcv1+hcd1; LS=sch1+scv1+scd1; LV=vch1+vcv1+vcd1;

a=idwt2(LH,hch1,hcv1,hcd1,'bior1.3'); %figure,imshow(a); b=idwt2(LS,sch1,scv1,scd1,'bior1.3'); %figure,imshow(b); c=idwt2(LV,vch1,vcv1,vcd1,'bior1.3'); %figure,imshow(c); %hsvimg=a+b+c;

HSV1(:,:,1)=a; HSV1(:,:,2)=b; HSV1(:,:,3)=c;

figure,imshow(HSV1); title('reconstructed HSV image');

rgbimg=hsv2rgb(HSV1); %colormap(rgbimg); figure,imshow(rgbimg); %imhist(rgbimg); title('reconstructed rgb image');

grayimg=rgb2gray(rgbimg); figure,imshow(grayimg); imhist(grayimg);

 level = graythresh(grayimg);
 BW = im2bw(grayimg,level);
figure,imshow(BW);

[Image Analyst]

http://www.mathworks.com/matlabcentral/answers/13205#answer_18099