perlinNoiseのstitch境界 knd forked:0favorite:1lines:33license : All rights reserved modified : 2010-01-15 23:58:26 Embed Tweet package { import flash.display.Bitmap; import flash.display.BitmapData; import flash.display.Sprite; import flash.events.Event; import flash.filters.ColorMatrixFilter; import flash.geom.Point; public class FlashTest extends Sprite { // write as3 code here.. private var bmd:BitmapData; private var pos:Point; public function FlashTest() { bmd = new BitmapData(180,120, true, 0x0); pos = new Point(); addEventListener(Event.ENTER_FRAME, redraw); redraw(); } private function redraw(e:Event = null):void { bmd.perlinNoise(80, 50, 4, 0, true, true, 6, false, [pos, pos]); pos.x+=2; pos.y+=2; if(pos.x > 500) { pos.x = 0; pos.y = 0; } graphics.clear(); graphics.beginBitmapFill(bmd, null, true, true); graphics.drawRect(0, 0, stage.stageWidth, stage.stageHeight); } } } Code Fullscreen Preview Fullscreen chilli addEventListener Point Event.ENTER_FRAME Event Sprite