STRAWBERRY PROLOG: Membuat Garis (Line)

sehubungan dengan tugas tugas yang terlempar dari laboratorium teknik informatika. mata praktikum pengantar kecerdasan buatan (PKB). harus menggunakan strawberry prolog

Download Strawberry Prolog: download strawberry prolog
Password:

langkah 1

untuk membuka aplikasi strawberry prolog, download file di atas kemudian ekstrak rar nya, pilih strawberry prolog.exe
setelah muncul tampilan pertama, klik file kemudian new, pilih yang strawberry project, kemudian klik OK

langkah 2

ketikkan code berikut pada window kosong yang baru anda buat

?-window(G_namaWindow, _, window1(_), "Ini window pertamaku", 100,200,300,400).

• ?-window berarti membuat window baru.
• G_namaWindow adalah nama window tersebut
• window1(_) adalah fungsi yang nantinya akan dibuat
• “ini window pertamaku” adalah judul dari window yang akan muncul
• 100, 200, 300, 400 adalah koordinat dari window yang akan muncul, perhatikan gambar di bawah

langkah 3

untuk melihat hasilnya, pilih RUN di menu bar atau tekan F5 pada keyboard anda. maka akan tampil window kosong.

untuk membuat garis, tambahkan kode berikut

window1(paint):-
    line(100,100,100,200).

• window1(paint) adalah nama fungsi dari window saat dibuat.
• line berguna untuk membuat garis.
• 100,100,100,200 adalah koordinat dari (X1, Y1), (X2, Y2). koordinat (X1, Y1) akan membuat titik di (100, 100), (X2, Y2) akan membuat titik di (100,200). kedua titik tersebut akan dihubungkan sehingga menjadi garis. lihat gambar di bawah

langkah 4

jika masih bingung, buat 1 buah garis lagi sehingga coding kalian seperti ini

window1(paint):-
    line(100,100,100,200), %garis pertama
    line(100,200,200,200). %garis kedua

untuk memisahkan antar garis, menggunakan koma ( , ) . untuk mengakhiri fungsi harus menggunakan titik (.) . maka akan tampil seperti ini

langkah 5

untuk membuat persegi menggunakan garis menggunakan 4 garis.

window1(paint):-
    line(100,100,100,200), %garis pertama
    line(100,200,200,200), %garis kedua
    line(200,200,200,100), %garis ketiga
    line(200,100,100,100). %garis keempat

maka akan tampil seperti ini