code:

---

setconsole("minimize")
$agent_control = "agent.control.2"
$agent_name = "Merlin"
$agent_path = "c:\winnt\msagent\chars\$agent_name.acs"
$agent_mode = "speak"
$agent = olecreateobject ( "$agent_control" )
$= oleputproperty ( $agent, "connected", "s","1" )
$characters = val ( "&" + olegetproperty ( $agent, "characters" ) )
$= olecallfunc ( $characters, "load", "ss","$agent_name","$agent_path" )
$character = val ( "&" + olecallfunc ( $characters, "character", "s", "$agent_name" ) )
$= olecallfunc ( $character, "show" )
$= olecallfunc ( $character, "play", "s", "announce" )
$= olecallfunc ( $character, "play", "s", "greet" )
$= olecallfunc ( $character, "$agent_mode", "s", "Greetings %username% !" )
$= olecallfunc ( $character, "$agent_mode", "s", "My name is $agent_name and "+"this is your logon script ... "  )
sleep 3
$= olecallfunc ( $character, "play", "s", "read" )
$= olecallfunc ( $character, "$agent_mode", "s", "Checking group membership ..." )
$= olecallfunc ( $character, "play", "s", "readreturn" )
sleep 3
$= olecallfunc ( $character, "play", "s", "domagic1" )
$= olecallfunc ( $character, "$agent_mode", "s", "I summon the network drives" )
$= olecallfunc ( $character, "play", "s", "domagic2" )
sleep 5
$= olecallfunc ( $character, "play", "s", "wave" )
$= olecallfunc ( $character, "$agent_mode", "s", "All done... have a nice day !" )
$= olecallfunc ( $character, "hide" ) 
sleep 5
$= olereleaseobject ( $agent )
sleep 15
exit

---

Thanks Shawn... This is the best thing since VNC