Cara Membuat Komputer Berbicara

Bisakah komputer kita bicara seperti manusia,saya rasa bisa
Walau tidak selancar manusia disini akan aku share bagaimana cara membuat komputer berbicara

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
Sumber : http://computertiptrik.blogspot.com/2011/02/cara-membuat-computer-berbicara.html