z777899465 發表於 2007-10-20 06:17:42

文字跟隨這滑鼠

1.在</head>前貼上下面語法:

<script>

var x,y
var step=15
var flag=0

var message="歡迎來到閒居小棧裡";
message=message.split("")

var xpos=new Array()
for (i=0;i<=message.length-1;i++) {
xpos=-50
}

var ypos=new Array()
for (i=0;i<=message.length-1;i++) {
ypos=-50
}

function handlerMM(e){
x = (document.layers) ? e.pageX : document.body.scrollLeft+event.clientX
y = (document.layers) ? e.pageY : document.body.scrollTop+event.clientY
flag=1
}

function makesnake() {
if (flag==1 && document.all) {
for (i=message.length-1; i>=1; i--) {
xpos=xpos+step
ypos=ypos
}
xpos=x+step
ypos=y

for (i=0; i<message.length-1; i++) {
var thisspan = eval("span"+(i)+".style")
thisspan.posLeft=xpos
thisspan.posTop=ypos
}
}

else if (flag==1 && document.layers) {
for (i=message.length-1; i>=1; i--) {
xpos=xpos+step
ypos=ypos
}
xpos=x+step
ypos=y

for (i=0; i<message.length-1; i++) {
var thisspan = eval("document.span"+i)
thisspan.left=xpos
thisspan.top=ypos
}
}
var timer=setTimeout("makesnake()",30)
}

</script>

<style>
.spanstyle {
position:absolute;
visibility:visible;
top:-50px;
font-size:9pt;
font-family:Verdana;
font-weight:bold;
color:#0000ff;
}




</style>

2.在<body>內貼上下面語法

<bodystyle="width:100%;overflow-x:hidden;overflow-y:scroll" background="bkb05.gif">


3.在<body>下貼上下面語法:

<script>
<!-- Beginning of javascript -

for (i=0;i<=message.length-1;i++)
{
/*
if (i < 2)
document.write("<span id='span"+i+"' class='spanstyle1'>")
else
document.write("<span id='span"+i+"' class='spanstyle'>")
*/
document.write("<span id='span"+i+"' class='spanstyle'>");
/*
if ((i == 0) || (i == 2))
document.write("<span id='span"+i+"' class='spanstyle2'>")
else if ((i == 1) || (i == 3))
document.write("<span id='span"+i+"' class='spanstyle1'>")
else
document.write("<span id='span"+i+"' class='spanstyle'>")
*/
document.write(message)
document.write("</span>")
}

if (document.layers){
document.captureEvents(Event.MOUSEMOVE);
}
document.onmousemove = handlerMM;

// - End of javascript - -->
</script>

lee569 發表於 2008-1-4 13:22:00

多謝分享喔!!!!!
剛好需要用到!!
很實用的說
頁: [1]
查看完整版本: 文字跟隨這滑鼠