MEMBUAT KOMPUTER BERBICARA

Ini nih, ada sedikit tips agar  komputer untuk berbicara sesuai keinginan kita. Kemarin iseng iseng aja browsing di internet, ehh , gak tau nya ketemu tuh . cara agar komputer berbicara. Gampang saja, caranya simple kok , gak perlu keahlian khusus , cukup mengikuti langkah-langkah di bawah ini. Gk percaya? coba aja

Bahan yang kudu wajib dimiliki, hanya sebuah notepad (yang udah kadaluarsa juga gpp), gak usah repot-repot nyarinya, karena semua komputer Win pasti sudah punya. Langsung aja ikutin step by step :

1. Buka Notepad. Yang belum punya bisa nyari sendiri.
2. Silahkan copy code berikut kedalam Notepadnya

   Dim ProSpeak Set ProSpeak = WScript.CreateObject( “SAPI.SpVoice” ) ProSpeak.Speak “hello“

3. Kata “hello”, bisa diganti dengan kalimat lain.
4. Save dalam format vbs. Misalnya “hello.vbs”
5. Setelah di save, buka filenya.

Dikarenakan untuk melakukan penggantian kata yang ribet, (*harus membuka filenya, lalu di edit), maka saya punya cara yang lain, biar lebih simple dalam pergantian kalimatnya. Ikuti step berikut :

1. Buka Notepad.
2. Copy code berikut kedalam Notepadnya

   Dim msg, aloy msg=InputBox(“Masukkan Kalimat”,”Komputernya mau ngomong nih..”) Set aloy=CreateObject(“sapi.spvoice”) aloy.Speak msg

3. Save dalam format vbs. Misalnya “Komputer Nogmong.vbs”
4. Setelah di save, buka filenya, lalu masukkan kalimatnya.

Silahkan Coba