Cara Membuat Komputer Bicara

Mozaik TKJ ~ Kembali lagi di Mozaik TKJ. Kali ini kita akan bersenang senang dengan komputer kita. Yakni membuat komputer kita bisa bicara.

Bagaimana caranya? Langsung saja kita mulai:

1. Buka Notepad. Caranya tekan tombol bergambar logo Windows + R, ketik "notepad", lalu tekan Enter

2. Jika Notepad sudah terbuka, copy paste teks di bawah: 

Dim Sapi, Message
Message = InputBox("Masukkan Kata yang Anda ingin Saya katakan:")
Set Sapi = CreateObject("Sapi.SPVoice")
Sapi.Speak Message 

3. Lalu simpan dengan nama "speak.vbs" (tanpa tanda petik)

4. Buka Windows Explorer, lalu buka tempat file tersebut Anda simpan, lalu klik 2 kali,
5. Tulis kata yang Anda ingin untuk komputer Anda katakan, misal: "I Love You". Lalu klik OK

6. Dengarkan bagaimana komputer Anda bicara

Catatan: cara tersebut tidak akan berhasil jika komputer Anda tidak ada speakernya.