图片渐变特效
将下面代码插入到<body>和</body>之间
<script> var
i=0,pictures=new Array();//设置图片数组，图片数为奇数
pictures[i++]="wsh/1.gif"
pictures[i++]="wsh/2.gif"
pictures[i++]="wsh/3.gif"
pictures[i++]="wsh/4.gif"
pictures[i++]="wsh/5.gif"
pictures[i++]="wsh/6.gif"
pictures[i++]="wsh/7.gif"
pictures[i++]="wsh/8.gif"
pictures[i++]="wsh/9.gif"
pictures[i++]="wsh/10.gif"
pictures[i++]="wsh/11.gif"
pictures[i++]="wsh/12.gif"
pictures[i++]="wsh/13.gif"
pictures[i++]="wsh/14.gif"
pictures[i++]="wsh/15.gif"
pictures[i++]="wsh/16.gif"
pictures[i++]="wsh/17.gif"
pictures[i++]="wsh/18.gif"
pictures[i++]="wsh/19.gif"
pictures[i++]="wsh/20.gif"
pictures[i++]="wsh/21.gif"
pictures[i++]="wsh/22.gif"
pictures[i++]="wsh/23.gif"
pictures[i++]="wsh/24.gif"
pictures[i++]="wsh/25.gif"
var picturewidth=400//图片宽度
var pictureheight=290//图片高度
var delay=1//延迟时间
</script>
<script>
if (document.all) {
document.write('<OBJECT ID="DAControl_Wipe" ')
document.write('STYLE="width:'+picturewidth+';
height:'+pictureheight+'"')
document.write('CLASSID="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D">')
document.write('</OBJECT>')
m = DAControl_Wipe.MeterLibrary;
whatTransformation = new ActiveXObject("DXImageTransform.Microsoft.Wipe");
whatTransformation.GradientSize = 1.0;//设置渐变度
whatTransformation.WipeStyle = 0;//设置擦洗类型
var myArr=new Array(),myArr2=new Array();
var len=Math.floor(pictures.length/2);//将图片分成两组
for(var i=0;i<len;i++){
myArr[i]=m.ImportImage(pictures[2*i])
myArr2[i]=m.ImportImage(pictures[2*i+1])
}
myArr[i]=m.ImportImage(pictures[2*i])
myArr=m.Array(myArr)
myArr2=m.Array(myArr2)
Index = m.Interpolate(0.5,len+0.5,len*2*delay).RepeatForever();
Index2 = m.Interpolate(0,len,len*2*delay).RepeatForever();
//交错运行半个时间单元
var whatPictures=new Array();
whatPictures[0] = myArr.NthAnim(Index);
whatPictures[1] = myArr2.NthAnim(Index2);
forward = m.Interpolate(0, 1, delay);
back = m.Interpolate(1, 0, delay);
whatMovement = m.Sequence(forward, back).RepeatForever();
//设置参数方向
theResult = m.ApplyDXTransform( whatTransformation, whatPictures, whatMovement );
DAControl_Wipe.Image = theResult.OutputBvr;//设置显示图形
DAControl_Wipe.Start();//开始
}
</script>
-------------------------------------------------------------------------------------
这个光是图片变幻，没有雪花效果
