Hehehehehe kali ini saya akan mempublikasikan sebuah aplikasi yang dapat kalian buat sendiri. Awal penjelajahan saya di remo-xp dan ada hal yang unik saat saya membuka dokumen" di sana, saya menemukan sebuah post berjudul "Membuat Komputer Berbicara". Pasti kalian bingungkan bagaimana cara membuat komputer berbicara ! Yak langsung saja Ke TKP
Caranya mudah sekali, yaitu :
- Pertama, buka notepad.
- Copy-Paste script berikut : Dim msg, sapi
- Save as, kemudian pilih all files lalu kasih nama mypc.vbs
- Selesai
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
Ooooo ia ada yang kelupaan atau kalau yang nggak mau menggunakan InputBox (Jadi pas di klik 2x langsung berbicara tanpa perlu memasukan kata-kata). Scriptnya seperti ini :
Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
Jangan lupa komentarnya !!!
0 komentar:
Posting Komentar