removed useless _ folders

This commit is contained in:
Fred Beckhusen
2015-08-09 16:54:31 -05:00
parent fde850293c
commit 948a44dfba
5204 changed files with 2425579 additions and 0 deletions

3
Follower/Follower.sol Normal file
View File

@@ -0,0 +1,3 @@
<Solution name="follower">
<Project name="follower" path="follower\follower.prj" active="true"/>
</Solution>

View File

@@ -0,0 +1,6 @@
<Project name="follower" guid="d75b78b8-6c00-1014-b904-200204c60a89">
<Object name="follower" guid="d75b7d6e-6c00-1014-b904-200204c60a89">
<Script name="follower.lsl" guid="d75b9e57-6c00-1014-b904-200204c60a89">
</Script>
</Object>
</Project>

View File

@@ -0,0 +1,81 @@
// :CATEGORY:Pet
// :NAME:Follower
// :AUTHOR:Anonymous
// :KEYWORDS:
// :CREATED:2010-01-10 05:20:56.000
// :EDITED:2014-01-30 19:59:25
// :ID:525
// :NUM:709
// :REV:1.1
// :WORLD:Second Life
// :DESCRIPTION:
// A gadget that follows a target when rezzed by a controller. Useful in attack huds and rezzers
// :CODE:
// follower
integer unichan = -123458; // this is the channel used by the controller and objects to sync
integer handle; // handle for the listen function
vector my_offset; // original offset, set at first activation
rotation my_orientation; // original rotation, set at first activation
integer my_num; // position in the chain of redundancy
default
{
on_rez(integer p)
{
llResetScript();
}
state_entry()
{
my_num = (integer)llGetSubString(llGetScriptName(), -1, -1);
handle = llListen(unichan + my_num, "", "", "");
}
listen(integer chan, string name, key id, string mesg)
{
if (mesg == "k")
llDie();
integer index = llSubStringIndex(mesg, "*");
my_offset = llGetPos() + llGetRegionCorner() - (vector)llGetSubString(mesg, 0, index - 1);
my_orientation = llGetRot();
my_offset = my_offset / my_orientation;
state running;
}
state_exit()
{
llListenRemove(handle);
}
}
state running
{
on_rez(integer p)
{
state default;
}
state_entry()
{
handle = llListen(unichan + my_num, "", "", "");
}
listen(integer chan, string name, key id, string mesg)
{
if (mesg == "k")
llDie();
list info = llParseString2List(mesg, ["*"], []);
rotation rtarget = my_orientation * llEuler2Rot(<0,0,(float)((integer)llList2String(info, 1)) * DEG_TO_RAD>);
vector target = my_offset * rtarget + (vector)llList2String(info, 0) - llGetRegionCorner();
llSetPrimitiveParams([PRIM_POSITION, target, PRIM_ROTATION, rtarget]);
}
state_exit()
{
llListenRemove(handle);
}
}