turmijan
3rd February 2012, 09:44 PM
Pasti pada pengen tau dan penasaran nih sama komputernya cewe ato cowo, atow bahkan bencong? :wahaha: Ada triknya nih guys, mari dicoba :D
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, kemudian pilih all files lalu kasih nama ngomong.vbs
4. Jalankan File tadi.
5. Masukkan kata-kata terserah kamu
Nah, dari suara yang keluar maka kita bisa tau itu suara cowok apa suara cewek. Tapi jangan salahin saya klo misalkan suara bencong yang keluar :wahaha:
Tambahan : 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
Selamat mencoba! wkwkwk
credit to
http://ceri.ws/smilies/melongive.gif (indofiles.org)
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, kemudian pilih all files lalu kasih nama ngomong.vbs
4. Jalankan File tadi.
5. Masukkan kata-kata terserah kamu
Nah, dari suara yang keluar maka kita bisa tau itu suara cowok apa suara cewek. Tapi jangan salahin saya klo misalkan suara bencong yang keluar :wahaha:
Tambahan : 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
Selamat mencoba! wkwkwk
credit to
http://ceri.ws/smilies/melongive.gif (indofiles.org)