Saturday, June 11, 2011

How to make your computer speak/talk whatever you type

Here’s how you do it:
1) Open Notepad and type/paste the following text into a new document:
Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak messag
e

2) Now when you go to save the file, give it any name, but make sure you also type .VBS after the name. Also, for the Save as type box, choose All files instead of the default Text Do
cuments.


3) After doing this, just run the script. You will come across a box as shown below. Type anything you want in there and have fun. Tho the default voice is quite funny but its fun. Now show this to your friends or just play a prank with them:-P


Note:- In  my view this works only with windows XP. If it works on any other version of windows, do let me know:)
This uses default Windows Narrator functionalities. (Again in XP).You can activiate this from
“Accessories –> Accessibility –> Narrator”

If you want to change the voice, you can download it from microsoft site and then can change it from
“Control Pannel –> Switch to Classical View –> Speech”.
You can also set frequency from here. Also, you can use this control in your programming and get it read by your computer whatever you want.