Comments on: How to make your computer talk/speak what you type

By: Rich

Rich — Sun, 15 Nov 2009 14:35:19 +0000

Go to Control Panel;
Go to Sounds, Speech, and Audio Devices;
Go to Speech;
Type what you want in the text box and click Preview Voice.

By: Paul

Paul — Sat, 14 Nov 2009 06:21:47 +0000

You can change the voice (how fast it talks and the tone) by going to Control Panel and the Speech. My computer only has Microsoft Sam on it. I assume you can download more voices somewhere.

By: sam

sam — Wed, 04 Nov 2009 23:01:20 +0000

it keeps on saying

LINE: 2
CHAR: 18
ERROR: INVALID CHARACTER
CODE: 800A0408
SOURCE: MICROSOFT VBSCRIPT COMPILATION ERROR

By: HM

HM — Wed, 28 Oct 2009 13:00:31 +0000

Please can someone upload a newer version with different voice? This voice is scary…

By: alljon

alljon — Sun, 25 Oct 2009 16:56:59 +0000

How can I change the voice????

By: Janey

Janey — Sun, 25 Oct 2009 04:09:55 +0000

My OS is Vista Ultimate 64bit. I found the solution and it work on my computer.

The solution for the
“LINE: 2
CHAR: 18
ERROR: INVALID CHARACTER
CODE: 800A0408
SOURCE: MICROSOFT VBSCRIPT COMPILATION ERROR”

You have to physically retype the all “.

So it would be like this:
Dim message, sapi
message=InputBox(”Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(”sapi.spvoice”)
sapi.Speak message

By: Hunter

Hunter — Sat, 24 Oct 2009 20:15:58 +0000

You can also do this on a mac, just open Terminal and type- say i want it to say something – and replace i want it to say something with what you want it to say.

By: Jake

Jake — Wed, 21 Oct 2009 16:08:45 +0000

This is awesome, but is there a way of extending the limit on how much can be typed/spoken. It wont let me input more than 41 words at a time…

By: Diesel pump

Diesel pump — Tue, 20 Oct 2009 13:02:20 +0000

Is there any program that can do reverse of this ??

Ie what I say can be turned to text for say a messenger program?

By: Mitch

Mitch — Mon, 19 Oct 2009 18:51:11 +0000

Hi,

So I modified the script to speak to me a random number between 1 and 12, here it is

Dim message, sapi
Do
Dim max,min
max=12
min=1
message=(Int((max-min+1)*Rnd+min))
Set sapi=CreateObject(”sapi.spvoice”)
sapi.Speak message
loop until message=”"

The way this is written it will go on forever, and that’s fine for the moment but how can I make it speak slower?

Thanks

By: Brother Ray

Brother Ray — Fri, 25 Sep 2009 20:54:39 +0000

Let’s try this again: VB’s not equal operator, which is LessThan GreaterThan symbols side-by-side, is not showing up here. Anyway, you could also use:

loop while not ucase(message) = “”

By: Brother Ray

Brother Ray — Fri, 25 Sep 2009 20:51:22 +0000

Hi folks,

Try this one:

Dim message, sapi
Set sapi=CreateObject(”sapi.spvoice”)
do
message=InputBox(”Enter the text you want spoken”,”Speak This”)
if ucase(message) = “” then
sapi.speak “o k, I will stop!”
else
sapi.Speak message
end if
loop while ucase(message) “”

Of course, as per comments above, make sure you replace all double quotes in the script with normal double quotes, as the website seems to add some troublesome formatting to them.

This script puts the input box in a loop. Pressing either OK or Cancel without typing anything will cause it to go away.

By: Amy Lou

Amy Lou — Thu, 24 Sep 2009 21:21:12 +0000

Wow…thanks! Had no idea my laptop could speak! Awesome A+++++

By: :3

:3 — Mon, 21 Sep 2009 03:27:47 +0000

This is SO SUPERB!!! is there anyway to change the talking voice?

By: Dunc

Dunc — Tue, 15 Sep 2009 19:02:00 +0000

Thanks this is awesome my lil girl just loves when the computer talks to her!

thinks pc is now really called claire : ) priceless