Pengolahan Citra dengan Matlab

POTONGAN SCRIPT :

Untuk mengambil gambar dari komputer

function btnbrowse_Callback(hObject, eventdata, handles)

% hObject handle to btnbrowse (see GCBO)

% eventdata reserved – to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

proyek=guidata(gcbo);

[namafile,direktori]=uigetfile({‘*.jpg’;'*.bmp’;'*.png’;'*.tif’},’Buka Gambar’)

if isequal(namafile,0)

return;

end

eval(['cd ''' direktori ''';']);

I=imread(namafile);;

wait_Callback(hObject, eventdata, handles) %waitbar

set(proyek.fighistogram,’CurrentAxes’,proyek.axes1);

set(imshow(I));

info=imfinfo(namafile);

set(proyek.enama,’String’,info.Filename);

set(proyek.eukuran,’String’,info.FileSize);

set(proyek.eformat,’String’,info.Format);

set(proyek.elebar,’String’,info.Width);

set(proyek.etinggi,’String’,info.Height);

set(proyek.ebit,’String’,info.BitDepth);

set(proyek.ewarna,’String’,info.ColorType);

set(proyek.etanggal,’String’,info.FileModDate);

set(proyek.fighistogram,’Userdata’,I);

set(proyek.axes1,’Userdata’,I);

set(proyek.ebit,’Userdata’,info.BitDepth);

backupimage_Callback(hObject, eventdata, handles) %bikin backup gambar

Untuk mengambil gambar dari komputer.

% — Executes on button press in btnhisto.

function btnhisto_Callback(hObject, eventdata, handles)

% hObject handle to btnhisto (see GCBO)

% eventdata reserved – to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

proyek=guidata(gcbo);

I=get(proyek.axes1,’Userdata’);

%I=get(proyek.fighistogram,’Userdata’);

if isequal(I,[])

msgbox(‘Belum ada gambar!’,'Peringatan’,'warn’);

else

wait_Callback(hObject, eventdata, handles) %waitbar

bit=get(proyek.ebit,’Userdata’);

figure;

if bit==8

subplot(1,1,1);

imhist(I(:,:,1));

title(‘Histogram Intensitas Warna Grayscale’);

else

subplot(3,1,1);

imhist(I(:,:,1));

title(‘Histogram Intensitas Warna Merah (R)’);

subplot(3,1,2);

imhist(I(:,:,2));

title(‘Histogram Intensitas Warna Hijau (G)’);

subplot(3,1,3);

imhist(I(:,:,3));

title(‘Histogram Intensitas Warna Biru (B)’);

end

end

Untuk menajamkan gambar

% ——————————————————————–

function sharp_Callback(hObject, eventdata, handles)

% hObject handle to sharp (see GCBO)

% eventdata reserved – to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

proyek=guidata(gcbo);

I=get(proyek.axes1,’Userdata’);

if isequal(I,[])

msgbox(‘Belum ada gambar!’,'Peringatan’,'warn’);

else

PSF=fspecial(‘unsharp’);

A=imfilter(I,PSF,’replicate’);

set(proyek.fighistogram,’CurrentAxes’,proyek.axes1);

set(imshow(A));

set(proyek.axes1,’Userdata’,A);

end

Membuat waiting bar

% — Executes on button press in pushbutton8.

function wait_Callback(hObject, eventdata, handles)

% hObject handle to pushbutton8 (see GCBO)

% eventdata reserved – to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

h=waitbar(0,’Harap Tunggu…’);

n=1;

pjg=1000;

while n <= pjg

n=n+1;

waitbar(n/pjg);

end

close(h);

Mereset gambar

% ——————————————————————–

function reset_Callback(hObject, eventdata, handles)

% hObject handle to reset (see GCBO)

% eventdata reserved – to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

proyek=guidata(gcbo);

I=get(proyek.axes3,’Userdata’);

set(proyek.fighistogram,’CurrentAxes’,proyek.axes1);

set(imshow(I));

set(proyek.axes1,’Userdata’,I);

REFERENSI BUKU :

Judul : “Cepat Mahir GUI Matlab”

Penerbit : Penerbit Andi

Pengarang :

* Erick Paulus, S.Si.,M.Kom
* Yessica Nataliani,S.Si.,M.Kom

Sumber:
http://ri32.wordpress.com/2009/10/25/pengolahan-citra-dengan-matlab-7/