Aller au contenu
Le Web des Cheminots

Faites Parler Merlin !


Invité ___

Messages recommandés

Programmation des MS agents

Les MS agents sont de petits personnages qui parlent et qui se déplacent sur votre écran au

gré de la programmation.

Vous pouvez contrôler à peu près tous leurs faits et gestes.

Ces personnages facétieux sont livrés avec les systèmes d'exploitations Microsoft depuis

Windows2000 et Windows Millenium.

Il peuvent être pilotés par un programme VBA pour inter-agir avec une application MS-Office.

Pour vérifier leur présence sur votre système,regardez dans le dossier

C:\WINDOWS\msagent\chars\Merlin.acs

Les fichiers *.ASC sont les personnages.

Pour Windows 95, 98 et NT4,et Xp vous devez télécharger (gratuitement) le fichier

msagent.exe . MS vous offre 4 personnages.

Vous pouvez trouver d'autres personnages sur le WEB .

---------------------------------------------------------------------------

Chargement et installations des fichiers nécessaires à partir du site Microsoft :

Allez sur :

http://www.microsoft.com/msagent/downloads/user.asp

puis téléchargez et installez :

_The Microsoft Agent core components.

_Selected language (après avoir sélectionné French !).

_Selected character (après avoir sélectionné le personnage qui vous intéresse.

En fait, je vous conseille de tous les télécharger).

_A text-to-speech engine (c'est ce qui vous permettra de faire parler votre personnage à

partir d'un texte). Prenez au moins la version "French".

_Speech recognition engines (pour pouvoir commander votre programme à l'aide de la parole).

Et enfin pendant que vous y êtes :

_le speech control panel.

Les fichiers Microsoft Text-to-speech et Speech recognition engines ne sont pas faits pour

le français.

D'où l'horible accent anglais... et la nécessité de parler avec un accent si on veut que notre voix soit reconnue.

Vous trouverez sur ce même site des liens vers des Text-to-speech et Speech recognition

engines qui eux comprennent le français (gratuit limité dans le temps).

Facultatif pour les programmeurs

Aide (en anglais) sur Les MS agents:

http://www.microsoft.com/msagent/downloads...per.asp#alldocs

Si vous avez MS-Office allez voir ce site qui ma bien servi pour faire cette petite démo:

Créer ses propres animations dans MS-Office (II)

http://cherbe.free.fr/animation2.html

Exemple de script VBS utilisant des MS agents desdes Pages HTML :

Outils de synthèse vocale pour la GS et le CP

Ces petites applications HTML téléchargeables à partir de mes pages utilisent la synthèse vocale et la technique des agents Microsoft. Elles sont destinées pour 4 d'entre elles à l'apprentissage du lire/écrire au cycle 2.

http://membres.lycos.fr/simonnet/sitfen/fr...se/synthese.htm

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

Voici la démo en VbScript que j'ai créer pour faire évoluer et parler Merlin:

Copier le texte ci-dessous(dans la citation) dans le block-note et sauvegardez comme Merlin.vbs

Attention l'extension finale doit bien être .vbs

Il est nécessaire pour cela de configurer l'explorateur de fichier:

dans ligne "Type de fichier" mettre sur "Tous" sinon vous ne pourriez pas sauvegarder le

fichier avec l'extension vbs.

--------------------------------------------------------------------------------

Attention :

L’exécution des scripts VBS repose sur le moteur Windows Scripting Host qui doit être

installé sur votre machine normalement si vous avez I.E. il doit fonctionner.

Pour plus de détails sur le VbScript voir:

http://msdn.microsoft.com/library/default....tml/vbswhat.asp

Pour télécharger directement les fichiers, consultez:

Microsoft Windows Script 5.6 (Windows 9x, Me, NT4)

ou

Microsoft Windows Script 5.6 (Windows 2000, XP)

http://msdn.microsoft.com/library/default....list/webdev.asp

--------------------------------------------------------------------------------

Pour lancez mon script double-cliquez le fichier Merlin.vbs

Dim AgentControl1

Dim Merlin

On Error Resume Next

'Creer l'objet AgentControl 1

Set AgentControl1 = CreateObject("Agent.Control.1")

'Si L'objet est charger

If IsObject(AgentControl1) Then

AgentControl1.Connected = True

On Error Resume Next

'Appel de l'application Merlin

AgentControl1.Characters.Load"merlin","C:\WINDOWS\msagent\chars\Merlin.acs"

'on spécifie la langue voulue.

'ici le français

'AgentControl1.Characters("Merlin").LanguageID = &H40C

'Etablir la variable Merlin comme l'application Merlin

set Merlin= AgentControl1.Characters ("merlin")

'on spécifie la langue voulue.

'ici le français

Merlin.LanguageID = &H40C

'Montrer Merlin

Merlin.Show

'Deplacer Merlin Hauteur, Largeur,Durée

'En Haut à droite

Merlin.MoveTo 900,0,3000

'Du haut vers le milieu et sous le message VbScript

Merlin.MoveTo 400,500,3000

'Merlin souffle dans une trompette

Merlin.Play "Announce"

'Merlin tape sur la vitre de l'écran

Merlin.play "GetAttention"

'Merlin vous présente la coupe

Merlin.Play "Congratulate"

'Merlin marque une pause

Merlin.play "RestPose"

'Merlin parle

Merlin.Speak "\Chr=""Greeter""\ "

Merlin.Speak "Bravo vous avez réussi à me faire parler. Vous avez gagner la coupe des programmateurs !"

'Merlin Lit

Merlin.Play "Read"

'Faire parler Merlin en chuchotant = \Chr=""Whisper""\

Merlin.Speak "\Chr=""Whisper""\Monsieur et Madame Bricot ont un fils. Comment l'appellent-ils ?"

Merlin.Play "RestPose" 'forcer Merlin à revenir à la position neutre

Application.Wait (TimeSerial(Hour(Now()), Minute(Now()), Second(Now()) - 300))

Merlin.Speak " Réponse : Judas! Judas Bricot"

'Merlin dit au revoir sans chuchoter

Merlin.Speak "Ca vous a fait rire ? moi pas ..."

Merlin.Speak "N'oubliez pas de cliquer sur OK pour effacer le message de VB Script ."

'Merlin dit au revoir sans chuchoter

Merlin.Speak "Au revoir !"

'Merlin fait au revoir

Merlin.Play "Wave"

'Arrêter Merlin

merlin.Hide

AgentControl1.Connected = False

End If

msgbox "Veuillez attendre que merlin est fini de parler." & vbCrLF & "Soyez patient car cela peut prendre un certain temps."& vbCrLF & vbCrLF & "Cliquer sur le 'bouton OK quand Merlin aura lu son message et disparu.",vbinformation ,"Démo de Merlin sous VBScript"

Wscript.Quit

mdrmdr

Modifié par ___
Lien vers le commentaire
Partager sur d’autres sites

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

L'extension "AdBlock" anti-pub... on en parle ?

Vous avez installé un outil pour bloquer la publicité sur internet...hors c'est la publicité qui permet à cheminots.net d'exister et de vous permettre d'avoir la meilleure expérience utilisateur possible.

Alors pourquoi ne pas désactiver votre bloqueur de pub pour ce site et ainsi participer à sa pérennité ?

Si vous ne souhaitez pas désactiver Adblock, vous pouvez quand même accéder au site,
et on vous souhaite une bonne visite !

 

Comment désactiver Adblock pour cheminots.net ?

Repérez l'icône Adblock sur votre navigateur internet (Mozilla Firefox, Google Chrome etc.). 
Généralement elle se situe à droite de la barre d'adresse, ou tout en bas à droite de la fenêtre.
adblock.png.b5362a440eebda16ea382664cb9b629f.png

Cliquez sur l'icône puis.. (en fonction du navigateur) :

Mozilla Firefox 
Cliquez sur « Désactiver partout ».

Google Chrome et autres 
Cliquez sur « Ne rien bloquer sur les pages de ce domaine » ou décochez « Activé pour ce site ».

 

Si je n'arrive pas à désactiver Adblock...

Si vous ne trouvez pas le bouton Adblock ou si vous n'arrivez pas à désactiver Adblock, vous pouvez essayer de désinstaller complètement le logiciel dans les options de votre navigateur web:

Mozilla Firefox 
Cliquez sur Firefox, puis Modules complémentaires. Dans Extensions, désactivez/désinstallez Adblock.

Google Chrome 
Cliquez sur la clé à outil en haut à droite, puis Outils et enfin Extensions. Désactivez/désinstallez Adblock.

Apple Safari 
Cliquez Safari, puis Préférences et enfin Extensions. Désactivez/désinstallez Adblock.

 

FREEBOX
Se connecter à l’interface de gestion mafreebox.freebox.fr puis « Connexion Internet > Configuration > Blocage de la publicité »
Désactiver l’option et cliquer sur Modifier.

Antivirus
Certains antivirus bloquent les bannières, essayez en le désactivant. Si c'est lui qui bloque les pubs, vous pouvez désactiver cette fonctionnalité, ou mettre le site cheminots.net en liste blanche.