Bercahaya Akan Iman: Program Prolog Mendeteksi Kerusakan Pada Komputer

domains
            kerusakan = symbol
            gejala = symbol
            tanya = string
            jawab = char
database
            xpositif(gejala)
            xnegatif(gejala)
predicates
            penyebab(kerusakan)
            go
            positif(tanya,gejala)
            negatif(tanya,gejala)
            gejala(gejala)
            clear_fakta2
            simpan(gejala,jawab)
            tanya(tanya,gejala,jawab)
            go_once
            diagnosa(kerusakan)
            solusi(kerusakan)
        penanganan(kerusakan)
goal
            clearwindow,
            makewindow(1,24,15,"    KERUSAKAN HARDWARE (INPUT DEVICE)    ",0,0,24,80),
            go,
            removewindow.

clauses
            go:-
                        go_once,nl,nl,nl,nl,nl,
                        write("Ingin mengulang lagi (Y/T) ?"),
                        readchar(Jawab),nl,
                        clearwindow,
                        Jawab = 'y',
                        go.
            go_once:-
                        diagnosa(_),!,
                        save("test.dat"),
                        clear_fakta2.
            go_once:-
                        write("MAAF KERUSAKAN TiDAK DAPAT TERDETEKSI"),nl,
                        clear_fakta2.
            positif(_,Gejala):-
                        xpositif(Gejala),!.
            positif(Tanya,Gejala):-
                        not(xnegatif(Gejala)),
                        tanya(Tanya,Gejala,Jawab),
                        Jawab='y'.
            negatif(_,Gejala):-
                        xnegatif(Gejala),!.
            negatif(Tanya,Gejala):-
                        not(xpositif(Gejala)),
                        tanya(Tanya,Gejala,Jawab),
                        Jawab='t'.
            tanya(Tanya,Gejala,Jawab):-
                        write(Tanya),
                        readchar(Jawab),
                        write(Jawab),nl,
                        simpan(Gejala,Jawab).
            simpan(Gejala,'y'):-
                        asserta(xpositif(Gejala)).
            simpan(Gejala,'t'):-
                        asserta(xnegatif(Gejala)).
            clear_fakta2:-
                        retract(xpositif(_)),fail.
            clear_fakta2:-
                        retract(xnegatif(_)),fail.
            clear_fakta2.

/*------------gejala-----------*/

            gejala(Gejala):-
                        xpositif(Gejala),!.
            gejala(Gejala):-
                        xnegatif(Gejala),!,fail.

            gejala(tidak_ada_gambar_dimonitor):-
                        positif("Apakah tidak_ada gambar dimonitor(Y/T)? ",tidak_ada_gambar_dimonitor).
            gejala(ada_garis_horizontal_dimonitor):-
                        positif("Apakah ada garis horizontal dimonitor (Y/T)? ",ada_garis_horizontal_dimonitor).

            gejala(tidak_ada_tampilan_bios):-
                        positif("Apakah tidak ada tampilan bios (Y/T)? ",tidak_ada_tampilan_bios).
            gejala(muncul_pesan_error_pada_bios):-
                        positif("Apakah muncul pesan error pada bios (Y/T)? ",muncul_pesan_error_pada_bios).
            gejala(alaram_bios_bunyi):-
                        positif("Apakah alaram bios bunyi (Y/T)? ", alaram_bios_bunyi).
            gejala(os_melakukan_restart_otomatis):-
                        positif("Apakah os melakukan restart otomatis (Y/T)? ", os_melakukan_restart_otomatis).
            gejala(keluarnya_blue_screen_pada_os):-
                        positif("Apakah keluarnya blue screen pada os (Y/T)? ", keluarnya_blue_screen_pada_os).

        gejala(terdengar_suara_aneh_pada_HDD):-
                        positif("Apakah terdengar suara aneh pada HDD (Y/T)? ",terdengar_suara_aneh_pada_HDD).
            gejala(sering_terjadi_hang_crash_saat_menjalankan_apliasi):-
                        positif("Apakah sering terjadi hang crash saat menjalankan apliasi (Y/T)? ",sering_terjadi_hang_crash_saat_menjalankan_apliasi).
            gejala(selalu_scand_disk_saat_booting):-
                        positif("selalu scand disk saat booting (Y/T)? ", selalu_scand_disk_saat_booting).
            gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divece_manager_meski_driver_telah_diinstal):-
                        positif("Apakah divice driver informasi tidak terdeteksi dalam divece manager meski driver telah_diinstal (Y/T)? ", divice_driver_informasi_tidak_terdeteksi_dalam_divece_manager_meski_driver_telah_diinstal).
            gejala(divice_tidak_terdeteksi_dalam_bios):-
                        positif("Apakah divice tidak terdeteksi dalam bios (Y/T)? ", divice_tidak_terdeteksi_dalam_bios).
        gejala(informasi_deteksi_yang_salah_dalam_bios):-
                        positif("Apakah informasi deteksi yang salah dalam bios (Y/T)? ", informasi_deteksi_yang_salah_dalam_bios).

        gejala(tidak_ada_gambar_tertampil_dimonitor):-
                        positif("apakah tidak ada gambar tertampil di monitor (Y/T)? ",tidak_ada_gambar_tertampil_dimonitor).
            gejala(tidak_ada_tampilan_awal_bios):-
                        positif("Apakah tidak ada tampilan awal bios (Y/T)? ",tidak_ada_tampilan_awal_bios).
            gejala(alarm_bios_berbunyi):-
                        positif("Apakah alarm bios berbunyi(Y/T)? ", alarm_bios_berbunyi).
            gejala(muncul_pesan_error_saat_menjalankan_game_atau_aplikasi_grafis ):-
                        positif("Apakah muncul pesan error saat menjalankan game atau aplikasi grafis (Y/T)? ", muncul_pesan_error_saat_menjalankan_game_atau_aplikasi_grafis ).
            gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divice_manajer_meski_driver_telah_di_instal):-
                        positif("Apakah divice driver informasi tidak terdeteksi dalam divice manajer meski driver telah di instal (Y/T)? ", divice_driver_informasi_tidak_terdeteksi_dalam_divice_manajer_meski_driver_telah_di_instal).
        gejala(keluarnya_blue_screen_pada_os_windows):-
                        positif("Apakah keluarnya_blue screen pada os windows (Y/T)? ", keluarnya_blue_screen_pada_os_windows).
        gejala(suara_tetap_tidak_keluar_meskipun_driver_dan_setting_divice_telah_dilakukan_sesuai_petunjuk):-
                        positif("Apakah suara tetap tidak keluar meskipun driver dan setting divice telah dilakukan sesuai petunjuk (Y/T)? ", suara_tetap_tidak_keluar_meskipun_driver_dan_setting_divice_telah_dilakukan_sesuai_petunjuk).

        gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divece_manager_meski_driver_telah_diinstal):-
                        positif("Apakah divice driver informasi tidak terdeteksi dalam divece manager meski driver telah diinstal(Y/T)? ",divice_driver_informasi_tidak_terdeteksi_dalam_divece_manager_meski_driver_telah_diinstal).
            gejala(suara_tetap_tidak_keluar_meskipun_driver_dan_setting_divice_telah_dilakukan_sesuai_petunjuk):-
                        positif("Apakah suara tetap tidak keluar meskipun driver dan setting divice telah dilakukan sesuai petunjuk (Y/T)? ",suara_tetap_tidak_keluar_meskipun_driver_dan_setting_divice_telah_dilakukan_sesuai_petunjuk).
        gejala(muncul_pesan_error_saat_menjalankan_aplikasi_audio):-
                        positif(" Apakah muncul pesan error saat menjalankan aplikasi audio (Y/T)? ",muncul_pesan_error_saat_menjalankan_aplikasi_audio).

        gejala(tiba_tiba_os_restart_otomatis):-
                        positif("Apakah tiba_tiba_os_restart_otomatis(Y/T)? ",tiba_tiba_os_restart_otomatis).
            gejala(muncul_pesan_error_saat_pertama_os_diload_dari_HDD):-
                        positif("Apakah muncul pesan error saat pertama os diload dari HDD (Y/T)? ",muncul_pesan_error_saat_pertama_os_diload_dari_HDD).


        gejala(sering_terjadi_hang_crash_saat_menjalankan_aplikasi):-
                        positif("Apakah sering_terjadi_hang_crash_saat_menjalankan_aplikasi(Y/T)? ",sering_terjadi_hang_crash_saat_menjalankan_aplikasi).
            gejala(keluarnya_blue_screen_pada_os_windows):-
                        positif("Apakah keluarnya_blue_screen_pada_os_windows (Y/T)? ",keluarnya_blue_screen_pada_os_windows).

        gejala(tidak_ada_tanda_tanda_dari_sebagian_atau_seluruh_perangkat_bekerja):-
                        positif("Apakah tidak_ada_tanda_tanda_dari sebagian_atau_seluruh_perangkat_bekerja(Y/T)? ",tidak_ada_tanda_tanda_dari_sebagian_atau_seluruh_perangkat_bekerja).
            gejala(sering_tiba_tiba_mati_tanpa_sebab):-
                        positif("Apakah sering_tiba_tiba_mati_tanpa_sebab (Y/T)? ",sering_tiba_tiba_mati_tanpa_sebab).

        gejala(tidak_ada_gambar_tertampil_dimonitor):-
                        positif("Apakah tidak_ada_gambar_tertampil_dimonitor(Y/T)? ",tidak_ada_gambar_tertampil_dimonitor).
            gejala(tidak_ada_tamplan_awal_bios):-
                        positif("Apakah tidak_ada_tamplan_awal_bios (Y/T)? ",tidak_ada_tamplan_awal_bios).
        gejala(muncul_pesan_error_pada_bios):-
                        positif("Apakah muncul_pesan_error_pada_bios(Y/T)? ",muncul_pesan_error_pada_bios).
            gejala(alarm_bios_berbunyi):-
                        positif("Apakah alarm_bios_berbunyi (Y/T)? ",alarm_bios_berbunyi).

        gejala(muncul_pesan_pada_windows_bahwa_windows_kekurangan_virtual_memory):-
                        positif("Apakah muncul_pesan_pada_windows_bahwa_windows_kekurangan_virtual_memory(Y/T)? ",muncul_pesan_pada_windows_bahwa_windows_kekurangan_virtual_memory).
            gejala(aplikasi_berjalan_dengan_lambat_respon_yang_lambat_terhadap_inputan):-
                        positif("Apakah aplikasi_berjalan_dengan_lambat_respon_yang_lambat_terhadap_inputan(Y/T)? ",aplikasi_berjalan_dengan_lambat_respon_yang_lambat_terhadap_inputan).

        gejala(muncul_pesan_eror_saat_menjalankan_game):-
            positif("Apkah muncul_pesan_eror_saat_menjalankan_game (Y/T)?",muncul_pesan_eror_saat_menjalankan_game).
        gejala(kinerja_grafis_terasa_berat):-
            positif("Apkah kinerja_grafis_terasa_berat (Y/T)?",kinerja_grafis_terasa_berat).

        gejala(aplikasi_berjalan_dengan_lambat):-
            positif("Apkah aplikasi_berjalan_dengan_lambat(Y/T)?",aplikasi_berjalan_dengan_lambat).

            gejala(device_tidak_terdeteksi_dalam_bios):-
            positif("Apkah device_tidak_terdeteksi_dalam_bios(Y/T)?",device_tidak_terdeteksi_dalam_bios).


         gejala(alaram_bios_berbunyi):-
            positif("Apkah alaram_bios_berbunyi(Y/T)?",alaram_bios_berbunyi).
         gejala(hanya_sebagian_perangkat_bekerja):-
            positif("Apkah hanya_sebagian_perangkat_bekerja(Y/T)?",hanya_sebagian_perangkat_bekerja).


        gejala(device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger):-
            positif("Apkah device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger(Y/T)?",device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger).


        gejala(sebagian_karakter_inputan_mati):-
            positif("Apkah sebagian_karakter_inputan_mati(Y/T)?",sebagian_karakter_inputan_mati).


        gejala(pointer_mouse_tidak_merespon):-
            positif("Apkah pointer_mouse_tidak_merespon(Y/T)?",pointer_mouse_tidak_merespon).
        gejala(device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger):-
            positif("Apkah device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger(Y/T)?",device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger).




/* --------------------diagnosa------------------ */


            diagnosa("monitor_rusak"):-
                        gejala(tidak_ada_gambar_dimonitor),
                        gejala(ada_garis_horizontal_dimonitor),
                        solusi("monitor_rusak"),
            penanganan("sebaiknya_beli_monitor_baru").

            diagnosa("memori_rusak"):-
                        gejala(tidak_ada_tampilan_bios),
                        gejala(muncul_pesan_error_pada_bios),
            gejala(alaram_bios_bunyi),
            gejala(os_melakukan_restart_otomatis),
            gejala(keluarnya_blue_screen_pada_os),
                        solusi("memori_rusak"),
            penanganan("Bersihkan_memory_dengan_cara_menggosok_pin-pin_memory_jika_tetap_tidak_bisa_beli_baru").

        diagnosa("HDD_rusak"):-
                        gejala(terdengar_suara_aneh_pada_HDD),
                        gejala(sering_terjadi_hang_crash_saat_menjalankan_apliasi),
            gejala(selalu_scand_disk_saat_booting),
            gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divece_manager_meski_driver_telah_diinstal ),
            gejala(divice_tidak_terdeteksi_dalam_bios),
            gejala(informasi_deteksi_yang_salah_dalam_bios),
            solusi("HDD_rusak"),
            penanganan("lakukan_pemeriksaan_satu _per_satu_dan_khusus_untuk_drive_C_tempat_windows_terinstal").

        diagnosa("VGA_rusak"):-
                        gejala(tidak_ada_gambar_tertampil_dimonitor),
                        gejala(tidak_ada_tampilan_awal_bios),
            gejala(alarm_bios_berbunyi),
            gejala(muncul_pesan_error_saat_menjalankan_game_atau_aplikasi_grafis ),
            gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divice_manajer_meski_driver_telah_di_instal),
            gejala(keluarnya_blue_screen_pada_os_windows),
            gejala(suara_tetap_tidak_keluar_meskipun_driver_dan_setting_divice_telah_dilakukan_sesuai_petunjuk),
            solusi("VGA_rusak"),
            penanganan("Bersihkan_vga_card_pada_slot_mobo").

        diagnosa("sound_card_rusak"):-
                        gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divece_manager_meski_driver_telah_diinstal),
                        gejala(suara_tetap_tidak_keluar_meskipun_driver_dan_setting_divice_telah_dilakukan_sesuai_petunjuk),
            gejala(muncul_pesan_error_saat_menjalankan_aplikasi_audio),
            solusi("sound_card_rusak"),
            penanganan("memasang_sound_card_usb_yaitu_tinggal_colok_dan_pasang_driver").

        diagnosa("os_bermasalah"):-
                        gejala(tiba_tiba_os_restart_otomatis),
            gejala(muncul_pesan_error_saat_pertama_os_diload_dari_HDD),
            solusi("os_bermasalah"),
            penanganan("instal_ulang_os").

        diagnosa("aplikasi_rusak"):-
                        gejala(sering_terjadi_hang_crash_saat_menjalankan_aplikasi),
            gejala(keluarnya_blue_screen_pada_os_windows),
            solusi("plikasi_rusak"),
            penanganan("instal_ulang_aplikasi").

        diagnosa("CPU_rusak"):-
                        gejala(tidak_ada_tanda_tanda_dari_sebagian_atau_seluruh_perangkat_bekerja),
            gejala(sering_tiba_tiba_mati_tanpa_sebab),
            solusi("CPU_rusak"),
            penanganan("instal_ulang_CPU").

        diagnosa("Prosessor_rusak"):-
                        gejala(tidak_ada_gambar_tertampil_dimonitor),
            gejala(tidak_ada_tamplan_awal_bios),
            gejala(muncul_pesan_error_pada_bios),
            gejala(alarm_bios_berbunyi),
            solusi("Prosessor_rusak"),
            penanganan("Ganti_prosesor").

        diagnosa("memory_kurang"):-
                        gejala(muncul_pesan_pada_windows_bahwa_windows_kekurangan_virtual_memory),
            gejala(aplikasi_berjalan_dengan_lambat_respon_yang_lambat_terhadap_inputan),
            solusi("memory_kurang"),
            penanganan("beli_memory_baru").

        diagnosa("memori_vga_kurang"):-
            gejala(muncul_pesan_eror_saat_menjalankan_game),
            gejala(kinerja_grafis_terasa_berat),
            solusi("memori_vga_kurang"),
            penanganan("tambah_memori_vga").

        diagnosa("clock_prosesor_kurang_tinggi"):-
            gejala(aplikasi_berjalan_dengan_lambat),
            solusi("clock_prosesor_kurang_tinggi"),
            penanganan("cara_untuk_meningkatkan_clock_prosesor_dengan_menambah_jumlah_CORE").

        diagnosa("kabel_ide_rusak"):-
            gejala(device_tidak_terdeteksi_dalam_bios),
            solusi("kabel_ide_rusak"),
            penanganan("ganti_kabel_ide").

        diagnosa("kurang_daya_pada_psu"):-
            gejala(alaram_bios_berbunyi),
            gejala(hanya_sebagian_perangkat_bekerja),
            solusi("kurang_daya_pada_psu"),
            penanganan("memeriksa_stop_kontak_serta_kabel_listrik_dan_memeriksa_atau_mengecek_koneksi_keMotherboard").

        diagnosa("perangkat_usb_rusak"):-
                       gejala(device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger),
                       solusi("perangkat_usb_rusak"),
               penanganan("solusi_terbaik_mengganti_port_USB").

        diagnosa("keyboard_rusak"):-
            gejala(sebagian_karakter_inputan_mati),
            solusi("keyboard_rusak"),
            penanganan("bersihkan_bagian_dalam_keyboard_dengan_kapas_yang_diberi_alkohol_Dan_tunggu_sampai_kering").

        diagnosa("mouse_rusak"):-
            gejala(pointer_mouse_tidak_merespon),
            gejala(device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger),
            solusi("mouse_rusak"),
            penanganan("beli_mouse_baru").

        penyebab("monitor_rusak"):-
                        gejala(tidak_ada_gambar_dimonitor),
                        gejala(ada_garis_horizontal_dimonitor),
                        solusi("monitor_rusak"),
            penanganan("sebaiknya_beli_monitor_baru").

            penyebab("memori_rusak"):-
                        gejala(tidak_ada_tampilan_bios),
                        gejala(muncul_pesan_error_pada_bios),
            gejala(alaram_bios_bunyi),
            gejala(os_melakukan_restart_otomatis),
            gejala(keluarnya_blue_screen_pada_os),
                        solusi("memori_rusak"),
            penanganan("Bersihkan_memory_dengan_cara_menggosok_pin-pin_memory_jika_tetap_tidak_bisa_beli_baru").

        penyebab("HDD_rusak"):-
                        gejala(terdengar_suara_aneh_pada_HDD),
                        gejala(sering_terjadi_hang_crash_saat_menjalankan_apliasi),
            gejala(selalu_scand_disk_saat_booting),
            gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divece_manager_meski_driver_telah_diinstal ),
            gejala(divice_tidak_terdeteksi_dalam_bios),
            gejala(informasi_deteksi_yang_salah_dalam_bios),
            solusi("HDD_rusak"),
            penanganan("lakukan_pemeriksaan_satu _per_satu_dan_khusus_untuk_drive_C_tempat_windows_terinstal").

         penyebab("VGA_rusak"):-
                        gejala(tidak_ada_gambar_tertampil_dimonitor),
                        gejala(tidak_ada_tampilan_awal_bios),
            gejala(alarm_bios_berbunyi),
            gejala(muncul_pesan_error_saat_menjalankan_game_atau_aplikasi_grafis ),
            gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divice_manajer_meski_driver_telah_di_instal),
            gejala(keluarnya_blue_screen_pada_os_windows),
            gejala(suara_tetap_tidak_keluar_meskipun_driver_dan_setting_divice_telah_dilakukan_sesuai_petunjuk),
            solusi("VGA_rusak"),
            penanganan("Bersihkan_vga_card_pada_slot_mobo").

         penyebab("sound_card_rusak"):-
                        gejala(divice_driver_informasi_tidak_terdeteksi_dalam_divece_manager_meski_driver_telah_diinstal),
                        gejala(suara_tetap_tidak_keluar_meskipun_driver_dan_setting_divice_telah_dilakukan_sesuai_petunjuk),
            gejala(muncul_pesan_error_saat_menjalankan_aplikasi_audio),
            solusi("sound_card_rusak"),
            penanganan("memasang_sound_card_usb_yaitu_tinggal_colok_dan_pasang_driver").

         penyebab("os_bermasalah"):-
                        gejala(tiba_tiba_os_restart_otomatis),
            gejala(muncul_pesan_error_saat_pertama_os_diload_dari_HDD),
            solusi("os_bermasalah"),
            penanganan("instal_ulang_os").

         penyebab("aplikasi_rusak"):-
                        gejala(sering_terjadi_hang_crash_saat_menjalankan_aplikasi),
            gejala(keluarnya_blue_screen_pada_os_windows),
            solusi("plikasi_rusak"),
            penanganan("instal_ulang_aplikasi").

         penyebab("CPU_rusak"):-
                        gejala(tidak_ada_tanda_tanda_dari_sebagian_atau_seluruh_perangkat_bekerja),
            gejala(sering_tiba_tiba_mati_tanpa_sebab),
            solusi("CPU_rusak"),
            penanganan("instal_ulang_CPU").

         penyebab("Prosessor_rusak"):-
                        gejala(tidak_ada_gambar_tertampil_dimonitor),
            gejala(tidak_ada_tamplan_awal_bios),
            gejala(muncul_pesan_error_pada_bios),
            gejala(alarm_bios_berbunyi),
            solusi("Prosessor_rusak"),
            penanganan("Ganti_prosesor").

         penyebab("memory_kurang"):-
                        gejala(muncul_pesan_pada_windows_bahwa_windows_kekurangan_virtual_memory),
            gejala(aplikasi_berjalan_dengan_lambat_respon_yang_lambat_terhadap_inputan),
            solusi("memory_kurang"),
            penanganan("beli_memory_baru").

         penyebab("memori_vga_kurang"):-
            gejala(muncul_pesan_eror_saat_menjalankan_game),
            gejala(kinerja_grafis_terasa_berat),
            solusi("memori_vga_kurang"),
            penanganan("tambah_memori_vga").

         penyebab("clock_prosesor_kurang_tinggi"):-
                       gejala(aplikasi_berjalan_dengan_lambat),
                       solusi("clock_prosesor_kurang_tinggi"),
               penanganan("cara_untuk_meningkatkan_clock_prosesor_dengan_menambah_jumlah_CORE").

         penyebab("kabel_ide_rusak"):-
                       gejala(device_tidak_terdeteksi_dalam_bios),
                       solusi("kabel_ide_rusak"),
               penanganan("ganti_kabel_ide").

         penyebab("kurang_daya_pada_psu"):-
            gejala(alaram_bios_berbunyi),
            gejala(hanya_sebagian_perangkat_bekerja),
            solusi("kurang_daya_pada_psu"),
            penanganan("memeriksa_stop_kontak_serta_kabel_listrik_dan_memeriksa_atau_mengecek_koneksi_keMotherboard").

         penyebab("perangkat_usb_rusak"):-
                       gejala(device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger),
                       solusi("perangkat_usb_rusak"),
               penanganan("solusi_terbaik_mengganti_port_USB").

         penyebab("keyboard_rusak"):-
            gejala(sebagian_karakter_inputan_mati),
            solusi("keyboard_rusak"),
            penanganan("bersihkan_bagian_dalam_keyboard_dengan_kapas_yang_diberi_alkohol_Dan_tunggu_sampai_kering").

         penyebab("mouse_rusak"):-
            gejala(pointer_mouse_tidak_merespon),
            gejala(device_driver_informasi_tidak_terdeteksi_dalam_dvciemeneger),
            solusi("mouse_rusak"),
            penanganan("beli_mouse_baru").

            solusi(Kerusakan):-
                        upper_lower(BKerusakan,Kerusakan),nl,nl,nl,
                        write("     KERUSAKAN PADA KOMPUTER ANDA ADALAH     ",BKerusakan),nl.

            penanganan(Kerusakan):-
                        upper_lower(BKerusakan,Kerusakan),nl,nl,nl,
                        write(" SOLUSINYA ADALAH     ",BKerusakan),nl.