語法展示:: http://home.graffiti.net/qdcsfcvs/
請用IE6.0或更新版本觀看語法特效展示
將以下程式碼複製,貼在<body>及</body>標籤之間。
<object ID="DAControl" STYLE="position:absolute; left:0%; top:3;width:500;height:500" CLASSID="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D" width="190" height="190">
</object>
<script LANGUAGE="JScript">
<!--
m = DAControl.MeterLibrary;
numGeos = 6;
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);
//Create an animated color
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);
}
// Assign the animation back to the control and start it
DAControl.Image = finalImg;
DAControl.Start();
//-->
</script>
留言列表