macroScript MbaColorTools
	category:"mbaColorTools"
	toolTip:"Tools for blending colors"
(

	
	
	
	
		on execute do
	(
		rollout maClrTools "Ma Color Mix Tools"
		(

			
			colorpicker color1 "Color A:   " color:[0,0,0] pos:[10,10]
			colorpicker color2 "Color B:   " color:[255,255,255] pos:[10,35]
			colorpicker color3 "Color Mix:" color:[127,127,127] pos:[10,60]

 
			on color1 changed blend_col1 do 	color3.color =  ((blend_col1 + color2.color)/2);  	
			on color2 changed blend_col2 do 	color3.color =  ((blend_col2 + color1.color)/2);
		)
		maCTfloat = newrolloutfloater " Color Blending Tools 1.0" 210	350
		addrollout maClrTools maCTfloat
	
	
	
	-- --------------------------------------------------------------
	
			rollout maClrClipBrd "Color Clipboard"
		(

			
			colorpicker tmpcolor1 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[5,5]
			colorpicker tmpcolor2 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[30,5]
			colorpicker tmpcolor3 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[55,5]
			colorpicker tmpcolor4 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[80,5]
			colorpicker tmpcolor5 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[105,5]
			colorpicker tmpcolor6 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[130,5]
			colorpicker tmpcolor7 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[155,5]
			colorpicker tmpcolor8 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[5,30]
			colorpicker tmpcolor9 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[30,30]
			colorpicker tmpcolor10 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[55,30]
			colorpicker tmpcolor11 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[80,30]
			colorpicker tmpcolor12 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[105,30]
			colorpicker tmpcolor13 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[130,30]
		colorpicker tmpcolor14 "" color:[0,0,0] fieldWidth: 20 height: 20 pos:[155,30]	


 		label tipTxt0 "Tip: You can drag and drop  " 
 		label tipTxt1 "colors from all places... " 
 		label tipTxt2 "Also from the MtrlEditor" 
	 


		)
		
		addrollout maClrClipBrd maCTfloat
	
	
	--------------------------------------------------------------------
	
				rollout maAbout "About.."
		(

 		label tipTxt0 "Comments, idears and bugs etc.:" 
 		label tipTxt1 "info@3d-designer.dk" 
 		label tipTxt2 "Martin Andersen" 
		 


		)
		
		addrollout maAbout maCTfloat
	
	
	
	
	
	
	
	
	
	)
	
	
	
	
)