TIPS BIKIN KOMPUTER BICARA

Pernah kepikir ga bikin komputer ngomong.Ato gini aja deh pernah ga nonton box office khusus film action modern pasti ga lepas yang namanya komputer.Canggihnya lagi dan bikin ngiler buat yang suka tentunya di film biasanya kalo nyalain komputer,komputernya bisa ngomong.



Nah waktu iseng browsing tapi dapet blog tentang tips dan trik sederhana bikin komputer ngomong,walaupun sederhana ga pa pa lah yang penting bisa ngomomng dan terserah anda nantinya memodifikasinya.

Saran saya sebelum melakukan tips ini disamping anda harap ada kamus karena sangat berguna,karena komputer bukan buatan Indonesia maka logat yang entar dipake komputer kita buat ngomong bukan logat Indonesia juga,tapi logat Inggris.

-Pertama, buka Notepad.
-Copy-Paste script berikut ke Notepad:

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

-Save as, kemudian pilih "All Files", lalu beri nama "mypc.vbs" (tanpa tanda kutip).
-Cari file tadi dan klik 2 kali, lalu ketikkan kata-kata yang ingin diucapkan komputer.

Atau kalau ingin komputer langsung bicara begitu diklik, copy dan paste script ini ke Notepad:

Dim msg, sapi
msg = "Hi, how are you doing?"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

Ganti tulisan merah dengan kata-kata Anda sendiri, lalu Save as, dan beri nama "mypc.vbs".

Selamat mencoba...

sumber: http://educlopedia.blogspot.com/2011/01/cara-membuat-komputer-berbicara.html