♀方圍..定礎..結!!♂就讓你走進我的絕界裡頭吧!! 心境不夠平靜根本不能稱得上是術者!!@o@ ''還未成為成功的術者根本不可能進入黑芒的
 
首頁歡迎頁日曆相冊常見問題搜尋會員列表會員群組會員註冊登入

分享 | 
 

 程式名稱 : 漫天飛雪動畫

上一篇主題 下一篇主題 向下 
發表人內容
☆卍滿天星卍"◇
Admin


文章數 : 170
注冊日期 : 2009-09-24
年齡 : 19

發表主題: 程式名稱 : 漫天飛雪動畫   12/3/2010, 3:39 pm

步驟一 :
將以下程式碼複製 , 貼在網頁原始檔HTML <body> 之內 .
bgcolor=#000000 onLoad="snow()"



步驟二 :
將以下程式碼複製 , 貼在網頁原始檔HTML <body> 與 </body> 之間 .
<script language="JavaScript">
<!-- wenchin
N = 40;
Y = new Array();
X = new Array();
S = new Array();
A = new Array();
B = new Array();
M = new Array();
V = (document.layers)?1:0;

iH=(document.layers)?window.innerHeight:window.document.body.clientHeight;
iW=(document.layers)?window.innerWidth:window.document.body.clientWidth;
for (i=0; i < N; i++){
Y[i]=Math.round(Math.random()*iH);
X[i]=Math.round(Math.random()*iW);
S[i]=Math.round(Math.random()*5+2);
A[i]=0;
B[i]=Math.random()*0.1+0.1;
M[i]=Math.round(Math.random()*1+1);
}
if (V){
for (i = 0; i < N; i++)
{document.write("<LAYER NAME='sn"+i+"' LEFT=0 TOP=0 BGCOLOR='#FFFFF0' CLIP='0,0,"+M[i]+","+M[i]+"'></LAYER>")}
}
else{
document.write('<div style="position:absolute;top:0px;left:0px">');
document.write('<div style="position:relative">');
for (i = 0; i < N; i++)
{document.write('<div id="si" style="position:absolute;top:0;left:0;width:'+M[i]+';height:'+M[i]+';background:#fffff0;font-size:'+M[i]+'"></div>')}
document.write('</div></div>');
}
function snow(){
var H=(document.layers)?window.innerHeight:window.document.body.clientHeight;
var W=(document.layers)?window.innerWidth:window.document.body.clientWidth;
var T=(document.layers)?window.pageYOffset:document.body.scrollTop;
var L=(document.layers)?window.pageXOffset:document.body.scrollLeft;
for (i=0; i < N; i++){
sy=S[i]*Math.sin(90*Math.PI/180);
sx=S[i]*Math.cos(A[i]);
Y[i]+=sy;
X[i]+=sx;
if (Y[i] > H){
Y[i]=-10;
X[i]=Math.round(Math.random()*W);
M[i]=Math.round(Math.random()*1+1);
S[i]=Math.round(Math.random()*5+2);
}
if (V){document.layers['sn'+i].left=X[i];document.layers['sn'+i].top=Y[i]+T}
else{si[i].style.pixelLeft=X[i];si[i].style.pixelTop=Y[i]+T}
A[i]+=B[i];
}
setTimeout('snow()',10);
}
/wenchin/-->
</script>
回頂端 向下
http://enjoytheworld.forum888.tw
 
程式名稱 : 漫天飛雪動畫
上一篇主題 下一篇主題 回頂端 
1頁(共1頁)

這個論壇的權限:無法 在這個版面回復文章
☆★㊣論壇俱樂部㊣★☆ :: 俱樂部之城 I :: 程式分享俱樂部-
前往: