Monday, December 19, 2011

MEMBUAT KOMPUTER BERBICARA


Nah kali ini saya memposting yang unik hehehehe yaitu membuat komputer anda berbicara..apa bisa..? "bisa dong" ikuti langkah-langkah di bawah ini:

-Pertama, buka Notepad.
-Copy-Paste script berikut ke Notepad:

Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

-Save as, kemudian pilih "All Files", lalu beri nama "mypc.vbs" (tanpa tanda kutip).
-Cari file tadi dan klik 2 kali, lalu ketikkan kata-kata yang ingin diucapkan komputer.


Atau kalau ingin komputer langsung bicara begitu diklik, copy dan paste script ini ke Notepad:

Dim msg, sapi
msg = "Hi, how are you doing?"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

Ganti tulisan merah dengan kata-kata Anda sendiri, lalu Save as, dan beri nama "mypc.vbs".

Selamat mencoba...

2 comments:

  1. Thanks for your Information,

    Visit, coment and follow my blog
    http://jlepp.blogspot.com/

    ReplyDelete

Silakan Berkomentar sesuka Hati Anda Demi Kelancaran Kami Membangun Blog Ini.

Related Posts Plugin for WordPress, Blogger...

BERJALAN MENDAKI GUNUNG EVEREST, TERTATIH BERJALAN DI GURUN SAHARA, BERLAYAR MENYEBRANGI LAUTAN HINDIA,HANYA UNTUK MELIHAT RESTANA'S BLOG