minimal snow

by ysle
♥0 | Line 36 | Modified 2012-10-31 22:21:45 | MIT License
play

ActionScript3 source code

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

package 
{
    import flash.display.Bitmap;
    import flash.display.BitmapData;
    import flash.display.Sprite;
    import flash.events.Event;
    
    public class Main extends Sprite 
    {
        private var particles:Array = []
        private var bmd:BitmapData
        
        public function Main():void 
        {
            stage.scaleMode = 'noScale'
            stage.align = 'TL'

            addChild(new Bitmap(bmd = new BitmapData(400,225,false,0)))

            for (var i:int = 0; i < 1000; i++) particles.push( initParticle( { }, Math.random() * bmd.height ))

            addEventListener(Event.ENTER_FRAME,onEnterFrame)
        }
        
        private function initParticle(o:Object, y:Number = 0):Object
        {
            o.x = Math.floor( Math.random() * 400 )
            o.y = y
            o.s = Math.random() * 2 + 1
            return o
        }
        
        private function onEnterFrame(e:Event):void 
        {
            bmd.fillRect(bmd.rect,0)
            for each (var p:Object in particles) 
            {
                bmd.setPixel(p.x, p.y, 0xffffff)
                if ((p.y+=p.s) > bmd.height) initParticle(p)
            }
        }
    }
}

Forked