Sunday, January 16, 2011

Cara membuat komputer berbicara

sepatu orthopadi orthoshoping.com sepatu untuk koreksi kaki pengkor/ bengkok pada balita kelainan kaki pada balita arrow
Ads orthoshop info
sepatu orthopadi orthoshoping.com sepatu untuk koreksi kaki pengkor/ bengkok pada balita kelainan kaki pada balita arrow
Ads orthoshop info

-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...
sepatu orthopadi orthoshoping.com sepatu untuk koreksi kaki pengkor/ bengkok pada balita kelainan kaki pada balita arrow
Ads orthoshop info
Posted by at

No comments:

Post a Comment

Note: Only a member of this blog may post a comment.

Subscribe to: Post Comments (Atom)