鼠标跟随的文字

<head>
<style type="text/css">
 .spanstyle { position:absolute; visibility:visible; top:-50px; font-size:9pt; color: #0000FF; font-weight:bold; }
</style>
<script type="text/javascript">
//IE专用
 var x, y
 var step = 20
 var flag = 0
 var message = "欢迎来枫丹白露亭!!"
 message = message.split("");
 var xpos = new Array();
 for (i = 0; i <= message.length - 1; i++) {
     xpos[i] = -50
 }
 var ypos = new Array();
 for (i = 0; i <= message.length - 1; i++) {
     ypos[i] = -50
 }
 function handlerMM(e) {
	 ee=e||event;
     x = (document.layers) ? e.pageX : document.body.scrollLeft + ee.clientX;
	 y = (document.layers) ? e.pageY : document.body.scrollTop + ee.clientY;
	 flag = 1;
 }
 function makesnake() {
     if (flag == 1 && document.all) {
         for (i = message.length - 1; i >= 1; i--) {
             xpos[i] = xpos[i - 1] + step;
			 ypos[i] = ypos[i - 1]
         }
         xpos[0] = x + step;
		 ypos[0] = y
         for (i = 0; i < message.length - 1; i++) {
             var thisspan = eval("span" + (i) + ".style");
			 thisspan.posLeft = xpos[i];
			 thisspan.posTop = ypos[i];
         }
     } else if (flag == 1 && document.layers) {
         for (i = message.length - 1; i >= 1; i--) {
             xpos[i] = xpos[i - 1] + step;
			 ypos[i] = ypos[i - 1];
         }
         xpos[0] = x + step; 
		 ypos[0] = y;
         for (i = 0; i < message.length - 1; i++) {
             var thisspan = eval("document.span" + i); 
			 thisspan.left = xpos[i]; 
			 thisspan.top = ypos[i];
         }
     }
     var timer = setTimeout("makesnake()", 30);
 }
</script>

</head>
<body onload="makesnake()">
<script type="text/javascript">
 for (i = 0; i <= message.length - 1; i++) {
     document.write("<span id='span" + i + "' class='spanstyle'>");
	 document.write(message[i]);
	 document.write("</span>");
 }
 if (document.layers) {
     document.captureEvents(Event.MOUSEMOVE);
 }
 document.onmousemove = handlerMM;
</script>
</body>

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

这个站点使用 Akismet 来减少垃圾评论。了解你的评论数据如何被处理

相关文章

开始在上面输入您的搜索词,然后按回车进行搜索。按ESC取消。

返回顶部