Create LightOnOff.lsl

2026-08-14 09:02:50 +00:00 · 2014-11-22 13:52:10 -05:00
parent 7aa934062e
commit e34c965251
1 changed files with 36 additions and 0 deletions
@@ -0,0 +1,36 @@
+vector WHITE = < 1.0, 1.0, 1.0 >;
+float Intensity = 1.0;
+float Radius = 10.0;
+float Falloff = 0.75;
+
+list LightOff;
+list LightOn;
+
+integer IsLightOn;
+
+default
+{
+    state_entry ()
+    {
+        LightOff = [ PRIM_FULLBRIGHT, ALL_SIDES, FALSE, PRIM_POINT_LIGHT, FALSE, WHITE, 0, 0, 0 ];
+        LightOn = [ PRIM_FULLBRIGHT, ALL_SIDES, TRUE, PRIM_POINT_LIGHT, TRUE, WHITE, Intensity, Radius, Falloff ];
+
+        IsLightOn = FALSE;
+        llSetPrimitiveParams ( LightOff );
+    }
+    
+    touch_start ( integer x )
+    {
+        if ( IsLightOn == FALSE )
+        {
+            llSetPrimitiveParams ( LightOn );
+            IsLightOn = TRUE;
+        }
+        
+        else if ( IsLightOn == TRUE )
+        {
+            llSetPrimitiveParams ( LightOff );
+            IsLightOn = FALSE;
+        }
+    }
+}