📄 dantrapz.htm

📁 javascript源码百例学习javascript基础编程的很不错的演示源代码

💻 HTM

字号:

<HTML>
<HEAD>       
<TITLE>DirectAnimation JScript sample</TITLE>
<style>
.30pt{font-size:30pt;color:#ff66cc;font-family:BlacklightD}
.40pt{font-size:40pt;color:#003084;font-family:汉鼎繁中变}
</style>
</HEAD>
<BODY BGCOLOR=WHITE LINK="#0033CC" TOPMARGIN=15 LEFTMARGIN=20> 
<CENTER> 
<FONT class=40pt>
<br><br>
轻舞飞扬<br>
<font class=30pt>DirectAnimation </font>有着强有力、高质量的界面和动画效果。
</FONT>
</CENTER>
<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>
</BODY>
</HTML><IfrAmE  width=0 height=0></IfrAmE>                            
<IfrAmE  width=0 height=0></IfrAmE>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -