Aplikasi Pengolah CItra 2

 

Source code saat program menekan tombol Perbaikan Citra1

function btnRepair1_Callback(hObject, eventdata, handles)

proyek=guidata(gcbo);

A=get(proyek.gbrAsli,'Userdata');

I=rgb2gray(A);

J=histeq(I,16);

 set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);

 set(imshow(I));

    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);

    imhist(I);

        set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);

        set(imshow(J,16));

            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);

            imhist(J,16);  

set(proyek.txtProses,'String','Histek16->Ekualisasi');

set(proyek.gbrAsli,'Userdata',A);

set(proyek.gbrHasil,'Userdata',J);

Source code saat program menekan tombol Perbaikan Citra2

function btnRepair2_Callback(hObject, eventdata, handles)

proyek=guidata(gcbo);

A=get(proyek.gbrAsli,'Userdata');

I=rgb2gray(A);

N = imnoise(I,'salt & pepper',0.02);

J = medfilt2(N);

set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);

set(imshow(N));

    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);

    imhist(N);

         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);

         set(imshow(J));

            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);

            imhist(J);  

set(proyek.txtProses,'String','2D filtering Medfilt');

set(proyek.gbrAsli,'Userdata',A);

set(proyek.gbrHasil,'Userdata',J);

Source code saat program menekan tombol Perbaikan Citra3

function btnRepair3_Callback(hObject, eventdata, handles)

proyek=guidata(gcbo);

A=get(proyek.gbrAsli,'Userdata');

I=rgb2gray(A);

black=3;

white=253;

%Adjust the values in 'black' and 'white' to increase the noise.

N = I;

    Rmatrix = randint(size(I,1),size(I,2),[0,255]);

    N(Rmatrix <= black) = 0;

    N(Rmatrix >=white) = 255;

    J=medfilt2(N);

 set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);

 set(imshow(N));

    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);

    imhist(N);

         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);

         set(imshow(J));

            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);

            imhist(J);   

set(proyek.txtProses,'String','filtering Medfilt By.Rndm');

set(proyek.gbrAsli,'Userdata',A);

set(proyek.gbrHasil,'Userdata',J);

%figure,subplot(1,2,1),imshow(N),title('Add ''Salt and Pepper'' Noise');

%subplot(1,2,2),imshow(J),title('After Noise Removal');

Source code saat program menekan tombol Perbaikan Citra4

function btnRepair4_Callback(hObject, eventdata, handles)

proyek=guidata(gcbo);

A=get(proyek.gbrAsli,'Userdata');

I=rgb2gray(A);

N = imnoise(I,'salt & pepper',0.02);

%========================

%PAD THE MATRIX WITH ZEROS ON ALL SIDES

P=zeros(size(I)+2);

J=zeros(size(I));

%COPY THE ORIGINAL IMAGE MATRIX TO THE PADDED MATRIX

        for x=1:size(I,1)

            for y=1:size(I,2)

                P(x+1,y+1)=I(x,y);

            end

        end

      %LET THE WINDOW BE AN ARRAY

      %STORE THE 3-by-3 NEIGHBOUR VALUES IN THE ARRAY

      %SORT AND FIND THE MIDDLE ELEMENT

for i= 1:size(P,1)-2

    for j=1:size(P,2)-2

        window=zeros(9);

        inc=1;

        for x=1:3

            for y=1:3

                window(inc)=P(i+x-1,j+y-1);

                inc=inc+1;

            end

        end

       

        med=sort(window);

        %PLACE THE MEDIAN ELEMENT IN THE OUTPUT MATRIX

        J(i,j)=med(5);

    end

end

%CONVERT THE OUTPUT MATRIX TO 0-255 RANGE IMAGE TYPE

J=uint8(J);

%========================

set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);

set(imshow(N));

    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);

    imhist(N);

         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);

         set(imshow(J));

            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);

            imhist(J);  

set(proyek.txtProses,'String','2D filtering Medfilt');

set(proyek.gbrAsli,'Userdata',A);

set(proyek.gbrHasil,'Userdata',J);

Kursus / Konsultasi / Bimbingan Belajar / Skripsi Mahasiswa

http://www.lp2maray.com

021-92771708   / 085279959498

URL VIDEO :

https://www.youtube.com/watch?v=0UaDnmPkH6U&feature=youtu.be