Join us in Outworldz at www.outworldz.com:9000 or follow us:

Search dozens of selected web sites for OpenSim and LSL script

New! Script Meta-Search will search thousands of scripts here and at other sites for LSL or Opensim scripts.
Loading

Want to add a script or a project? Upload it and a half million people will see it and your name here this year.

Home   Show All
Category: Contributor: Creator
Access Access_NewAge  

Access_NewAge

Change the Access variable 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.

Category: Access
By : Asia Snowfall
Created: 2010-12-27 Edited: 2010-12-27
Worlds: Second Life

the Zip file

Download all files for Access_NewAge
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. Access_NewAge_1.lsl
1 /////////////////////////////////
2 // NewAge Access Script
3 // By Asia Snowfall
4 // Version 1.0
5 /////////////////////////////////
6
7 string Access = "public";
8
9 // Access Types;
10 // Public = Everyone can use
11 // Group = Group Only
12 // Owner = Owner Only
13
14 key asObjectOwner()
15 {
17 return (key)llList2CSV(details);
18 }
19
20 integer asAccessCheck(key id)
21 {
22 if(llSubStringIndex(llToLower(Access), "public") != -1)
23 {
24 return TRUE;
25 }
26 else if((llSubStringIndex(llToLower(Access), "group") != -1)||(asObjectOwner() == id))
27 {
28 if(llSameGroup(id) == TRUE)
29 {
30 return TRUE;
31 }
32 else
33 {
34 return FALSE;
35 }
36 }
37 else if(llSubStringIndex(llToLower(Access), "owner") != -1)
38 {
39 if(asObjectOwner() == id)
40 {
41 return TRUE;
42 }
43 else
44 {
45 return FALSE;
46 }
47 }
48 else
49 {
50 return FALSE;
51 }
52 }
53
54 default
55 {
57 {
58 if(asAccessCheck(llDetectedKey(0)) == TRUE)
59 {
60 llWhisper(0, "Access Granted");
61 }
62 else
63 {
64 llWhisper(0, "Access Denied");
65 }
66 }
67 }

Back to the Best Free Tools in Second Life and OpenSim.