Laman

Script Untuk Membuat Komputer Bisa Berbicara

Zaman modern ini sudah tidak aneh jika komputer bisa mengeluarkan suara, membacakan suatu kata pada dokumen yang ada. Namun, tidak ada salahnya jika kita mencoba script sederhana untuk mengubah text menjadi suara dengan menggunakan notepad.
  • Buka Notepad
  • Copy dan paste kode dibawah ini 
Dim Message, Speak
Message=InputBox("Masukan Text","Speak")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak Message
  • Klik File > Save As, pilih All Files pada bagian Save as type, dan simpan dengan akhiran .vbs (NamaBebas.vbs)
Untuk mencobanya, double klik pada script yang sudah dibuat, kemudian masukan sembarang text lalu klik Ok untuk mendengarkan suara.

Tidak ada komentar:

Posting Komentar