langsung aja ikuti langkah - langkahnya..ok
1. pertama, buka notepad,
2. copy paste script berikut,
Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg
3. save as,pilih "all file" kamudian masukan namanya mypc.vbs
4. selesai..
coba anda jalankan programnya...
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
Tips ini sudah saya coba dan hasilnya : 100% Tested n Worked..!
biar lebih jelas kata2nya pake bahasa inggris.
ini juga bisa ngejek jenis kelamin komputer kamu,kalau komputer kamu suaranya cewek berarti kelaminnya perempuan dan sebaliknya klo komputer kamu suaranya cowok berarti kelaminnya laki-laki.
0 komentar:
Posting Komentar
Terima kasih anda telah menyukai/berkomentar ..Komentar yang anda tulis sangat berarti bagi kemajuan blog ini.THX.