网页特效-音乐光环

Kiver 发布于2003-11-9 10:26 819 次浏览 1 位用户参与讨论   [复制分享主题]
<body bgcolor="#000000">7 H% X: F: o; R+ S6 x( L
<SCRIPT LANGUAGE="javascript">( X+ y5 x+ O1 l: T7 T: y
ns = (document.layers)?1:0;) x9 M1 X' w5 m4 w0 i+ D2 i
Clrs = new Array('ff0000','00ff00','ffffff','ff00ff','ffa500','ffff00','00ff00','ffffff','ff00ff')' X9 }* S6 |* \4 l/ o( i: ^% m
yBase = 0;+ X/ O/ \! i, _- @. Q
xBase = 0;
. M$ p8 n- y. {2 Y/ V8 d9 Gstep = 3;
' y9 q% K, X. q8 Y1 k9 F$ PcurrStep = 0;
& S# {3 v- h8 K$ A/ bYpos = 0;
+ S2 z, Z$ r" f$ \3 W( NXpos = 0;+ A; K$ T6 A1 e9 W% y0 U8 j
if (ns){  q: L* v# b1 a) a
for (i = 0; i < 14; i++)
) N3 E- K, |0 L  ?, l/ Xdocument.write('<LAYER NAME="n'+i+'" LEFT=0 TOP=0 CLIP="0,0,'+i/4+','+i/4+'"></LAYER>');
5 {9 i$ L5 ]3 H/ p7 fwindow.captureEvents(Event.MOUSEMOVE);' A4 p9 \# w* p
function nMouse(evnt){
% p0 e" e' M* w* N" ?Ypos = evnt.pageY;) }' k6 j6 H5 b4 V
Xpos = evnt.pageX;
- T2 f; `3 X! B5 B0 N8 P}
/ L. M$ Y; z/ z  t' ^: {/ twindow.onMouseMove = nMouse;
1 }( B9 R! d  n* S2 L}
0 u* R, p# `' |; Eelse{
; i3 O; R# n" E8 g. g3 |document.write('<div style="position:absolute;top:0;left:0"><div style="position:relative">');
6 g! p! R5 s+ x  q  C" nfor (i=0; i < 14; i++)  \5 g. |8 E: F" d8 D9 N- {
{document.write('<div id="me" style="position:absolute;top:0;left:0;width:'+i/4+';height:'+i/4+';font-size:'+i/4+'"></div>')}. C6 r: n3 N  h+ o0 l: S
document.write('</div></div>');4 I  f$ w0 k$ S+ Z; O
function iMouse() {  h! |, f; o. W) r. h/ Q; r
Ypos = event.y+document.body.scrollTop;
3 {# r% z/ }# I) G1 D9 G7 OXpos = event.x+document.body.scrollLeft;4 }+ b* Y- L1 L: `) b) r  s
}! I- ~' L+ X8 l
document.onmousemove = iMouse;
. L, {3 S# _; k}- x  P6 ~/ N! Q5 B8 u; S
function Comet() {
9 E4 H& L. t2 w& Q. jvar yBase = (document.layers)?window.innerHeight/4:window.document.body.clientHeight/4;4 E# |  w) O; |5 Q8 C
var xBase = (document.layers)?window.innerWidth/4:window.document.body.clientWidth/4;" L0 ]& ]' t) O9 |/ ^( f5 B
for (i = 0; i < 14; i++){) @" C6 g! h  x, L& Z4 B
var randCol = Math.round(Math.random()*8);
0 Z/ @; M0 m* S/ P- r- Zvar layer = (document.layers)?document.layers['n'+i]:me.style;
/ i. @6 i7 O% G) X. Z$ t+ {layer.top =Ypos + yBase*Math.cos((currStep+i*4)/12)*Math.cos(0.7+currStep/200);
6 e- V% v, P5 s- f/ q6 Xlayer.left = Xpos + xBase*Math.sin((currStep+i*3)/10)*Math.sin(8.2+currStep/400);3 T( x5 ?5 [- M+ W
if (ns) layer.bgColor = Clrs[randCol];' Q% \7 t/ F' o0 }  t2 K
else( W/ ^+ p( E) [5 U
layer.background = Clrs[randCol];" g5 |: u$ N( D: P
}: m1 R2 n# Z: [$ B
currStep += step;
' t+ p$ }8 `+ X' ZsetTimeout("Comet()",10);
3 f6 g) L" h% A% P# r}9 f5 I2 X" T3 f. f! T5 h
window.onload = Comet;
9 A: g$ r7 h5 d</script>+ ~+ N% d( E$ I

已有(1)人评论

rubylin 发表于 2004-11-22 23:20:50 | 显示全部楼层
正啊,等我又试下先
您需要登录后才可以回帖 登录 | 註冊

本版积分规则

快速
回复
返回
列表
返回
顶部