In case Flash no longer exists; a copy of this site is included in the Flashpoint archive's "ultimate" collection.

Dead Code Preservation :: Archived AS3 works from wonderfl.net

code on 2008-12-18

first time on wonderfl
circles orbit circles
Get Adobe Flash player
by modernCarpentry 18 Dec 2008
// first time on wonderfl

// circles orbit circles

package
{
    import flash.display.Sprite;
    import flash.events.Event;

    [SWF(backgroundColor="#ccfccc")]
    public class Orbit extends Sprite
    {
        //count
        private var c:Number = 0;
        
        //orbit radius
        private var or:Number = 100;

        //circle radius
        private var r:Number = 20;     

        //offset
        private var off:int = 100;   

        public function Orbit()
        {    
            stage.align = "TOP_LEFT";
            stage.scaleMode = "noScale";

            addEventListener(Event.ENTER_FRAME, frame);
        }

        private function frame(event:Event):void
        {
            c+=.1;
            graphics.clear();
            
            var cx:Number = off + or + Math.cos(c) * or;
            var cy:Number = off + or + Math.sin(c) * or;            

            graphics.beginFill(0x0000ff);
            graphics.drawCircle(cx, cy, r)
            
            cx = cx + Math.cos(2*c)*or;
            cy = cy + Math.sin(2*c)*or;

            graphics.beginFill(0x00ff00);
            graphics.drawCircle(cx, cy, r/2);

            cx = cx + Math.cos(4*c)*or/2;
            cy = cy + Math.sin(4*c)*or/2;
           
            graphics.beginFill(0xffff00);
            graphics.drawCircle(cx, cy, r/4);            
            
        }
    }



};