new

AVsitter2/Plugins/AVcontrol/LockGuard/[AV]LockGuard-object.lslp

@@ -0,0 +1,28 @@
+
+// Placed in prop objects, this script sends the uuid of any Lockguard rings to the script in furniture.
+// Ring prims in the prop should be named with "ring" in their prim name. e.g. "ring1", "ring2"
+
+integer COMM_CHANNEL = -57841689;
+
+integer comm_handle;
+
+default{
+	
+	on_rez(integer start){
+		if(llGetStartParameter()){ 
+			comm_handle = llListen(COMM_CHANNEL,"","","INFORM");
+		}
+	}
+	
+	listen(integer listen_channel, string name, key id, string msg){
+		list ring_prims;
+		integer i;
+		for(i=0;i<=llGetNumberOfPrims();i++){
+			if (llSubStringIndex(llToLower(llGetLinkName(i)),"ring")!=-1){
+				ring_prims += [llGetLinkName(i),llGetLinkKey(i)];	
+			}				
+		}
+		llSay(COMM_CHANNEL,llDumpList2String(["ATTACHPOINTS"]+ring_prims,"|"));
+		llListenRemove(comm_handle);
+	}
+}