Page 45 - E-MODUL PCD

Program : kebiner.m

% KEBINER Digunakan untuk mengonversi
file
% daun_gray.png ke citra biner

Img = imread('c:\Image\daun_gray.png');
[tinggi, lebar] = size(Img);
ambang = 210; % Nilai ini bisa diubah-
ubah biner = zeros(tinggi, lebar); for
baris=1 : tinggi for kolom=1 : lebar
if Img(baris, kolom) >= ambang
Biner(baris, kolom) = 0; else
Biner(baris, kolom) =
1; end end end
imshow(Biner);
Akhir Program

Sebelum mencoba program di atas, akan dibahas dulu kode yang mendasari

program. Tanda % mengawali komentar. Semua tulisan dimulai dari tanda tersebut

hingga akhir baris tidak dianggap sebagai perintah, melainkan sebagai penjelas

bagi pembaca program. Kode

Img = imread('c:\Image\daun_gray.png'); merupakan perintah untuk

membaca citra daun_gray.png. Hasilnya disimpan di

Img. Lalu, [tinggi, lebar] = size(Img); berguna untuk mendapatkan

lebar dan tinggi citra. Pernyataan ambang = 210; digunakan untuk

menentukan nilai ambang bagi penentuan konversi suatu piksel menjadi 0 atau 1.

Nilai ambang berkisar antara 0 sampai dengan 255.

Pernyataan

45