1 files changed, 130 insertions, 0 deletions
diff --git a/OpenSim/Region/Environment/Modules/Terrain/PaintBrushes/SmoothSphere.cs b/OpenSim/Region/Environment/Modules/Terrain/PaintBrushes/SmoothSphere.cs
new file mode 100644
index 0000000..076b3cc
--- /dev/null
+++ b/OpenSim/Region/Environment/Modules/Terrain/PaintBrushes/SmoothSphere.cs
@@ -0,0 +1,130 @@
+/*
+* Copyright (c) Contributors, http://opensimulator.org/
+* See CONTRIBUTORS.TXT for a full list of copyright holders.
+*
+* Redistribution and use in source and binary forms, with or without
+* modification, are permitted provided that the following conditions are met:
+*     * Redistributions of source code must retain the above copyright
+*       notice, this list of conditions and the following disclaimer.
+*     * Redistributions in binary form must reproduce the above copyright
+*       notice, this list of conditions and the following disclaimer in the
+*       documentation and/or other materials provided with the distribution.
+*     * Neither the name of the OpenSim Project nor the
+*       names of its contributors may be used to endorse or promote products
+*       derived from this software without specific prior written permission.
+*
+* THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY
+* EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+* DISCLAIMED. IN NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY
+* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
+* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
+* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+* 
+*/
+using OpenSim.Region.Environment.Interfaces;
+namespace OpenSim.Region.Environment.Modules.Terrain.PaintBrushes
+{
+    public class SmoothSphere : ITerrainPaintableEffect
+    {
+        private double SphericalFactor(double x, double y, double rx, double ry, double size)
+        {
+            double z = size * size - ((x - rx) * (x - rx) + (y - ry) * (y - ry));
+            return z;
+        }
+        private double GetBilinearInterpolate(double x, double y, ITerrainChannel map)
+        {
+            int w = map.Width;
+            int h = map.Height;
+            if (x > w - 2.0)
+                x = w - 2.0;
+            if (y > h - 2.0)
+                y = h - 2.0;
+            if (x < 0.0)
+                x = 0.0;
+            if (y < 0.0)
+                y = 0.0;
+            int stepSize = 1;
+            double h00 = map[(int)x, (int)y];
+            double h10 = map[(int)x + stepSize, (int)y];
+            double h01 = map[(int)x, (int)y + stepSize];
+            double h11 = map[(int)x + stepSize, (int)y + stepSize];
+            double h1 = h00;
+            double h2 = h10;
+            double h3 = h01;
+            double h4 = h11;
+            double a00 = h1;
+            double a10 = h2 - h1;
+            double a01 = h3 - h1;
+            double a11 = h1 - h2 - h3 + h4;
+            double partialx = x - (int)x;
+            double partialz = y - (int)y;
+            double hi = a00 + (a10 * partialx) + (a01 * partialz) + (a11 * partialx * partialz);
+            return hi;
+        }
+        #region ITerrainPaintableEffect Members
+        public void PaintEffect(ITerrainChannel map, double rx, double ry, double strength)
+        {
+            int x, y;
+            double[,] tweak = new double[map.Width, map.Height];
+            
+            double n, l;
+            double area = strength;
+            double step = strength / 4.0;
+            
+            // compute delta map 
+            for (x = 0; x < map.Width; x++)
+            {
+                for (y = 0; y < map.Height; y++)
+                {
+                    double z = SphericalFactor(x, y, rx, ry, strength);
+                    
+                    if (z > 0) // add in non-zero amount 
+                    {
+                        double average = 0.0;
+                        int avgsteps = 0;
+                        
+                        for (n = 0.0 - area; n < area; n += step)
+                        {
+                            for (l = 0.0 - area; l < area; l += step)
+                            {
+                                avgsteps++;
+                                average += GetBilinearInterpolate(x + n, y + l, map);
+                            }
+                        }
+                        tweak[x, y] = average / avgsteps;
+                    }
+                }
+            }
+            // blend in map 
+            for (x = 0; x < map.Width; x++)
+            {
+                for (y = 0; y < map.Height; y++)
+                {
+                    double z = SphericalFactor(x, y, rx, ry, strength);
+                    
+                    if (z > 0) // add in non-zero amount 
+                    {
+                        double da = z;
+                        double a = (map[x, y] - tweak[x, y]) * da;
+                        double newz = map[x, y] - a;
+                        if (newz > 0.0)
+                            map[x, y] = newz;
+                    }
+                }
+            }
+        }
+        #endregion
+    }
+}
+\ No newline at end of file

diff --git a/OpenSim/Region/Environment/Modules/Terrain/PaintBrushes/SmoothSphere.cs b/OpenSim/Region/Environment/Modules/Terrain/PaintBrushes/SmoothSphere.cs new file mode 100644 index 0000000..076b3cc --- /dev/null +++ b/OpenSim/Region/Environment/Modules/Terrain/PaintBrushes/SmoothSphere.cs
@@ -0,0 +1,130 @@
	1	/*
	2	* Copyright (c) Contributors, http://opensimulator.org/
	3	* See CONTRIBUTORS.TXT for a full list of copyright holders.
	4	*
	5	* Redistribution and use in source and binary forms, with or without
	6	* modification, are permitted provided that the following conditions are met:
	7	* * Redistributions of source code must retain the above copyright
	8	* notice, this list of conditions and the following disclaimer.
	9	* * Redistributions in binary form must reproduce the above copyright
	10	* notice, this list of conditions and the following disclaimer in the
	11	* documentation and/or other materials provided with the distribution.
	12	* * Neither the name of the OpenSim Project nor the
	13	* names of its contributors may be used to endorse or promote products
	14	* derived from this software without specific prior written permission.
	15	*
	16	* THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY
	17	* EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
	18	* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
	19	* DISCLAIMED. IN NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY
	20	* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
	21	* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
	22	* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
	23	* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
	24	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
	25	* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
	26	*
	27	*/
	28	using OpenSim.Region.Environment.Interfaces;
	29
	30	namespace OpenSim.Region.Environment.Modules.Terrain.PaintBrushes
	31	{
	32	public class SmoothSphere : ITerrainPaintableEffect
	33	{
	34	private double SphericalFactor(double x, double y, double rx, double ry, double size)
	35	{
	36	double z = size * size - ((x - rx) * (x - rx) + (y - ry) * (y - ry));
	37	return z;
	38	}
	39
	40	private double GetBilinearInterpolate(double x, double y, ITerrainChannel map)
	41	{
	42	int w = map.Width;
	43	int h = map.Height;
	44
	45	if (x > w - 2.0)
	46	x = w - 2.0;
	47	if (y > h - 2.0)
	48	y = h - 2.0;
	49	if (x < 0.0)
	50	x = 0.0;
	51	if (y < 0.0)
	52	y = 0.0;
	53
	54	int stepSize = 1;
	55	double h00 = map[(int)x, (int)y];
	56	double h10 = map[(int)x + stepSize, (int)y];
	57	double h01 = map[(int)x, (int)y + stepSize];
	58	double h11 = map[(int)x + stepSize, (int)y + stepSize];
	59	double h1 = h00;
	60	double h2 = h10;
	61	double h3 = h01;
	62	double h4 = h11;
	63	double a00 = h1;
	64	double a10 = h2 - h1;
	65	double a01 = h3 - h1;
	66	double a11 = h1 - h2 - h3 + h4;
	67	double partialx = x - (int)x;
	68	double partialz = y - (int)y;
	69	double hi = a00 + (a10 * partialx) + (a01 * partialz) + (a11 * partialx * partialz);
	70	return hi;
	71	}
	72
	73	#region ITerrainPaintableEffect Members
	74
	75	public void PaintEffect(ITerrainChannel map, double rx, double ry, double strength)
	76	{
	77	int x, y;
	78	double[,] tweak = new double[map.Width, map.Height];
	79
	80	double n, l;
	81	double area = strength;
	82	double step = strength / 4.0;
	83
	84	// compute delta map
	85	for (x = 0; x < map.Width; x++)
	86	{
	87	for (y = 0; y < map.Height; y++)
	88	{
	89	double z = SphericalFactor(x, y, rx, ry, strength);
	90
	91	if (z > 0) // add in non-zero amount
	92	{
	93	double average = 0.0;
	94	int avgsteps = 0;
	95
	96	for (n = 0.0 - area; n < area; n += step)
	97	{
	98	for (l = 0.0 - area; l < area; l += step)
	99	{
	100	avgsteps++;
	101	average += GetBilinearInterpolate(x + n, y + l, map);
	102	}
	103	}
	104	tweak[x, y] = average / avgsteps;
	105	}
	106	}
	107	}
	108	// blend in map
	109	for (x = 0; x < map.Width; x++)
	110	{
	111	for (y = 0; y < map.Height; y++)
	112	{
	113	double z = SphericalFactor(x, y, rx, ry, strength);
	114
	115	if (z > 0) // add in non-zero amount
	116	{
	117	double da = z;
	118	double a = (map[x, y] - tweak[x, y]) * da;
	119	double newz = map[x, y] - a;
	120
	121	if (newz > 0.0)
	122	map[x, y] = newz;
	123	}
	124	}
	125	}
	126	}
	127
	128	#endregion
	129	}
	130	} \ No newline at end of file