Cara Membuat Komputer Berbicara

Andhika Priyanto

Tips and Trick

Saturday, January 28, 2012

Cara Membuat Komputer Berbicara, maksudnya disini adalah komputer dapat mengeluarkan pesan - pesan yang sudah diatur kita sebelumnya. Berikut Cara Membuat Komputer Berbicara :

- Pertama, buka Notepad

- Copy Paste script berikut ke Notepad

Dim msg, sapi

msg = InputBox ( "Apa yang Anda ingin saya katakan?","Masukan kata - kata" )

Set sapi = CreateObject ( "sapi.spvoice")

sapi.Speak msg

- Save as, kemudian pilih "All Files", lalu beri nama "mypc.vbs" (tanpa tanda kutip)

- Cari file tadi dan klik 2 kali, lalu ketikkan kata - kata yang ingin dicucapkan komputer

Atau kalau ingin komputer bicara begitu diklik, Copy Paste Script ini ke Notepad :

Dim msg, sapi

msg = "Hi, how are you doing"

Set sapi = CreateObject ( "sapi. spvoice")

sapi.Speak msg

Ganti tulisan yang berwarna merah dengan kata - kata anda sendiri, lalu save as dan beri nama "mypc.vbs".

Source : http://hermawayne.blogspot.com/2011/01/cara-membuat-komputer-berbicara.html

Selamat mencoba dan semoga berhasil, Cara Membuat Komputer Berbicara