flash on 2012-5-21

by mutantleg
♥0 | Line 51 | Modified 2012-05-21 22:41:35 | MIT License
play

ActionScript3 source code

/**
 * Copyright mutantleg ( http://wonderfl.net/user/mutantleg )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/5Yqt
 */

package {
    import flash.text.TextField;
    import flash.events.Event;
    import flash.display.Sprite;
    public class FlashTest extends Sprite {
        
        
        public var sp:Sprite;
        public var deb:TextField;
        
        public function FlashTest() {
            
            sp = new Sprite();
            sp.graphics.clear();
            sp.graphics.lineStyle(2,0);
            sp.graphics.drawCircle(0,0,16);
            sp.y= 50;
            addChild(sp);
            
            num = frame.length;
            var i:int;
            
            graphics.clear();
            graphics.lineStyle(1,0);
            for (i = 0; i < num; i++)
            {
                graphics.drawCircle(frame[i],50,8);
            }//nexti
            
            deb = new TextField();
            deb.width = 400;
            deb.text = "debug";
            addChild(deb);
            
            addEventListener(Event.ENTER_FRAME, onEnter);
        }//ctor
        
        public var cx:Number = 0;
        public var cur:Number = 0;
        public var next:Number = 0;
        public var speed:Number = 0.09;
        public var num:int = 0;
        public var frame:Array = [40, 70, 100, 120,200,250];
        
        public function onEnter(e:Event):void
        {
            var u:Number;
            
            cur += speed;
            if (cur >= num) { cur = 0; }
              
            var f0:int;
            var f1:int;
            
            f0 = Math.floor(cur);
            f1 = Math.floor(cur+1);
            if (f1 >= num) {f1= 0;}
            
            u = cur - Math.floor(cur);
            
            cx = frame[f0] + (frame[f1] - frame[f0]) * u;
            
            deb.text = "cur " + cur  + "\n f0 "+f0 +"\n f1 "+ f1 + "\n u " + u +"\n  cx " + cx;
            
            sp.x = cx;
            
            
        }//onenter
        
    }//classend
}