flash on 2010-4-13

by kihon
♥0 | Line 36 | Modified 2010-04-13 22:34:42 | MIT License
play

ActionScript3 source code

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

package
{
	import flash.display.Bitmap;
	import flash.display.Loader;
	import flash.display.Sprite;
	import flash.display.BitmapData;
	import flash.events.Event;
	import flash.geom.Point;
 
	public class Main extends Sprite
	{
		private var bd:BitmapData;
		private var maskbd:BitmapData;
		private var temp:BitmapData;
		private var count:int = 0;
 
		public function Main()
		{
			maskbd = new BitmapData(465, 465, true, 0x0);
			maskbd.perlinNoise(maskbd.width, maskbd.height, 5, int.MAX_VALUE * Math.random(), false, false, 4);
 
			temp = new BitmapData(465, 465, true, 0x0);
 
			bd = new BitmapData(465, 465, true, 0x0);
			addChild(new Bitmap(bd));
 
			addEventListener(Event.ENTER_FRAME, onEnterFrame);
		}
 
		private function onEnterFrame(event:Event):void
		{
			temp.fillRect(temp.rect, 0x0); 
			temp.threshold(maskbd, maskbd.rect, new Point(), "<=", count, 0xFF000000, 0xFF);
			bd.copyPixels(temp, temp.rect, new Point(), temp, new Point());
 
			if (count++ == 0xAA)
			{
				count = 0;
				bd.fillRect(bd.rect, 0xFFFFFF);
			}
		}
	}
}