membuat komputer bisa berbicara

Penasaran nggak sob dengan judul
Tips Membuat Komputer Kita
Berbicara?? pasti penasaran kan??
Emang komputer bisa berbicara??
Gak percaya nih coba triknya...!!
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
kasih nama mypc.vbs
Selesai
Coba sekarang anda klik 2x..
Gimana?? keren kan?? hehe
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 : 100% Tested n Worked..!!
Have Fun...
..:: SEMOGA BERMANFAAT ::..