Simple Steam

by a24 21 Sep 2010

Tags

effect
Embed

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

package
{
	import flash.display.*;
	import flash.geom.Point;
	
	[SWF(backgroundColor = "#777777", frameRate = 60)]
	
	public class SimpleSteam extends MovieClip {
		private var _bmd:BitmapData = new BitmapData(465 / 2, 465 / 2, false, 0);
		private var _bmp:Bitmap     = new Bitmap(_bmd);
		private var _lay:Array      = [new Point(), new Point(), new Point(), new Point()];
		
		public function SimpleSteam() {
			_bmp.scaleX = _bmp.scaleY = 2;
			addChild(_bmp).blendMode = "screen";
			
			addEventListener("enterFrame", function():void {
				for (var i:int; i < _lay.length; i++) _lay[i].offset((mouseX - 232) / 700 * (2 - i) , mouseY / 800 * (4 - i));
				_bmd.perlinNoise(60, 60, 4, 0, true, true, 4, true, _lay);
			});
		}
	}
}