Script Buat Voice Komputer Bicara
Saat sekarang sudah tidak aneh lagi komputer mengeluarkan voice / suara,
Membacakan untuk kita sederetan kata atau kalimat yang ada pada suatu dokumen (text).
Tetapi tidak ada salahnya kita mencoba sendiri script sederhana untuk mengkonversi / mengubah tulisan Menjadi voice, yaitu dengan menggunakan notepad.
• Buka Notepad
• Copy dan Pastekan pada notepad script berikut ini
• Simpan file dengan nama bebas terserah anda dengan extension .vbs
( namaterserahanda.vbs ) bukan berektension .txt
• Untuk menjalankan dobel klik file yang telah dibuat,
Ketikkan tulisan yang ingin dikonversikan ke voice
• Klik OK untuk mendengarkan.
Saat sekarang sudah tidak aneh lagi komputer mengeluarkan voice / suara,
Membacakan untuk kita sederetan kata atau kalimat yang ada pada suatu dokumen (text).
Tetapi tidak ada salahnya kita mencoba sendiri script sederhana untuk mengkonversi / mengubah tulisan Menjadi voice, yaitu dengan menggunakan notepad.
• Buka Notepad
• Copy dan Pastekan pada notepad script berikut ini
Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
• Simpan file dengan nama bebas terserah anda dengan extension .vbs
( namaterserahanda.vbs ) bukan berektension .txt
• Untuk menjalankan dobel klik file yang telah dibuat,
Ketikkan tulisan yang ingin dikonversikan ke voice
• Klik OK untuk mendengarkan.
Leave a comment
Bila Ada Kesalahan Cybernet13 Minta Maaf.
Silahkan Kirim Kan Saran & Kritiknya
Agar Bisa Lebih Baik
Untuk Kepentingan Kita Bersama...
Terima Kasih