您所在位置：主题：代码 QQ 制作
qq926
[专家分：0] 发布于 2006-04-17 16:19:00
%追风过客% 15:38:48
<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.MoveTo(200,200);
Merlin.Show();
Merlin.Play("Explain");
Merlin.Play("Announce");
Merlin.Speak("呵呵");
Merlin.Play("Gestureright");
Merlin.Play("Pleased");
Merlin.Speak("欢迎光临寒府");
Merlin.Play("Idle1_1");
Merlin.Hide();
Merlin.MoveTo(600,300);
Merlin.Show();
Merlin.Play("Surprised");
Merlin.Speak("你好");
Merlin.Play("Read");
Merlin.Speak("欢迎");
Merlin.Play("Read")
Merlin.Play("GestureUp");
Merlin.Speak("对你的来访我表示热烈的欢迎和诚挚的问候");
Merlin.Play("DontRecognize");
Merlin.Speak("再一次表达我的致意");
Merlin.Play("DontRecognize");
Merlin.Play("Greet");
Merlin.Speak("希望你在我的玫瑰之家玩的高兴");
Merlin.Play("Greet");
Merlin.Speak("欢迎下次光临，祝你快乐每一天！！");
Merlin.Play("Greet");
Merlin.Hide();
}
}
//-->
</SCRIPT>
<SCRIPT>
<!--
chplay()
-->
</SCRIPT>
</body>