Buat Komputer Kamu Berbicara

Oke, langsung aja…
Buka notepad dan copas kode berikut…

Code :

Dim msg, jasakom
msg=InputBox(“Masukkan Kalimat”,”Ngomong Dong”)
Set jasakom=CreateObject(“sapi.spvoice”)
jasakom.Speak msg

Nah simpan dengan nama Terserah.vbs dan jalankan…
Setelah itu masukkan atau ketik kata2 yang diinginkan…
Nyalakan speaker sekeras mungkin dan “ENTER”…
perhatian sob “suaranya dari orang inggris yang agak cadel berbicara bahasa indonesia” keren sih..

Semoga berguna…

Cruz3N

Tinggalkan komentar

Belum ada komentar.

Comments RSS TrackBack Identifier URI