Senin, 03 November 2014

Aplikasi Pengolah CItra 4















Source code saat menekan tombol Sharpening Gaussian
function btnGA_Callback(hObject, eventdata, handles)
proyek=guidata(gcbo);
I=get(proyek.gbrAsli,'Userdata');
myFilter = fspecial('gaussian');
%'gaussian', 'sobel', 'prewitt', 'laplacian', 'log', 'average', 'unsharp','roberts'
J = imfilter(I, myFilter, 'replicate');
 
set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);
set(imshow(I));
    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);
    imhist(rgb2gray(I));
         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);
         set(imshow(J));
            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);
            imhist(rgb2gray(J));  
set(proyek.txtProses,'String','GAUSSIAN');
set(proyek.gbrAsli,'Userdata',I);
set(proyek.gbrHasil,'Userdata',J);


Source code saat menekan Edge Detection Prewit
function btnPL_Callback(hObject, eventdata, handles)
proyek=guidata(gcbo);
I=get(proyek.gbrAsli,'Userdata');
myFilter = fspecial('prewitt');
%'gaussian', 'sobel', 'prewitt', 'laplacian', 'log', 'average', 'unsharp','roberts'
J = imfilter(I, myFilter, 'replicate');
 
set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);
set(imshow(I));
    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);
    imhist(rgb2gray(I));
         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);
         set(imshow(J));
            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);
            imhist(rgb2gray(J));  
set(proyek.txtProses,'String','PREWITT');
set(proyek.gbrAsli,'Userdata',I);
set(proyek.gbrHasil,'Userdata',J);


Source code saat menekan Edge Detection Laplacian
function btnLA_Callback(hObject, eventdata, handles)
proyek=guidata(gcbo);
I=get(proyek.gbrAsli,'Userdata');
myFilter = fspecial('laplacian');
%'gaussian', 'sobel', 'prewitt', 'laplacian', 'log', 'average', 'unsharp','roberts'
J = imfilter(I, myFilter, 'replicate');
 
set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);
set(imshow(I));
    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);
    imhist(rgb2gray(I));
         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);
         set(imshow(J));
            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);
            imhist(rgb2gray(J));  
set(proyek.txtProses,'String','LAPLACIAN');
set(proyek.gbrAsli,'Userdata',I);
set(proyek.gbrHasil,'Userdata',J);


Source code saat menekan Edge Detection Log
function btnLO_Callback(hObject, eventdata, handles)
proyek=guidata(gcbo);
I=get(proyek.gbrAsli,'Userdata');
myFilter = fspecial('log');
%'gaussian', 'sobel', 'prewitt', 'laplacian', 'log', 'average', 'unsharp','roberts'
J = imfilter(I, myFilter, 'replicate');
 
set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);
set(imshow(I));
    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);
    imhist(rgb2gray(I));
         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);
         set(imshow(J));
            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);
            imhist(rgb2gray(J));  
set(proyek.txtProses,'String','L=O=G');
set(proyek.gbrAsli,'Userdata',I);
set(proyek.gbrHasil,'Userdata',J);


Source code saat menekan Sharpening Average

function btnAverage_Callback(hObject, eventdata, handles)
proyek=guidata(gcbo);
I=get(proyek.gbrAsli,'Userdata');
myFilter = fspecial('average');
%'gaussian', 'sobel', 'prewitt', 'laplacian', 'log', 'average', 'unsharp','roberts'
J = imfilter(I, myFilter, 'replicate');
 
set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);
set(imshow(I));
    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);
    imhist(rgb2gray(I));
         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);
         set(imshow(J));
            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);
            imhist(rgb2gray(J));  
set(proyek.txtProses,'String','AVERAGE');
set(proyek.gbrAsli,'Userdata',I);
set(proyek.gbrHasil,'Userdata',J);


Source code saat menekan Sharpening Unsharp
function btnUnsharp_Callback(hObject, eventdata, handles)
proyek=guidata(gcbo);
I=get(proyek.gbrAsli,'Userdata');
myFilter = fspecial('unsharp');
%'gaussian', 'sobel', 'prewitt', 'laplacian', 'log', 'average', 'unsharp','roberts'
J = imfilter(I, myFilter, 'replicate');
 
set(proyek.proyekPD,'CurrentAxes',proyek.gbrAsli);
set(imshow(I));
    set(proyek.proyekPD,'CurrentAxes',handles.gbrHistogram);
    imhist(rgb2gray(I));
         set(proyek.proyekPD,'CurrentAxes',proyek.gbrHasil);
         set(imshow(J));
            set(proyek.proyekPD,'CurrentAxes',proyek.gbrHistogramHasil);
            imhist(rgb2gray(J));  
set(proyek.txtProses,'String','UNSHARP');
set(proyek.gbrAsli,'Userdata',I);
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

Tidak ada komentar:

Posting Komentar