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..
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..
Jika ada kesalah dalam penulisan kata yang kurang berkenan di hati anda saya mintak maaf.. karena saya masih penuh dengan kekurangan.. apabila ada kekurangan tolong sampaikan melalui komentar anda.. Tertanda :
Tidak ada komentar:
Posting Komentar