Sign in to follow this  
Followers 0
i542

Talk2Me

19 posts in this topic

#1 ·  Posted (edited)

Hi,

I created that small program only for fun. I think and you will cheer when hear how Microsoft Sam reading your document or speaking non-English text.

So, open that ZIP which includes:

  • Script compiled to EXE
  • Source code for your additions
  • Readme file (you need MS Word to read it)
Current version: 1.1

Don't worry, be :D

i542

P.S. My English is maybe bad... :D

EDIT: 0.1 deleted, now you can download 1.2 here. See post at end for other informations.

Talk2Me_1.2.zip

Edited by i542

I can do signature me.

Share this post


Link to post
Share on other sites



oh thats really nice, i like it

Share this post


Link to post
Share on other sites

I did something similar.

Check it out.

#include <GUIConstants.au3>
Opt ( "GUICloseOnESC", 0)
Opt ( "GUIOnEventMode", 1)

_StartHereGUI()

    While 1 = 1
        Sleep(30)
    Wend

Func _StartHereGUI();Builds the first GUI window;
        GuiCreate("Computer Speak", 452, 340,(@DesktopWidth-452)/2, (@DesktopHeight-391)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
        GuiCtrlCreateButton("Speak", 70, 265, 70, 30)
        GuiCtrlCreateButton("Clipboard", 190, 265, 70, 30)
        GuiCtrlCreateButton("Exit", 310, 265, 70, 30)
        GuiCtrlCreateInput("", 205, 40, 190, 20)
        GuiCtrlCreateLabel("", 70, 80, 320, 150)
        GuiCtrlCreateLabel("Have the computer speak:", 70, 40, 130, 30)
        GUICtrlSetOnEvent(3, "_SpeakButton");OnEvent functions are only called when GUIOnEventMode is set.
        GUICtrlSetOnEvent(4, "_ClipBoardBtn");OnEvent functions are only called
        GUICtrlSetOnEvent(5, "_Exit");OnEvent functions are only called
        GUISetOnEvent ($GUI_EVENT_CLOSE, "_ClosedBtn")
        GUISetState(@SW_SHOW)
    EndFunc

Func _SpeakButton();Action for the speak Btn;

        $Input = GUICtrlRead(6)
        _StartHereGUI()
        GUISetState(@SW_HIDE)
        $talk = ObjCreate("SAPI.SpVoice")
        $talk.Speak($Input)
        EndFunc

Func _ClipBoardBtn();Action for the clipboard Btn;
        $clip = ClipGet()
        GUICtrlSetData(7,$clip)
        $talk = ObjCreate("SAPI.SpVoice")
        $talk.Speak($clip)
    EndFunc


Func _Exit();Action for the close Btn;
  GUIDelete ()
        Exit
    EndFunc

Func _ClosedBtn();Action for the close Btn;
        GUIDelete ()
        Exit
    EndFunc

Share this post


Link to post
Share on other sites

very nice i542... now microsoft needs some more realistic sounding voices.

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

New version! It is 1.0!

Here it is. I added 'Import from clipboard' and fixed something - color in previous version doesn't work.

jcorr1339, I tryed your code, but I think that is more functional... :D

Enjoy!

i542

EDIT: Removed attachment due to lack of space :wacko:

Edited by i542

I can do signature me.

Share this post


Link to post
Share on other sites

HI,

here is something you can implement to play around with.

#include <inet.au3>
Dim $voice = ObjCreate("Sapi.SpVoice")
Speak(@IPAddress1 , 0.75 , 100)
MsgBox(0, "IP-Addresse", "Deine IP-Adresse lautet: " & @IPAddress1)
Func Speak($Text, $Rate, $Vol)
    $voice.Rate = $Rate
    $voice.Volume = $Vol
    $voice.Speak($Text)
EndFunc  ;==>Speak

So, you can set up the speed. Hope you'll like it.

Nice script!

So long,

Mega


Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Share this post


Link to post
Share on other sites

OK, th.meger, i tryed your code. And yes, it will be implented in v1.1 :D , but with some changes.

For other users of AutoIt forum: when I post new versions, 0.1 will be deleted. I think it will be tomorrow.

Have fun with Talk2Me!

i542.


I can do signature me.

Share this post


Link to post
Share on other sites

#8 ·  Posted (edited)

Hi again! I decided 0.1 stays here :D but this is really better...

This version 1.1 has TWO toolboxes - one for frequently used functions and one for playing MP3. Then, you now can choose voices: Mary, Mike and Sam. Maybe it doesn't working well but you can change speed (norm - max). Hopefully you like this program...

i542

EDIT: Attachment deleted, look first post.

Edited by i542

I can do signature me.

Share this post


Link to post
Share on other sites

HI,

nice. Would be easier when you change your first post. Otherwise you have to search through the thread to find the latest version.

So long,

Mega


Scripts & functions Organize Includes Let Scite organize the include files

Yahtzee The game "Yahtzee" (Kniffel, DiceLion)

LoginWrapper Secure scripts by adding a query (authentication)

_RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...)

Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc.

MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times

Share this post


Link to post
Share on other sites

OK, I will do that now... :D

i542


I can do signature me.

Share this post


Link to post
Share on other sites

Hi,

I created that small program only for fun. I think and you will cheer when hear how Microsoft Sam reading your document or speaking non-English text.

So, open that ZIP which includes:

  • Script compiled to EXE
  • Source code for your additions
  • Readme file (you need MS Word to read it)
Current version: 1.1

Don't worry, be :wacko:

i542

P.S. My English is maybe bad... :D

EDIT: 0.1 deleted, now you can download 1.1 here.

EDIT 2: For 1.1: There was be one error, so 14 peoples who are downloaded Talk2Me 1.1, download that. Problem is be in changing voices. Thanks.

hi ....

is this program talks other languages ?

is there any options to configure prior that ?

Share this post


Link to post
Share on other sites

hi ....

is this program talks other languages ?

is there any options to configure prior that ?

1. No, that program can't talk in some other languages. You can set three voices: MS Mary, Mike and Sam. (you can write at your language but then don't talks enough clear).

2. Only what you can configure is voices and speed.

I am included code you can change. PLZ tell me if is some popular voice which I don't know, so I can implent it in 1.2. :D

i542


I can do signature me.

Share this post


Link to post
Share on other sites

Well, you now hav tray function for keeping T2M always runned. :D

Have fun with 1.2. See first post for download!

i542


I can do signature me.

Share this post


Link to post
Share on other sites

i542,

Very cool program. :D

Have you considered highlighting each word in the text as it is read? I think it would be good for learning English, or other languages.

taurus905


"Never mistake kindness for weakness."-- Author Unknown --"The highest point to which a weak but experienced mind can rise is detecting the weakness of better men."-- Georg Lichtenberg --Simple Obfuscator (Beta not needed.), Random names for Vars and Funcs

Share this post


Link to post
Share on other sites

i542,

Very cool program. :D

Have you considered highlighting each word in the text as it is read? I think it would be good for learning English, or other languages.

taurus905

OK. Do you know some good TTS voice to I implent it in script?

i542


I can do signature me.

Share this post


Link to post
Share on other sites

OK. Do you know some good TTS voice to I implent it in script?

i542

i542,

I'm sorry. I don't.

Maybe someone with more knowledge than myself can help you.

taurus905


"Never mistake kindness for weakness."-- Author Unknown --"The highest point to which a weak but experienced mind can rise is detecting the weakness of better men."-- Georg Lichtenberg --Simple Obfuscator (Beta not needed.), Random names for Vars and Funcs

Share this post


Link to post
Share on other sites

i542,

I'm sorry. I don't.

Maybe someone with more knowledge than myself can help you.

taurus905

:D sad.

i542


I can do signature me.

Share this post


Link to post
Share on other sites

OK. Do you know some good TTS voice to I implent it in script?

i542

Check out this demo of TTS Voices by Loquendo:

http://actor.loquendo.com/actordemo/default.asp

They are the absolute best in my opinion.

To try them out for 30 days you can download them from:

http://www.qualilife.com/products/index.cfm?id=218

After you install them they'll be available in the Voice Selection in Speech Properties.

Share this post


Link to post
Share on other sites

Check out this demo of TTS Voices by Loquendo:

http://actor.loquendo.com/actordemo/default.asp

They are the absolute best in my opinion.

To try them out for 30 days you can download them from:

http://www.qualilife.com/products/index.cfm?id=218

After you install them they'll be available in the Voice Selection in Speech Properties.

Thank you!

i542


I can do signature me.

Share this post


Link to post
Share on other sites

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
Sign in to follow this  
Followers 0