Membuat Komputer berbicara

Hmmmm...anda ingin komputer anda dapat berbicara??oke...
Saya akan kasih tau caranya..
1. Pertama anda harus Buka Notepad
2. 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

3. Save as, kemudian pilih all files lalu kasih nama mypc.vbs
4. Selesai,
Oke sekarang coba anda klik 2x dan masukan kata apa yang inginkan..Gimana?Keren kan?heee

Atau kalau yang nggak mau menggunakan InputBox (Jadi pas di klik 2x 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

Tips ini sudah saya coba dan hasilnya berhasil...