Pages

BIKIN KOMPUTERMU BISA BICARA

Di postingan kali ini saya akan memberikan sedikit pengetahuan untuk anda. Tanpa install software atau hardware, komputer kita bisa dirayu untuk bicara sesuai kemauan kita. Caranya mudah banget, buka notepad atau teks editor apa saja, lalu masukkan cuplikan puisi berikut:

Dim pesan, sapi
pesan = InputBox ( "Kamu ingin aku ngomong apa?", "Bicaralah padaku sayang")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak pesan

Kemudian simpan file dengan nama apa saja, yang penting berekstensi .vbs, misal ngomongDonk.vbs
Untuk mengeksekusi, klik 2x file tersebut, maka akan muncul jendela seperti ini

Lalu masukkan kata atau kalimat yang ingin diucapkan oleh komputer dan tekan OK. Cobalah untuk menambahkan tanda baca titik, tanda tanya atau tanda seru, dan perhatikan perbedaan nada bicaranya.
Trik ini saya adaptasi dari 8uj3l.

0 komentar:

Posting Komentar