Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Microsoft agents
Message
From
12/05/2006 13:32:01
 
General information
Forum:
Visual FoxPro
Category:
Third party products
Miscellaneous
Thread ID:
01117654
Message ID:
01121411
Views:
9
Hi Naomi -
I'm glad it worked for you. You can d/l a sample foxpro form at

http://www.microsoft.com/products/msagent/dev/code/default.asp

This is more complex than the sample code I sent you as it uses a custom class to control the characters. I/m still messing around at the more fundamental level to try and understandwhat's going on. The form will show the available animations in a listbox if it is working properly. A funny thing, it works fine for me on my home PC running XP home but the enumeration of the AnimationNames does not work on my office PC running XP Pro, although the characters do seem to work just fine. I think one of my dlls is screwed up.

There is also a powerpoint demo available somewhere on the MS website although I can't seem to find it
just now. It shows how to use a character to narrate a ppt presentation. If you want it and can't find it I could email it to you directly.


As far as interaction goes, you will have to write program code to parse your question and determine the correct answer. Not a trivial task. But once done you can simply send your question via a textbox and button and return the response via the .speak(lcResponse) command. I was thinking of trying to use the old ELIZA psychoanalyist to generate some interaction but I haven't found a version with open code that I can co-opt yet.

Borislav showed you where to find some more characters. Just be aware that the animation sets for each of them will be different. That's why its important to be able to enumerate the AnimationNames so you can see what's available.

Let me know if you do anything fun with it.
- Don

>Dan,
>
>Thanks a lot. On my home computer it worked after I un-installed MS Speech Recognition that I installed for some unknown reason.
>
>Now, I have two questions:
>1) Where can I find more free chars besides 4 standard? (I showed it yesterday to my son and he wanted more chars).
>
>2) How can I make the char to interact with the user, in other words, ask a question and receive an answer?
>
>Thanks in advance.
>
>
>>Naomi -
>>
>>Here's a stand along prg that works for me. You will need Peedy and Genie installed.
>>
>>
>>public oAgent,oPeedy,oGenie
>>
>>oAgent = createobject("agent.control.2")
>>oAgent.connected = .t.
>>
>>oAgent.Characters.Load("Peedy","Peedy.acs")
>>oAgent.Characters.Load("Genie","Genie.acs")
>>
>>opeedy = oAgent.Characters('Peedy')
>>ogenie = oAgent.Characters('Genie')
>>opeedy.show
>>lWait = opeedy.moveto(200,400)
>>
>>oGenie.wait(lWait)
>>oGenie.moveto(400,400)
>>lWAit = oGenie.show
>>
>>
>>oPeedy.wait(lWait)
>>oPeedy.speak("Hello")
>>oPeedy.play("gestureleft")
>>oPeedy.speak("Allow me to introduce my good friend, Genie.")
>>
>>oPeedy.play("lookleft")
>>lWait = oPeedy.speak("Hello Genie")
>>
>>oGenie.wait(lWait)
>>oGenie.play("lookright")
>>lWait = ogenie.speak("And hello to you too Peedy")
>>
>>oPeedy.wait(lWait)
>>
>>
>>
>>***************************************************************
>>>>>Ok, I think I made a complete mess of my PC. I downloaded several files from the link you send me. Now
>>>>>SET Classlib TO (HOME()+"ffc\_agent.vcx") addi
>>>>>PUBLIC msagent
>>>>>
>>>>>msagent=CREATEOBJECT("_agent")
>>>>>msagent.load("merlin","merlin.acs")
>>>>>msagent.setActiveAgent("merlin")
>>>>>msagent.show(680,400)
>>>>>
>>>>>msagent.activeagent.LanguageID="&H0409"
>>>>>
>>>>>*msagent.play("greet")
>>>>>msagent.speak("Hello Naomi")
>>>>>
>>>>>the agent appears, but it doesn't speak and instead of Hello Naomi shows just Hello. Nick's FoxSpeaker also stopped working...
>>>>
>>>>
>>>>I never installed Foxspeaker. You don't need Foxspeaker. I can make spoken agents with only these lines upper.
>>>>
>>>>Try this link. The agent in this link speaks too.
>>>>http://fox.wikis.com/wc.dll?Wiki~MicrosoftAgent~WIN_COM_API
>>>
>>>It doesn't, since it's not installed on my work PC.
Previous
Reply
Map
View

Click here to load this message in the networking platform