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

perlinNoise-offsets引数を使ってみる

perlinNoise関数のoffsets引数が何なのかよくわからなかったので。
offsets配列はnumOctaves-1までが有効で
生成されるノイズをずらすことができる。
Get Adobe Flash player
by cpu_t 16 Mar 2010
    Embed
/**
 * Copyright cpu_t ( http://wonderfl.net/user/cpu_t )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/7hld
 */

// perlinNoise関数のoffsets引数が何なのかよくわからなかったので。
// 
// offsets配列はnumOctaves-1までが有効で
// 生成されるノイズをずらすことができる。
// 
package {
	import flash.display.Bitmap;
	import flash.display.BitmapData;
    import flash.display.Sprite;
	import flash.events.Event;
	import flash.geom.Point;
	
	import net.hires.debug.Stats;
    public class FlashTest extends Sprite {
		private var bmpdata:BitmapData;
        public function FlashTest() {
			stage.addChild(new Stats());
			
			bmpdata = new BitmapData(stage.stageWidth, stage.stageHeight, false, 0);
			addChild(new Bitmap(bmpdata));
			
			var seed:int = int(Math.random() * 0xFFFFFF);
			var offsets:Array = new Array();
			offsets[0] = new Point(0, 0);
			offsets[1] = new Point(0, 0);
			
			addEventListener(Event.ENTER_FRAME, function(e:Event):void
			{
				offsets[0].x -= 5;
				offsets[1].y -= 5;
				bmpdata.perlinNoise(bmpdata.width/2, bmpdata.height/2, 2, seed, false, false, 3, false, offsets);
			});
            
        }
    }
}