鼠标指针随移动的方向而改变-JS特效-爱易网页

鼠标指针随移动的方向而改变

日期：2014-05-18　浏览次数：20311 次

以下是程序代码

<html xmlns:v="urn:schemas-microsoft-com:vml">
<STYLE>
body{margin:0px;cursor:url(http://js.aiyiweb.com/UploadPic/2009-6/Select.cur)}
v\:* { Behavior: url(#default#VML) }
</STYLE>

<script>
     var trace=""
     var vP
     var r=0
     var vS
     var p=new Object()
     var lineColor=[[255,0,0],[255,0,255]]
     p.x=0;p.y=0
     function init(){
      document.body.onmousedown=function(){
        if (event.button==1 || event.button==4){
         if (event.button==1) vP=document.createElement("v:PolyLine"); else vP=document.createElement("v:line");
        }
        vS=document.createElement("v:stroke")
        vP.filled="false"
        vP.appendChild(vS)
        document.body.appendChild(vP)
        trace="";
        if (event.button==4) vP.from.value=event.clientX + "," + event.clientY;
      }
      
      document.body.onmousemove=function(){
        if (event.button==1){
        pos=event.clientX + "," + event.clientY + " ";
        trace+=pos
        vS.color="rgb(255,0,0)"
     vP.points.value=trace
       }
       if  (event.button==4) {
        vP.to.value=event.clientX + "," + event.clientY;
       }
       
       rImg.style.left=event.clientX-20;
       rImg.style.top=event.clientY-20;
       
       var cX = p.x-event.clientX;
       var cY = p.y-event.clientY;
       if (cX || cY) {
     status ="cX:"+cX+" -cY:"+cY
     rotationImg(180-parseInt(Math.atan2(cY,cX)*180/Math.PI,10));
       }  
        p.x=event.clientX;
        p.y=event.clientY;  
      }
     
      document.body.onmouseup=function(){
         vS.EndArrow="Block"
       }
      document.onselectstart=function(){return false}
     }
     
     function rotationImg(flag){
    window.status=r + " to " + flag;
    var step=3;
   while(r-flag>180) flag+=360
   while(flag-r>180) flag-=360
   r += (flag-r)/step
     rImg.style.rotation=90-r;
    }
    </script>
<body onload="init()">
<v:image id="rImg" src="http://js.aiyiweb.com/UploadPic/2009-6/20096151524071010.gif" style="position:absolute;top:0;left:0;width:37;height:37;0" >
 <v:Stroke dashstyle="Solid"/>
</v:image>
</body>

[Ctrl+A 全部选择提示：你可先修改部分代码，再按运行]

免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。

相关资料更多>

巨人网络回应央视否认应用黑客停止诈骗

苏宁易购成世界最慢电商专家称其涉嫌违约

微软确认 Surface 计划更多尺寸和LTE 版本

CSS控制字符长度和显示长度

二代 iPad Air将配备2GB内存？为同屏多任务做准备

微软最后的救命稻草Win 8份额继续上升

乐视今日临时停牌受广电酝酿新规消息影响

杨元庆去年总薪酬1.33亿元

【晚报】女子泰国游晒10照片流量费2000

香港全能空间免费试用15天香港高速云虚拟主机PHP/ASP/NET送MSSQL和MYSQL

推荐阅读更多>