1. Accueil
  2. Visual Basic / VB.NET
  3. Sources Visual Basic / VB.NET
  4. Sources Divers
  5. Synthèse vocale(aide handicapé de la parole-version 3)

Synthèse vocale(aide handicapé de la parole-version 3)

0/5 (5 avis)

Vue 6 506 fois - Téléchargée 915 fois

Télécharger le projet
Commenter

Description

Ce programme fait suite aux précédents "Aide pour handicapé de la parole" .
J'ai reçu des suggestions et j'en ai tenu compte pour améliorer mon programme.
Il est maintenant doté de la synthèse vocale qui permet à l'ordinateur de prononcer tout
le texte écrit en français.
Cependant il est INDISPENSABLE d'aller sur le site ' http://easyvb.free.fr/agent.php3 '
pour copier ou ouvrir directement les programmes suivants :
Ace.exe & Agtx040c_fr.exe & Msagent.exe & Lhttsfrf.exe & Genie.exe
Ces programmes proviennent de Microsoft et sont dédiés à MsAgent.
Autre possibilité:
Sur le CD VB6.0\COMMON\TOOLS\VB\MSAGENT.Un programme d'intallation existe .
Ensuite \COMMON\TOOLS\VB\FRENCH\MSAGENT pour msagent français.
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
cs_Kyot
Messages postés
1
Date d'inscription
jeudi 15 juin 2006
Statut
Membre
Dernière intervention
15 juin 2006
15 juin 2006 à 19:31
Bonjour,
Je suis bénévole pour une association de personnes handicapées, j'ai besoin de logiciels libres, ou à la limite en version d'essai (ce que je fais je le fais sur mon temps et avec mes deniers propres) de :
- conversion de mes pages textes en braille,
- reconnaissance vocale de texte, je dicte et l'ordinateur écrit.
Ces deux logiciels sont importants pour mon engagement.
Merci de vos renseignements.
Kyot
coquin007
Messages postés
5
Date d'inscription
samedi 13 août 2005
Statut
Membre
Dernière intervention
27 février 2006
27 févr. 2006 à 05:10
bonjour,
j'ai un nouveau probème a présenter.
comment puis-je enregistrer dans un fichier wave ce que dit l'agent.
je ne trouve aucune source pour ce genre de problème.
coquin007
coquin007
Messages postés
5
Date d'inscription
samedi 13 août 2005
Statut
Membre
Dernière intervention
27 février 2006
27 févr. 2006 à 05:07
Bonjour, ton code il est super.
j'utilise les msagents et j'ai un problème.
quand j'en utilise deux dans le mëme texte il parlent en mëme temps.
Je lit le texte avec

open fichier.txt for input as 1
while eof(1)
input#1, letexte
agent.speak letexte
wend
close #1

dans mon fichier l'agent est choisi ce qui me permet de faire parler l'agent que je veut ex.


lire une frase
<genie.speak>
lire une dexieme phrase
ect...

mais la boucle n'attend pas que l'agent ai fini de parler,les deux parlent en mëme temps.
connaissez-vous le moyen pour regler mon problème, y a t_il un moyen pour que la ligne suivante dans la boucle attende que l'agent est fini de parler.
merci.
coquin007
cs_JLN
Messages postés
371
Date d'inscription
samedi 1 juin 2002
Statut
Membre
Dernière intervention
17 juin 2013
3 janv. 2004 à 16:41
Lorsque les agents sont correctement installé, nul n'est besoin de préciser le path "c:\Program files....." il suffit d'écrire directement le nom du fichier acs ex : DATAPATH = "Genie.acs" et voila !

Bonne prog à tous et bonne année.

JLN
Ziman
Messages postés
245
Date d'inscription
dimanche 27 avril 2003
Statut
Membre
Dernière intervention
26 septembre 2008
29 nov. 2003 à 11:41
Salut

Chez moi il marche pas ton progz, le problème est que quand je le lance, il me met "fichier introuvable" à la ligne :

Agent1.Characters.Load "Genie", DATAPATH

de

Private Sub Form_Activate()
If Dac = True Then Exit Sub
Agent1.Characters.Load "Genie", DATAPATH
Set Genie = Agent1.Characters("Genie")
Genie.MoveTo 450, 300
Dac = True
End Sub

Est-ce normal ?
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_KifKif)