Pastisobat penasaran dengan judulnya, membuat komputer bisa berbicara. Kalorobot atau boneka bisa berbicara sih biasa, tapi kali ini komputer bisaberbicara. Yup, komputer yang sedang sobat pakai.... yang lebihmenakjubkan lagi, ia akan berbicara sesuai dengan apa yang kitaperintahkan. Nah....low, pa enggak aneh bin ajaib itu. Dari padasemakin penasaran, mending kita langsung praktek cara membuat komputer bisa berbicara:
1. Buka Notepad
2. Silakan copy paste script dibawah ini pada notepad
4. Selesai..... Dan coba klik 2 kali file tersebut.
Apabila kita ingin membuatnya bicara secara otomatis ketika kitamengeklik 2 kali, tanpa mengisi form kodenya adalah sebagai berikut.
Kemudian simpan. Namanya terserah, yang penting berekstensi .vbs.
Oke, Selamat mencoba.... hehehe
1. Buka Notepad
2. Silakan copy paste script dibawah ini pada notepad
Dim msg, sapi3. Save As, lalu beri nama mypc.vbs, lalu klik tombol close.
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
4. Selesai..... Dan coba klik 2 kali file tersebut.
Apabila kita ingin membuatnya bicara secara otomatis ketika kitamengeklik 2 kali, tanpa mengisi form kodenya adalah sebagai berikut.
Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
Kemudian simpan. Namanya terserah, yang penting berekstensi .vbs.
Oke, Selamat mencoba.... hehehe
No comments:
Post a Comment