Jump to content

TinyClipToSpeech v 1.0.0.9 Update of 2012-07-01


wakillon
 Share

Recommended Posts

TinyClipToSpeech v 1.0.0.9

Read Clipboard Text Content using Sapi Voice

20140126213814.png


Access to all commands by Tray menu.

If you doesn't have Sapi5 installed, script ask for download it.
I know there is already some Text to speech scripts,
but i wanted an easy access ( clipboard content and tray menu )
and the possibility to change voice and settings while reading.
Text can be displayed on desktop gradually as what is read.
You can also save text to mp3 without need of read it.
My preference goes to Scansoft voices, easy to found and install and with a good pronunciation qualty.

As usual, some externals files are downloaded at first execution.

Previous downloads : 199

Update of 2012-07-01

Source : TinyClipToSpeech v 1.0.0.9.au3

ExecutableTinyClipToSpeech.exe.html

(Once this html file downloaded, double click on it for start the download)

Hope you like it ! :)

Edited by wakillon

AutoIt 3.3.14.2 X86 - SciTE 3.6.0WIN 8.1 X64 - Other Example Scripts

Link to comment
Share on other sites

  • 4 months later...
  • 3 weeks later...
  • 4 months later...

Hi wakilon,

#Include <WinAPIEx.au3> and #Include <APIConstants.au3> where not found on my includes file. It´s a new version of au3 that I need?

Thanks again,

Jose

Hi joselB

Download the of Yashield and copy all the files in your include dir ;)

AutoIt 3.3.14.2 X86 - SciTE 3.6.0WIN 8.1 X64 - Other Example Scripts

Link to comment
Share on other sites

  • 2 months later...

Hi Wakillon

My PC is speaking in portuguese :thumbsup: Great! Thanks for sharing!

It´s win7, 64 bits...

I have some extra questions/points:

1- at start, your program tries to write in registry. Do you know why? I didn´t allow but it worked OK.

2- option "open ...panel" opens no window

3- you told "...and the possibility to change voice and settings while reading ...". I too. There are any "commands" whe can insert at text to control speech?

I found Loquendo at least in protuguese has a much better speech. Probably in other languages too, it´s more natural.

If you want, give a try live at http://www.oddcast.com/home/demos/tts/tts_example.php?sitepal

Do you believe that your program would work with Loquendo?

Thanks

Jose

Edited by joseLB
Link to comment
Share on other sites

HI joseLB

RegWrite with EnableBalloonTips key is for enable traytip display.

It seems the reg key i use for get sapi.cpl path doesn't exists on x64, so you can replace _OpenSpeechProperties function by this one :

Func _OpenSpeechProperties ( )    
    TrayItemSetState ( $_SpeechItem, $TRAY_UNCHECKED )
    Local $_SapiCplPath = RegRead ( 'HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Control Panel\Cpls', 'Speech' )
    If FileExists ( $_SapiCplPath ) Then
        ShellExecute ( $_SapiCplPath )
        Return
    EndIf
    If StringInStr ( @OSArch, 64 ) Then ShellExecute ( @WindowsDir & '\SysWOW64\Speech\SpeechUX\sapi.cpl' )
EndFunc ;==> _OpenSpeechProperties ( )

i have tried text to speech of oddcast.com and the Loquendo Démo TTS Interactive and you are right, voices ( french for me ) are better.

But oddcast is based on Flash and Loquendo returns wav files, so no chances to get it working with my script !

Thanks. ;)

Edited by wakillon

AutoIt 3.3.14.2 X86 - SciTE 3.6.0WIN 8.1 X64 - Other Example Scripts

Link to comment
Share on other sites

  • 3 weeks later...

Hi wakillon

I´m starting to use your code... it´s a great contribution, thanks

But as always, we need something else...

Do you know how I can know when it finish the talk? I mean, I don´t want to sotp waiting it to finish, but from time to time "ask" if it finished the talk?

second, what about to do an UDF with these functions?

Thanks

Jose

Link to comment
Share on other sites

Do you know how I can know when it finish the talk? I mean, I don´t want to stop waiting it to finish, but from time to time "ask" if it finished the talk?

second, what about to do an UDF with these functions?

Hi joseLB :)

You can do like this for ask if it finished to talk.

If $ospeech.Status.RunningState = $SRSEIsSpeaking Then
    ; is talking
Else
    ; is not talking
EndIf

And If i remember well there is already several Udf for sapi voice ! ;)

AutoIt 3.3.14.2 X86 - SciTE 3.6.0WIN 8.1 X64 - Other Example Scripts

Link to comment
Share on other sites

  • 3 weeks later...

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...