Sistem Pakar(dalam bahasa Inggris :expert system) adalah sistem informasi yang berisi dengan pengetahuan dari pakar sehingga dapat digunakan untuk konsultasi. Pengetahuan dari pakar di dalam sistem ini digunakan sebagi dasar oleh Sistem Pakar untuk menjawab pertanyaan (konsultasi).
Kepakaran (expertise) adalah pengetahuan yang ekstensif dan spesifik yang diperoleh melalui rangkaian pelatihan, membaca, dan pengalaman. Pengetahuan membuat pakar dapat mengambil keputusan secara lebih baik dan lebih cepat daripada non-pakar dalam memecahkan problem yang kompleks. Kepakaran mempunyai sifat berjenjang, pakar top memiliki pengetahuan lebih banyak daripada pakar yunior. Tujuan Sistem Pakar adalah untuk mentransfer kepakaran dari seorang pakar ke komputer, kemudian ke orang lain (yang bukan pakar).
Kepakaran (expertise) adalah pengetahuan yang ekstensif dan spesifik yang diperoleh melalui rangkaian pelatihan, membaca, dan pengalaman. Pengetahuan membuat pakar dapat mengambil keputusan secara lebih baik dan lebih cepat daripada non-pakar dalam memecahkan problem yang kompleks. Kepakaran mempunyai sifat berjenjang, pakar top memiliki pengetahuan lebih banyak daripada pakar yunior. Tujuan Sistem Pakar adalah untuk mentransfer kepakaran dari seorang pakar ke komputer, kemudian ke orang lain (yang bukan pakar).
Sistem pakar adalah suatu program komputer yang mengandung pengetahuan dari satu atau lebih pakar manusia mengenai suatu bidang spesifik. Jenis program ini pertama kali dikembangkan oleh periset kecerdasan buatan pada dasawarsa 1960-an dan 1970-an dan diterapkan secara komersial selama 1980-an. Bentuk umum sistem pakar adalah suatu program yang dibuat berdasarkan suatu set aturan yang menganalisis informasi (biasanya diberikan oleh pengguna suatu sistem) mengenai suatu kelas masalah spesifik serta analisis matematis dari masalah tersebut. Tergantung dari desainnya, sistem pakar juga mampu merekomendasikan suatu rangkaian tindakan pengguna untuk dapat menerapkan koreksi. Sistem ini memanfaatkan kapabilitas penalaran untuk mencapai suatu simpulan.
APA ITU SWI PROLOG?
Prolog singkatan dari Programming in Logic. Dikembangkan oleh Alain Colmenraurer dan P.Roussel di UniversitasMarseillesPerancis, tahun1972. Prolog populer di Eropa untuk aplikasi artificial intelligence, sedangkan di Amerika peneliti mengembangkan aplikasi yang sama, yaitu LISP.
Prolog merupakan suatu bahasa pemrograman yang banyak digunakan dalam pengembangan Artificial Intelliegence. Prolog dalam perkembangannya telah dikombinasikan dengan berbagai bahasa pemrograman, terutama functional programming.
DESKRIPSI PROGRAM
Program dibagi menjadi dua file terpisah dengan nama file program utama handphone.pl dan handphonedb.pl sebagai file database nya. Cukup dengan menjalankan program utama saja program pun akan berjalan dengan baik beserta database nya.
Berikut source code yang saya buat:
mulai:-
inisialisasi,
data_pengamatan,
aturan(Nomor,Alasan),
jawaban(Alasan,Jawab),nl,
write(‘Analisis Kerusakan : ‘ ), write(Jawab),nl,
write(‘Alasannya adalah aturan nomer ‘),
write(Nomor),nl,nl,
retractall(observation(_)).
mulai:-
nl,
write(‘NGACO!! handphone nya aja mati/hang!! silahkan mulai lagi’),nl,nl,
retractall(observation(_)).
inisialisasi:-
consult(‘c:\\Program Files\\pl\\contoh\\handphonedb.pl’),
judul(Judul),write(Judul),nl,nl,
tulis_pesan,nl.
tulis_pesan:-
pesan(Pesan),
write(Pesan),nl,fail.
tulis_pesan:-
nl.
data_pengamatan:-
pertanyaan(Tanya,Obs),
write(Tanya),nl,
read(Yatidak),
Yatidak=y,
assert(observation(Obs)),
fail.
data_pengamatan.
ini file database nya :
judul(‘*Deteksi Kerusakan Handphone*’).
pesan(‘Jawab pertanyaan berikut dengan y atau n’).
pertanyaan(‘Apakah handphone hidup saat dinyalakan ?’, hidup).
pertanyaan(‘Apakah masuk ke menu/tampilan utama ?’, menu).
pertanyaan(‘Apakah layar bermasalah ?’, layar).
pertanyaan(‘Apakah bisa melakukan panggilan keluar/sms/internetan ?’, call_sms).
pertanyaan(‘Apakah nada getar berfungsi ?’, getar).
pertanyaan(‘Apakah bisa untuk mendengarkan musik/mendengarkan suara si penelpon ?’ , musik).
pertanyaan(‘Apakah handphone hang saat digunakan ?’, hang).
pertanyaan(‘Apakah bisa untuk charger ?’, charger).
aturan(1, ic_power):-
observation(hang),
not(observation(hidup)),
not(observation(layar)),
observation(call_sms),
observation(getar),
not(observation(musik)),
not(observation(menu)),
observation(charger).
aturan(2, ic_signal):-
observation(hidup),
observation(menu),
not(observation(layar)),
not(observation(call_sms)),
not(observation(hang)).
aturan(3, lcd):-
observation(hidup),
observation(layar),
not(observation(menu)).
aturan(4, ic_interface):-
observation(hidup),
observation(call_sms),
not(observation(layar)),
not(observation(getar)),
not(observation(hang)).
aturan(5, socket_charge):-
observation(hidup),
observation(menu),
observation(call_sms),
observation(musik),
not(observation(hang)),
not(observation(charger)),
not(observation(layar)).
aturan(6, speaker):-
observation(hidup),
observation(menu),
not(observation(musik)),
not(observation(hang)).
aturan(7, keypad):-
observation(hidup),
not(observation(hang)),
not(observation(menu)),
not(observation(layar)).
aturan(8, mati_total):-
observation(hang),
not(observation(hidup)),
not(observation(layar)),
not(observation(call_sms)),
not(observation(getar)),
not(observation(musik)),
not(observation(menu)),
not(observation(charger)).
jawaban(ic_power, ‘Tidak ada supply daya dari baterai, coba check IC Power’).
jawaban(ic_signal, ‘Terhambatnya aliran listrik dari IC Signal, bisa juga kosong’).
jawaban(lcd, ‘adanya kerusakan pada LCD(Liquid Cell DIsplay) ‘).
jawaban(ic_interface, ‘Tidak bisa getar diakibatkan karena IC interfacenya tidak berfungsi ‘).
jawaban(socket_charge,’kerusakan bisa pada soket charge atau dari chargeran itu sendiri’).
jawaban(speaker,’kegagalan output suara pada speaker’).
jawaban(keypad,’hang pada menu, tidak bisa bergerak ke kiri atau ke kanan dikarenakan tuts keypad sudah aus’).
jawaban(mati_total,’ Handphone Mati Total! Silahkan Lempar dan Beli yang Baru:-)’).
inisialisasi,
data_pengamatan,
aturan(Nomor,Alasan),
jawaban(Alasan,Jawab),nl,
write(‘Analisis Kerusakan : ‘ ), write(Jawab),nl,
write(‘Alasannya adalah aturan nomer ‘),
write(Nomor),nl,nl,
retractall(observation(_)).
mulai:-
nl,
write(‘NGACO!! handphone nya aja mati/hang!! silahkan mulai lagi’),nl,nl,
retractall(observation(_)).
inisialisasi:-
consult(‘c:\\Program Files\\pl\\contoh\\handphonedb.pl’),
judul(Judul),write(Judul),nl,nl,
tulis_pesan,nl.
tulis_pesan:-
pesan(Pesan),
write(Pesan),nl,fail.
tulis_pesan:-
nl.
data_pengamatan:-
pertanyaan(Tanya,Obs),
write(Tanya),nl,
read(Yatidak),
Yatidak=y,
assert(observation(Obs)),
fail.
data_pengamatan.
ini file database nya :
judul(‘*Deteksi Kerusakan Handphone*’).
pesan(‘Jawab pertanyaan berikut dengan y atau n’).
pertanyaan(‘Apakah handphone hidup saat dinyalakan ?’, hidup).
pertanyaan(‘Apakah masuk ke menu/tampilan utama ?’, menu).
pertanyaan(‘Apakah layar bermasalah ?’, layar).
pertanyaan(‘Apakah bisa melakukan panggilan keluar/sms/internetan ?’, call_sms).
pertanyaan(‘Apakah nada getar berfungsi ?’, getar).
pertanyaan(‘Apakah bisa untuk mendengarkan musik/mendengarkan suara si penelpon ?’ , musik).
pertanyaan(‘Apakah handphone hang saat digunakan ?’, hang).
pertanyaan(‘Apakah bisa untuk charger ?’, charger).
aturan(1, ic_power):-
observation(hang),
not(observation(hidup)),
not(observation(layar)),
observation(call_sms),
observation(getar),
not(observation(musik)),
not(observation(menu)),
observation(charger).
aturan(2, ic_signal):-
observation(hidup),
observation(menu),
not(observation(layar)),
not(observation(call_sms)),
not(observation(hang)).
aturan(3, lcd):-
observation(hidup),
observation(layar),
not(observation(menu)).
aturan(4, ic_interface):-
observation(hidup),
observation(call_sms),
not(observation(layar)),
not(observation(getar)),
not(observation(hang)).
aturan(5, socket_charge):-
observation(hidup),
observation(menu),
observation(call_sms),
observation(musik),
not(observation(hang)),
not(observation(charger)),
not(observation(layar)).
aturan(6, speaker):-
observation(hidup),
observation(menu),
not(observation(musik)),
not(observation(hang)).
aturan(7, keypad):-
observation(hidup),
not(observation(hang)),
not(observation(menu)),
not(observation(layar)).
aturan(8, mati_total):-
observation(hang),
not(observation(hidup)),
not(observation(layar)),
not(observation(call_sms)),
not(observation(getar)),
not(observation(musik)),
not(observation(menu)),
not(observation(charger)).
jawaban(ic_power, ‘Tidak ada supply daya dari baterai, coba check IC Power’).
jawaban(ic_signal, ‘Terhambatnya aliran listrik dari IC Signal, bisa juga kosong’).
jawaban(lcd, ‘adanya kerusakan pada LCD(Liquid Cell DIsplay) ‘).
jawaban(ic_interface, ‘Tidak bisa getar diakibatkan karena IC interfacenya tidak berfungsi ‘).
jawaban(socket_charge,’kerusakan bisa pada soket charge atau dari chargeran itu sendiri’).
jawaban(speaker,’kegagalan output suara pada speaker’).
jawaban(keypad,’hang pada menu, tidak bisa bergerak ke kiri atau ke kanan dikarenakan tuts keypad sudah aus’).
jawaban(mati_total,’ Handphone Mati Total! Silahkan Lempar dan Beli yang Baru:-)’).
SUMBER :
http://abby-molana.blogspot.co.id/2012/02/program-deteksi-handphone-menggunakan.htmlhttps://id.wikipedia.org/wiki/Sistem_pakar
