Cara membuat komputer berbicara

Judulnya lebay n agak sotoy sepertinya, padahal ini cuman tips dan trik lama yang mungkin anak SD juga tau ... but disini mo share aj coz mungkin sebagian dari kita yang belum mengetahui hal ini.

Berikut cara membuat komputer berbicara sesuai dengan kemauan kita, coz kita yang mengatur dan menseting apa yang akan komputer bicarakan. So langsung coba seperti di bawah ini.

• Buka aplikasi notepad ( kl ga tau notepad kebangetan "start > accessories > notepad" )
• Ketikkan code berikut ( copas aj kalo ga mau repot )

Dim ProSpeak
Set ProSpeak = WScript.CreateObject( "SAPI.SpVoice" )
ProSpeak.Speak "yoga [dot] web [dot] i d"

• Simpan code di atas dengan ekstension .vbs ( misal pcbicara.vbs ) 
• Jalankan file pcbicara.vbs dengan klik 2x atau open pada folder tempat penyimpan.

Note :

Tulisan yoga [dot] web [dot] i d yang berwarna merah pada kode di atas bisa di rubah atau di ganti sesuai kemauan komputer untuk berbicara apa.

Tips dan trik cara membuat komputer berbicara sebenarnya banyak dan bisa di akalin dengan berbagai logika pemrograman, salah satunya bila ingin memunculkan box apa yang ingin komputer katakan, so tinggal ganti kode di atas dengan kode berikut :

Dim msg, sapi
msg = InputBox ( "Apa yang ingin komputer katakan ?", "Masukan kata-kata disini")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

Bila dengan kode script di atas maka screenshotnya seperti di bawah ini :
selamat mencoba semoga bermanfaat......

Posting ini telah dilihat sebanyak (kali)