【AS3代码】更换鼠标箭头样式，并跟随鼠标!

package
{
     import flash.display.Sprite;
     import flash.events.MouseEvent;
     import flash.ui.Mouse;
     public  class Main  extends Sprite
    {    
         private  var flag: Boolean = new  Boolean();
         public  function Main():void
        {
             // 创建一个新光标（小方块）
             var a:Sprite = new Sprite();
            a.graphics.beginFill(0xff0000);
            a.graphics.drawRect(0,0,50,50);
            a.graphics.endFill();
            this.addChild(a);
            
            a.startDrag( true);     // 新光标跟随鼠标
            Mouse.hide();          // 隐藏原有光标
            stage.addEventListener(MouseEvent.CLICK, an);   // 监听舞台是否被点击 
            flag =  false;          //标识原鼠标箭头为隐藏状态 
        }
        
         // 鼠标点击舞台后激发的事件
         private  function an(evt:MouseEvent):void
        {
             if(flag ==  false)
            {
                Mouse.show();   // 显示原有光标 
            }
             else
            {
                Mouse.hide();   // 隐藏原有光标 
            }
            flag = !flag;  //隐藏和显示状态转换
        }
    }
    
    
}