Sunday 15 September 2013
Penasaran nggak sob dengan postingan saya dengan judul Komputer Ku Bisa Ngomong?? pasti penasaran kan?? Emang komputer bisa berbicara??ahh gx mungkinn..pasti jawaban yg ada di benak sobat sekalian seperti ini tapi ada enaknya mending di cicip dulu nih biar lebih percaya nanti nya...okee ikutin nih cara-cara ini biar jadi bukti klo ternyata komputer kita emang bisa ngomong...
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
gimana keren kan...?
sekarang saatnya bilang.."SEMPURNA"
selamat mencuba brother :)
