112 lines
2.7 KiB
Plaintext
112 lines
2.7 KiB
Plaintext
// :CATEGORY:Follower
|
|
// :NAME:Keyframe Follower
|
|
// :AUTHOR:Fred Beckhusen (Ferd Frederix)
|
|
// :KEYWORDS:
|
|
// :CREATED:2014-12-04 12:13:47
|
|
// :EDITED:2014-12-04
|
|
// :ID:1058
|
|
// :NUM:1684
|
|
// :REV:1
|
|
// :WORLD:Second Life
|
|
// :DESCRIPTION:
|
|
// A avatar folloer thaty works in Opensim
|
|
// :CODE:
|
|
|
|
|
|
|
|
float minspeed = 0.5;
|
|
float maxspeed = 2;
|
|
float maxtimer = 10.0; // when no one is around, slow way down.
|
|
|
|
float maxrange = 96;
|
|
float minrange = 20;
|
|
float oldZ;
|
|
|
|
integer isSensorRepeatOn = FALSE;
|
|
integer land;
|
|
|
|
float random_float(float min, float max)
|
|
{
|
|
return min + llFrand(max - min + 1);
|
|
}
|
|
|
|
|
|
rotation NormRot(rotation Q)
|
|
{
|
|
float MagQ = llSqrt(Q.x*Q.x + Q.y*Q.y +Q.z*Q.z + Q.s*Q.s);
|
|
return <Q.x/MagQ, Q.y/MagQ, Q.z/MagQ, Q.s/MagQ>;
|
|
}
|
|
|
|
default
|
|
{
|
|
state_entry()
|
|
{
|
|
llSetLinkPrimitiveParamsFast(LINK_ROOT,
|
|
[PRIM_PHYSICS_SHAPE_TYPE, PRIM_PHYSICS_SHAPE_CONVEX,
|
|
PRIM_LINK_TARGET, LINK_ALL_CHILDREN,
|
|
PRIM_PHYSICS_SHAPE_TYPE, PRIM_PHYSICS_SHAPE_NONE]);
|
|
|
|
llSensorRepeat("", "", AGENT, 20.0, PI, maxtimer);
|
|
}
|
|
|
|
|
|
|
|
no_sensor()
|
|
{
|
|
llSensorRepeat("", "", AGENT, maxrange, PI, maxtimer);
|
|
}
|
|
|
|
sensor(integer num_detected)
|
|
{
|
|
float speed = random_float(minspeed,maxspeed);
|
|
vector ownPosition = llGetPos();
|
|
rotation ownRotation = llGetRot();
|
|
vector detectedPosition = llDetectedPos(0);
|
|
rotation detectedRotation = llDetectedRot(0);
|
|
vector size = llGetAgentSize(llDetectedKey(0));
|
|
|
|
float Z = random_float(0, size.z/2);
|
|
if (llFrand(10) < 1) {
|
|
Z = -size.z/2;
|
|
llMessageLinked(LINK_SET,1,"land","");
|
|
land = TRUE;
|
|
speed = 0.5;
|
|
} else {
|
|
land = FALSE;
|
|
if (llFrand(10) < 1)
|
|
{
|
|
llMessageLinked(LINK_SET,1,"flames","");
|
|
}
|
|
|
|
}
|
|
|
|
|
|
float Y = random_float(0, 1);
|
|
if (llFrand(2) < 1) {
|
|
llMessageLinked(LINK_SET,1,"r","");
|
|
Y *= -1;
|
|
} else {
|
|
llMessageLinked(LINK_SET,1,"l","");
|
|
}
|
|
|
|
|
|
if (Z - oldZ > 0.2)
|
|
llMessageLinked(LINK_SET,1,"up","");
|
|
if (Z - oldZ > -0.2)
|
|
llMessageLinked(LINK_SET,1,"down","");
|
|
|
|
oldZ = Z;
|
|
|
|
|
|
llSetKeyframedMotion(
|
|
[(detectedPosition - ownPosition) + <-1, Y, Z>*detectedRotation,
|
|
NormRot(detectedRotation/ownRotation), speed],
|
|
[]);
|
|
|
|
if (land)
|
|
llSensorRepeat("", "", AGENT, maxrange, PI, 10);
|
|
else
|
|
llSensorRepeat("", "", AGENT, minrange, PI, maxspeed);
|
|
}
|
|
}
|