0 Speaker Akan Ngomong Ketika Kamu Mengetik

Speaker Akan Ngomong Ketika Kamu Mengetik

Just for Fun

Nih satu trik yg ok juga lho,............

Run by VBS (Visual Basic Script,.... )
Script yg dibuat ini bisa buat PC kamu bersuara lho,..... ?????

PC akan mengeluarkan suara sesuai dengan kalimat yang kamu ketik,.....
Wets,... keren juga kan????
gimana caranya tuh?????

ok deh,... berikut step2-nya:


1. buka Notepad
2. trus copas code di bawah ini :

Code:

Dim msg, sapi
msg=InputBox("Tulis kalimat dikolom, lalu klik OK/tekan Enter","Neo_roang PC SPEAKS")
Set sapi=CreateObject("sapi.spvoice")
WScript.sleep 60
sapi.Speak msg

3. file Notepad yg sudah berisi code tadi di Save As; (namafile).vbs
4. simpan di drive mana aja (gag harus di c:)
5. nyalakan speaker PC kamu
6. jalankan aplikasi yg sdh kamu buat tadi. Kilik 2 Kali

7. ketik apa aja di box -->> tekan Enter atau klik OK

8. dengarkan PC kamu bersuara sesuai dengan apa yg sudah kamu ketik.

kekurangan : suara yg dihasilkan masih datar alias kurang penekanan intonasi karena suara ini merupakan suara basic windows yg ada di OS kamu, terus suara juga masih berlogat Inggris, walaupun masih tetap bisa mengucapkan lafal bahasa apa aja, tetap dengan logat Inggris-nya,....... dan kekurangan yg terakhir; buat para cowo; suaranya bukan suara cewe hehehehe

ok selamat mencoba yah
met have fun