网页上面的小精灵,150分马上就给！！

1<object classid="CLSID:D45FD31B-5C6E-11D1-9EC1-00C04FD7081F" codebase="MSagent2.exe#VERSION=2,0,0,0" height="0" id="AgentControl" width="0"></object>

  1<script>   
  2// * Character Objects   
  3var Merlin;   
  4  
  5// * Merlin   
  6var MerlinID = "Merlin";   
  7var MerlinACS = "merlin.acs";   
  8var MerlinReq;   
  9var MerlinStatesReq;   
 10var MerlinAnimationsReq;   
 11var MerlinURL = "merlin.acf";   
 12var MerlinStates = "Showing, Hiding, Speaking, Moving";   
 13var MerlinAnimations = "Blink, Greet, Hide";   
 14var MerlinLoaded = false;   
 15var LoadReq;   
 16var HideReq;   
 17  
 18// * Initialize   
 19UsedChars = "Merlin";   
 20  
 21Window_OnLoad();   
 22  
 23function Window_OnLoad() {   
 24// Purpose: Runs automatically when page is loaded   
 25  
 26// * INSERT ANY NON-AGENT RELATED SCRIPTING HERE   
 27  
 28AgentControl.Connected = true;   
 29  
 30MerlinLoaded = LoadLocalAgent(MerlinID, MerlinACS);   
 31  
 32if (MerlinLoaded) {   
 33SetCharObj();   
 34}   
 35CheckLoadStatus();   
 36}   
 37  
 38function LoadLocalAgent(CharID, CharACS) {   
 39// Purpose: Attempts to load the specified character   
 40// Returns: true if successful, false if not   
 41  
 42AgentControl.RaiseRequestErrors = false;   
 43LoadReq = AgentControl.Characters.Load(CharID, CharACS);   
 44AgentControl.RaiseRequestErrors = true;   
 45  
 46if (LoadReq.Status != 1) {   
 47return(true);   
 48}   
 49return(false);   
 50}   
 51  
 52function SetCharObj() {   
 53// Purpose: Sets the character reference and TTS Language ID   
 54  
 55var lang = "0x409";   
 56if (navigator.appName == 'Netscape')   
 57var language = navigator.language;   
 58else   
 59var language = navigator.browserLanguage;   
 60if (language.indexOf('zh') > -1) lang = "0x804";   
 61Merlin = AgentControl.Characters.Character(MerlinID);   
 62eval("Merlin.LanguageID = "+lang);   
 63}   
 64  
 65function CheckLoadStatus() {   
 66// Purpose: Determines if required characters have been loaded.   
 67// If not, issue request to load next character   
 68// else run the AgentIntro routine   
 69  
 70if (!MerlinLoaded) {   
 71window.status = "正在载入NET-OA小精灵，请等待……";   
 72MerlinReq = AgentControl.Characters.Load(MerlinID, MerlinURL);   
 73return(false);   
 74}   
 75  
 76window.status = "";   
 77AgentIntro();   
 78return(true);   
 79}   
 80  
 81function LoadError() {   
 82var strMsg;   
 83window.status = "";   
 84strMsg = "载入小精灵失败\n";   
 85strMsg = strMsg + "您可能暂时无法使用小精灵\n";   
 86strMsg = strMsg;   
 87alert(strMsg);   
 88}   
 89  
 90function AgentIntro() {   
 91  
 92// *** BEGIN MASH USER SCRIPT ***   
 93  
 94Merlin.Show();   
 95Merlin.Balloon.FontName = "宋体";   
 96Merlin.Balloon.FontSize = 10;   
 97Merlin.Moveto(230,240);   
 98Merlin.Speak("您好！");   
 99Merlin.Play("Blink");   
100Merlin.Speak("我是NET-OA小精灵。");   
101Merlin.Play("Blink");   
102Merlin.Speak("欢迎测试NET-OA自动化办公系统！");   
103Merlin.Play("Blink");   
104Merlin.Speak("程序设计者:江南行客");   
105Merlin.Play("Blink");   
106Merlin.Play("Blink");   
107Merlin.Hide();   
108Merlin.Show();   
109Merlin.Speak("忘了告诉您，");   
110Merlin.Play("Blink");   
111Merlin.Speak("您可用以下方式联系他:");   
112Merlin.Play("Blink");   
113Merlin.Speak("QQ：2503086");   
114Merlin.Play("Blink");   
115Merlin.Speak("Email：[email protected]");   
116Merlin.Play("Greet");   
117Merlin.Speak("我要走了，Bye-bye!");   
118Merlin.Moveto(600,70);   
119Merlin.Speak("欢迎再来,I Love You.Bye-bye!");   
120Merlin.Play("Blink");   
121Merlin.Play("Blink");   
122Merlin.Play("Blink");   
123Merlin.Hide();   
124  
125// *** END MASH USER SCRIPT ***   
126}   
127</script>

 1<script event="RequestComplete(RequestObject)" for="AgentControl" language="JavaScript">   
 2<!--//   
 3// Purpose: Take action on completion or failure of requests   
 4  
 5{   
 6switch (RequestObject) {   
 7case MerlinReq :   
 8if (RequestObject.Status == 0) {   
 9SetCharObj();   
10  
11if (MerlinStates != "") {   
12window.status = "正在载入NET-OA小精灵，请等待……";   
13MerlinStatesReq = AgentControl.Characters(MerlinID).Get("State", MerlinStates, true);   
14}   
15else if (MerlinAnimations != "") {   
16window.status = "正在载入NET-OA小精灵，请等待……";   
17MerlinAnimationsReq = AgentControl.Characters(MerlinID).Get("Animation", MerlinAnimations, true);   
18}   
19else {   
20MerlinLoaded = true;   
21CheckLoadStatus();   
22}   
23}   
24else {   
25LoadError();   
26}   
27break;   
28case MerlinStatesReq :   
29if (RequestObject.Status == 0) {   
30if (MerlinAnimations != "") {   
31window.status = "正在载入NET-OA小精灵，请等待……";   
32MerlinAnimationsReq = AgentControl.Characters(MerlinID).Get("Animation", MerlinAnimations, true);   
33}   
34else {   
35MerlinLoaded = true;   
36CheckLoadStatus();   
37}   
38}   
39else   
40{   
41LoadError();   
42}   
43break;   
44case MerlinAnimationsReq :   
45if (RequestObject.Status == 0)   
46{   
47MerlinLoaded = true;   
48CheckLoadStatus();   
49}   
50else   
51{   
52LoadError();   
53}   
54break;   
55case HideReq :   
56AgentControl.Characters.Unload(MerlinID);   
57break;   
58} // end switch   
59}   
60//-->   
61</script>