From 8136cf4075216d09738b8707258581e6db755759 Mon Sep 17 00:00:00 2001
From: Homer Horwitz
Date: Sat, 4 Apr 2009 15:43:02 +0000
Subject: Thanks jonc, for a patch that adds rendering of classic clouds. First
 part of Mantis #964, the necessary clouds image will follow separately.

---
 .../ScriptEngine/Shared/Api/Implementation/LSL_Api.cs       | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

(limited to 'OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs')

diff --git a/OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs b/OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs
index edaa3e9..bcbfe96 100644
--- a/OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs
+++ b/OpenSim/Region/ScriptEngine/Shared/Api/Implementation/LSL_Api.cs
@@ -1027,7 +1027,18 @@ namespace OpenSim.Region.ScriptEngine.Shared.Api
         public LSL_Float llCloud(LSL_Vector offset)
         {
             m_host.AddScriptLPS(1);
-            return 0;
+            float cloudCover = 0f;
+            ICloudModule module = World.RequestModuleInterface<ICloudModule>();
+            if (module != null)
+            {
+                Vector3 pos = m_host.GetWorldPosition();
+                int x = (int)(pos.X + offset.x);
+                int y = (int)(pos.Y + offset.y);
+
+                cloudCover = module.CloudCover(x, y, 0);
+
+            }
+            return cloudCover;
         }
 
         public LSL_Vector llWind(LSL_Vector offset)
-- 
cgit v1.1