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

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

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

以下是程序代码

<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 全部选择提示：你可先修改部分代码，再按运行]

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

相关资料更多>

淘宝公布新规：升级售假卖家惩罚力度

搜狐前副总编何毅加盟乐视任车联网公司CEO

Skype周年：与微软联姻到底有没有未来？

IT企业人才争夺战打响：员工待遇水涨船高

中电信率先推移动转售业务中下旬批量上市

史玉柱卸任巨人网络CEO 继位人选引猜想

佳能利润大跌三成智能终端倒逼相机厂商转型

人们为什么总愿尝试新社交网络？

诺基亚再缩阵线封锁上海旗舰店全力蜕变

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

推荐阅读更多>