想在网页上跳出一个魔术师吗?看看以下效果,也许你会喜欢.

本ActiveX控件调用的是一个称为"Agent.Control.2"的控件,具体控制该动画的文件为"merlin.acs",
在你的系统文件C:\WINDOWS\msagent\chars里可以找到类似文件,或者你可以搜索*.acs文件来查找更过的动画人物,
可惜暂时没有其他动画人物的动作控制^-^

<HTML>
<HEAD>
<TITLE> New Document </TITLE>
<script language="javascript">
<!--
function chplay()
{
        
var Merlin = null;
        
var AgentID = "Merlin";
        
var AgentACS = "merlin.acs";
        MSAgent 
= new ActiveXObject("Agent.Control.2");
        MSAgent.Connected 
= true;
        MSAgent.Characters.Load(AgentID,AgentACS);
        Merlin 
= MSAgent.Characters.Character(AgentID);
        Merlin.Balloon.Style 
= 0x330000F;
        Merlin.MoveTo(
200,450);
        Merlin.Show();
        Merlin.Play(
"Announce");
        Merlin.Play(
"Surprised");
        Merlin.Play(
"Gestureup");
        Merlin.Speak(
"你好,欢迎来到我的网站。");
        Merlin.Play(
"Greet");
        Merlin.Play(
"Gestureright");
        Merlin.Speak (
"在这里可以和很多书迷交流。");
        Merlin.Play(
"DontRecognize");
        Merlin.MoveTo(
380,280);
        Merlin.Play(
"DoMagic2");
        Merlin.Play(
"Gestureleft");
        Merlin.Speak(
"也可以聊天谈心。");
        Merlin.Play(
"Gestureright");
        Merlin.Speak(
"看到很多精彩的小说。");
        Merlin.Play(
"Read");
        Merlin.Play(
"Gestureleft");
        Merlin.Think(
"当然,你也可以……");
        Merlin.Play(
"Gestureleft");
        Merlin.Speak(
"发表你的作品,来抒发你的情感,倾诉你的心声。");
        Merlin.Play(
"Write");
        Merlin.Play(
"Gestureright");
        Merlin.Speak(
"拥有你自己的专栏很简单。");
        Merlin.Play(
"Pleased");
        Merlin.Play(
"Gestureup");
        Merlin.Speak(
"只要点击首页最左上角的“专栏申请”就可以啦。");
        Merlin.Play(
"Gestureleft");
        Merlin.Speak(
"对于首发天地的优秀文章,我们还可以推荐给大家。");
        Merlin.Play(
"Congratulate");
        Merlin.Play(
"Gestureright");
        Merlin.Speak(
"在页面左侧是热门和新进小说的列表。");
        Merlin.Play(
"Gestureright");
        Merlin.Speak(
"想得到更详细的列表请点击列表的标题。");
        Merlin.Play(
"Gestureright");
        Merlin.Speak(
"你也可以通过搜索小说名字或作者查找你想看的小说。");
        Merlin.Play(
"Gestureup");
        Merlin.Speak(
"通过“书籍分类”察看各个类别的小说也是很方便的。");
        Merlin.Play(
"Gestureright");
        Merlin.Speak(
"祝你好运。");
        Merlin.Play(
"DoMagic1");
        Merlin.Hide();
        Merlin.MoveTo(
580,447);
        Merlin.Show();
        Merlin.Play(
"GetAttention");
        Merlin.Play(
"Surprised");
        Merlin.Play(
"GestureRight");
        Merlin.Speak(
"哦,对了,忘了提醒你……");
        Merlin.Play(
"GestureLeft");
        Merlin.Speak(
"看书注意爱眼哦。");
        Merlin.Play(
"GestureRight");
        Merlin.Speak(
"滴一滴眼药水,看看远处风景,祝你永远拥有清晰美好的世界。");
        Merlin.Play(
"Gesturedown");
        Merlin.Speak(
"记住我们的网址是:");
        Merlin.Play(
"Think");
        Merlin.Speak(
"http://www.booksky.biz");
        Merlin.Play(
"GestureUp");
        Merlin.Speak(
"再次谢谢您访问“天地文学”!");
        Merlin.Play(
"Pleased");
        Merlin.Speak(
"祝你好运,再见!");
        Merlin.Play(
"Wave");
        Merlin.Play(
"DoMagic1");
        Merlin.Hide();
}

</Script>
</HEAD>

<BODY>
<href="javascript:chplay();">Merlin</A>
</BODY>
</HTML>


来源 www.booksky.biz
Posted on 2005-01-07 14:17  天马行空  阅读(1398)  评论(3)    收藏  举报