<!-- http://www.do*wnc**odes.com --> <!-- bbs http://bbs.dow**nc*odes.com --> <!--把如下代码加入到<body>区域中--> <DIV ID=controlDiv> <OBJECT ID="DAControl" STYLE="position:absolute; left:20%; top:0;width:500;height:500" CLASSID="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D"> </OBJECT> </DIV> <SCRIPT LANGUAGE="JScript"> <!-- m = DAControl.MeterLibrary; numGeos = 5; speed = m.Div(m.LocalTime, m.DANumber(2.5)); hue = m.Abs(m.Sin(m.Div(speed,m.DANumber(2)))); offX = m.Mul(m.DANumber(.04),m.Sin(speed)); offY = m.Mul(m.DANumber(.04),m.Sin(speed)); rotX = m.Mul(speed, m.DANumber(2)); rotY = m.Mul(speed, m.DANumber(2)); rotZ = m.Mul(speed, m.DANumber(2)); lrotX = m.Mul(m.DANumber(.02),speed); lrotY = m.Mul(m.DANumber(.02),speed); lrotZ = m.Mul(m.DANumber(.02),speed); scale = m.DANumber(1); //颜色变化 half = m.DANumber(0.5); clr = m.colorHslAnim(hue, half, half); xfID = m.IdentityTransform2; xfsc = m.Scale2UniformAnim(scale); xflr = m.Compose3(m.Compose3(m.Rotate3Anim(m.xVector3,lrotX), m.Rotate3Anim(m.yVector3,lrotY) ), m.Rotate3Anim(m.zVector3,lrotZ) ).ParallelTransform2(); xflt = m.Translate2Anim(offX, offY); xfwt = m.Compose3(m.Compose3(m.Rotate3Anim(m.xVector3,rotX), m.Rotate3Anim(m.yVector3,rotY) ), m.Rotate3Anim(m.zVector3,rotZ) ).ParallelTransform2(); xf = m.Compose2(xfwt, m.Compose2(xflt, m.Compose2( xflr, xfsc ) ) ); rect = m.RectAnim(m.DANumber(.015),m.DANumber(.015)); recImg = m.SolidColorImage(clr).Clip(m.FillMatte(rect)); finalImg = m.EmptyImage; for(i=0; i<numGeos; i++) { wait = xfID.Duration(i*.3); newImg = recImg.Transform(m.Sequence(wait,xf)); finalImg = m.Overlay(newImg,finalImg); } // 开始动画 DAControl.Image = finalImg; DAControl.Start(); --> </SCRIPT> 相关文章 knowsky.com 完美修复你浏览器的源码 2009-06-20 列表记录的增加、删除以及向上向下移动的效果 2009-06-20 一个全面的对输入框内容进行检测的程序 2009-06-20 相互关联的下拉菜单，在提交表单时是非常有用的 2009-06-20 推荐阅读 检查表格的行数，没有多少实际的意义 2009-06-20 打开页面时跳出对话框，输入姓名后告诉你上次登陆的时间 2009-06-20 在javascript中加入Html代码的特效实现方法 2009-06-20 进入页面时，系统会自动根据你所使用的浏览器进行相应的导航 2009-06-20