Access (NewAge) - Revision history

ObviousAltIsObvious Resident: tag to

2015-01-25T02:14:23Z

← Older revision		Revision as of 19:14, 24 January 2015
Line 11:		Line 11:
	Returns FALSE if user UUID is not permitted to use.		Returns FALSE if user UUID is not permitted to use.

	<~~lsl~~>		<source lang="lsl2">
	// NewAge Access Script		// NewAge Access Script
	// By Asia Snowfall		// By Asia Snowfall
Line 46:		Line 46:
	}		}
	}		}
	</~~lsl~~>		</source>

Omei Qunhua: /* Access Script */ Simplify

2014-03-27T18:09:37Z

Access Script: Simplify

← Older revision		Revision as of 11:09, 27 March 2014
Line 1:		Line 1:
	== Access Script ==		== Access Script ==

	~~'''Note: This script is for people who have knowledge of coding'''~~

	How to use?		How to use?

	Change the Access ~~varible~~ to one of the three;		Change the Access variable to one of the three;
	'Public'		'Public'
	'Group'		'Group'
	'Owner'		'Owner'

	Returns TRUE if user UUID is allowed to continue using.		Returns TRUE if user UUID is allowed to continue using.
	Returns FALSE if user UUID is not permitted to use.		Returns FALSE if user UUID is not permitted to use.

	~~<lsl>~~
	~~if(asAccessCheck(key id) == TRUE)~~
	~~{ ...~~
	~~</lsl>~~


	<lsl>		<lsl>
	// NewAge Access Script		// NewAge Access Script
	// By Asia Snowfall		// By Asia Snowfall
	// Version ~~1.0~~		// Version 2
	//
	//		//
	// Access Mode:		// Access Mode:
Line 31:		Line 22:

	string accessMode = "public";		string accessMode = "public";

	~~key asObjectOwner()~~
	{
	~~key thisPrim = llGetKey();~~
	~~list details = llGetObjectDetails(thisPrim, [OBJECT_OWNER]);~~

	~~return~~
	~~llList2Key(details, 0);~~
	}

	integer asAccessCheck(key id)		integer asAccessCheck(key id)
Line 45:		Line 27:
	string accessModeToLower = llToLower(accessMode);		string accessModeToLower = llToLower(accessMode);

	if (accessModeToLower == "public")		if (accessModeToLower == "public" \|\| id == llGetOwner() )
	return TRUE;		return TRUE;

	~~else~~ if (accessModeToLower == "group" ~~\|\| asObjectOwner() == id~~)		if (accessModeToLower == "group")
	{		return llSameGroup(id);
	~~if (~~llSameGroup(id))
	~~return TRUE;~~		return FALSE;
	~~// else~~
	~~return FALSE;~~
	}
	~~else if (accessModeToLower == "owner")~~
	{
	~~if (asObjectOwner() == id)~~
	~~return TRUE~~;
	~~// else~~
	~~return FALSE;~~
	}
	~~// else~~
	return FALSE;
	}		}

Line 70:		Line 40:
	touch_start(integer num_detected)		touch_start(integer num_detected)
	{		{
	~~key id =~~ llDetectedKey(0);		if (asAccessCheck( llDetectedKey(0) ))
			llWhisper(0, "Access Granted");
	~~// PUBLIC_CHANNEL has the integer value 0~~

	~~if (asAccessCheck(id~~))
	llWhisper(~~PUBLIC_CHANNEL~~, "Access Granted");
	else		else
	llWhisper(~~PUBLIC_CHANNEL~~, "Access Denied");		llWhisper(0, "Access Denied");
	}		}
	}		}
	</lsl>		</lsl>

Kireji Haiku: removed some redundant elses in userfunctions where returning values

2012-10-16T19:01:43Z

removed some redundant elses in userfunctions where returning values

← Older revision		Revision as of 12:01, 16 October 2012
Line 20:		Line 20:

	<lsl>		<lsl>
	~~/////////////////////////////////~~
	// NewAge Access Script		// NewAge Access Script
	// By Asia Snowfall		// By Asia Snowfall
	// Version 1.0		// Version 1.0
	////////////~~/////////////////////~~		//
			//
			// Access Mode:
			// public = anybody
			// group = agents with the same active group
			// owner = owner only

	string ~~Access~~ = "public";		string accessMode = "public";

	~~// Access Types;~~
	~~// Public = Everyone can use~~
	~~// Group = Group Only~~
	~~// Owner = Owner Only~~

	key asObjectOwner()		key asObjectOwner()
	{		{
	list details = llGetObjectDetails(~~llGetKey()~~, [OBJECT_OWNER]);		key thisPrim = llGetKey();
	return ~~(key)llList2CSV~~(details);		list details = llGetObjectDetails(thisPrim, [OBJECT_OWNER]);

			return
			llList2Key(details, 0);
	}		}

	integer asAccessCheck(key id)		integer asAccessCheck(key id)
	{		{
	~~if(llSubStringIndex(~~llToLower(~~Access~~), "public") ~~!= -1)~~		string accessModeToLower = llToLower(accessMode);
	{
			if (accessModeToLower == "public")
	return TRUE;		return TRUE;
	}
	else if(~~(llSubStringIndex(llToLower(Access),~~ "group"~~) != -1)~~\|\|(asObjectOwner() == id))		else if (accessModeToLower == "group" \|\| asObjectOwner() == id)
	{		{
	if(llSameGroup(id) ~~== TRUE~~)		if (llSameGroup(id))
	{
	return TRUE;		return TRUE;
	}		// else
	else
	{
	return FALSE;		return FALSE;
	}
	}		}
	else if(~~llSubStringIndex(llToLower(Access),~~ "owner"~~) != -1~~)		else if (accessModeToLower == "owner")
	{		{
	if(asObjectOwner() == id)		if (asObjectOwner() == id)
	{
	return TRUE;		return TRUE;
	}		// else
	else
	{
	return FALSE;		return FALSE;
	}
	}		}
	else		// else
	{
	return FALSE;		return FALSE;
	}
	}		}

	default		default
	{		{
	touch_start(integer x)		touch_start(integer num_detected)
	{		{
	if(asAccessCheck(~~llDetectedKey(0~~)) ~~== TRUE)~~		key id = llDetectedKey(0);
	{
	llWhisper(0, "Access Granted");		// PUBLIC_CHANNEL has the integer value 0
	}
			if (asAccessCheck(id))
			llWhisper(PUBLIC_CHANNEL, "Access Granted");
	else		else
	{		llWhisper(PUBLIC_CHANNEL, "Access Denied");
	llWhisper(0, "Access Denied");
	}
	}		}
	}		}
	</lsl>		</lsl>

Asia Snowfall: /* Access Script */

2010-07-22T20:19:10Z

Access Script

← Older revision		Revision as of 13:19, 22 July 2010
Line 10:		Line 10:
	'Owner'		'Owner'

	Returns TRUE if user UUID is allowed to continue using		Returns TRUE if user UUID is allowed to continue using.
	Returns FALSE if user UUID is not permitted to use		Returns FALSE if user UUID is not permitted to use.

	<lsl>		<lsl>

Asia Snowfall: Created page with '== Access Script == '''Note: This script is for people who have knowledge of coding''' How to use? Change the Access varible to one of the three; 'Public' 'Group' 'Owner' Ret...'

2010-07-22T20:18:30Z

Created page with '== Access Script == '''Note: This script is for people who have knowledge of coding''' How to use? Change the Access varible to one of the three; 'Public' 'Group' 'Owner' Ret...'

New page

== Access Script ==

'''Note: This script is for people who have knowledge of coding'''

How to use?

Change the Access varible to one of the three;
'Public'
'Group'
'Owner'

Returns TRUE if user UUID is allowed to continue using
Returns FALSE if user UUID is not permitted to use

<lsl>
if(asAccessCheck(key id) == TRUE)
{ ...
</lsl>

<lsl>
/////////////////////////////////
// NewAge Access Script
// By Asia Snowfall
// Version 1.0
/////////////////////////////////

string Access = "public";

// Access Types;
// Public = Everyone can use
// Group = Group Only
// Owner = Owner Only

key asObjectOwner()
{
list details = llGetObjectDetails(llGetKey(), [OBJECT_OWNER]);
return (key)llList2CSV(details);
}

integer asAccessCheck(key id)
{
if(llSubStringIndex(llToLower(Access), "public") != -1)
{
return TRUE;
}
else if((llSubStringIndex(llToLower(Access), "group") != -1)||(asObjectOwner() == id))
{
if(llSameGroup(id) == TRUE)
{
return TRUE;
}
else
{
return FALSE;
}
}
else if(llSubStringIndex(llToLower(Access), "owner") != -1)
{
if(asObjectOwner() == id)
{
return TRUE;
}
else
{
return FALSE;
}
}
else
{
return FALSE;
}
}

default
{
touch_start(integer x)
{
if(asAccessCheck(llDetectedKey(0)) == TRUE)
{
llWhisper(0, "Access Granted");
}
else
{
llWhisper(0, "Access Denied");
}
}
}
</lsl>