Merlin the great!

Imagine how amazed your users will be when they login to the domain and Merlin greets them...

You can call Merlin using Agent Control and make do the moves while you perform you login scripts in the background...

You can load information about the logged on user either using ADSI scripts or just by reading on the environment variable table...

Take note of the length of the messages or actions you throw at Merlin, you might need to make use of the Sleep method, otherwise the sentences or the animation will overlap...

Code Snippet:

1. strAgentName = "Merlin"
   
2. strAgentPath = "Msagent\Chars\" & strAgentName & ".acs"
   
3. Set objAgent = CreateObject("Agent.Control.2")
   
4. objAgent.Connected = True
   
5. objAgent.Characters.Load strAgentName, strAgentPath
   
6. Set merlin_d_great = objAgent.Characters.Character(strAgentName)
   
7. With merlin_d_great
   
8. .Show
   
9. Set objRequest = .MoveTo(500,400)
10. Set objRequest = .Play("Announce")
11. Set objRequest = .Play("Explain")
    
12. Set objRequest = .Speak("Hi ")
    
13. Set objRequest = .Play("Read")
    
14. wscript.sleep 2000
    
15. Set objRequest = .Speak("Today is " & Now() & "...")
    
16. Set objRequest = .Play("ReadContinued")
    
17. wscript.sleep 2000
    
18. Set objRequest = .Speak("and the time is " & Time() & "...")
    
19. wscript.sleep 2000
    
20. Set objRequest = .Play("ReadReturn")
    
21. wscript.sleep 2000
    
22. Set objRequest = .MoveTo(750, 450)
    
23. Set objRequest = .Play("Pleased")
    
24. wscript.sleep 5000
    
25. Set objRequest = .Speak("I will be back shortly...")
    
26. wscript.sleep 5000
    
27. Set objRequest = .Play("Wave")
    
28. wscript.sleep 5000
    
29. .Hide
    
30. End With

Have a blast with Merlin, and oh... you can use other characters aswell...

If at first you fail, call it version 1.0