Cara Untuk Memaksa Komputer Berbicara

Ini nih, ada sedikit tips supaya
komputer berbicara sesuai keinginan kita. Gampang saja, caranya simple kok, gak perlu keahlian khusus. Cukup mengikuti langkah-langkah di bawah ini. Gak percaya? Cobain aja.

Bahan yang kudu wajib dimiliki, hanya sebuah Notepad (yang udah kadaluarsa juga gapapa), 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 Ngomong.vbs”
4. Setelah di save, buka filenya, lalu masukkan kalimatnya.

Silahkan dicoba

Regards