Indra Gunawan

word of my mind, word of my heart.


Sim City Societies, Keren !!

Bosan main Seal, Dota juga, apalagi RF. Iseng-iseng masuk ke toko kaset, cari game baru. Eh, ketemu Sim City. Game kesayangan saya dulu, yang kalau main bisa sampai lupa waktu.

Sekarang Sim City keluar versi barunya, Sim City Societies namanya. Game ini terasa agak berbeda. Selain graphik yang tentu saja wuaah.., cara permainanya juga agak lain dari sebelumnya. Tapi, yang penting game ini tetep enjoy.

Nih Snapshots nya :


Ini kota pertama saya ^^




Kalau ini suasana pedesaannya.

*nanti kalau sudah jadi kota yang gede, saya kasih snapshots lagi deh (kalau ga lupa)

Labels:

Penyelesaian masalah Petani, Kambing, Hariamau dan Sayuran dalam CLIPS

Kalau anda pernah mengikuti mata kuliah Artificial Intelligence, anda pasti sudah tidak asing mendengar judul tersebut. Masalah yang umum ditanyakan kepada newbie AI selain masalah "Water Jug".

Soal :
Seorang petani akan menyebrangkan seekor kambing, seekor harimau, dan sayur-sayuran dengan sebuah boat yang melalui sungai. Boat hanya bisa memuat petani dan satu penumpang yang lain (kambing, harimau, atau sayur-sayuran). Jika ditinggalkan oleh petani tersebut, maka sayur-sayuran akan dimakan oleh kambing, dan kambing akan dimakan oleh harimau.

Penyelesaian :

Berikut adalah penyelesaian program CLIPS yang telah dibuat oleh teman saya. Sedangkan saya sendiri dulu tidak sanggup menyelesaikan masalah ini.

; inisialisasi keadaan awal
(deffacts init
(timur petani)
(timur harimau)
(timur kambing)
(timur sayuran)
)

; urutan makan dimakan
(deffacts makan
(makan harimau kambing)
(makan kambing sayuran)
)

; aturan pengangkutan ke barat
; petani dan kambing ke barat
(defrule petaniKambingBarat1
?i<-(timur petani)
?j<-(timur ?k)
(timur ?h)
(timur ?s)
(makan ?h ?k)
(makan ?k ?s)
=>
(printout t ?k " dan petani ke barat " t)
(assert(barat petani))
(assert(barat ?k))
(retract ?i)
(retract ?j)
)

; harimau dan petani ke barat
(defrule petaniHarimauKeBarat
?i<-(timur petani)
?j<-(timur ?h)
(timur ?s)
(barat ?k)
(makan ?h ?k)
(makan ?k ?s)
=>
(retract ?i)
(retract ?j)
(assert(barat petani))
(assert(barat ?h))
(printout t ?h " dan petani ke barat" t)
)

; sayuran dan petani ke barat
(defrule sayuranPetaniBarat
?i<-(timur petani)
?j<-(timur ?s)
(barat ?h)
(timur ?k)
(makan ?h ?k)
(makan ?k ?s)
=>
(retract ?i)
(retract ?j)
(assert (barat petani))
(assert (barat ?s))
(printout t ?s " dan petani ke barat" t)
)

; petani dan kambing ke barat
(defrule petaniKambingBarat
?i<-(timur petani)
?j<-(timur ?k)
(barat ?h)
(barat ?s)
(makan ?h ?k)
(makan ?k ?s)
=>
(retract ?i)
(retract ?j)
(assert (barat petani))
(assert (barat ?k))
(printout t ?k " dan petani ke barat" t)
)

; aturan pengangkutan ke timur
; petani ke timur
(defrule petaniKeTimurSendiri
?i<-(barat petani)
(barat ?k)
(timur ?h)
(timur ?s)
(makan ?h ?k)
(makan ?k ?s)
=>
(retract ?i)
(assert(timur petani))
(printout t "petani ke timur" t)
)

; petani ke timur
(defrule petaniKeTimurSendiri2
?i<-(barat petani)
(timur ?k)
(barat ?h)
(barat ?s)
(makan ?h ?k)
(makan ?k ?s)
=>
(retract ?i)
(assert(timur petani))
(printout t "petani ke timur" t)
)

; kambing dan petani ke timur
(defrule petaniKeTimur
?i<-(barat petani)
?j<-(barat ?k)
(barat ?h)
(timur ?s)
(makan ?h ?k)
(makan ?k ?s)
=>
(retract ?i)
(retract ?j)
(assert (timur ?k))
(assert (timur petani))
(printout t ?k " dan petani ke timur" t)
)


*di lain soal, kambing sering digantikan dengan serigala

Labels: , , , ,

Dasar Pengoperasian CLIPS

Program yang dibutuhkan :

CLIPS (clipswin)
Text/Code Editor (notepad, textpad, clipsedt, dll)


Untuk menuliskan code CLIPS tidak diperlukan program khusus. Tidak harus dengan CLIPS editor, dengan notepad sekalipun sudah bisa. Yang penting di sini, anda harus menyimpan program anda dengan ekstension “.clp” (dot clp tanpa tanda petik).

Setelah disimpan, kemudian bukalah program clipswin yang anda miliki.

File > Load Construcs.. (CTRL+L)

Cari file yang anda simpan tadi, kemudian “open”. Setelah itu maka program akan membaca code anda. Apabila berhasil akan tertulis “TRUE” di akhir baris. Apabila gagal tertulis “FALSE”. TRUE disini berarti program anda sudah benar. FALSE, berarti ada yang harus anda perbaiki dari program anda.

Reset program anda terlebih dahulu, gunakan :

Execution > Reset (CTRL+U)

Kemudian untuk me-run program gunakan :

Execution > Run (CTRL+R)

Maka akan keluar hasil dari program yang anda buat.
Sebelum me-load program yang lain, anda harus meng"clear" program CLIPS anda. Gunakan :

Execution > Clear CLIPS

atau dengan menegtikkan "(clear)" (tanpa tanda petik) kemudian ENTER

Hal ini wajib dilakukan. Karena apabila tidak, CLIPS masih mengenali program yang selumnya.
Untuk membuka file BIN (seperti file .exe pada C) caranya hampir sama. Gunakan :

File > Load Binary Image..

Akan keluar pemberitahuan TRUE atau FALSE. Kemudian jalankan run dengan menekan CTRL+R.

*sebenarnya penulisan code CLIPS bisa dilakukan pada software itu langsung, tapi prosesnya akan lebih merepotkan.

Labels: , , ,

Pi (π) ituh bukan 22/7!!

Tadi siang saya telibat dalam sebuah perdebatan kecil. Perdebatan mengenai asal mula nilai pi (disimbolkan dengan π). Yah, pi(π) yang kita kenal sebagai rumus untuk menghitung luas atau keliling lingkaran.

Ternyata masih banyak yang menganggap bahwa pi(π) itu benar-benar bernilai 22/7, dan 3.14 adalah pembulatan dari hasil bagi 22 dengan angka 7 tersebut. Padahal sebenarnya bukan. Sebaliknya, sebenarnya 22/7 lah yang merupakan pembulatan dari 3.14.

Pembulatan tersebut tentunya bukanlah benar-benar berasal dari 3.14, tapi dari bilangan 3.14159265358979323846… (belum habis sampai 1,241,100,000,000 tempat desimal).

Sebagai pembuktian bahwa pi(π) bukanlah benar-benar bernilai 22/7, coba anda bagikan angka 22/7 tersebut. Pasti angka yang dihasilkan bukanlah 3.14159265358979323846…

Jadi lebih tepat anda mengatakan bahwa pi(π) adalah 3.14, bukan 22/7. Kalau anda mengatakan bahwa pi(π) adalah 3.14, anda hanya memotong tempat desimal. Sedangkan bila anda mengatakan bahwa pi(π) adalah 22/7, anda sebenarnya mengatakan nilai yang salah.

Matematika itu sulit. Tidak sesederhana itu.


Untuk mengetahui lebih lanjut mengenai nilai pi(π), anda bisa membacanya disini

Labels: ,

Newer›  ‹Older


Black Rose

I'm Indra Gunawan
From : Siak Sri Indrapura, Indonesia
Live : Kanazawa, Japan

Now I am school at Kindai, Japan.

I don't believe in luck and I love to made some poetry. :)


Search

Chit Chat



Recent Comments


    hit counter html code
  • since 22 Feb '08

  • Page Rank Check

My Social Networks


    Indra EhM's Facebook profile


Blogged Blog Directory
XML

Adsvertise