Facebook Badge

Jumat, 20 April 2012

Buat komputer berbicara


Saat sekarang sudah tidak aneh lagi komputer mengeluarkan voice / suara, membacakan untuk kita sederetan kata atau kalimat yang ada pada suatu dokumen (text).
Tetapi tidak ada salahnya kita mencoba sendiri script sederhana untuk mengkonversi / mengubah tulisan menjadi voice, yaitu dengan menggunakan notepad.


• Buka Notepad
• Copy dan Pastekan pada notepad script berikut ini 

Dim message, sapi
message=InputBox("apa yang anda ingin katakan?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

• Simpan file dengan nama bebas terserah anda dengan extension .vbs
( namaterserahanda.vbs ) bukan berektension .txt
• Untuk menjalankan dobel klik file yang telah dibuat, ketikkan tulisan yang ingin dikonversikan ke voice
• Klik OK untuk mendengarkan..

0 komentar:

Posting Komentar

Terima kasih telah mengunjungi blog ini, Semoga bermanfaat!