Re: [問題] 圖片隨機播放

看板Web_Design作者 (艾瑞克)時間18年前 (2006/09/01 13:44), 編輯推噓1(102)
留言3則, 2人參與, 最新討論串4/4 (看更多)
詳細設定方法,我都寫到註解裡面,原則上你只要改圖片設定就好了 <script> var i=0,pictures=new Array(); var picbase=""; //圖片名稱設定 pictures[i++]="onion-dp01.jpg"; pictures[i++]="onion-dp02.jpg"; pictures[i++]="onion-dp03.jpg"; pictures[i++]="onion-dp04.jpg"; pictures[i++]="onion-dp05.jpg"; pictures[i++]="onion-dp06.jpg"; pictures[i++]="onion-dp07.jpg"; pictures[i++]="onion-dp08.jpg"; //....增加方式以此類推,我是洋蔥迷:) //也可以設定到子目錄底下,例如 //pictures[i++]="images/onion-dp10.jpg"; 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; //設定變化程度0.1~1.0 whatTransformation.WipeStyle = 0; //設定變化類型 0左右刷 1上下刷 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(picbase+pictures[2*i]) myArr2[i]=m.ImportImage(picbase+pictures[2*i+1]) } if(pictures[2*i]) myArr[i]=m.ImportImage(picbase+pictures[2*i]) else myArr[i]=m.ImportImage(picbase+pictures[0]) ; 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> -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.30.138.165

09/01 14:50, , 1F
感恩 大推~^^
09/01 14:50, 1F

09/01 19:18, , 2F
IE only ...
09/01 19:18, 2F

09/01 19:20, , 3F
一模一樣的程式 http://0rz.net/ab1Lb
09/01 19:20, 3F
文章代碼(AID): #14zyZLo7 (Web_Design)
文章代碼(AID): #14zyZLo7 (Web_Design)