Sunday, December 23, 2012

1 CARA MEMBUAT KOMPUTER BISA BICARA

Cara membuatnya gampang, pertama buka Notepad
copy paste script berikut :


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

Cara Membuat Computer Berbicara

Selesai

Cara Membuat Computer Berbicara

Coba sekarang anda dobel klik file tersebut apa katanya …

Cara Membuat Computer Berbicara

Atau kalau yang nggak mau menggunakan InputBox (Jadi pas di klik dua kali langsung berbicara tanpa perlu memasukan kata-kata). Scriptnya seperti ini :

Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

Selamat mencoba

1 Comments

Bagaimana Pendapat Anda ?

Followers