forked from: forked from: perlinNoise-offsets引数を使ってみる

perlinNoise関数のoffsets引数が何なのかよくわからなかったので。

offsets配列はnumOctaves-1までが有効で
生成されるノイズをずらすことができる。

by HotKarubi 05 Sep 2011

Embed

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

// forked from noise's forked from: perlinNoise-offsets引数を使ってみる
// forked from cpu_t's perlinNoise-offsets引数を使ってみる
// 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 = 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[0].y -= 5;
                offsets[1].x += 5;
                offsets[1].y += 5;
                bmpdata.perlinNoise(bmpdata.width/2, bmpdata.height/2, 2, seed, false, false, 3, false, offsets);
            });
            
        }
    }
}