[Ex] Utiliser la synthèse vocale de XP ou Vista

[novservant]

Bonjour, je met en ligne mon petit programme que j'ai fait et qui sera peut-être utile à quelques-uns.
En fait mon programme pilote un logiciel gratuit qui utilise la synthèse vocale de XP ou de Vista. Il suffit d'installer au préalable la voix française (le lien est inclut dans le fichier Read-me) et vous pourrez entendre parler Virginie . Après une petite configuration qui demande le sexe, age (pour le tutoiement), et elle devine votre prénom (grâce au nom de la session ).
Elle dit "Menu démarrer" lorsque vous cliquez sur Démarrer, et pour l'instant c'est tout.

Voilà je donne aussi les sources si certains veulent continuer à la programmer ou tout simplement pour apprendre des fonctions interressantes. Je met pas le code direct sur le forum parcequ'il est un peu long.

NovSpeak 0.11

Lien sur http://www.autoitscript.fr
NovSpeak 0.11

[arrkhan]

sympathique ce petit soft, j'ai pas encore lu toutes les sources mais je vois que tu as utiliser un programme tiers pour faire parler windows, il y a une solution made in crosoft qui peut le faire egalement:
http://www.microsoft.com/technet/script ... /sapi.mspx

et un bout de code valant mieux qu'un long discour:

Code : Tout sélectionner

_TalkOBJ("Bienvenu sur auto-hit script point free point f r")
Func _TalkOBJ($s_text)
    Local $o_speech
    $o_speech = ObjCreate("SAPI.SpVoice")
    $o_speech.Speak ($s_text)
EndFunc ;==>_TalkOBJ

il peut etre interressant egalement de remplacer la synthese quelque peu inaudible de veronique par des solutions plus aboutie tel que Mbrola, le projet le plus performant a mon sens a l heure actuelle mais impossible a parametrer sans une connaissance tres approfondi du logiciel http://tcts.fpms.ac.be/synthesis/mbrola.html ou elanspeech http://www.acapela-group.com/
PS:dommage que speechissimo (mac osx) n'existe pas en version x86

$Mode_Troll = ON
essayez de faire dire ca a microsoft sam : crotch soy (en vitesse lente c'est encore mieux)
$Mode_Troll = OFF

[ani]

Excellent, mais je n'ai pas testé non plus.
c'est un sujet qui m'interesse pourtant, sa doit être assez fun que le pc parle ^^'

je vais testé les deux

pour le SAPI.SpVoice par default (le panneau de configuration) il se trouve ou exactement dans windows ? car là j'obtiend une erreur avec le bout de code ..
j'ai bien le dossier msagent avec tout les bonhommes sauf merlin ^^ , là aussi ça doit être fun de jouer avec (agent.control)

[novservant]

merci pour l'astuce et tout tes conseils. faut vraiment que j'essaye le SAPI

[arrkhan]

oui le Sapi est dans win.

un p'tit test avec merlin ^^

Code : Tout sélectionner

$strAgentName = "Merlin"
$strAgentPath = "C:\Windows\Msagent\Chars\" & $strAgentName & ".acs"
$Obj1 = ObjCreate("Agent.Control.2")
$Obj1.Connected = 1
$Obj1.Characters.Load ($strAgentName, $strAgentPath)
if @error then exit
$objCharacter = $obj1.Characters.Character($strAgentName)
$objCharacter.Show
sleep(200)
$objCharacter.Play("Announce")
$objCharacter.Play("GetAttention")
$objCharacter.Speak("Bonjour, et bienvenu sur AutoItscript.free.fr.")
$objCharacter.Speak("Je m'appelle Ani et je suis un novice ^^")
$objCharacter.Play("ReadContinued")
$objCharacter.Speak("Voilà à quoi je passe la plupart de mon temps")
sleep(1000)
$objCharacter.Think("Je vais faire un petit tour...")
$objCharacter.MoveTo(500,400)
$objCharacter.Play("Pleased")
$objCharacter.Speak("Bon, j'y go...")
$objCharacter.Speak("Bye")
$objCharacter.Hide
While $objCharacter.Visible = TRUE
    Sleep(250)
WEnd
 

[arrkhan]

quelques liens bien pratique en vrac

http://www.microsoft.com/downloads/deta ... laylang=en
http://www.microsoft.com/msagent/downlo ... loper.aspx
http://www.microsoft.com/downloads/deta ... laylang=en
http://www.microsoft.com/technet/script ... agent.mspx

bon, j'ai reussi a faire parler merlin avec le sapi.voices en telechargeant la plupart des outils disponible ici :
http://www.microsoft.com/msagent/downlo ... .aspx#code
http://www.microsoft.com/msagent/downlo ... #character

malheureusement dans ma precipitation, je n'ai pas identifier quel composant exactement a permit de faire en sorte qu'il parle, je vous laisse le soins de le trouver, mais ca peut ouvrir de nombreuse possibilite au script de depart, avec les outils fournis aux develloppeurs, il est notement possible d'ameliorer la prononciation de l ordi et meme de le controle a la voix avec le speech recognition, enfin tout ca pour dire que ca peut etre marrant de developper un petit peu plus tout ca quoi ^^

Edit:.......Quelques temps plus tard ......... ca y est c'est le Text-to-speech engines de la page http://www.microsoft.com/msagent/downloads/user.aspx

[arrkhan]

bon, j'ai un peu continué les test, bien marrant tout ca, vous pouvez vous rendre ici :
http://arrkhan.free.fr/Forums/autoit/po ... sagent.htm
la fenetre s'ouvre dans ie_tab si vous utiliser FireFox et vous demande de dl un active-X si vous ne disposez pas du composant que j'ai mis dans le post precedant ensuite laissez vous guider ^^, dites moi ce que vous en pensez

[ani]

j'ai juste une page blanche avec ceux-ci
Aprés avoir fait un clique droit sur Merlin, vous pourrez accéder à l'options permettant de lire ce texte.
j'allais meme te demander par pm mais vu que j'ai franchement du mal a m'exprimer, je prefere rien demander ^^'
J'avais bien installé tout les composant du msagent, mais pas moyen de faire fonctionner la petite fonction avec l'object sapi.spvoice tout triste

[arrkhan]

hum, petit detail, aller a la page en question avec IE ou le IETab de firefox sinon ca ne marche pas

[ani]

j'avais bien compris sté
Sinon je comprend pas pourquoi ce bout de code ne fonctionne pas chez moi, t'a installé quoi exactement? moi depuis que j'ai mi le L&HTruVoice fonctionne plus et je vois plus le panneau Voix

Code : Tout sélectionner

_TalkOBJ("Bienvenu sur auto-hit script point free point f r")
Func _TalkOBJ($s_text)
    Local $o_speech
    $o_speech = ObjCreate("SAPI.SpVoice")
    $o_speech.Speak ($s_text)
EndFunc ;==>_TalkOBJ

Teste effectué sur la page.
Après petite réflection, c'est normal que çà ne fonctionne pas chez moi, je ne dispose pas de merlin
j'ai enregistrer la source est testé en local avec genie ^^

excellent arrkhan

[arrkhan]

chez moi non plus il ne fonctionne plus, probablement du au fait que je suis suis passé au Sapi 5.1, et que celui par defaut etait Sapi 4, je vais regarder ce qu'il faut changer


Edit: quel boulet je fais, en fait il fonctionne, mes enceintes etaient eteinte ^^'

PS: marre de l'erreur 500 9 click sur 10, il nous faudrait changer de serveur

[sylvanie]

très drôle le script avec Merlin, je sens que je vais m'en servir plus d'une fois dans mes script ^^

[ani]

voici le lazyreader2

script sympathique, faudra juste compiler le configutility.au3 en exe

lors de l'appel du panneau configuration j'obtiend une erreur et vous ?

Code : Tout sélectionner

autoit error
Line -1:
Error:Variable must be of type "object"

[TaPuZ]

J'aime bien tout cela, avec un petit faible pour Merlin... Comment faire pour qu'il parle français?