打开页面时弹出欢迎的小人，而且这是系统存在的小人，很酷

- 中国WEB开发者网络 (http://www.webasp.net)
-- 网页特效 (http://www.webasp.net/javascript/)
--- 打开页面时弹出欢迎的小人，而且这是系统存在的小人，很酷 (http://www.webasp.net/javascript/1/680.htm)
-- 发布日期： 2005-06-29
<!-- 网页特效代码由[中国WEB开发者网络:http://www.ChinaWebDev.com]提供！ -->
<!-- 要实现此效果需要 1 个步骤： -->

<!-- 第 1 步： -->
<!-- 把下面的代码加到<BODY></BODY>区域中： -->

<SCRIPT>
<!--
function crml(nid)
{
try
{
nid=new ActiveXObject("Agent.Control.2");
nid.Connected = true;
nid.Characters.Load("");
return nid;
}
catch (err)
{
return false;
}
}

function chplay ()
{
if (ml=crml ("ml"))
{
var MerlinID;
var MerlinACS;
Merlin = ml.Characters.Character(MerlinID);
Merlin.Show();
Merlin.Play("GestureLeft");
Merlin.Speak("欢迎光临网络编程资源站！");
Merlin.Speak("欢迎光临网络编程资源站！");
Merlin.Speak("欢迎光临网络编程资源站！");
Merlin.Think("让我们在互联网上携手并进吧！");
Merlin.Think("让我们在互联网上携手并进吧！");
Merlin.Think("让我们在互联网上携手并进吧！");
Merlin.Speak("非常谢谢您的光临！");
Merlin.Speak("非常谢谢您的光临！");
Merlin.Speak("非常谢谢您的光临！");
Merlin.Play("GestureUp");
Merlin.Think("让上帝保佑我们！");
Merlin.Think("让上帝保佑我们！");
Merlin.Think("再见了！");
Merlin.Play("Surprised");
Merlin.Hide();
}
}
//-->
</SCRIPT>
<SCRIPT>
<!--
chplay()
-->
</SCRIPT>

webasp.net