ogb912/opensim
1
0
Fork 0
mirror of https://github.com/opensim/opensim.git synced 2026-08-09 18:55:58 +08:00
Code Issues Packages Projects Releases Wiki Activity

More inventory work for CharlieO. Final patch to make it all work yet to come.

Browse Source
This commit is contained in:
Brian McBee
2008-01-07 01:03:46 +00:00
parent 286802558e
commit 35b0c2e9df
76 changed files with 3511 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

135
bin/assets/ScriptsAssetSet/ScriptsAssetSet.xml Normal file
View File

@@ -0,0 +1,135 @@
<Nini>
<Section Name="llAbs">
<Key Name="assetID" Value="3b055e3f-b19d-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAbs" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAbs.lsl" />
</Section>
<Section Name="llAcos">
<Key Name="assetID" Value="6519bf39-b19f-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAcos" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAcos.lsl" />
</Section>
<Section Name="llAddToLandBanList">
<Key Name="assetID" Value="7ceba3f1-b1a0-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAddToLandBanList" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAddToLandBanList.lsl" />
</Section>
<Section Name="llAddToLandPassList">
<Key Name="assetID" Value="609047e7-b390-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAddToLandPassList" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAddToLandPassList.lsl" />
</Section>
<Section Name="llAdjustSoundVolume">
<Key Name="assetID" Value="56df4bcd-b393-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAdjustSoundVolume" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAdjustSoundVolume.lsl" />
</Section>
<Section Name="llAllowInventoryDrop">
<Key Name="assetID" Value="54d6962d-b394-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAllowInventoryDrop" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAllowInventoryDrop.lsl" />
</Section>
<Section Name="llAngleBetween">
<Key Name="assetID" Value="6b341609-b34e-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAngleBetween" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAngleBetween.lsl" />
</Section>
<Section Name="llAsin">
<Key Name="assetID" Value="7e7422ed-b425-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAsin" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAsin.lsl" />
</Section>
<Section Name="llAtan2">
<Key Name="assetID" Value="7e7422ef-b425-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAtan2" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAtan2.lsl" />
</Section>
<Section Name="llApplyImpulse">
<Key Name="assetID" Value="714ec679-b419-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llApplyImpulse" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llApplyImpulse.lsl" />
</Section>
<Section Name="llAvatarOnSitTarget">
<Key Name="assetID" Value="579fc821-b426-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llAvatarOnSitTarget" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llAvatarOnSitTarget.lsl" />
</Section>
<Section Name="llBase64ToString">
<Key Name="assetID" Value="1d4c71d9-b428-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llBase64ToString" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llBase64ToString.lsl" />
</Section>
<Section Name="llRemoveFromLandBanList">
<Key Name="assetID" Value="299b2101-b392-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llRemoveFromLandBanList" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llRemoveFromLandBanList.lsl" />
</Section>
<Section Name="llRemoveFromLandPassList">
<Key Name="assetID" Value="299b2103-b392-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llRemoveFromLandPassList" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llRemoveFromLandPassList.lsl" />
</Section>
<Section Name="llResetLandBanList">
<Key Name="assetID" Value="366ac8e7-b391-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llResetLandBanList" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llResetLandBanList.lsl" />
</Section>
<Section Name="llResetLandPassList">
<Key Name="assetID" Value="366ac8e9-b391-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llResetLandPassList" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llResetLandPassList.lsl" />
</Section>
<Section Name="llSay">
<Key Name="assetID" Value="3af51d21-b38f-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llSay" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llSay.lsl" />
</Section>
<Section Name="llSetParcelMusicURL">
<Key Name="assetID" Value="3603a4f8-b360-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llSetParcelMusicURL" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llSetParcelMusicURL.lsl" />
</Section>
<Section Name="llSetRot">
<Key Name="assetID" Value="220baef9-b376-11dc-8314-0800200c9a66" />
<Key Name="name" Value="llSetRot" />
<Key Name="assetType" Value="10" />
<Key Name="inventoryType" Value="10" />
<Key Name="fileName" Value="llSetRot.lsl" />
</Section>
</Nini>

7
bin/assets/ScriptsAssetSet/llAbs.lsl Normal file
View File

@@ -0,0 +1,7 @@
default
{
state_entry()
{
llOwnerSay("The absolute value of -4 is: "+(string)llAbs(-4) );
}
}

8
bin/assets/ScriptsAssetSet/llAcos.lsl Normal file
View File

@@ -0,0 +1,8 @@
default
{
state_entry()
{
float r = llFrand(2) - 1.0;
llOwnerSay("The arccosine of " + (string)r + " is " + llAcos(r));
}
}

84
bin/assets/ScriptsAssetSet/llAddToLandBanList.lsl Normal file
View File

@@ -0,0 +1,84 @@
//Commands are:
///5 ban:full_avatar_name
///5 tempban:full_avatar_name
///5 unban:full_avatar_name
///5 pass:full_avatar_name
///5 unpass:full_avatar_name
///5 clearban
///5 clearpass
string command;
default
{
state_entry()
{
llListen(5, "", llGetOwner(), "");
}
on_rez(integer param)
{
llResetScript();
}
listen(integer chan, string name, key id, string message)
{
if (command != "")
{
llOwnerSay("Sorry, still processing last command, try again in a second.");
}
list args = llParseString2List(message,[":"],[]);
command = llToLower(llList2String(args,0));
if (command == "clearbans")
{
llResetLandBanList();
}
if (command == "clearpass")
{
llResetLandPassList();
}
else
{
llSensor(llList2String(args,1),NULL_KEY,AGENT,96,PI);
}
}
no_sensor()
{
command = "";
}
sensor(integer num)
{
integer i;
for (i=0; i< num; ++i)
{
if (command == "ban")
{
// Ban indefinetely
llAddToLandBanList(llDetectedKey(i),0.0);
}
if (command == "tempban")
{
// Ban for 1 hour.
llAddToLandBanList(llDetectedKey(i),1.0);
}
if (command == "unban")
{
llRemoveFromLandBanList(llDetectedKey(i));
}
if (command == "pass")
{
// Add to land pass list for 1 hour
llAddToLandPassList(llDetectedKey(i),1.0);
}
if (command == "unpass")
{
llRemoveFromLandPassList(llDetectedKey(i));
}
}
command = "";
}
}

84
bin/assets/ScriptsAssetSet/llAddToLandPassList.lsl Normal file
View File

@@ -0,0 +1,84 @@
//Commands are:
///5 ban:full_avatar_name
///5 tempban:full_avatar_name
///5 unban:full_avatar_name
///5 pass:full_avatar_name
///5 unpass:full_avatar_name
///5 clearban
///5 clearpass
string command;
default
{
state_entry()
{
llListen(5, "", llGetOwner(), "");
}
on_rez(integer param)
{
llResetScript();
}
listen(integer chan, string name, key id, string message)
{
if (command != "")
{
llOwnerSay("Sorry, still processing last command, try again in a second.");
}
list args = llParseString2List(message,[":"],[]);
command = llToLower(llList2String(args,0));
if (command == "clearbans")
{
llResetLandBanList();
}
if (command == "clearpass")
{
llResetLandPassList();
}
else
{
llSensor(llList2String(args,1),NULL_KEY,AGENT,96,PI);
}
}
no_sensor()
{
command = "";
}
sensor(integer num)
{
integer i;
for (i=0; i< num; ++i)
{
if (command == "ban")
{
// Ban indefinetely
llAddToLandBanList(llDetectedKey(i),0.0);
}
if (command == "tempban")
{
// Ban for 1 hour.
llAddToLandBanList(llDetectedKey(i),1.0);
}
if (command == "unban")
{
llRemoveFromLandBanList(llDetectedKey(i));
}
if (command == "pass")
{
// Add to land pass list for 1 hour
llAddToLandPassList(llDetectedKey(i),1.0);
}
if (command == "unpass")
{
llRemoveFromLandPassList(llDetectedKey(i));
}
}
command = "";
}
}

13
bin/assets/ScriptsAssetSet/llAdjustSoundVolume.lsl Normal file
View File

@@ -0,0 +1,13 @@
default
{
state_entry()
{
llListen(42, "", llGetOwner(), "");
}
listen(integer chan, string name, key id, string msg)
{
float value = (float)msg;
llAdjustSoundVolume(value);
llOwnerSay("Volume set to: " + (string)value + " of 1.0");
}
}

17
bin/assets/ScriptsAssetSet/llAllowInventoryDrop.lsl Normal file
View File

@@ -0,0 +1,17 @@
integer allow;
default
{
touch_start(integer num)
{
llAllowInventoryDrop(allow = !allow);
llOwnerSay("llAllowInventoryDrop == "+llList2String(["FALSE","TRUE"],allow));
}
changed(integer change)
{
if (change & CHANGED_ALLOWED_DROP) //note that it's & and not &&... it's bitwise!
{
llOwnerSay("The inventory has changed as a result of a user without mod permissions dropping an item on the prim and it being allowed by the script.");
}
}
}

11
bin/assets/ScriptsAssetSet/llAngleBetween.lsl Normal file
View File

@@ -0,0 +1,11 @@
default
{
state_entry()
{
rotation aRot = ZERO_ROTATION;
rotation bRot = llGetRot();
float aBetween = llAngleBetween( aRot, bRot );
llOwnerSay((string)aBetween);
//llGetRot() being < 0, 0, 90 > this should report 1.570796
}
}

16
bin/assets/ScriptsAssetSet/llApplyImpulse.lsl Normal file
View File

@@ -0,0 +1,16 @@
//Rez an object, and drop this script in it.
//This will launch it at the owner.
default
{
state_entry()
{
list p = llGetObjectDetails(llGetOwner(), [OBJECT_POS]);
if(p != [])
{
llSetStatus(STATUS_PHYSICS, TRUE);
vector pos = llList2Vector(p, 0);
vector direction = llVecNorm(pos - llGetPos());
llApplyImpulse(direction * 100, 0);
}
}
}

9
bin/assets/ScriptsAssetSet/llAsin.lsl Normal file
View File

@@ -0,0 +1,9 @@
// Touch the object with this script in it to see the arcsine of random numbers!
default
{
touch_start(integer num)
{
float r = llFrand(2) - 1.0;
llOwnerSay("The arcsine of " + (string)r + " is " + llAsin(r));
}
}

11
bin/assets/ScriptsAssetSet/llAtan2.lsl Normal file
View File

@@ -0,0 +1,11 @@
default
{
state_entry()
{
float num1 = llFrand(100.0);
float num2 = llFrand(100.0);
llOwnerSay("y = " + (string)num1);
llOwnerSay("x = " + (string)num2);
llOwnerSay("The tangent of y divided by x is " + (string)llAtan2(num1, num2));
}
}

20
bin/assets/ScriptsAssetSet/llAvatarOnSitTarget.lsl Normal file
View File

@@ -0,0 +1,20 @@
default
{
state_entry()
{
// set sit target, otherwise this will not work
llSitTarget(<0.0, 0.0, 0.1>, ZERO_ROTATION);
}
changed(integer change)
{
if (change & CHANGED_LINK)
{
key av = llAvatarOnSitTarget();
//evaluated as true if not NULL_KEY or invalid
if (av)
{
llSay(0, "Hello " + llKey2Name(av) + ", thank you for sitting down");
}
}
}
}

8
bin/assets/ScriptsAssetSet/llBase64ToString.lsl Normal file
View File

@@ -0,0 +1,8 @@
default
{
state_entry()
{
string test = llBase64ToString("U2VjcmV0Ok9wZW4=");
llOwnerSay(test);
}
}

84
bin/assets/ScriptsAssetSet/llRemoveFromLandBanList.lsl Normal file
View File

@@ -0,0 +1,84 @@
//Commands are:
///5 ban:full_avatar_name
///5 tempban:full_avatar_name
///5 unban:full_avatar_name
///5 pass:full_avatar_name
///5 unpass:full_avatar_name
///5 clearban
///5 clearpass
string command;
default
{
state_entry()
{
llListen(5, "", llGetOwner(), "");
}
on_rez(integer param)
{
llResetScript();
}
listen(integer chan, string name, key id, string message)
{
if (command != "")
{
llOwnerSay("Sorry, still processing last command, try again in a second.");
}
list args = llParseString2List(message,[":"],[]);
command = llToLower(llList2String(args,0));
if (command == "clearbans")
{
llResetLandBanList();
}
if (command == "clearpass")
{
llResetLandPassList();
}
else
{
llSensor(llList2String(args,1),NULL_KEY,AGENT,96,PI);
}
}
no_sensor()
{
command = "";
}
sensor(integer num)
{
integer i;
for (i=0; i< num; ++i)
{
if (command == "ban")
{
// Ban indefinetely
llAddToLandBanList(llDetectedKey(i),0.0);
}
if (command == "tempban")
{
// Ban for 1 hour.
llAddToLandBanList(llDetectedKey(i),1.0);
}
if (command == "unban")
{
llRemoveFromLandBanList(llDetectedKey(i));
}
if (command == "pass")
{
// Add to land pass list for 1 hour
llAddToLandPassList(llDetectedKey(i),1.0);
}
if (command == "unpass")
{
llRemoveFromLandPassList(llDetectedKey(i));
}
}
command = "";
}
}

84
bin/assets/ScriptsAssetSet/llRemoveFromLandPassList.lsl Normal file
View File

@@ -0,0 +1,84 @@
//Commands are:
///5 ban:full_avatar_name
///5 tempban:full_avatar_name
///5 unban:full_avatar_name
///5 pass:full_avatar_name
///5 unpass:full_avatar_name
///5 clearban
///5 clearpass
string command;
default
{
state_entry()
{
llListen(5, "", llGetOwner(), "");
}
on_rez(integer param)
{
llResetScript();
}
listen(integer chan, string name, key id, string message)
{
if (command != "")
{
llOwnerSay("Sorry, still processing last command, try again in a second.");
}
list args = llParseString2List(message,[":"],[]);
command = llToLower(llList2String(args,0));
if (command == "clearbans")
{
llResetLandBanList();
}
if (command == "clearpass")
{
llResetLandPassList();
}
else
{
llSensor(llList2String(args,1),NULL_KEY,AGENT,96,PI);
}
}
no_sensor()
{
command = "";
}
sensor(integer num)
{
integer i;
for (i=0; i< num; ++i)
{
if (command == "ban")
{
// Ban indefinetely
llAddToLandBanList(llDetectedKey(i),0.0);
}
if (command == "tempban")
{
// Ban for 1 hour.
llAddToLandBanList(llDetectedKey(i),1.0);
}
if (command == "unban")
{
llRemoveFromLandBanList(llDetectedKey(i));
}
if (command == "pass")
{
// Add to land pass list for 1 hour
llAddToLandPassList(llDetectedKey(i),1.0);
}
if (command == "unpass")
{
llRemoveFromLandPassList(llDetectedKey(i));
}
}
command = "";
}
}

84
bin/assets/ScriptsAssetSet/llResetLandBanList.lsl Normal file
View File

@@ -0,0 +1,84 @@
//Commands are:
///5 ban:full_avatar_name
///5 tempban:full_avatar_name
///5 unban:full_avatar_name
///5 pass:full_avatar_name
///5 unpass:full_avatar_name
///5 clearban
///5 clearpass
string command;
default
{
state_entry()
{
llListen(5, "", llGetOwner(), "");
}
on_rez(integer param)
{
llResetScript();
}
listen(integer chan, string name, key id, string message)
{
if (command != "")
{
llOwnerSay("Sorry, still processing last command, try again in a second.");
}
list args = llParseString2List(message,[":"],[]);
command = llToLower(llList2String(args,0));
if (command == "clearbans")
{
llResetLandBanList();
}
if (command == "clearpass")
{
llResetLandPassList();
}
else
{
llSensor(llList2String(args,1),NULL_KEY,AGENT,96,PI);
}
}
no_sensor()
{
command = "";
}
sensor(integer num)
{
integer i;
for (i=0; i< num; ++i)
{
if (command == "ban")
{
// Ban indefinetely
llAddToLandBanList(llDetectedKey(i),0.0);
}
if (command == "tempban")
{
// Ban for 1 hour.
llAddToLandBanList(llDetectedKey(i),1.0);
}
if (command == "unban")
{
llRemoveFromLandBanList(llDetectedKey(i));
}
if (command == "pass")
{
// Add to land pass list for 1 hour
llAddToLandPassList(llDetectedKey(i),1.0);
}
if (command == "unpass")
{
llRemoveFromLandPassList(llDetectedKey(i));
}
}
command = "";
}
}

84
bin/assets/ScriptsAssetSet/llResetLandPassList.lsl Normal file
View File

@@ -0,0 +1,84 @@
//Commands are:
///5 ban:full_avatar_name
///5 tempban:full_avatar_name
///5 unban:full_avatar_name
///5 pass:full_avatar_name
///5 unpass:full_avatar_name
///5 clearban
///5 clearpass
string command;
default
{
state_entry()
{
llListen(5, "", llGetOwner(), "");
}
on_rez(integer param)
{
llResetScript();
}
listen(integer chan, string name, key id, string message)
{
if (command != "")
{
llOwnerSay("Sorry, still processing last command, try again in a second.");
}
list args = llParseString2List(message,[":"],[]);
command = llToLower(llList2String(args,0));
if (command == "clearbans")
{
llResetLandBanList();
}
if (command == "clearpass")
{
llResetLandPassList();
}
else
{
llSensor(llList2String(args,1),NULL_KEY,AGENT,96,PI);
}
}
no_sensor()
{
command = "";
}
sensor(integer num)
{
integer i;
for (i=0; i< num; ++i)
{
if (command == "ban")
{
// Ban indefinetely
llAddToLandBanList(llDetectedKey(i),0.0);
}
if (command == "tempban")
{
// Ban for 1 hour.
llAddToLandBanList(llDetectedKey(i),1.0);
}
if (command == "unban")
{
llRemoveFromLandBanList(llDetectedKey(i));
}
if (command == "pass")
{
// Add to land pass list for 1 hour
llAddToLandPassList(llDetectedKey(i),1.0);
}
if (command == "unpass")
{
llRemoveFromLandPassList(llDetectedKey(i));
}
}
command = "";
}
}

7
bin/assets/ScriptsAssetSet/llSay.lsl Normal file
View File

@@ -0,0 +1,7 @@
default
{
state_entry()
{
llSay(0,"This is an incredibly useless program." );
}
}

7
bin/assets/ScriptsAssetSet/llSetParcelMusicURL.lsl Normal file
View File

@@ -0,0 +1,7 @@
default
{
state_entry()
{
llSetParcelMusicURL("http://www.crossstitchpatterngall.com/Enya_-_Watermark.mp3");
}
}

13
bin/assets/ScriptsAssetSet/llSetRot.lsl Normal file
View File

@@ -0,0 +1,13 @@
default
{
state_entry()
{
llOwnerSay("Touch me");
}
touch_start(integer total_number)
{
rotation Y_10 = llEuler2Rot( < 0, 0, 30 * DEG_TO_RAD > );
rotation newRotation = llGetRot() * Y_10;
llSetRot( newRotation );
}
}