我的一亩三分地 我就喜欢!
13fen  设为主页
 收藏本站
 
当前位置: > 一亩三分地:首页 > 网络学院 > 网络编程 > ASP专区 > Asp组件/脚本 > dhtml:围着鼠标转的小鸟(飞鸟:不是我)
热门文章排行
热门文章排行 手推车”功能的实现(10-07)
八大法则防范ASP网站漏洞(10-23)
ASP教程十一、调试ASP脚本(10-23)
在JSP中访问数据库大全(10-23)
虚机服务中常见Asp.Net低级错误一览(03-21)
精采文章排行
精采文章排行 ASP.NET实现抓取网页中的链接(11-15)
ASP连接数据库的11种方法(11-10)
如何动态创建网页的RSS内容摘要(11-10)
ASP网站漏洞及入侵防范方法(11-10)
ASP自定义函数:对字符串正则替换(11-10)
技术专题推荐
网管论坛交流
 

dhtml:围着鼠标转的小鸟(飞鸟:不是我) 

作者:佚名   来源:一亩三分地   点击:   日期:2007-03-28

来几段有趣的Dhtml,挺好玩的,是做五子棋的时候找来的副产品
咪咪今年有多大了?去过这么多地方,看上去好象比飞哥哥还要大一些似的。
图片我就懒得传了,本来我是用的那个拍翅膀的小天使。
现在只支持NetScape 4,赶明儿把IE的做出来。是一个围着鼠标转的小鸟。
<HTML>
<head>
<title>飞鸟</title>
</head>

<body bgcolor="#505050" text="#ffffff" link="#e0e0e0" vlink="#808080" alink="#ffffff" >
<layer name="a" left="10" top="10" visibility="SHOW" bgcolor="#fffae2" clip="0,0,50,50" >
<img src="flybird.gif"></layer >

<script language="JavaScript1.2" >
// <!--
var userAgent = navigator.appName + " " + navigator.appVersion;
var agentInfo = userAgent.substring(0, 12);

if (agentInfo >= "Netscape 4.0") {
window.captureEvents(Event.MOUSEMOVE);
var yBase = window.innerHeight/2;
var xBase = window.innerWidth/2;
var delay = 20;
var yAmpl = 10;
var yMax = 40;
var step = .2;
var ystep = .5;
var currStep = 0;
var tAmpl=1;
var Xpos = 10;
var Ypos = 10;
var j = 0;

function MoveHandler(evnt) {
Xpos = evnt.pageX ;
Ypos = evnt.pageY ;
}
window.onMouseMove = MoveHandler;
function FlyBird() {
yBase = window.innerHeight / 4;
xBase = window.innerWidth / 4;

document.layers[0].top = Ypos + Math.cos( ( 20 * Math.sin( currStep / ( 20 + j ) ) ) + j * 70 ) * yBase * (Math.sin( 10 + currStep / 10 ) + 0.2 ) * Math.cos( ( currStep + j * 25 ) / 10);

document.layers[0].left =Xpos + Math.sin( ( 20 * Math.sin( currStep / 20 ) ) + j * 70 ) * xBase * (Math.sin( 10 + currStep / (10 + j ) ) + 0.2 ) * Math.cos( (currStep + j * 25 ) / 10);

currStep += step;
setTimeout("FlyBird()", delay) ;
}

FlyBird()
}
// -- >
</script >
</body > </HTML >  

文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【论坛讨论

   相关文章:
·ASP中巧用Response属性 ·第六课:ASP脚本循环语句
·在 Web 页上使用条件数值格式 ·连接数据库查询手册(不仅仅适用于asp)
·警惕"给你的FileSystemObject对象加把锁" ·用ASP做全文检索

   文章评论:(条)
  
 请留名: 匿名评论   点击查看所有评论 网管论坛
 

  责任编辑:一分  声明:刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。