BitmapData.parlinNoise を知る

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

<?xml version="1.0" encoding="utf-8"?>
<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml" width="465" height="465" paddingLeft="0" paddingTop="0" paddingRight="0" paddingBottom="0"
		applicationComplete="applicationCompleteHandler( event )">
	
	<mx:Script>
		<![CDATA[
			
			import flash.display.Bitmap;
			import flash.display.BitmapData;
			import flash.display.Loader;
			import flash.display.LoaderInfo;
			import flash.geom.ColorTransform;
			import flash.geom.Point;
			import flash.net.FileFilter;
			import flash.net.FileReference;
			import mx.controls.ColorPicker;
			import mx.controls.HSlider;
			import mx.events.EffectEvent;
			import mx.events.FlexEvent;
			
			/**
			 * BitmapData.parlinNoise を知る
			 */
			
			/**
			 * 生成したノイズを含む画像です。
			 */
			private var perlinNoiseBitmap:Bitmap;
			
			/**
			 * 初期設定をします。
			 * 
			 * @param	event
			 */
			private function applicationCompleteHandler( event:Event ):void {
				
				resetPerlinNoiseProperty();
			}
			
			/** --------------------------------------------------
			 * perlinNoise
			 */
			
			private function setPerlinNoiseProperty():void {
				
				if( perlinNoiseBitmap )
					imageContentHolder.removeChild( perlinNoiseBitmap );
				
				var perlinNoiseBitmapData:BitmapData = new BitmapData( 400, 400 );
				
				var offsets:Array = new Array();
				for ( var i:Number = 0; i < numOctavesNumericStepper.value; i++ )
					offsets.push( new Point( offsetXNumericStepper.value, offsetYNumericStepper.value ) );
				
				perlinNoiseBitmapData.perlinNoise( 
						baseXNumericStepper.value, 
						baseYNumericStepper.value, 
						uint( numOctavesNumericStepper.value ), 
						int( randomSeedNumericStepper.value ), 
						stitchCheckBox.selected, 
						fractalNoiseCheckBox.selected, 
						( Number( redChannelOptionCheckBox.selected ) ) + 
							( Number( greenChannelOptionCheckBox.selected ) << 1 ) + 
							(Number( blueChannelOptionCheckBox.selected ) << 2 ), 
						grayScaleCheckBox.selected, 
						offsets
					);
				perlinNoiseBitmap = new Bitmap( perlinNoiseBitmapData );
				
				imageContentHolder.x = ( stage.stageWidth - perlinNoiseBitmap.width ) / 2;
				imageContentHolder.y = ( stage.stageHeight - perlinNoiseBitmap.height ) / 2;
				imageContentHolder.addChild( perlinNoiseBitmap );
			}
			/**
			 * 
			 * @param	event
			 */
			private function perlinNoisePropertyChangeHandler( event:Event ):void {
				
				setPerlinNoiseProperty();
			}
			
			
			
			/**
			 * perlinNoiseProperty のリセットボタンが押されたときに各値を初期値に戻します。
			 * 
			 * @param	event
			 */
			private function perlinNoisePropertyResetButtonDownHandler( event:FlexEvent ):void {
				
				resetPerlinNoiseProperty();
			}
			
			/**
			 * 
			 */
			private function resetPerlinNoiseProperty():void {
				
				baseXNumericStepper.value = 40;
				baseYNumericStepper.value = 40;
				numOctavesNumericStepper.value = 1;
				randomSeedNumericStepper.value = 0;
				stitchCheckBox.selected = false;
				fractalNoiseCheckBox.selected = false;
				redChannelOptionCheckBox.selected = true;
				greenChannelOptionCheckBox.selected = true;
				blueChannelOptionCheckBox.selected = true;
				grayScaleCheckBox.selected = false;
				offsetXNumericStepper.value = 0;
				offsetYNumericStepper.value = 0;
				
				setPerlinNoiseProperty();
			}
			
			
			/** --------------------------------------------------
			 * colorTransform
			 */
			
			/**
			 * colorTransform の設定値を変更する各 Slider の値を変更するとその値を color
			 * 
			 * @param	event
			 */
			private function colorTransformSliderChangeHandler( event:Event ):void {
				
				setColorTransform();
			}
			
			/**
			 * colorTransformProperty のリセットボタンが押されたときに各値を初期値に戻します。
			 * 
			 * @param	event
			 */
			private function colorTransformPropertyResetButtonDownHandler( event:FlexEvent ):void {
				
				redMultiplierHSlider.value = 1;
				greenMultiplierHSlider.value = 1;
				blueMultiplierHSlider.value = 1;
				alphaMultiplierHSlider.value = 1;
				
				redOffsetHSlider.value = 0;
				greenOffsetHSlider.value = 0;
				blueOffsetHSlider.value = 0;
				alphaOffsetHSlider.value = 0;
				
				setColorTransform();
			}
			
			/**
			 * loadedBitmap の colorTransform にコンポーネントの値を適用した ColorTransform を適用します。
			 */
			private function setColorTransform():void {
				
				imageContentHolder.transform.colorTransform = new ColorTransform( 
						redMultiplierHSlider.value, 
						greenMultiplierHSlider.value, 
						blueMultiplierHSlider.value, 
						alphaMultiplierHSlider.value, 
						redOffsetHSlider.value, 
						greenOffsetHSlider.value, 
						blueOffsetHSlider.value, 
						alphaOffsetHSlider.value
					);
			}
			
			/**
			 * プロパティボックスが表示されているかのフラグです。
			 */
			private var propertyViewStackVisible:Boolean = true;
			
			/**
			 * プロパティボックスを隠すボタンが押されたときに呼ばれます。
			 * 
			 * @param	event
			 */
			private function propertyViewStackVisibleButtonDownHandler( event:FlexEvent ):void {
				
				propertyViewStackMove.end();
				
				if ( propertyViewStackVisible ) {
					
					propertyViewStackMove.xTo = -propertyViewStack.width;
					propertyViewStackVisibleButton.label = "プロパティボックスを表示";
					
				} else {
					
					propertyViewStackMove.xTo = 0;
					propertyViewStackVisibleButton.label = "プロパティボックスを隠す";
				}
				
				propertyViewStackMove.play();
				
				propertyViewStackVisible = !propertyViewStackVisible;
			}
			
			/**
			 * 
			 * @param	event
			 */
			private function canvasBackgroundColorPickerChangeHandler( event:Event ):void {
				
				canvas.setStyle( "backgroundColor", canvasBackgroundColorPicker.selectedColor );
			}
			
			
		]]>
	</mx:Script>
	
	<mx:Move id="propertyViewStackMove" target="{ propertyViewStack }" />
	
	<mx:Canvas id="canvas" width="100%" height="100%" backgroundColor="0xffffff">
		
		<mx:UIComponent id="imageContentHolder" />
		
		<mx:ViewStack id="propertyViewStack" height="100%" width="300" alpha="0.9" backgroundColor="0xffffff" paddingLeft="10"  paddingBottom="10" paddingTop="40" paddingRight="10">
			
			<mx:Box id="perlinNoiseProperty" horizontalAlign="center" alpha="1.1">
				<mx:Box height="100%" verticalAlign="middle">
					<mx:Button id="perlinNoisePropertyResetButton" label="パーリンノイズプロパティの値をリセット" buttonDown="perlinNoisePropertyResetButtonDownHandler( event )" />
					<mx:Spacer height="5" />
					<mx:HBox>
						<mx:Label width="100" text="baseX" />
						<mx:NumericStepper id="baseXNumericStepper" width="60" minimum="-65025" maximum="65025" stepSize="1" change="perlinNoisePropertyChangeHandler( event )" />
					</mx:HBox>
					<mx:HBox>
						<mx:Label width="100" text="baseY" />
						<mx:NumericStepper id="baseYNumericStepper" width="60" minimum="-65025" maximum="65025" stepSize="1" change="perlinNoisePropertyChangeHandler( event )" />
					</mx:HBox>
					<mx:HBox>
						<mx:Label width="100" text="numOctaves" />
						<mx:NumericStepper id="numOctavesNumericStepper" width="60" minimum="0" maximum="65025" stepSize="1" change="perlinNoisePropertyChangeHandler( event )" />
					</mx:HBox>
					<mx:HBox>
						<mx:Label width="100" text="randomSeed" />
						<mx:NumericStepper id="randomSeedNumericStepper" width="60" minimum="-65025" maximum="65025" stepSize="1" change="perlinNoisePropertyChangeHandler( event )" />
					</mx:HBox>
					<mx:CheckBox id="stitchCheckBox" label="stitch" change="perlinNoisePropertyChangeHandler( event )" />
					<mx:CheckBox id="fractalNoiseCheckBox" label="fractalNoise" change="perlinNoisePropertyChangeHandler( event )" />
					<mx:CheckBox id="redChannelOptionCheckBox" label="redChannelOption" change="perlinNoisePropertyChangeHandler( event )" />
					<mx:CheckBox id="greenChannelOptionCheckBox" label="greenChannelOption" change="perlinNoisePropertyChangeHandler( event )" />
					<mx:CheckBox id="blueChannelOptionCheckBox" label="blueChannelOption" change="perlinNoisePropertyChangeHandler( event )" />
					<mx:CheckBox id="grayScaleCheckBox" label="grayScale" change="perlinNoisePropertyChangeHandler( event )" />
					<mx:HBox>
						<mx:Label width="100" text="offsetX" />
						<mx:NumericStepper id="offsetXNumericStepper" width="60" minimum="-65025" maximum="65025" stepSize="1" change="perlinNoisePropertyChangeHandler( event )" />
					</mx:HBox>
					<mx:HBox>
						<mx:Label width="100" text="offsetY" />
						<mx:NumericStepper id="offsetYNumericStepper" width="60" minimum="-65025" maximum="65025" stepSize="1" change="perlinNoisePropertyChangeHandler( event )" />
					</mx:HBox>
				</mx:Box>
				<mx:Button label="カラートランスフォームプロパティを表示" buttonDown="propertyViewStack.selectedChild = colorTransformProperty" />
			</mx:Box>
			
			<mx:Box id="colorTransformProperty" horizontalAlign="center" alpha="1.1">
				<mx:Box height="100%" verticalAlign="middle" horizontalAlign="center">
					<mx:Button id="colorTransformPropertyResetButton" label="カラートランスフォームプロパティの値をリセット" buttonDown="colorTransformPropertyResetButtonDownHandler( event )" />
					<mx:Spacer height="5" />
					<mx:HSlider id="redMultiplierHSlider" minimum="-1" maximum="1" value="1" labels="[ '-1','redMultiplier', '1' ]" labelOffset="5" change="colorTransformSliderChangeHandler( event )" />
					<mx:HSlider id="greenMultiplierHSlider" minimum="-1" maximum="1" value="1" labels="[ '-1','greenMultiplier', '1' ]" labelOffset="5" change="colorTransformSliderChangeHandler( event )" />
					<mx:HSlider id="blueMultiplierHSlider" minimum="-1" maximum="1" value="1" labels="[ '-1','blueMultiplier', '1' ]" labelOffset="5" change="colorTransformSliderChangeHandler( event )" />
					<mx:HSlider id="alphaMultiplierHSlider" minimum="-1" maximum="1" value="1" labels="[ '-1','alphaMultiplier', '1' ]" labelOffset="5" change="colorTransformSliderChangeHandler( event )" />
					<mx:Spacer height="5" />
					<mx:HSlider id="redOffsetHSlider" minimum="-255" maximum="255" value="0" labels="[ '-255','redOffset', '255' ]" labelOffset="5" change="colorTransformSliderChangeHandler( event )" />
					<mx:HSlider id="greenOffsetHSlider" minimum="-255" maximum="255" value="0" labels="[ '-255','greenOffset', '255' ]" labelOffset="5" change="colorTransformSliderChangeHandler( event )" />
					<mx:HSlider id="blueOffsetHSlider" minimum="-255" maximum="255" value="0" labels="[ '-255','blueOffset', '255' ]" labelOffset="5" change="colorTransformSliderChangeHandler( event )" />
					<mx:HSlider id="alphaOffsetHSlider" minimum="-255" maximum="255" value="0" labels="[ '-255','alphaOffset', '255' ]" labelOffset="5" change="colorTransformSliderChangeHandler( event )" />
				</mx:Box>
				<mx:Button label="パーリンノイズプロパティを表示" buttonDown="propertyViewStack.selectedChild = perlinNoiseProperty" />
			</mx:Box>
			
		</mx:ViewStack>
		
		<mx:Box width="100%" alpha="0.9" backgroundColor="0xffffff" paddingLeft="2" paddingTop="2" paddingBottom="2">
			<mx:HBox alpha="1.1">
				<mx:Button id="propertyViewStackVisibleButton" label="プロパティボックスを隠す" buttonDown="propertyViewStackVisibleButtonDownHandler( event )" />
				<mx:ColorPicker id="canvasBackgroundColorPicker" selectedColor="0xffffff" change="canvasBackgroundColorPickerChangeHandler( event )" />
			</mx:HBox>
		</mx:Box>
	</mx:Canvas>
	
</mx:Application>