Sunday, September 4, 2011

Membuat Komputer Berbicara

Buka notepad, copy-paste script berikut :
Dim msg, sapi
msg ="Isi dengan tulisan yang kamu mau??"
Set sapi = CreateObject ("sapi.spvoice")
sapi.Speak msg

Lalu, save file dengan tipe "all files" , diberi nama "(apa aja).vbs" dan save.
Sekarang coba kalian buka scriptnya dan dengarkan.. Hehehe..

Bisa untuk teka teki, pesan singkat, sekedar iseng, juga buat nembak si doi..

No comments:

Post a Comment