Small scripts.
Worlds of possibility.

Setup: Place the moving child offset horizontally from the root. Put the script in that child; owner-touch starts.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. The initial root-local Z is retained. The child orientation turns with the path, preserving its starting tangential alignment. One revolution takes about 63 seconds.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            float angle=llGetTime()*0.1;
            rotation turn=llEuler2Rot(<0.0,0.0,angle>);
            vector p=home*turn;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,rest*turn]);
            llSetTimerEvent(0.2);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        float angle=llGetTime()*0.1;
        rotation turn=llEuler2Rot(<0.0,0.0,angle>);
        vector p=home*turn;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,rest*turn]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a nonphysical child. Owner-touch sets its local rotation to identity; touch again restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Useful for inspecting modeled axes and preparing aligned displays. A mesh’s apparent forward may not match its local axes.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
rotation home;
default
{
    state_entry()
    {
        home=llGetLocalRot();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview=!preview;
        if(preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,ZERO_ROTATION]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,home]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set TOP_HEIGHT. Use a nonphysical child with meaningful bounding-box dimensions. Owner-touch applies/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Useful for aligning shelf undersides or ceiling details. It uses projected bounding-box height, not exact mesh geometry.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
float TOP_HEIGHT=1.0;
vector home;
default
{
    state_entry()
    {
        home=llGetLocalPos();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview=!preview;
        if(preview)
        {
            vector size=llGetScale();
            rotation r=llGetLocalRot();
            vector x=<1.0,0.0,0.0>*r;
            vector y=<0.0,1.0,0.0>*r;
            vector z=<0.0,0.0,1.0>*r;
            float half=(llFabs(x.z)*size.x+llFabs(y.z)*size.y+llFabs(z.z)*size.z)*0.5;
            vector p=home;
            p.z=TOP_HEIGHT-half;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set POINTS and positive SPEED. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Each segment is linear with instantaneous corner direction changes; smooth turning requires additional planning.

// Original Incoprea. MIT. Motion planning only.
list POINTS=[<0.0,0.0,0.0>,<3.0,0.0,0.0>,<3.0,4.0,0.0>];
float SPEED=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SPEED<=0.0||llGetListLength(POINTS)<2)
        {
            llOwnerSay("Positive speed and two points required.");
            return;
        }
        float time;
        llOwnerSay("Frame0 time0");
        integer i;
        for(i=1;i<llGetListLength(POINTS);++i)
        {
            time+=llVecDist(llList2Vector(POINTS,i-1),llList2Vector(POINTS,i))/SPEED;
            llOwnerSay("Frame "+(string)i+" time="+(string)time);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a hinge-centered child hand pointing +X in a root-local XY clock face. Owner-touch starts one-minute updates.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. A complete clock combines this with the separate minute-hand script. This uses UTC rather than local daylight-saving rules.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            string stamp=llGetTimestamp();
            integer hour=(integer)llGetSubString(stamp,11,12)%12;
            integer minute=(integer)llGetSubString(stamp,14,15);
            float angle=PI_BY_TWO-TWO_PI*(hour+minute/60.0)/12.0;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,angle>)]);
            llSetTimerEvent(60);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        string stamp=llGetTimestamp();
        integer hour=(integer)llGetSubString(stamp,11,12)%12;
        integer minute=(integer)llGetSubString(stamp,14,15);
        float angle=PI_BY_TWO-TWO_PI*(hour+minute/60.0)/12.0;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,angle>)]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a hinge-centered clock hand with +X pointing to the right at startup. Root-local clock face should be in XY; put the script in the child.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. The hand points to +Y at minute zero and rotates clockwise. It sets the actual angle, not an accumulating timer approximation.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            string stamp=llGetTimestamp();
            integer minute=(integer)llGetSubString(stamp,14,15);
            integer second=(integer)llGetSubString(stamp,17,18);
            float angle=PI_BY_TWO-TWO_PI*(minute+second/60.0)/60.0;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,angle>)]);
            llSetTimerEvent(1);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        string stamp=llGetTimestamp();
        integer minute=(integer)llGetSubString(stamp,14,15);
        integer second=(integer)llGetSubString(stamp,17,18);
        float angle=PI_BY_TWO-TWO_PI*(minute+second/60.0)/60.0;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,angle>)]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a child prim of a nonphysical stationary pedestal. The initial child position is the resting pose. Uses the root’s local Z direction.

Stop / restore: Touch to stop and restore the starting position before removing or resetting.

Actual child position changes, unlike visual target-omega. Keep the amplitude small and do not relink while running.

// Original Incoprea example. MIT. Not compiled or tested in-world.
vector home;
integer active;
default
{
    state_entry()
    {
        home = llGetLocalPos();
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner() || llGetLinkNumber() < 2) return;
        if (llGetStatus(STATUS_PHYSICS)) return;
        active = !active;
        if (active)
        {
            llResetTime();
            llSetTimerEvent(0.2);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_POS_LOCAL, home]);
        }
    }
    timer()
    {
        if (llGetLinkNumber() < 2 || llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active = FALSE;
            return;
        }
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_POS_LOCAL, home + <0.0, 0.0, 0.12 * llSin(llGetTime())>]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a small nonphysical child aligned along its local Z axis. Owner-touch extends and retracts.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Use a small nonphysical rezzed build with room around it. This changes real geometry, not just a viewer effect. Restore before reset, relink, or removal; a script-memory snapshot is not a permanent backup. Designed for an ordinary centered prim or centered mesh with matching bounds.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_SIZE, PRIM_POS_LOCAL, PRIM_ROT_LOCAL]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview = !preview;
        if (preview)
        {
            vector size=llList2Vector(saved,0);
            vector pos=llList2Vector(saved,1);
            rotation rot=llList2Rot(saved,2);
            vector offset=<0.0,0.0,size.z*0.5>*rot;
            size.z*=2.0;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_SIZE,size,PRIM_POS_LOCAL,pos+offset]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_SIZE,llList2Vector(saved,0),PRIM_POS_LOCAL,llList2Vector(saved,1)]);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a hinge-centered child. Owner-touch starts a ten-second sweep from 0 to 60 degrees and back.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. An angular inspection sweep is useful for clearance review. It does not sense collisions; observe the build on a copy.

// Original Incoprea. MIT. Not compiled or tested in-world.
rotation home;
integer active;
default
{
    state_entry()
    {
        home=llGetLocalRot();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        if(active)
        {
            active=FALSE;
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,home]);
            return;
        }
        active=TRUE;
        llResetTime();
        llSetTimerEvent(0.2);
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        float t=llGetTime();
        if(t>=10.0)
        {
            active=FALSE;
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,home]);
            return;
        }
        float f=t/5.0;
        if(f>1.0)f=2.0-f;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,60.0*DEG_TO_RAD*f>)*home]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            home=llGetLocalRot();
            llOwnerSay("Links changed; current pose is the new Home.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set positive OMEGA, initial OFFSET/VELOCITY and nonnegative TIME. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Analytical unit-mass model. Large parameter products may underflow harmlessly toward zero.

// Original Incoprea. MIT. Motion planning only.
float OMEGA=3.0;
float OFFSET=1.0;
float VELOCITY=0.0;
float TIME=0.8;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(OMEGA<=0.0||TIME<0.0)
        {
            llOwnerSay("Invalid frequency/time.");
            return;
        }
        float b=VELOCITY+OMEGA*OFFSET;
        float decay=llPow(2.718281828,-OMEGA*TIME);
        float x=(OFFSET+b*TIME)*decay;
        float v=(b-OMEGA*(OFFSET+b*TIME))*decay;
        llOwnerSay("Offset="+(string)x+" velocity="+(string)v);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set nonnegative ACCUMULATOR/ELAPSED, positive STEP, and MAX_STEPS1..100. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Explicitly reports discarded backlog to avoid a spiral of excessive catch-up work. This is a planning demonstration.

// Original Incoprea. MIT. Motion planning only.
float ACCUMULATOR=0.02;
float ELAPSED=0.4;
float STEP=0.05;
integer MAX_STEPS=4;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(ACCUMULATOR<0.0||ELAPSED<0.0||STEP<=0.0||MAX_STEPS<1||MAX_STEPS>100)
        {
            llOwnerSay("Invalid step configuration.");
            return;
        }
        float available=ACCUMULATOR+ELAPSED;
        integer count=llFloor(available/STEP);
        integer run=count;
        if(run>MAX_STEPS)run=MAX_STEPS;
        float leftover=available-count*STEP;
        llOwnerSay("Run steps="+(string)run+" discarded seconds="+(string)((count-run)*STEP)+" remainder="+(string)leftover);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set lengths L1/L2 and target X/Y. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Returns one elbow configuration. Singular and unreachable targets are reported; this does not control a rig or avatar.

// Original Incoprea. MIT. Motion planning only.
float L1=3.0;
float L2=2.0;
float X=3.0;
float Y=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(L1<=0.0||L2<=0.0)
        {
            llOwnerSay("Positive lengths required.");
            return;
        }
        float d2=X*X+Y*Y;
        float c=(d2-L1*L1-L2*L2)/(2.0*L1*L2);
        if(c< -1.0||c>1.0||d2<0.000001)
        {
            llOwnerSay("Unreachable or singular target.");
            return;
        }
        float elbow=llAcos(c);
        float shoulder=llAtan2(Y,X)-llAtan2(L2*llSin(elbow),L1+L2*llCos(elbow));
        llOwnerSay("Shoulder degrees="+(string)(shoulder*RAD_TO_DEG)+" elbow degrees="+(string)(elbow*RAD_TO_DEG));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a nonphysical child with some offset from root. The object’s modeled front must be local +X.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Use a small nonphysical rezzed build with room around it. This changes real geometry, not just a viewer effect. Restore before reset, relink, or removal; a script-memory snapshot is not a permanent backup. Roll is determined by the shortest-arc alignment from +X. It does not search for a mesh nose.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_ROT_LOCAL]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS)||llVecMag(llGetLocalPos())<0.01)return;
        preview = !preview;
        if (preview)
        {
            rotation aim=llRotBetween(<1.0,0.0,0.0>,llVecNorm(llGetLocalPos()));
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,aim]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a small arrow child. Owner-touch starts five-second updates.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Tracks parcel environment, which can differ from a viewer override. The script aims an indicator and does not modify the sky.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            vector local=llGetSunDirection()/llGetRootRotation();
            if(llVecMag(local)>0.01)llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,llVecNorm(local))]);
            llSetTimerEvent(5);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        vector local=llGetSunDirection()/llGetRootRotation();
        if(llVecMag(local)>0.01)llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,llVecNorm(local))]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a nonphysical child. Home stores the startup pose; capture A/B after manual edits.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Does not save size or shape. Keep link topology unchanged; recalling a pose uses root-local coordinates.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
list home;
list a;
list b;
list capture()
{
    return llGetLinkPrimitiveParams(LINK_THIS,[PRIM_POS_LOCAL,PRIM_ROT_LOCAL]);
}
apply(list pose)
{
    llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,llList2Vector(pose,0),PRIM_ROT_LOCAL,llList2Rot(pose,1)]);
}
init()
{
    home=capture();
    a=home;
    b=home;
}
show()
{
    menu("Child pose bookmarks",["Capture A","Capture B","Recall A","Recall B","Home"]);
}
choose(string s)
{
    if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
    if(s=="Capture A")a=capture();
    else if(s=="Capture B")b=capture();
    else if(s=="Recall A")apply(a);
    else if(s=="Recall B")apply(b);
    else if(s=="Home")apply(home);
    else return;
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a child arrow whose front is local +X. Owner-touch starts wind tracking once per two seconds.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Converts a world direction into the root-local frame. Calm wind keeps the last meaningful orientation; the root never rotates.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            vector wind=llWind(ZERO_VECTOR);
            wind.z=0.0;
            if(llVecMag(wind)>0.01)
            {
                vector local=llVecNorm(wind)/llGetRootRotation();
                llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,local)]);
            }
            llSetTimerEvent(2);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        vector wind=llWind(ZERO_VECTOR);
        wind.z=0.0;
        if(llVecMag(wind)>0.01)
        {
            vector local=llVecNorm(wind)/llGetRootRotation();
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,local)]);
        }
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set POINTS, SEGMENT, FRACTION0..1 and nonnegative LOOKAHEAD. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Assumes the caller already knows its current path segment; does not locate an object in the scene.

// Original Incoprea. MIT. Motion planning only.
list POINTS=[<0.0,0.0,0.0>,<4.0,0.0,0.0>,<4.0,5.0,0.0>];
integer SEGMENT=0;
float FRACTION=0.5;
float LOOKAHEAD=3.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(POINTS);
        if(SEGMENT<0||SEGMENT>=n-1||FRACTION<0.0||FRACTION>1.0||LOOKAHEAD<0.0)
        {
            llOwnerSay("Invalid route location.");
            return;
        }
        vector a=llList2Vector(POINTS,SEGMENT);
        vector b=llList2Vector(POINTS,SEGMENT+1);
        vector current=a+(b-a)*FRACTION;
        float remaining=LOOKAHEAD;
        integer i;
        for(i=SEGMENT+1;i<n;++i)
        {
            vector target=llList2Vector(POINTS,i);
            float length=llVecDist(current,target);
            if(length>0.0&&remaining<=length)
            {
                llOwnerSay("Lookahead="+(string)(current+(target-current)*(remaining/length)));
                return;
            }
            remaining-=length;
            current=target;
        }
        llOwnerSay("Lookahead clamped="+(string)current);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set A/B and normalized T. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Shows why easing changes speed while preserving endpoints. No scene object is changed.

// Original Incoprea. MIT. Motion planning only.
vector A=ZERO_VECTOR;
vector B=<10.0,0.0,0.0>;
float T=0.25;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(T<0.0||T>1.0)
        {
            llOwnerSay("T must be0..1.");
            return;
        }
        float eased=T*T*(3.0-2.0*T);
        vector linear=A+(B-A)*T;
        vector smooth=A+(B-A)*eased;
        llOwnerSay("Linear="+(string)linear+" smooth="+(string)smooth+" separation="+(string)llVecDist(linear,smooth));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set positive RADIUS and SPEED. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Useful when choosing llTargetOmega rate; visual nonphysical orbit still does not move collision geometry.

// Original Incoprea. MIT. Motion planning only.
float RADIUS=5.0;
float SPEED=0.5;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RADIUS<=0.0||SPEED<=0.0)
        {
            llOwnerSay("Positive radius/speed required.");
            return;
        }
        float omega=SPEED/RADIUS;
        llOwnerSay("Radians/sec="+(string)omega+" degrees/sec="+(string)(omega*RAD_TO_DEG)+" seconds/revolution="+(string)(TWO_PI/omega));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set PREVIOUS<=NOW and positive PERIOD. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

The interval is open at PREVIOUS and closed at NOW. A caller can cap catch-up work rather than running unbounded missed events.

// Original Incoprea. MIT. Motion planning only.
float PREVIOUS=2.4;
float NOW=9.2;
float PERIOD=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(PERIOD<=0.0||NOW<PREVIOUS)
        {
            llOwnerSay("Invalid interval.");
            return;
        }
        integer first=llFloor(PREVIOUS/PERIOD)+1;
        integer last=llFloor(NOW/PERIOD);
        integer due=last-first+1;
        if(due<0)due=0;
        llOwnerSay("Boundaries due="+(string)due+" next deadline="+(string)((last+1)*PERIOD));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in root with uniquely named gear_small and gear_large children, pivots at their centers and axes local Z. Owner-touch toggles.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. This is geometric animation, not a gear simulation. Place compatible teeth manually; script cannot infer tooth count or mesh clearances.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer small;
integer large;
rotation a;
rotation b;
integer active;
default
{
    state_entry()
    {
        integer i;
        integer hits;
        for(i=2;i<=llGetObjectPrimCount(llGetKey());++i)
        {
            string name=llGetLinkName(i);
            if(name=="gear_small")
            {
                small=i;
                ++hits;
            }
            if(name=="gear_large")
            {
                large=i;
                ++hits;
            }
        }
        if(hits!=2||!small||!large)
        {
            small=0;
            large=0;
            return;
        }
        a=llList2Rot(llGetLinkPrimitiveParams(small,[PRIM_ROT_LOCAL]),0);
        b=llList2Rot(llGetLinkPrimitiveParams(large,[PRIM_ROT_LOCAL]),0);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetStatus(STATUS_PHYSICS)||!small||!large)return;
        active=!active;
        if(active)
        {
            llResetTime();
            llSetTimerEvent(0.2);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(small,[PRIM_ROT_LOCAL,a]);
            llSetLinkPrimitiveParamsFast(large,[PRIM_ROT_LOCAL,b]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        float t=llGetTime()*0.3;
        llSetLinkPrimitiveParamsFast(small,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,t>)*a]);
        llSetLinkPrimitiveParamsFast(large,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,-t*0.5>)*b]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            small=0;
            large=0;
            llOwnerSay("Links changed; reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in root with exactly one child named crank_marker and one piston. The illustration uses root-local XY; both should be small. Owner-touch starts/stops.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Uses a slider-crank relation with crank radius 0.2 m and connecting-rod length 0.6 m. No physics constraints or collisions are simulated.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer crank;
integer piston;
list home;
integer active;
default
{
    state_entry()
    {
        integer i;
        integer hits;
        for(i=2;i<=llGetObjectPrimCount(llGetKey());++i)
        {
            string name=llGetLinkName(i);
            if(name=="crank_marker")
            {
                crank=i;
                ++hits;
            }
            if(name=="piston")
            {
                piston=i;
                ++hits;
            }
        }
        if(hits!=2||!crank||!piston)
        {
            crank=0;
            piston=0;
            return;
        }
        home=llGetLinkPrimitiveParams(crank,[PRIM_POS_LOCAL])+llGetLinkPrimitiveParams(piston,[PRIM_POS_LOCAL]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS)||!crank||!piston)return;
        active=!active;
        if(active)
        {
            llResetTime();
            llSetTimerEvent(0.15);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(crank,[PRIM_POS_LOCAL,llList2Vector(home,0)]);
            llSetLinkPrimitiveParamsFast(piston,[PRIM_POS_LOCAL,llList2Vector(home,1)]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        float a=llGetTime()*0.5;
        float y=0.2*llSin(a);
        float x=0.2*llCos(a);
        float slider=x+llSqrt(0.36-y*y);
        llSetLinkPrimitiveParamsFast(crank,[PRIM_POS_LOCAL,<x,y,0.5>]);
        llSetLinkPrimitiveParamsFast(piston,[PRIM_POS_LOCAL,<slider,0.0,0.5>]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            crank=0;
            piston=0;
            llOwnerSay("Links changed; reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set positive TRAVEL, nonnegative HOLD and ELAPSED. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

The duration of a whole cycle is2*(travel+hold). Endpoints remain stationary during dwell phases.

// Original Incoprea. MIT. Motion planning only.
float TRAVEL=2.0;
float HOLD=1.0;
float ELAPSED=4.5;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(TRAVEL<=0.0||HOLD<0.0)
        {
            llOwnerSay("Invalid timing.");
            return;
        }
        float period=2.0*(TRAVEL+HOLD);
        float t=ELAPSED-period*llFloor(ELAPSED/period);
        float p;
        string phase;
        if(t<HOLD)
        {
            phase="hold A";
            p=0.0;
        }
        else if(t<HOLD+TRAVEL)
        {
            phase="A to B";
            p=(t-HOLD)/TRAVEL;
        }
        else if(t<2.0*HOLD+TRAVEL)
        {
            phase="hold B";
            p=1.0;
        }
        else
        {
            phase="B to A";
            p=1.0-(t-2.0*HOLD-TRAVEL)/TRAVEL;
        }
        llOwnerSay("Phase="+phase+" progress="+(string)p);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set ELAPSED, positive PERIOD and WAVE_CYCLES around the ring. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

WAVE_CYCLES controls spatial repetition, not the number of objects. No texture or motion changes occur.

// Original Incoprea. MIT. Motion planning only.
float ELAPSED=0.5;
float PERIOD=4.0;
integer WAVE_CYCLES=2;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(PERIOD<=0.0)
        {
            llOwnerSay("Positive period required.");
            return;
        }
        integer i;
        for(i=0;i<8;++i)
        {
            float phase=TWO_PI*(ELAPSED/PERIOD+(float)(i*WAVE_CYCLES)/8.0);
            llOwnerSay("Part "+(string)i+" value="+(string)llSin(phase));
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a child at its closed pose. Owner-touch toggles a half-meter root-Z reveal; each leg lasts two seconds.

Stop / restore: Owner-touch to close, then wait two seconds for Home restoration before removing or resetting.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Touching during a transition reverses from its current fraction. Home is restored only after the closing transition finishes.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
float value;
float from;
float target;
integer opened;
default
{
    state_entry()
    {
        home=llGetLocalPos();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        opened=!opened;
        from=value;
        target=0.0;
        if(opened)target=1.0;
        llResetTime();
        llSetTimerEvent(0.1);
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            return;
        }
        float t=llGetTime()/2.0;
        if(t>=1.0)
        {
            t=1.0;
            llSetTimerEvent(0.0);
        }
        float ease=t*t*(3.0-2.0*t);
        value=from+(target-from)*ease;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home+<0.0,0.0,value*0.5>]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a child cube with width along local Y, height Z and thickness X. Put in its closed pose. Owner-touch opens/closes 90 degrees.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Unlike a hinge-centered mesh, a centered cube needs its center translated around the hinge. The left edge is negative local Y; use a copy and verify orientation first.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
vector hinge;
integer opened;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
        vector size=llGetScale();
        hinge=home+<0.0,-size.y*0.5,0.0>*rest;
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        opened=!opened;
        vector p=home;
        rotation r=rest;
        if(opened)
        {
            rotation localTurn=llEuler2Rot(<0.0,0.0,PI_BY_TWO>);
            r=localTurn*rest;
            vector offset=(home-hinge)/rest;
            p=hinge+offset*r;
        }
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,r]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a small child with at least half a meter of clear space in root X/Y.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Orientation stays fixed; this is a path study rather than automatic nose alignment. The path starts at its crossing center.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            float t=llGetTime()*0.4;
            vector p=home+<0.4*llSin(t),0.2*llSin(2.0*t),0.0>;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p]);
            llSetTimerEvent(0.2);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        float t=llGetTime()*0.4;
        vector p=home+<0.4*llSin(t),0.2*llSin(2.0*t),0.0>;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set increasing TIMES and QUERY. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Clamps before the first and after the last frame. Real keyframed motion has additional object and parcel constraints.

// Original Incoprea. MIT. Motion planning only.
list TIMES=[0.0,1.0,3.5,5.0];
float QUERY=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(TIMES);
        if(n<2)
        {
            llOwnerSay("Need two timestamps.");
            return;
        }
        integer i;
        for(i=1;i<n;++i)if(llList2Float(TIMES,i)<=llList2Float(TIMES,i-1))
        {
            llOwnerSay("Times must increase.");
            return;
        }
        if(QUERY<=llList2Float(TIMES,0))
        {
            llOwnerSay("At first frame.");
            return;
        }
        for(i=1;i<n;++i)
        {
            float end=llList2Float(TIMES,i);
            if(QUERY<=end)
            {
                float start=llList2Float(TIMES,i-1);
                llOwnerSay("Frames "+(string)(i-1)+" -> "+(string)i+" local t="+(string)((QUERY-start)/(end-start)));
                return;
            }
        }
        llOwnerSay("At last frame.");
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a child whose modeled pivot is at the fold edge. Put the script in its unfolded resting pose.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Use a small nonphysical rezzed build with room around it. This changes real geometry, not just a viewer effect. Restore before reset, relink, or removal; a script-memory snapshot is not a permanent backup. Pivot placement is required: a centered cube rotates around its middle.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_ROT_LOCAL]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview = !preview;
        if (preview)
        {
            rotation home=llList2Rot(saved,0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llEuler2Rot(<PI_BY_TWO,0.0,0.0>)*home]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set positive PERIOD for a full out-and-back cycle and sample TIMES. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Uses floor-based wrapping so negative input times remain well-defined.

// Original Incoprea. MIT. Motion planning only.
float PERIOD=4.0;
list TIMES=[0.0,1.0,2.0,3.0,4.0,5.0];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(PERIOD<=0.0)
        {
            llOwnerSay("Positive period required.");
            return;
        }
        integer i;
        for(i=0;i<llGetListLength(TIMES);++i)
        {
            float t=llList2Float(TIMES,i);
            float phase=t/PERIOD;
            phase-=llFloor(phase);
            float progress=1.0-llFabs(2.0*phase-1.0);
            llOwnerSay("t="+(string)t+" progress="+(string)progress);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a nonphysical build with a child whose pivot is at its suspension point. Put the script in that child at rest, then owner-touch to start. Swing axis is the child’s local Y.

Stop / restore: Owner-touch to restore the resting rotation before deleting or resetting.

This is a driven display, not a physics simulation. A centered prim swings around its center.

// Original Incoprea example. MIT. Not compiled or tested in-world.
rotation home;
integer active;
default
{
    state_entry()
    {
        home = llGetLocalRot();
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner() || llGetLinkNumber() < 2) return;
        if (llGetStatus(STATUS_PHYSICS)) return;
        active = !active;
        if (active)
        {
            llResetTime();
            llSetTimerEvent(0.2);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_ROT_LOCAL, home]);
        }
    }
    timer()
    {
        if (llGetLinkNumber() < 2 || llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active = FALSE;
            return;
        }
        rotation swing = llEuler2Rot(<0.0, 0.3 * llSin(llGetTime()), 0.0>);
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_ROT_LOCAL, swing * home]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a nonphysical linked build. The door must be a child whose actual pivot is at the hinge (for example, a mesh with a hinge-centered origin). Put this script in that door while closed. A normal centered cube will spin around its middle.

Stop / restore: Touch once more to close before disabling or removing. Reset only while closed; the saved pose is held in script memory.

Rotation is about the door’s local Z axis. Does not change physics or provide access security. Do not relink while open.

// Original Incoprea example. MIT. Not compiled or tested in-world.
rotation closed;
integer opened;
default
{
    state_entry()
    {
        closed = llGetLocalRot();
        if (llGetLinkNumber() < 2) llOwnerSay("Put this in a child door prim.");
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner() || llGetLinkNumber() < 2) return;
        if (llGetStatus(STATUS_PHYSICS))
        {
            llOwnerSay("Use a nonphysical build.");
            return;
        }
        opened = !opened;
        rotation target = closed;
        if (opened) target = llEuler2Rot(<0.0, 0.0, PI_BY_TWO>) * closed;
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_ROT_LOCAL, target]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a small nonphysical unattached root already compatible with KFM. Owner-touch starts a 0.5-meter lift, two-second dwell and return.

Stop / restore: Owner-touch while active clears motion in place. A normal completed cycle returns to its starting height.

Do not change link topology, attachment state or physics while running. Selection can pause simulator motion. One-shot examples keep their armed flag until the next owner touch clears it, even after the path finishes; they do not infer completion from wall-clock timers. Not a passenger elevator or safety device. KFM can affect physical objects; keep the test clear. No shape/physics settings are changed.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetAttached()||llGetStatus(STATUS_PHYSICS))return;
        if(active)
        {
            llSetKeyframedMotion([],[]);
            active=FALSE;
            llSetTimerEvent(0.0);
            return;
        }
        active=TRUE;
        llSetKeyframedMotion([<0.0,0.0,0.5>,3.0,ZERO_VECTOR,2.0,<0.0,0.0,-0.5>,3.0],[KFM_DATA,KFM_TRANSLATION,KFM_MODE,KFM_FORWARD]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            llSetKeyframedMotion([],[]);
            active=FALSE;
            llSetTimerEvent(0.0);
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in the nonphysical unattached root whose KFM motion you intend to control. Owner-touch opens a menu.

Stop / restore: Choose Clear to remove the motion. Pause retains the path for a later Resume; it does not clear or restore position.

Do not change link topology, attachment state or physics while running. Selection can pause simulator motion. One-shot examples keep their armed flag until the next owner touch clears it, even after the path finishes; they do not infer completion from wall-clock timers. KFM is an object property shared by scripts. This console does not know the original route; disable controllers that automatically restart it.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetAttached()||llGetStatus(STATUS_PHYSICS))return;
        close();
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
        llDialog(llGetOwner(),"Control existing keyframed motion",["Pause","Resume","Clear"],channel);
        llSetTimerEvent(30.0);
    }
    listen(integer ch,string name,key id,string s)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        close();
        if(llGetLinkNumber()>1||llGetAttached()||llGetStatus(STATUS_PHYSICS))return;
        if(s=="Pause")llSetKeyframedMotion([],[KFM_COMMAND,KFM_CMD_PAUSE]);
        else if(s=="Resume")llSetKeyframedMotion([],[KFM_COMMAND,KFM_CMD_PLAY]);
        else if(s=="Clear")llSetKeyframedMotion([],[]);
    }
    timer()
    {
        close();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in an unattached nonphysical root whose forward axis is local +X. Owner-touch levels; touch again restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Near-vertical forward directions have no stable heading and are rejected. Whole linkset geometry rotates; use clear space.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
rotation home;
default
{
    state_entry()
    {
        home=llGetRot();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()>1||llGetAttached()||llGetStatus(STATUS_PHYSICS))return;
        vector forward=llRot2Fwd(home);
        forward.z=0.0;
        if(llVecMag(forward)<0.01)return;
        preview=!preview;
        if(preview)
        {
            vector headingForward=llRot2Fwd(home);
            float heading=llAtan2(headingForward.y,headingForward.x);
            llSetRot(llEuler2Rot(<0.0,0.0,heading>));
        }
        else
        {
            llSetRot(home);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set headings, nonnegative TURN_SPEED and DT. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Uses degrees and a negative180-degree tie convention. This calculates yaw only, not full orientation.

// Original Incoprea. MIT. Motion planning only.
float CURRENT=350.0;
float TARGET=40.0;
float TURN_SPEED=30.0;
float DT=0.2;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(TURN_SPEED<0.0||DT<0.0)
        {
            llOwnerSay("Invalid rate/time.");
            return;
        }
        float delta=TARGET-CURRENT+180.0;
        delta-=360.0*llFloor(delta/360.0);
        delta-=180.0;
        float limit=TURN_SPEED*DT;
        if(delta>limit)delta=limit;
        if(delta< -limit)delta=-limit;
        float result=CURRENT+delta;
        result-=360.0*llFloor(result/360.0);
        llOwnerSay("Next heading="+(string)result+" step="+(string)delta);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in nonphysical root. Name up to 12 small child panels sheet_item. Grid uses root X/Z with 0.5-meter center spacing; Restore recovers positions.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Rotation is preserved, so orient the panels first. A grid can overlap large panels; use copies of your build.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
list links;
list positions;
init()
{
    integer i;
    for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<12;++i)if(llGetLinkName(i)=="sheet_item")
    {
        links+=[i];
        positions+=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]);
    }
}
show()
{
    menu("Contact-sheet layout",["Grid","Restore"]);
}
choose(string s)
{
    if(llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1||(s!="Grid"&&s!="Restore"))return;
    integer i;
    for(i=0;i<llGetListLength(links);++i)
    {
        vector p=llList2Vector(positions,i);
        if(s=="Grid")p=<(i%3-1)*0.5,0.0,1.0-(i/3)*0.5>;
        llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_POS_LOCAL,p]);
    }
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a hinge-centered child needle. A root named gauge_controller should send code 7860 with a float string from 0 to 1. Owner-touch toggles arming and restores on disarm.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Only messages from the named root are accepted. Input is checked character-by-character, then clamped; the script never listens to public chat.

// Original Incoprea. MIT. Not compiled or tested in-world.
rotation home;
integer armed;
default
{
    state_entry()
    {
        home=llGetLocalRot();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        armed=!armed;
        if(!armed)llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,home]);
    }
    link_message(integer sender,integer code,string text,key data)
    {
        if(!armed||sender!=1||llGetLinkName(sender)!="gauge_controller"||code!=7860)return;
        if(llStringLength(text)<1||llStringLength(text)>12||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        integer i;
        integer dots;
        integer digits;
        for(i=0;i<llStringLength(text);++i)
        {
            string c=llGetSubString(text,i,i);
            if(c==".")
            {
                ++dots;
                if(dots>1)return;
            }
            else if(llSubStringIndex("0123456789",c)<0)return;
            else ++digits;
        }
        if(!digits)return;
        float value=(float)text;
        if(value<0.0)value=0.0;
        if(value>1.0)value=1.0;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,(value-0.5)*PI>)*home]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in nonphysical root. Name up to 12 children radial_item. Ring radius is one meter; Restore recovers both local positions and rotations.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Use small items and clear space. Real prim transforms change; seated avatars are not targeted.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
list links;
list poses;
init()
{
    integer i;
    for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<12;++i)if(llGetLinkName(i)=="radial_item")
    {
        links+=[i];
        poses+=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL,PRIM_ROT_LOCAL]);
    }
}
show()
{
    menu("Radial exhibit layout",["Ring","Restore"]);
}
choose(string s)
{
    if(llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1||(s!="Ring"&&s!="Restore"))return;
    integer i;
    integer n=llGetListLength(links);
    for(i=0;i<n;++i)
    {
        vector p=llList2Vector(poses,i*2);
        rotation r=llList2Rot(poses,i*2+1);
        if(s=="Ring")
        {
            float a=TWO_PI*i/n;
            p=<llCos(a),llSin(a),0.5>;
            r=llEuler2Rot(<0.0,0.0,a>);
        }
        llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,r]);
    }
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in nonphysical root; name up to 12 children layout_item. Row spaces their centers by 0.4 m along root X; Restore recovers every position.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. This is a real layout operation, not a point calculator. It does not scale items to prevent overlap; choose small samples.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
list links;
list positions;
init()
{
    integer i;
    for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<12;++i)if(llGetLinkName(i)=="layout_item")
    {
        links+=[i];
        positions+=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]);
    }
}
show()
{
    menu("Arrange layout_item children",["Row","Restore"]);
}
choose(string s)
{
    if(llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1||(s!="Row"&&s!="Restore"))return;
    integer n=llGetListLength(links);
    integer i;
    for(i=0;i<n;++i)
    {
        vector p=llList2Vector(positions,i);
        if(s=="Row")p=<(i-(n-1)*0.5)*0.4,0.0,0.5>;
        llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_POS_LOCAL,p]);
    }
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in root; name up to 12 nonphysical children wave_bar. Their link order defines wave phase. Owner-touch starts/stops.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Only local Z changes by up to 0.15 meters. Start with enough separation and never relink while active.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list home;
integer active;
default
{
    state_entry()
    {
        integer i;
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<12;++i)if(llGetLinkName(i)=="wave_bar")
        {
            links+=[i];
            home+=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]);
        }
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            llSetTimerEvent(0.2);
        }
        else
        {
            llSetTimerEvent(0.0);
            integer i;
            for(i=0;i<llGetListLength(links);++i)llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_POS_LOCAL,llList2Vector(home,i)]);
        }
    }
    timer()
    {
        if(llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            return;
        }
        integer i;
        for(i=0;i<llGetListLength(links);++i)
        {
            vector p=llList2Vector(home,i)+<0.0,0.0,0.15*llSin(llGetTime()+i*0.5)>;
            llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_POS_LOCAL,p]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set amplitude, positive period and time. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Velocity units are coordinate-units per second. No prim is moved.

// Original Incoprea. MIT. Motion planning only.
float AMPLITUDE=2.0;
float PERIOD=5.0;
float TIME=1.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(PERIOD<=0.0)
        {
            llOwnerSay("Positive period required.");
            return;
        }
        float omega=TWO_PI/PERIOD;
        llOwnerSay("Displacement="+(string)(AMPLITUDE*llSin(omega*TIME))+" velocity="+(string)(AMPLITUDE*omega*llCos(omega*TIME)));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a child whose modeled front is +X. Owner-touch starts; rotate the root manually to test.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. World north is +Y. The child’s roll uses the shortest-arc alignment and may not match a flat dashboard’s preferred roll.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            vector north=<0.0,1.0,0.0>/llGetRootRotation();
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,north)]);
            llSetTimerEvent(0.5);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        vector north=<0.0,1.0,0.0>/llGetRootRotation();
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,north)]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a nonphysical unlinked object or linkset root at the intended resting rotation. Owner-touch to toggle.

Stop / restore: Touch again to restore the captured orientation before removal or reset.

Moves the actual orientation in one step; no timer or persistent target-omega. Child prims follow the root.

// Original Incoprea example. MIT. Not compiled or tested in-world.
rotation home;
integer turned;
default
{
    state_entry()
    {
        home = llGetRot();
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner() || llGetLinkNumber() > 1) return;
        if (llGetStatus(STATUS_PHYSICS)) return;
        turned = !turned;
        if (turned) llSetRot(llEuler2Rot(<0.0, 0.0, PI_BY_TWO>) * home);
        else llSetRot(home);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use an unattached nonphysical root already configured for KFM-compatible accounting. Owner-touch starts; touching while running cancels.

Stop / restore: At completion the new orientation remains. A touch while running clears motion in place; manually restore any desired previous orientation.

Do not change link topology, attachment state or physics while running. Selection can pause simulator motion. One-shot examples keep their armed flag until the next owner touch clears it, even after the path finishes; they do not infer completion from wall-clock timers. Use a small object with clear surroundings. This is real geometry motion, not target-omega. No automatic physics-shape changes; grid support varies.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetAttached()||llGetStatus(STATUS_PHYSICS))return;
        if(active)
        {
            llSetKeyframedMotion([],[]);
            active=FALSE;
            llSetTimerEvent(0.0);
            return;
        }
        active=TRUE;
        llSetKeyframedMotion([llEuler2Rot(<0.0,0.0,PI_BY_TWO>),4.0],[KFM_DATA,KFM_ROTATION,KFM_MODE,KFM_FORWARD]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            llSetKeyframedMotion([],[]);
            active=FALSE;
            llSetTimerEvent(0.0);
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in the prim to inspect. Owner-touch starts and stops updates; rotate the prim to observe the changing values.

Stop / restore: Touch to restore the original text before removal.

Euler angles have equivalent representations and can jump near singularities. The object’s modeled nose need not align with local X; this is not a flight-grade instrument.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer active;
list original;
default
{
    state_entry()
    {
        original = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_TEXT]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        active = !active;
        if (active) llSetTimerEvent(0.5);
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_TEXT] + original);
        }
    }
    timer()
    {
        vector angles = llRot2Euler(llGetRot()) * RAD_TO_DEG;
        llSetText("World Euler degrees\nX " + (string)llRound(angles.x)
        + "  Y " + (string)llRound(angles.y) + "  Z " + (string)llRound(angles.z), <0.8, 0.9, 1.0>, 1.0);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a nonphysical root with exactly one child named panel_left and one panel_right. Put this script in root; travel is along root-local X.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Use a small nonphysical rezzed build with room around it. This changes real geometry, not just a viewer effect. Restore before reset, relink, or removal; a script-memory snapshot is not a permanent backup. Names must be unique. Relinking or renaming while open can invalidate targets.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer left;
integer right;
vector a;
vector b;
integer opened;
default
{
    state_entry()
    {
        integer i;
        integer n=llGetObjectPrimCount(llGetKey());
        integer hits;
        for(i=2;i<=n;++i)
        {
            string name=llGetLinkName(i);
            if(name=="panel_left")
            {
                left=i;
                ++hits;
            }
            if(name=="panel_right")
            {
                right=i;
                ++hits;
            }
        }
        if(hits!=2||!left||!right)
        {
            left=0;
            right=0;
            llOwnerSay("Need uniquely named panel_left and panel_right children.");
            return;
        }
        a=llList2Vector(llGetLinkPrimitiveParams(left,[PRIM_POS_LOCAL]),0);
        b=llList2Vector(llGetLinkPrimitiveParams(right,[PRIM_POS_LOCAL]),0);
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS)||!left||!right)return;
        opened=!opened;
        vector x=a;
        vector y=b;
        if(opened)
        {
            x+=<-0.5,0.0,0.0>;
            y+=<0.5,0.0,0.0>;
        }
        llSetLinkPrimitiveParamsFast(left,[PRIM_POS_LOCAL,x]);
        llSetLinkPrimitiveParamsFast(right,[PRIM_POS_LOCAL,y]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set POINTS, ORIGIN, positive WAVE_SPEED/DURATION and ELAPSED. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Uses a compact sine envelope after arrival; output is zero before and after the pulse.

// Original Incoprea. MIT. Motion planning only.
list POINTS=[<1.0,0.0,0.0>,<2.0,2.0,0.0>,<4.0,0.0,0.0>];
vector ORIGIN=ZERO_VECTOR;
float WAVE_SPEED=2.0;
float DURATION=1.0;
float ELAPSED=1.8;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(WAVE_SPEED<=0.0||DURATION<=0.0)
        {
            llOwnerSay("Invalid timing.");
            return;
        }
        integer i;
        for(i=0;i<llGetListLength(POINTS);++i)
        {
            float arrival=llVecDist(ORIGIN,llList2Vector(POINTS,i))/WAVE_SPEED;
            float t=(ELAPSED-arrival)/DURATION;
            float value=0.0;
            if(t>=0.0&&t<=1.0)value=llSin(PI*t);
            llOwnerSay("Part "+(string)i+" arrival="+(string)arrival+" envelope="+(string)value);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set positive DURATION, DISTANCE and TIME in the interval. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

The polynomial has zero velocity and acceleration at both endpoints; it does not automatically respect a speed limit.

// Original Incoprea. MIT. Motion planning only.
float DURATION=4.0;
float DISTANCE=6.0;
float TIME=1.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(DURATION<=0.0||TIME<0.0||TIME>DURATION)
        {
            llOwnerSay("Time must be within a positive duration.");
            return;
        }
        float t=TIME/DURATION;
        float t2=t*t;
        float t3=t2*t;
        float t4=t3*t;
        float t5=t4*t;
        float p=10.0*t3-15.0*t4+6.0*t5;
        float v=(30.0*t2-60.0*t3+30.0*t4)/DURATION;
        float a=(60.0*t-180.0*t2+120.0*t3)/(DURATION*DURATION);
        llOwnerSay("Position="+(string)(DISTANCE*p)+" velocity="+(string)(DISTANCE*v)+" acceleration="+(string)(DISTANCE*a));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set positive PERIOD, ON_TIME within the period, and FADE no greater than half ON_TIME. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

The pulse has linear fade edges. It reports intensity only and does not flicker a light.

// Original Incoprea. MIT. Motion planning only.
float PERIOD=5.0;
float ON_TIME=2.0;
float FADE=0.4;
float ELAPSED=1.8;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(PERIOD<=0.0||ON_TIME<=0.0||ON_TIME>PERIOD||FADE<=0.0||2.0*FADE>ON_TIME)
        {
            llOwnerSay("Invalid envelope timing.");
            return;
        }
        float t=ELAPSED-PERIOD*llFloor(ELAPSED/PERIOD);
        float value=0.0;
        if(t<ON_TIME)
        {
            value=1.0;
            if(t<FADE)value=t/FADE;
            else if(t>ON_TIME-FADE)value=(ON_TIME-t)/FADE;
        }
        llOwnerSay("Pulse intensity="+(string)value);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set positive attack/decay/release, nonnegative hold and sustain0..1. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

This models an animation envelope; it does not synthesize or play sound.

// Original Incoprea. MIT. Motion planning only.
float ATTACK=0.3;
float DECAY=0.4;
float HOLD=1.0;
float RELEASE=0.8;
float SUSTAIN=0.6;
float ELAPSED=0.5;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(ATTACK<=0.0||DECAY<=0.0||HOLD<0.0||RELEASE<=0.0||SUSTAIN<0.0||SUSTAIN>1.0)
        {
            llOwnerSay("Invalid ADSR values.");
            return;
        }
        float t=ELAPSED;
        float value=0.0;
        if(t>=0.0)
        {
            if(t<ATTACK)value=t/ATTACK;
            else if(t<ATTACK+DECAY)value=1.0+(SUSTAIN-1.0)*(t-ATTACK)/DECAY;
            else if(t<ATTACK+DECAY+HOLD)value=SUSTAIN;
            else if(t<ATTACK+DECAY+HOLD+RELEASE)value=SUSTAIN*(1.0-(t-ATTACK-DECAY-HOLD)/RELEASE);
        }
        llOwnerSay("Envelope value="+(string)value);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in root; name up to 16 children expand_part. Owner-touch expands their center offsets by 25 percent, then restores.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Useful for an exploded assembly view. It scales offsets including height, not the children themselves; keep the root near the assembly center.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list home;
integer expanded;
default
{
    state_entry()
    {
        integer i;
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<16;++i)if(llGetLinkName(i)=="expand_part")
        {
            links+=[i];
            home+=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]);
        }
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS))return;
        expanded=!expanded;
        integer i;
        for(i=0;i<llGetListLength(links);++i)
        {
            vector p=llList2Vector(home,i);
            if(expanded)p*=1.25;
            llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_POS_LOCAL,p]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a nonphysical child. Owner short touch records a position; holding a touch for at least two seconds starts replay. The first recorded point is the return location.

Stop / restore: Owner-touch during replay stops and returns to the first recorded point, which may differ from the startup pose. The final replay step also returns there. A topology or physical-state change halts without moving.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Records the object’s own local positions only, never avatars. Replay uses one-second steps; stop by owner-touch during playback.

// Original Incoprea. MIT. Not compiled or tested in-world.
list points;
integer index;
integer playing;
float pressed;
integer skipEnd;
stop()
{
    playing=FALSE;
    llSetTimerEvent(0.0);
    if(llGetListLength(points))llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,llList2Vector(points,0)]);
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        pressed=llGetTime();
        skipEnd=FALSE;
        if(playing)
        {
            stop();
            skipEnd=TRUE;
        }
    }
    touch_end(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        if(skipEnd)
        {
            skipEnd=FALSE;
            return;
        }
        if(llGetTime()-pressed>=2.0)
        {
            if(llGetListLength(points)>1)
            {
                index=0;
                playing=TRUE;
                llSetTimerEvent(1.0);
            }
            return;
        }
        if(llGetListLength(points)<20)
        {
            points+=[llGetLocalPos()];
            llOwnerSay("Recorded point "+(string)llGetListLength(points));
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            playing=FALSE;
            return;
        }
        if(index>=llGetListLength(points))
        {
            stop();
            return;
        }
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,llList2Vector(points,index++)]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            llSetTimerEvent(0.0);
            playing=FALSE;
            points=[];
            llOwnerSay("Links changed; path cleared without moving.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a nonphysical ordinary child box or a mesh with representative bounds. Owner-touch applies/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Computes projected box half-height from local scale and rotation. This is bounding-box placement, not mesh collision analysis.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
vector home;
default
{
    state_entry()
    {
        home=llGetLocalPos();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview=!preview;
        if(preview)
        {
            vector size=llGetScale();
            rotation r=llGetLocalRot();
            vector x=<1.0,0.0,0.0>*r;
            vector y=<0.0,1.0,0.0>*r;
            vector z=<0.0,0.0,1.0>*r;
            float half=(llFabs(x.z)*size.x+llFabs(y.z)*size.y+llFabs(z.z)*size.z)*0.5;
            vector p=home;
            p.z=half;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a nonphysical child. Edit OFFSET; owner-touch applies and restores. Keep within link distance limits.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Use a small nonphysical rezzed build with room around it. This changes real geometry, not just a viewer effect. Restore before reset, relink, or removal; a script-memory snapshot is not a permanent backup.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
vector OFFSET=<0.0,0.0,0.25>;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_POS_LOCAL]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview = !preview;
        if (preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,llList2Vector(saved,0)+OFFSET]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare root whose modeled front is +X. Five owner touches visit four level cardinal orientations and restore.

Stop / restore: Cycle through four cardinal poses; the fifth owner touch restores Home. Restore before removing or resetting.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. This levels the root while previewing, so it intentionally removes pitch and roll until restored. Children follow the root.

// Original Incoprea. MIT. Not compiled or tested in-world.
rotation home;
integer step;
default
{
    state_entry()
    {
        home=llGetRot();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS))return;
        if(step==4)
        {
            llSetRot(home);
            step=0;
            llOwnerSay("Home restored.");
            return;
        }
        float angle=PI_BY_TWO-step*PI_BY_TWO;
        llSetRot(llEuler2Rot(<0.0,0.0,angle>));
        ++step;
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a nonphysical root. Rotate manually, choose Capture A/B, then recall either bookmark. Home restores startup orientation.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Bookmarks are rotations only; position and child-local transforms are not captured. Do not use on physical objects.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
rotation home;
rotation a;
rotation b;
init()
{
    home=llGetRot();
    a=home;
    b=home;
}
show()
{
    menu("Root orientation bookmarks",["Capture A","Capture B","Recall A","Recall B","Home"]);
}
choose(string s)
{
    if(llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS))return;
    if(s=="Capture A")a=llGetRot();
    else if(s=="Capture B")b=llGetRot();
    else if(s=="Recall A")llSetRot(a);
    else if(s=="Recall B")llSetRot(b);
    else if(s=="Home")llSetRot(home);
    else return;
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set ELAPSED, positive DURATION and nonnegative STAGGER. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Values are clamped0..1; this calculates a frame of an animation rather than setting visibility.

// Original Incoprea. MIT. Motion planning only.
float ELAPSED=1.2;
float DURATION=1.0;
float STAGGER=0.25;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(DURATION<=0.0||STAGGER<0.0)
        {
            llOwnerSay("Invalid timing.");
            return;
        }
        integer i;
        for(i=0;i<6;++i)
        {
            float p=(ELAPSED-i*STAGGER)/DURATION;
            if(p<0.0)p=0.0;
            if(p>1.0)p=1.0;
            llOwnerSay("Item "+(string)i+" progress="+(string)p);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set endpoints A/B, tangent vectors TA/TB and T0..1. Owner touch prints calculations only.

Stop / restore: Disable/remove. No prim motion or appearance is changed.

Tangents are derivatives with respect to normalized parameter, not automatically metres-per-second.

// Original Incoprea. MIT. Motion planning only.
vector A=ZERO_VECTOR;
vector B=<6.0,0.0,0.0>;
vector TA=<2.0,5.0,0.0>;
vector TB=<2.0,-3.0,0.0>;
float T=0.5;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(T<0.0||T>1.0)
        {
            llOwnerSay("T must be0..1.");
            return;
        }
        float t2=T*T;
        float t3=t2*T;
        vector p=(2.0*t3-3.0*t2+1.0)*A+(t3-2.0*t2+T)*TA+(-2.0*t3+3.0*t2)*B+(t3-t2)*TB;
        llOwnerSay("Hermite point="+(string)p);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare nonphysical unattached root with keyframed-motion-compatible prim accounting, commonly an appropriate Convex Hull shape configured manually. Owner-touch starts.

Stop / restore: Owner-touch clears keyframed motion at the current position. It does not return Home; reposition manually if needed.

Do not change link topology, attachment state or physics while running. Selection can pause simulator motion. One-shot examples keep their armed flag until the next owner touch clears it, even after the path finishes; they do not infer completion from wall-clock timers. KFM affects actual collision geometry and can push physical objects. Use a clear test area. It ignores nonphysical collision obstacles; this script never changes physics shape or physical status. OpenSim support must be checked.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetAttached()||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)llSetKeyframedMotion([<0.5,0.0,0.0>,4.0],[KFM_DATA,KFM_TRANSLATION,KFM_MODE,KFM_PING_PONG]);
        else llSetKeyframedMotion([],[]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            llSetKeyframedMotion([],[]);
            active=FALSE;
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in a child at the first stop. Travel is 0.6 meters along root X. Owner-touch begins a repeating 12-second cycle.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. Each leg takes four seconds with a two-second dwell at each end. The movement is time-based, so lag does not accumulate as extra steps.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            float t=llGetTime();
            t-=12.0*llFloor(t/12.0);
            float f=0.0;
            if(t<4.0)f=t/4.0;
            else if(t<6.0)f=1.0;
            else if(t<10.0)f=1.0-(t-6.0)/4.0;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home+<0.6*f,0.0,0.0>]);
            llSetTimerEvent(0.2);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        float t=llGetTime();
        t-=12.0*llFloor(t/12.0);
        float f=0.0;
        if(t<4.0)f=t/4.0;
        else if(t<6.0)f=1.0;
        else if(t<10.0)f=1.0-(t-6.0)/4.0;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home+<0.6*f,0.0,0.0>]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a nonphysical child drawer in its closed position. Change TRAVEL to the desired distance in meters. The child local X axis is its travel direction.

Stop / restore: Touch again to restore the captured closed position. Do not reset, remove, or relink while open.

The saved pose survives normal running but not script reset. Link-distance limits still apply.

// Original Incoprea example. MIT. Not compiled or tested in-world.
float TRAVEL = 0.5;
vector closed;
vector travel;
integer opened;
default
{
    state_entry()
    {
        closed = llGetLocalPos();
        travel = <TRAVEL, 0.0, 0.0> * llGetLocalRot();
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner() || llGetLinkNumber() < 2) return;
        if (llGetStatus(STATUS_PHYSICS)) return;
        opened = !opened;
        vector target = closed;
        if (opened) target += travel;
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_POS_LOCAL, target]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a nonphysical object. For an orbit, link the shark first and the center sphere last, then put this script in the sphere root. Position the shark away from the sphere and point its nose along the circular path. Both linked parts turn together.

Stop / restore: Disable any scripts restarting rotation, then run Stop linked rotation. Deleting a rotation script alone may leave the effect active.

This is a visual effect on nonphysical objects: collision geometry does not orbit. It preserves the shark’s existing alignment; it does not automatically find the mesh’s nose.

// Original Incoprea example. MIT. Nonphysical object; root prim.
default
{
    state_entry()
    {
        llTargetOmega(<0.0, 0.0, 1.0>, 0.10, 1.0);
    }
    on_rez(integer parameter)
    {
        llResetScript();
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a nonphysical linkset with the decorative prims linked as children. Put in the root.

Stop / restore: Use Stop linked rotation. It clears target-omega from every prim in this linkset.

This spins each child in place; it does not move child prims around the root. Visual only for nonphysical objects.

// Original Incoprea example. Nonphysical linked build; root prim.
default
{
    state_entry()
    {
        llSetLinkPrimitiveParamsFast(LINK_ALL_CHILDREN,
        [PRIM_OMEGA, <0.0, 0.0, 1.0>, 0.05, 1.0]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a nonphysical child. Edit STOPS as offsets from its startup location; keep the first entry ZERO_VECTOR.

Stop / restore: Cycle until Home restored before removing or resetting. Do not relink while offset.

Use a small nonphysical rezzed build with room around it. This changes real geometry, not just a viewer effect. Restore before reset, relink, or removal; a script-memory snapshot is not a permanent backup. A step is immediate. Use short offsets within the link limits.

// Original Incoprea. MIT. Not compiled or tested in-world.
list STOPS=[ZERO_VECTOR,<0.5,0.0,0.0>,<0.5,0.5,0.0>];
integer index;
vector home;
default
{
    state_entry()
    {
        home=llGetLocalPos();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS)||!llGetListLength(STOPS))return;
        index=(index+1)%llGetListLength(STOPS);
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home+llList2Vector(STOPS,index)]);
        if(!index)llOwnerSay("Home restored.");
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in a nonphysical child part. Owner-touch moves it half a meter radially away from the root. Child must not be centered on root.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Use a small nonphysical rezzed build with room around it. This changes real geometry, not just a viewer effect. Restore before reset, relink, or removal; a script-memory snapshot is not a permanent backup. This is a single component reveal, useful when each child needs its own independent switch.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_POS_LOCAL]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS)||llVecMag(llList2Vector(saved,0))<0.01)return;
        preview = !preview;
        if (preview)
        {
            vector pos=llList2Vector(saved,0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,pos+llVecNorm(pos)*0.5]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a small nonphysical child prim. Verify there are no seated avatars or tight collision clearances.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Use a small nonphysical rezzed build with room around it. This changes real geometry, not just a viewer effect. Restore before reset, relink, or removal; a script-memory snapshot is not a permanent backup. Simulator size limits may clamp the requested scale. The prim center stays fixed.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_SIZE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview = !preview;
        if (preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_SIZE,llList2Vector(saved,0)*1.2]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_SIZE]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in the root of a moving object or a suitable attachment. Owner-touch turns the instrument on and off.

Stop / restore: Touch to stop and restore the original hover text before removal.

Reads existing velocity only; it never changes physical status, vehicle settings, or movement. Teleports and scripted position jumps need not appear as meaningful velocity.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer active;
list original;
default
{
    state_entry()
    {
        original = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_TEXT]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        active = !active;
        if (active) llSetTimerEvent(0.5);
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_TEXT] + original);
        }
    }
    timer()
    {
        float speed = llVecMag(llGetVel());
        llSetText((string)(llRound(speed * 10.0) / 10.0) + " m/s\n"
        + (string)(llRound(speed * 36.0) / 10.0) + " km/h", <0.7, 1.0, 0.8>, 1.0);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in an arrow child on an already moving object. For this example use nonphysical scripted movement that reports velocity meaningfully.

Stop / restore: Owner-touch to stop and restore the captured starting pose before removing, resetting, or relinking.

Use a small nonphysical rezzed build with clear space. Actual prim transforms change. Original poses live only in script memory. Do not change physical status or link topology during use. It never enables physics or drives the vehicle. Position jumps may have zero reported velocity. Stationary states preserve the last direction.

// Original Incoprea. MIT. Not compiled or tested in-world.
vector home;
rotation rest;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        rest=llGetLocalRot();
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()||!valid||llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        active=!active;
        if(active)
        {
            llResetTime();
            vector velocity=llGetVel();
            if(llVecMag(velocity)>0.05)
            {
                vector local=llVecNorm(velocity)/llGetRootRotation();
                llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,local)]);
            }
            llSetTimerEvent(0.5);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home,PRIM_ROT_LOCAL,rest]);
        }
    }
    timer()
    {
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
        {
            llSetTimerEvent(0.0);
            active=FALSE;
            return;
        }
        vector velocity=llGetVel();
        if(llVecMag(velocity)>0.05)
        {
            vector local=llVecNorm(velocity)/llGetRootRotation();
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,local)]);
        }
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
            llSetTimerEvent(0.0);
            llOwnerSay("Links changed; stopped without restoring. Reposition and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare owned prim. Set radius, sweep and count2..12. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Assumes each exhibit faces local+X; a mesh modeled along another axis needs an additional offset.

// Original Incoprea. MIT. Planning only.
float RADIUS=5.0;
float SWEEP=150.0;
integer COUNT=7;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RADIUS<=0.0||COUNT<2||COUNT>12)
        {
            llOwnerSay("Invalid radius/count.");
            return;
        }
        integer i;
        for(i=0;i<COUNT;++i)
        {
            float degrees=-SWEEP*0.5+SWEEP*(float)i/(COUNT-1);
            float a=degrees*DEG_TO_RAD;
            llOwnerSay("Position="+(string)<RADIUS*llCos(a),RADIUS*llSin(a),0.0>+" inward yaw="+(string)(degrees+180.0));
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded.

Stop / restore: Remove or disable. This inspector changes no build properties.

Does not turn lights off or alter materials. Viewer light limits and graphics settings determine what is visible; this is a configuration inventory.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        integer i;
        integer active;
        for(i=1;i<=total;++i)
        {
            list light=llGetLinkPrimitiveParams(i,[PRIM_POINT_LIGHT]);
            if(llList2Integer(light,0))
            {
                ++active;
                llOwnerSay("Light "+(string)i+" "+llGetLinkName(i)+": intensity="+llList2String(light,2)+", radius="+llList2String(light,3));
            }
        }
        llOwnerSay("Enabled point lights: "+(string)active);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in your own rezzed test object. Place inside a prim running a slideshow or texture selector. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

Observes texture UUID changes only, not UV animation, pixel changes or PBR assets. Fast intermediate swaps can be missed.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
list assets;
list counts;
integer faces;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    integer i;
    for(i=0;i<faces;++i)llOwnerSay("Face "+(string)i+" observed asset transitions="+(string)llList2Integer(counts,i));
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        faces=llGetNumberOfSides();
        if(faces>32)return;
        assets=[];
        counts=[];
        integer i;
        for(i=0;i<faces;++i)
        {
            assets += [llList2String(llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,i]),0)];
            counts += [0];
        }
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        if(llGetNumberOfSides()!=faces)
        {
            llOwnerSay("Face count changed; ending session.");
            finish();
            return;
        }
        integer i;
        for(i=0;i<faces;++i)
        {
            string asset=llList2String(llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,i]),0);
            if(asset!=llList2String(assets,i))
            {
                assets=llListReplaceList(assets,[asset],i,i);
                counts=llListReplaceList(counts,[llList2Integer(counts,i)+1],i,i);
            }
        }
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5 · API reference 6

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch four landmarks on the same object/linkset. Collect 4 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

All samples have equal weight; this is not a volume or mass centroid. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=4)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<4)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 4.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector centre=(a+b+c+d)*0.25;
        float maximum;
        integer i;
        for(i=0;i<4;++i)
        {
            float distance=llVecDist(centre,llList2Vector(points,i));
            if(distance>maximum)maximum=distance;
        }
        llOwnerSay("Sample centroid="+(string)centre+" maximum sample radius="+(string)maximum);
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Use a spare owned prim. Set COUNT1..16 and spacing. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Odd totals produce one longer row; centering avoids an unintended half-cell shift.

// Original Incoprea. MIT. Planning only.
integer COUNT=9;
float SPACING=1.0;
float ROW_GAP=1.5;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(COUNT<1||COUNT>16||SPACING<=0.0)
        {
            llOwnerSay("Invalid count/spacing.");
            return;
        }
        integer i;
        for(i=0;i<COUNT;++i)
        {
            integer row=i%2;
            integer column=i/2;
            integer rowCount=COUNT/2;
            if(row==0)rowCount=(COUNT+1)/2;
            float x=(column-(rowCount-1)*0.5)*SPACING;
            llOwnerSay((string)i+": "+(string)<x,row*ROW_GAP,0.0>);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use an uncut solid box and touch as owner.

Stop / restore: Remove or disable the script. It does not change the build.

This is a mathematical box estimate, not mesh volume, physics volume, land impact, or a material-price quote. Hollow and cut prims are not accounted for.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        vector s = llGetScale();
        float volume = s.x * s.y * s.z;
        float area = 2.0 * (s.x*s.y + s.x*s.z + s.y*s.z);
        llOwnerSay("Full-box volume: " + (string)volume + " cubic meters.");
        llOwnerSay("Full-box surface area: " + (string)area + " square meters.");
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in a spare owned prim. Set endpoints A/B and choose a beam modeled along localX. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Rotation uses the shortest alignment; roll around the beam is not independently controlled.

// Original Incoprea. MIT. Calculation only.
vector A=<2.0,3.0,1.0>;
vector B=<8.0,7.0,4.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        vector delta=B-A;
        float length=llVecMag(delta);
        if(length<0.000001)
        {
            llOwnerSay("Anchors coincide.");
            return;
        }
        rotation r=llRotBetween(<1.0,0.0,0.0>,delta/length);
        llOwnerSay("Centre="+(string)((A+B)*0.5)+" length="+(string)length+" rotation="+(string)r);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set rod length greater than crank radius and crank angle degrees. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Ideal planar slider-crank; no offsets or joint thickness. This complements visual crank models with exact position math.

// Original Incoprea. MIT. Planning only.
float CRANK=1.0;
float ROD=3.0;
float ANGLE=60.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(CRANK<=0.0||ROD<=CRANK)
        {
            llOwnerSay("Need rod>crank>0.");
            return;
        }
        float a=ANGLE*DEG_TO_RAD;
        float y=CRANK*llSin(a);
        float x=CRANK*llCos(a)+llSqrt(ROD*ROD-y*y);
        llOwnerSay("SliderX="+(string)x+" rod angle degrees="+(string)(llAsin(-y/ROD)*RAD_TO_DEG));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Put in a spare owned prim. Set width/height and radius no greater than half the smaller dimension. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Ideal outline only; no geometry or collision shape is generated.

// Original Incoprea. MIT. Calculation only.
float W=8.0;
float H=5.0;
float R=0.8;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(W<=0.0||H<=0.0||R<0.0||2.0*R>W||2.0*R>H)
        {
            llOwnerSay("Radius does not fit.");
            return;
        }
        llOwnerSay("Area="+(string)(W*H-(4.0-PI)*R*R)+" perimeter="+(string)(2.0*(W+H)-8.0*R+TWO_PI*R));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set image width/height, overlap, mat width and frame width. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Overlap must leave positive visible image dimensions; borders are symmetric.

// Original Incoprea. MIT. Calculation only.
float IMAGE_W=2.0;
float IMAGE_H=1.4;
float OVERLAP=0.02;
float MAT=0.15;
float FRAME=0.08;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(IMAGE_W<=2.0*OVERLAP||IMAGE_H<=2.0*OVERLAP||OVERLAP<0.0||MAT<0.0||FRAME<0.0)
        {
            llOwnerSay("Invalid frame inputs.");
            return;
        }
        float apertureW=IMAGE_W-2.0*OVERLAP;
        float apertureH=IMAGE_H-2.0*OVERLAP;
        llOwnerSay("Aperture="+(string)<apertureW,apertureH,0.0>+" outer="+(string)<apertureW+2.0*(MAT+FRAME),apertureH+2.0*(MAT+FRAME),0.0>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set positive MODULE and tooth counts at least8. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Ideal spur-gear pitch geometry, not a printable tooth profile or structural design.

// Original Incoprea. MIT. Planning only.
float MODULE=0.1;
integer TEETH_A=24;
integer TEETH_B=36;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(MODULE<=0.0||TEETH_A<8||TEETH_B<8)
        {
            llOwnerSay("Invalid module/tooth counts.");
            return;
        }
        float da=MODULE*TEETH_A;
        float db=MODULE*TEETH_B;
        llOwnerSay("Pitch diameters="+(string)da+","+(string)db+" center spacing="+(string)((da+db)*0.5)+" output/input speed="+(string)(-(float)TEETH_A/(float)TEETH_B));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in your own rezzed test object. Put in an animated child; start by touching that child. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

Root movement does not affect the local envelope. Stops if the script prim ceases to be a child; no animation is changed.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
vector low;
vector high;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    llOwnerSay("Observed child local envelope min="+(string)low+" max="+(string)high+" span="+(string)(high-low));
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        if(llGetLinkNumber()<2)
        {
            llOwnerSay("Use a linked child.");
            return;
        }
        low=llGetLocalPos();
        high=low;
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        if(llGetLinkNumber()<2)
        {
            finish();
            return;
        }
        vector p=llGetLocalPos();
        if(p.x<low.x)low.x=p.x;
        if(p.y<low.y)low.y=p.y;
        if(p.z<low.z)low.z=p.z;
        if(p.x>high.x)high.x=p.x;
        if(p.y>high.y)high.y=p.y;
        if(p.z>high.z)high.z=p.z;
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Name two other children anchor_a and anchor_b. Owner-touch the child to preview; touch again to restore.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Copies only their midpoint. Both anchors must be distinct from the selected part; no root or avatar anchors.

// Original Incoprea. MIT. Test on a spare copy first.
integer selected;
key identity;
list original;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        if(selected)
        {
            if(llGetLinkKey(selected)==identity)llSetLinkPrimitiveParamsFast(selected,[PRIM_POS_LOCAL,llList2Vector(original,0),PRIM_ROT_LOCAL,llList2Rot(original,1),PRIM_SIZE,llList2Vector(original,2)]);
            else llOwnerSay("Topology changed; restore manually from backup.");
            selected=0;
            return;
        }
        integer link=llDetectedLinkNumber(0);
        if(link<2||link>llGetObjectPrimCount(llGetKey()))
        {
            llOwnerSay("Touch a child prim.");
            return;
        }
        list data=llGetLinkPrimitiveParams(link,[PRIM_POS_LOCAL,PRIM_ROT_LOCAL,PRIM_SIZE]);
        vector p=llList2Vector(data,0);
        rotation r=llList2Rot(data,1);
        vector size=llList2Vector(data,2);
        integer i;
        integer a;
        integer b;
        integer ca;
        integer cb;
        integer total=llGetObjectPrimCount(llGetKey());
        if(total>32)return;
        for(i=2;i<=total;++i)
        {
            if(llGetLinkName(i)=="anchor_a")
            {
                a=i;
                ++ca;
            }
            if(llGetLinkName(i)=="anchor_b")
            {
                b=i;
                ++cb;
            }
        }
        if(ca!=1||cb!=1||a==link||b==link)
        {
            llOwnerSay("Need two unique other anchor children.");
            return;
        }
        p=(llList2Vector(llGetLinkPrimitiveParams(a,[PRIM_POS_LOCAL]),0)+llList2Vector(llGetLinkPrimitiveParams(b,[PRIM_POS_LOCAL]),0))*0.5;
        selected=link;
        identity=llGetLinkKey(link);
        original=data;
        llSetLinkPrimitiveParamsFast(link,[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,r,PRIM_SIZE,size]);
        llOwnerSay("Preview applied; touch again to restore.");
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set wall dimensions and artwork grid inputs; total items at most16. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Rejects a grid that exceeds the wall; all works are assumed equal-sized.

// Original Incoprea. MIT. Planning only.
float WALL_W=10.0;
float WALL_H=5.0;
float ITEM_W=2.0;
float ITEM_H=1.2;
float GAP_X=0.5;
float GAP_Y=0.4;
integer COLUMNS=3;
integer ROWS=2;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(COLUMNS<1||ROWS<1||COLUMNS*ROWS>16||ITEM_W<=0.0||ITEM_H<=0.0||GAP_X<0.0||GAP_Y<0.0)
        {
            llOwnerSay("Invalid grid.");
            return;
        }
        float width=COLUMNS*ITEM_W+(COLUMNS-1)*GAP_X;
        float height=ROWS*ITEM_H+(ROWS-1)*GAP_Y;
        if(width>WALL_W||height>WALL_H)
        {
            llOwnerSay("Grid does not fit wall.");
            return;
        }
        integer row;
        integer col;
        for(row=0;row<ROWS;++row)for(col=0;col<COLUMNS;++col)llOwnerSay((string)<-width*0.5+ITEM_W*0.5+col*(ITEM_W+GAP_X),0.0,-height*0.5+ITEM_H*0.5+row*(ITEM_H+GAP_Y)>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Name another child reference_center. Use nonphysical moving child. Touch again restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Copies position only. Overlap intentional.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
vector home;
default
{
    state_entry()
    {
        home=llGetLocalPos();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview=!preview;
        if(preview)
        {
            integer i;
            integer target;
            integer count;
            for(i=2;i<=llGetNumberOfPrims();++i)if(i!=llGetLinkNumber()&&llGetLinkName(i)=="reference_center")
            {
                target=i;
                ++count;
            }
            if(count!=1)
            {
                preview=FALSE;
                llOwnerSay("Need one other reference_center child.");
                return;
            }
            vector p=llList2Vector(llGetLinkPrimitiveParams(target,[PRIM_POS_LOCAL]),0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch corners in boundary order. Collect 4 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Equal diagonals alone do not prove a rectangle; the full side/diagonal report helps diagnose the shape. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=4)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<4)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 4.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        llOwnerSay("Opposite side differences="+(string)llFabs(llVecDist(a,b)-llVecDist(c,d))+","+(string)llFabs(llVecDist(b,c)-llVecDist(d,a)));
        llOwnerSay("Diagonal difference="+(string)llFabs(llVecDist(a,c)-llVecDist(b,d)));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Place in a spare owned prim. Set ordered XY VERTICES, at least3. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Consistent turns are a convexity indicator for a simple polygon; this alone does not rule out every self-intersection or repeated vertex.

// Original Incoprea. MIT. Planning only.
list VERTICES=[<0.0,0.0,0.0>,<4.0,0.0,0.0>,<2.0,1.0,0.0>,<4.0,4.0,0.0>,<0.0,4.0,0.0>];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(VERTICES);
        if(n<3)
        {
            llOwnerSay("Need three vertices.");
            return;
        }
        integer positive;
        integer negative;
        integer i;
        for(i=0;i<n;++i)
        {
            vector a=llList2Vector(VERTICES,(i+1)%n)-llList2Vector(VERTICES,i);
            vector b=llList2Vector(VERTICES,(i+2)%n)-llList2Vector(VERTICES,(i+1)%n);
            float cross=a.x*b.y-a.y*b.x;
            if(cross>0.000001)positive=TRUE;
            if(cross< -0.000001)negative=TRUE;
        }
        llOwnerSay("Mixed turns/concavity="+(string)(positive&&negative)+" all collinear="+(string)(!positive&&!negative));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in the prim and touch as owner.

Stop / restore: Remove or disable. This inspector changes no build properties.

Second Life Description is limited to 127 bytes and printable ASCII excluding pipe. This examines the stored value, which may already have been normalized or truncated.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        string description=llGetObjectDesc();
        integer issues;
        integer i;
        for(i=0;i<llStringLength(description);++i)
        {
            integer code=llOrd(description,i);
            if(code<32 || code>126 || code==124) ++issues;
        }
        llOwnerSay("Stored length: "+(string)llStringLength(description)+"; nonpermitted-character findings: "+(string)issues);
        if(llStringLength(description)>127) llOwnerSay("Exceeds the documented 127-byte ASCII budget.");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set RADIUS and TOLERANCE. Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Ignores Z height and does not infer a mesh’s visual center. A radial layout can legitimately contain off-ring components such as a hub.

// Original Incoprea example. MIT.
float RADIUS=3.0;
float TOLERANCE=0.05;
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        if(RADIUS<0 || TOLERANCE<0)
        {
            llOwnerSay("Use nonnegative radius and tolerance.");
            return;
        }
        integer i;
        for(i=2;i<=total;++i)
        {
            vector p=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
            float radius=llSqrt(p.x*p.x+p.y*p.y);
            if(llFabs(radius-RADIUS)>TOLERANCE)llOwnerSay("Link "+(string)i+" radius="+(string)radius+" m");
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set positive artwork width/height, frame width/height and yaw. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Tests the bounding rectangle at the chosen rotation; no search for the best angle is performed.

// Original Incoprea. MIT. Planning only.
float W=3.0;
float H=2.0;
float FRAME_W=4.0;
float FRAME_H=3.0;
float ANGLE=25.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(W<=0.0||H<=0.0||FRAME_W<=0.0||FRAME_H<=0.0)
        {
            llOwnerSay("Positive dimensions required.");
            return;
        }
        float a=ANGLE*DEG_TO_RAD;
        float width=llFabs(W*llCos(a))+llFabs(H*llSin(a));
        float height=llFabs(W*llSin(a))+llFabs(H*llCos(a));
        llOwnerSay("Turned bounds="+(string)<width,height,0.0>+" fits="+(string)(width<=FRAME_W&&height<=FRAME_H));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Set LEVEL and TOLERANCE. Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Checks centers only, not bottoms or mesh vertices. The plane rotates with the root; it is not necessarily horizontal in the region.

// Original Incoprea example. MIT.
float LEVEL=0.0;
float TOLERANCE=0.01;
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        if(TOLERANCE<0)
        {
            llOwnerSay("Tolerance cannot be negative.");
            return;
        }
        integer i;
        for(i=2;i<=total;++i)
        {
            vector position=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
            if(llFabs(position.z-LEVEL)>TOLERANCE)llOwnerSay("Link "+(string)i+" local Z="+(string)position.z+" differs from level "+(string)LEVEL);
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set REFERENCE and TOLERANCE. Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Compares scale settings, not visible geometry. Useful for a set of intended identical modules; intentionally varied parts will be reported.

// Original Incoprea example. MIT.
vector REFERENCE=<1,1,1>;
float TOLERANCE=0.001;
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        if(TOLERANCE<0)
        {
            llOwnerSay("Tolerance cannot be negative.");
            return;
        }
        integer i;
        integer findings;
        for(i=1;i<=total;++i)
        {
            vector size=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_SIZE]),0);
            if(llVecDist(size,REFERENCE)>TOLERANCE)
            {
                ++findings;
                llOwnerSay("Scale differs at "+(string)i+": "+(string)size);
            }
        }
        llOwnerSay("Findings: "+(string)findings);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch endpoints of edgeA, then endpoints of edgeB. Collect 4 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

The angle is direction-independent; reversing an edge does not turn parallel into180 degrees. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=4)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<4)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 4.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector u=b-a;
        vector v=d-c;
        if(llVecMag(u)<0.000001||llVecMag(v)<0.000001)
        {
            llOwnerSay("Zero-length edge.");
            return;
        }
        float dot=llFabs(llVecNorm(u)*llVecNorm(v));
        if(dot>1.0)dot=1.0;
        float angle=llAcos(dot)*RAD_TO_DEG;
        float offset=llVecMag((c-a)%u)/llVecMag(u);
        llOwnerSay("Parallelism angle="+(string)angle+" first-start offset="+(string)offset);
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5 · API reference 6

Setup: Use a spare owned prim. Set alternating CENTER/RADIUS pairs, up to six spheres. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Spherical bounds are conservative for many shapes; a negative gap indicates overlapping bounds, not necessarily intersecting meshes.

// Original Incoprea. MIT. Planning only.
list BOUNDS=[<0.0,0.0,0.0>,1.0,<3.0,0.0,0.0>,1.2,<1.5,2.0,0.0>,0.8];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(BOUNDS);
        if(n%2||n>12)
        {
            llOwnerSay("Use at most six center/radius pairs.");
            return;
        }
        integer i;
        integer j;
        for(i=0;i<n;i+=2)
        {
            float ri=llList2Float(BOUNDS,i+1);
            if(ri<0.0)
            {
                llOwnerSay("Negative radius.");
                return;
            }
            for(j=i+2;j<n;j+=2)
            {
                float rj=llList2Float(BOUNDS,j+1);
                if(rj<0.0)
                {
                    llOwnerSay("Negative radius.");
                    return;
                }
                float gap=llVecDist(llList2Vector(BOUNDS,i),llList2Vector(BOUNDS,j))-ri-rj;
                llOwnerSay("Pair "+(string)(i/2)+"/"+(string)(j/2)+" gap="+(string)gap);
            }
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set step count, total turns and total rise positive. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Rise per revolution is a geometric clearance indicator only; it excludes tread thickness and avatar collision dimensions.

// Original Incoprea. MIT. Calculation only.
integer STEPS=24;
float TURNS=1.5;
float RISE=6.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(STEPS<1||TURNS<=0.0||RISE<=0.0)
        {
            llOwnerSay("Positive inputs required.");
            return;
        }
        llOwnerSay("Angle per step="+(string)(360.0*TURNS/STEPS)+" rise per step="+(string)(RISE/STEPS)+" vertical rise per revolution="+(string)(RISE/TURNS));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a rezzed object without seated avatars. Touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

The physical bounds center is not necessarily a visual or mass center. This helps explain why a rotation can look offset, without deciding the correct artistic pivot.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed object.");
            return;
        }
        list b=llGetBoundingBox(llGetKey());
        if(llGetListLength(b)!=2)
        {
            llOwnerSay("Bounds unavailable.");
            return;
        }
        vector center=(llList2Vector(b,0)+llList2Vector(b,1))*0.5;
        llOwnerSay("Bounds center relative to root: "+(string)center);
        llOwnerSay("Root-to-bounds-center distance: "+(string)llVecMag(center)+" m");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded.

Stop / restore: Remove or disable. This inspector changes no build properties.

Snapshot persists only until reset. Relinking can reorder keys; this check reports topology changes without identifying avatars.

// Original Incoprea example. MIT.
list prior;
integer ready;
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        list current=[];
        integer i;
        for(i=1;i<=total;++i) current += [llGetLinkKey(i)];
        if(!ready)
        {
            prior=current;
            ready=TRUE;
            llOwnerSay("Topology snapshot recorded.");
            return;
        }
        if(llGetListLength(prior)!=total) llOwnerSay("Prim count changed from "+(string)llGetListLength(prior)+" to "+(string)total);
        for(i=0;i<total;++i) if(llList2Key(current,i)!=llList2Key(prior,i)) llOwnerSay("Different prim at link "+(string)(i+1));
        prior=current;
        llOwnerSay("Topology baseline updated.");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set at least3 POINTS with a noncollinear first triple and nonnegative tolerance. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

A degenerate first triple is rejected rather than searching for another triple.

// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,0.0,0.0>,<3.0,0.0,0.0>,<0.0,3.0,0.0>,<2.0,2.0,0.02>];
float TOLERANCE=0.01;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(POINTS);
        if(n<3||TOLERANCE<0.0)
        {
            llOwnerSay("Invalid inputs.");
            return;
        }
        vector origin=llList2Vector(POINTS,0);
        vector normal=(llList2Vector(POINTS,1)-origin)%(llList2Vector(POINTS,2)-origin);
        if(llVecMag(normal)<0.000001)
        {
            llOwnerSay("First triple is collinear.");
            return;
        }
        normal=llVecNorm(normal);
        float maximum;
        integer i;
        for(i=0;i<n;++i)
        {
            float d=llFabs((llList2Vector(POINTS,i)-origin)*normal);
            if(d>maximum)maximum=d;
        }
        llOwnerSay("Maximum deviation="+(string)maximum+" within tolerance="+(string)(maximum<=TOLERANCE));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a nonphysical child at its resting orientation. Owner-touch opens the axis menu.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Multiplication applies each increment in the child local frame; axes therefore move with the child.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
rotation home;
init()
{
    home=llGetLocalRot();
}
show()
{
    menu("Child local rotation: 15 degree steps",["X+","X-","Y+","Y-","Z+","Z-","Home"]);
}
choose(string s)
{
    if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
    rotation target=llGetLocalRot();
    vector step=ZERO_VECTOR;
    if(s=="Home")target=home;
    else
    {
        if(s=="X+")step.x=15.0;
        else if(s=="X-")step.x=-15.0;
        else if(s=="Y+")step.y=15.0;
        else if(s=="Y-")step.y=-15.0;
        else if(s=="Z+")step.z=15.0;
        else if(s=="Z-")step.z=-15.0;
        else return;
        target=llEuler2Rot(step*DEG_TO_RAD)*target;
    }
    llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,target]);
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a nonphysical child; owner-touch opens X/Y/Z step buttons and Home.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Actual geometry moves. Keep within link distances and do not relink while offset.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
vector home;
init()
{
    home=llGetLocalPos();
}
show()
{
    menu("Child position: 5 cm root-local steps",["X+","X-","Y+","Y-","Z+","Z-","Home"]);
}
choose(string s)
{
    if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))
    {
        llOwnerSay("Use a nonphysical child.");
        close();
        return;
    }
    vector p=llGetLocalPos();
    if(s=="Home")p=home;
    else if(s=="X+")p.x+=0.05;
    else if(s=="X-")p.x-=0.05;
    else if(s=="Y+")p.y+=0.05;
    else if(s=="Y-")p.y-=0.05;
    else if(s=="Z+")p.z+=0.05;
    else if(s=="Z-")p.z-=0.05;
    else return;
    llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,p]);
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put the script inside a child prim of a linkset and touch that child as owner.

Stop / restore: Remove or disable the script. It does not change the build.

The script refuses root and unlinked prims because their local-position semantics differ. Rotation is printed as Euler degrees for convenient editing.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        if (llGetLinkNumber() < 2)
        {
            llOwnerSay("Place this inside a child prim, not the root.");
            return;
        }
        llOwnerSay("Root-local position: " + (string)llGetLocalPos());
        llOwnerSay("Root-local Euler degrees: " + (string)(llRot2Euler(llGetLocalRot()) * RAD_TO_DEG));
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set board width, minimum card width and gap. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Returns a layout plan, not a browser CSS setting. Count is bounded to64 and never drops below one.

// Original Incoprea. MIT. Planning only.
float WIDTH=12.0;
float MINIMUM=2.5;
float GAP=0.4;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(WIDTH<=0.0||MINIMUM<=0.0||GAP<0.0)
        {
            llOwnerSay("Invalid dimensions.");
            return;
        }
        integer columns=llFloor((WIDTH+GAP)/(MINIMUM+GAP));
        if(columns<1)columns=1;
        if(columns>64)columns=64;
        float card=(WIDTH-(columns-1)*GAP)/(float)columns;
        llOwnerSay("Columns="+(string)columns+" card width="+(string)card+" pitch="+(string)(card+GAP));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Set INNER and OUTER radii in meters. Owner-touch the child to preview; touch again to restore.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Preserves height and radial bearing. A center exactly on the axis uses +X as its defined fallback direction.

// Original Incoprea. MIT. Test on a spare copy first.
integer selected;
key identity;
list original;
float INNER=1.0;
float OUTER=3.0;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        if(selected)
        {
            if(llGetLinkKey(selected)==identity)llSetLinkPrimitiveParamsFast(selected,[PRIM_POS_LOCAL,llList2Vector(original,0),PRIM_ROT_LOCAL,llList2Rot(original,1),PRIM_SIZE,llList2Vector(original,2)]);
            else llOwnerSay("Topology changed; restore manually from backup.");
            selected=0;
            return;
        }
        integer link=llDetectedLinkNumber(0);
        if(link<2||link>llGetObjectPrimCount(llGetKey()))
        {
            llOwnerSay("Touch a child prim.");
            return;
        }
        list data=llGetLinkPrimitiveParams(link,[PRIM_POS_LOCAL,PRIM_ROT_LOCAL,PRIM_SIZE]);
        vector p=llList2Vector(data,0);
        rotation r=llList2Rot(data,1);
        vector size=llList2Vector(data,2);
        if(INNER<0.0||OUTER<INNER||OUTER>10.0)return;
        vector flat=<p.x,p.y,0.0>;
        float radius=llVecMag(flat);
        float chosen=radius;
        if(chosen<INNER)chosen=INNER;
        if(chosen>OUTER)chosen=OUTER;
        vector direction=<1.0,0.0,0.0>;
        if(radius>0.00001)direction=flat/radius;
        flat=direction*chosen;
        p=<flat.x,flat.y,p.z>;
        selected=link;
        identity=llGetLinkKey(link);
        original=data;
        llSetLinkPrimitiveParamsFast(link,[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,r,PRIM_SIZE,size]);
        llOwnerSay("Preview applied; touch again to restore.");
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set REFERENCE and LIMIT_DEGREES. Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Uses quaternion angular distance, avoiding Euler wraparound errors. Does not detect whether differently authored meshes visually face the same way.

// Original Incoprea example. MIT.
rotation REFERENCE=ZERO_ROTATION;
float LIMIT_DEGREES=1.0;
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        if(LIMIT_DEGREES<0 || LIMIT_DEGREES>180)
        {
            llOwnerSay("Angle limit must be 0-180.");
            return;
        }
        integer i;
        for(i=2;i<=total;++i)
        {
            rotation r=llList2Rot(llGetLinkPrimitiveParams(i,[PRIM_ROT_LOCAL]),0);
            float angle=llAngleBetween(r,REFERENCE)*RAD_TO_DEG;
            if(angle>LIMIT_DEGREES)llOwnerSay("Link "+(string)i+" differs by "+(string)angle+" degrees.");
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set positive TARGET and nonnegative ACTUAL dimensions plus tolerance. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

This is a numerical inspection helper; tolerances are user-selected and not manufacturing advice.

// Original Incoprea. MIT. Planning only.
vector TARGET=<4.0,2.0,1.0>;
vector ACTUAL=<4.02,1.98,1.005>;
float TOLERANCE=0.015;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(TARGET.x<=0.0||TARGET.y<=0.0||TARGET.z<=0.0||ACTUAL.x<0.0||ACTUAL.y<0.0||ACTUAL.z<0.0||TOLERANCE<0.0)
        {
            llOwnerSay("Invalid dimensions/tolerance.");
            return;
        }
        vector delta=ACTUAL-TARGET;
        vector percent=<100.0*delta.x/TARGET.x,100.0*delta.y/TARGET.y,100.0*delta.z/TARGET.z>;
        llOwnerSay("Delta="+(string)delta+" percent="+(string)percent+" within="+(string)(llFabs(delta.x)<=TOLERANCE&&llFabs(delta.y)<=TOLERANCE&&llFabs(delta.z)<=TOLERANCE));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the inspected prim and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

This checks only two legacy finish settings. Different textures, colors, PBR materials, or normals can still make faces look different.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        list reference=llGetPrimitiveParams([PRIM_GLOW,0,PRIM_FULLBRIGHT,0]);
        integer face;
        for(face=1;face<llGetNumberOfSides();++face)
        {
            list finish=llGetPrimitiveParams([PRIM_GLOW,face,PRIM_FULLBRIGHT,face]);
            if(llList2Float(finish,0)!=llList2Float(reference,0) || llList2Integer(finish,1)!=llList2Integer(reference,1))llOwnerSay("Finish differs on face "+(string)face+": glow="+llList2String(finish,0)+", fullbright="+llList2String(finish,1));
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch endpoints of the reference span, then endpoints of the comparison span. Collect 4 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Spans may have different directions. The first span must have nonzero length. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=4)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<4)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 4.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        float reference=llVecDist(a,b);
        float measured=llVecDist(c,d);
        if(reference<0.000001)
        {
            llOwnerSay("Reference span is zero.");
            return;
        }
        llOwnerSay("Reference="+(string)reference+" comparison="+(string)measured+" ratio="+(string)(measured/reference));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Use a spare owned prim. Set NX/NY/NZ and INDEX; total cell count limited to1000000. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

X changes fastest, thenY, thenZ. This is useful for deterministic storage and generated layouts.

// Original Incoprea. MIT. Planning only.
integer NX=5;
integer NY=4;
integer NZ=3;
integer INDEX=37;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(NX<1||NY<1||NZ<1||NX>100||NY>100||NZ>100||INDEX<0||INDEX>=NX*NY*NZ)
        {
            llOwnerSay("Invalid grid/index.");
            return;
        }
        integer x=INDEX%NX;
        integer y=(INDEX/NX)%NY;
        integer z=INDEX/(NX*NY);
        llOwnerSay("Cell="+(string)<x,y,z>+" restored index="+(string)(x+NX*(y+NY*z)));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set positive MODULE/TEETH and signed TURNS. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Ignores backlash, tooth shape, friction and mechanical loading.

// Original Incoprea. MIT. Planning only.
float MODULE=0.08;
integer TEETH=20;
float TURNS=1.5;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(MODULE<=0.0||TEETH<1)
        {
            llOwnerSay("Positive module/teeth required.");
            return;
        }
        float diameter=MODULE*TEETH;
        llOwnerSay("Travel="+(string)(PI*diameter*TURNS)+" travel per tooth="+(string)(PI*MODULE));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set positive RUN_UNITS and nonnegative RISE_UNITS. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Output formats describe the same ideal slope; they do not evaluate real construction suitability.

// Original Incoprea. MIT. Calculation only.
float RISE_UNITS=5.0;
float RUN_UNITS=12.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RISE_UNITS<0.0||RUN_UNITS<=0.0)
        {
            llOwnerSay("Invalid rise/run.");
            return;
        }
        llOwnerSay("Angle="+(string)(llAtan2(RISE_UNITS,RUN_UNITS)*RAD_TO_DEG)+" grade="+(string)(100.0*RISE_UNITS/RUN_UNITS)+" rise per metre="+(string)(RISE_UNITS/RUN_UNITS));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set positive pitch, starts andRPM; turns may be signed. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Lead equals thread pitch times starts. This only plans a virtual mechanism.

// Original Incoprea. MIT. Planning only.
float PITCH=0.02;
integer STARTS=2;
float TURNS=12.0;
float RPM=30.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(PITCH<=0.0||STARTS<1||RPM<=0.0)
        {
            llOwnerSay("Invalid screw inputs.");
            return;
        }
        float lead=PITCH*STARTS;
        llOwnerSay("Lead="+(string)lead+" travel="+(string)(lead*TURNS)+" seconds="+(string)(60.0*llFabs(TURNS)/RPM));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the exact prim and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Counts references, not texture memory, resolution, download size, or PBR maps. Repeated identifiers are counted once; hidden UUIDs are counted separately as unavailable.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        list textures=[];
        integer hidden;
        integer face;
        for(face=0;face<llGetNumberOfSides();++face)
        {
            key texture=llList2Key(llGetPrimitiveParams([PRIM_TEXTURE,face]),0);
            if(texture==NULL_KEY)++hidden;
            else if(llListFindList(textures,[texture])==-1)textures += [texture];
        }
        llOwnerSay("Unique exposed base textures: "+(string)llGetListLength(textures)+"; unavailable face keys: "+(string)hidden);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in your own rezzed test object. Set a nonzero region-space NORMAL and positive DEADBAND; move only this model. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

Crossings between samples can be missed. Start-point plane is fixed for the session; stops at a region change.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
vector NORMAL=<1.0,0.0,0.0>;
float DEADBAND=0.05;
vector origin;
vector normal;
vector region;
integer side;
integer forward;
integer reverse;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    llOwnerSay("Negative-to-positive crossings="+(string)forward+" reverse="+(string)reverse);
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        if(llVecMag(NORMAL)<0.001||DEADBAND<=0.0)return;
        origin=llGetPos();
        normal=llVecNorm(NORMAL);
        region=llGetRegionCorner();
        side=0;
        forward=0;
        reverse=0;
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        if(llGetRegionCorner()!=region)
        {
            finish();
            return;
        }
        float d=(llGetPos()-origin)*normal;
        integer next=side;
        if(d>DEADBAND)next=1;
        else if(d< -DEADBAND)next=-1;
        if(side==-1&&next==1)++forward;
        if(side==1&&next==-1)++reverse;
        side=next;
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5 · API reference 6

Setup: Use a spare owned prim. Set integer axial endpoints Q1/R1 and Q2/R2. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

This ignores blocked cells and terrain costs; it is a lower bound for obstacle-aware routes.

// Original Incoprea. MIT. Planning only.
integer Q1=0;
integer R1=0;
integer Q2=4;
integer R2=-2;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer dq=Q2-Q1;
        integer dr=R2-R1;
        integer ds=-dq-dr;
        integer distance=(llAbs(dq)+llAbs(dr)+llAbs(ds))/2;
        llOwnerSay("Hex neighbor steps="+(string)distance);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch two symmetric boundary points of the feature to center. Collect 2 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

The arithmetic midpoint does not necessarily lie on a curved surface. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=2)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<2)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 2.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector midpoint=(a+b)*0.5;
        llOwnerSay("Midpoint="+(string)midpoint+" span="+(string)llVecDist(a,b));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Set FACE. Touch as owner before and after editing the face.

Stop / restore: Remove or disable. This inspector changes no build properties.

Base/legacy texture mapping only. No values are restored. Texture identifiers may be hidden by permissions; the script checks actual returned values.

// Original Incoprea example. MIT.
integer FACE=0;
list baseline;
integer ready;
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(FACE<0 || FACE>=llGetNumberOfSides())
        {
            llOwnerSay("Invalid face.");
            return;
        }
        list current=llGetPrimitiveParams([PRIM_TEXTURE,FACE]);
        if(!ready)
        {
            baseline=current;
            ready=TRUE;
            llOwnerSay("Texture mapping baseline recorded.");
            return;
        }
        list labels=["texture","repeats","offset","angle"];
        integer i;
        for(i=0;i<4;++i) if(llList2String(current,i)!=llList2String(baseline,i)) llOwnerSay(llList2String(labels,i)+" changed: "+llList2String(baseline,i)+" -> "+llList2String(current,i));
        llOwnerSay("Comparison complete.");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in your own rezzed test object. Start while moving a test model; set TOLERANCE for your build scale. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

No forces are applied. A quiet sample streak is not proof of physics sleep or future stability.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
float TOLERANCE=0.005;
vector previous;
integer quiet;
integer settled;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    llOwnerSay("Settled="+(string)settled+" quiet samples="+(string)quiet+" elapsed seconds="+(string)(llGetTime()-began));
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        if(TOLERANCE<=0.0||TOLERANCE>0.5)return;
        previous=llGetPos();
        quiet=0;
        settled=FALSE;
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        vector current=llGetPos();
        if(llVecDist(previous,current)<=TOLERANCE)++quiet;
        else quiet=0;
        previous=current;
        if(quiet>=3)
        {
            settled=TRUE;
            finish();
            return;
        }
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Use a spare nonphysical prim no larger than ten meters per axis. Owner-touch; Home restores captured scale.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Prim center stays fixed. Mesh visual bounds and collision bounds may differ. Clamps dimensions between 0.05 and 10 meters.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
vector home;
init()
{
    home=llGetScale();
}
show()
{
    menu("Size: 5 cm increments (0.05 to 10 m)",["X+","X-","Y+","Y-","Z+","Z-","Home"]);
}
choose(string s)
{
    if(llGetStatus(STATUS_PHYSICS))return;
    vector size=llGetScale();
    if(s=="Home")size=home;
    else
    {
        if(s=="X+")size.x+=0.05;
        else if(s=="X-")size.x-=0.05;
        else if(s=="Y+")size.y+=0.05;
        else if(s=="Y-")size.y-=0.05;
        else if(s=="Z+")size.z+=0.05;
        else if(s=="Z-")size.z-=0.05;
        else return;
        if(size.x<0.05)size.x=0.05;
        if(size.y<0.05)size.y=0.05;
        if(size.z<0.05)size.z=0.05;
        if(size.x>10.0)size.x=10.0;
        if(size.y>10.0)size.y=10.0;
        if(size.z>10.0)size.z=10.0;
    }
    llSetScale(size);
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare owned prim. Set positive WIDTH and HEIGHT. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Deterministic quasi-random positions are not guaranteed to have minimum clearance and are not secure random values.

// Original Incoprea. MIT. Planning only.
float WIDTH=8.0;
float HEIGHT=5.0;
float radical(integer index,integer base)
{
    float value;
    float factor=1.0/(float)base;
    while(index>0)
    {
        value+=(index%base)*factor;
        index/=base;
        factor/=(float)base;
    }
    return value;
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(WIDTH<=0.0||HEIGHT<=0.0)
        {
            llOwnerSay("Positive dimensions required.");
            return;
        }
        integer i;
        for(i=1;i<=12;++i)llOwnerSay((string)<WIDTH*radical(i,2),HEIGHT*radical(i,3),0.0>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set count2..12, total run and positive first-to-last ratio. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

This is a terrace layout calculation rather than a staircase usability recommendation.

// Original Incoprea. MIT. Calculation only.
integer COUNT=6;
float RUN=9.0;
float FIRST_TO_LAST=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(COUNT<2||COUNT>12||RUN<=0.0||FIRST_TO_LAST<=0.0)
        {
            llOwnerSay("Invalid series.");
            return;
        }
        float last=2.0*RUN/((float)COUNT*(FIRST_TO_LAST+1.0));
        float first=last*FIRST_TO_LAST;
        float start;
        integer i;
        for(i=0;i<COUNT;++i)
        {
            float depth=first+(last-first)*(float)i/(float)(COUNT-1);
            llOwnerSay("Step "+(string)i+" start="+(string)start+" depth="+(string)depth);
            start+=depth;
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set radius positive and number of turns nonnegative. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Does not include rail fittings, thickness, end extensions or segmentation error.

// Original Incoprea. MIT. Calculation only.
float RADIUS=2.0;
float HEIGHT=5.0;
float TURNS=1.5;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RADIUS<=0.0||TURNS<0.0)
        {
            llOwnerSay("Invalid radius/turns.");
            return;
        }
        float run=TWO_PI*RADIUS*TURNS;
        llOwnerSay("Helix length="+(string)llSqrt(run*run+HEIGHT*HEIGHT)+" slope angle="+(string)(llAtan2(HEIGHT,run)*RAD_TO_DEG));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set positive LENGTH and GRAVITY. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Educational idealization: large angles, damping and simulator physics change the real period.

// Original Incoprea. MIT. Planning only.
float LENGTH=2.0;
float GRAVITY=9.81;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(LENGTH<=0.0||GRAVITY<=0.0)
        {
            llOwnerSay("Positive length/gravity required.");
            return;
        }
        llOwnerSay("Small-angle period seconds="+(string)(TWO_PI*llSqrt(LENGTH/GRAVITY)));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set first radius, radial step, number of rings1..8 and maximum spacing. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Ring counts are independent; angular alignment between rings is not guaranteed. This estimates object count before construction.

// Original Incoprea. MIT. Planning only.
float FIRST_RADIUS=1.0;
float RADIAL_STEP=1.0;
integer RINGS=4;
float MAX_SPACING=1.2;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(FIRST_RADIUS<=0.0||RADIAL_STEP<=0.0||RINGS<1||RINGS>8||MAX_SPACING<=0.0)
        {
            llOwnerSay("Invalid ring inputs.");
            return;
        }
        integer total;
        integer i;
        for(i=0;i<RINGS;++i)
        {
            float radius=FIRST_RADIUS+i*RADIAL_STEP;
            integer count=llCeil(TWO_PI*radius/MAX_SPACING);
            if(count<3)count=3;
            total+=count;
            llOwnerSay("Radius="+(string)radius+" count="+(string)count+" angle="+(string)(360.0/count));
        }
        llOwnerSay("Total objects planned="+(string)total);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set nonnegative SPEED and REACTION_TIME and positive DECELERATION. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Ideal kinematics for a virtual controller. It does not predict simulator physics or guarantee a collision-free stop.

// Original Incoprea. MIT. Planning only.
float SPEED=5.0;
float REACTION_TIME=0.2;
float DECELERATION=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SPEED<0.0||REACTION_TIME<0.0||DECELERATION<=0.0)
        {
            llOwnerSay("Invalid inputs.");
            return;
        }
        float reaction=SPEED*REACTION_TIME;
        float braking=SPEED*SPEED/(2.0*DECELERATION);
        llOwnerSay("Reaction travel="+(string)reaction+" braking="+(string)braking+" total="+(string)(reaction+braking));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set phase0..1 and positive lift. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Each quarter of the revolution is assigned one stage. Uses cosine rise/return with zero endpoint velocity.

// Original Incoprea. MIT. Planning only.
float PHASE=0.35;
float LIFT=1.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(PHASE<0.0||PHASE>1.0||LIFT<0.0)
        {
            llOwnerSay("Invalid phase/lift.");
            return;
        }
        float value;
        string stage;
        if(PHASE<0.25)
        {
            stage="low dwell";
            value=0.0;
        }
        else if(PHASE<0.5)
        {
            stage="rise";
            float t=(PHASE-0.25)*4.0;
            value=0.5*(1.0-llCos(PI*t));
        }
        else if(PHASE<0.75)
        {
            stage="high dwell";
            value=1.0;
        }
        else
        {
            stage="return";
            float t=(PHASE-0.75)*4.0;
            value=0.5*(1.0+llCos(PI*t));
        }
        llOwnerSay(stage+" lift="+(string)(LIFT*value));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded.

Stop / restore: Remove or disable. This inspector changes no build properties.

Root excluded because its local-position semantics differ. Output is not a full object backup; mesh, materials, inventory, and root transform are absent.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        integer i;
        for(i=2;i<=total;++i)
        {
            list p=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL,PRIM_ROT_LOCAL]);
            llOwnerSay((string)i+" "+llGetLinkName(i)+" position="+llList2String(p,0)+" rotation="+llList2String(p,1));
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

A transform manifest, not a complete backup. Does not capture meshes, textures, inventory, physics, or permissions.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        integer i;
        for(i=1;i<=total;++i)
        {
            list data=llGetLinkPrimitiveParams(i,[PRIM_POSITION,PRIM_ROTATION]);
            llOwnerSay("Link "+(string)i+" position="+llList2String(data,0)+" rotation="+llList2String(data,1));
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set DISTANCE between -5 and 5 meters. Use nonphysical child; touch previews/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Displacement follows saved child orientation, not root axes.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
float DISTANCE=0.3;
vector home;
rotation r;
default
{
    state_entry()
    {
        home=llGetLocalPos();
        r=llGetLocalRot();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS)||llFabs(DISTANCE)>5.0)return;
        preview=!preview;
        if(preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home+<DISTANCE,0.0,0.0>*r]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use offset nonphysical child; owner-touch previews/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Roll is chosen by llRotBetween, not a camera-style up-vector constraint.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
rotation home;
default
{
    state_entry()
    {
        home=llGetLocalRot();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS)||llVecMag(llGetLocalPos())<0.01)return;
        preview=!preview;
        if(preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,-llVecNorm(llGetLocalPos()))]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,home]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the exact prim to inspect and touch as owner.

Stop / restore: Remove or disable the script. It does not change the build.

Reports legacy face color/alpha settings, not texture pixel transparency or all PBR material settings. Copy the report to your notes before experimenting with a recoloring script.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        integer face;
        integer total = llGetNumberOfSides();
        for (face = 0; face < total; ++face)
        llOwnerSay("Face " + (string)face + " tint " + (string)llGetColor(face)
        + " alpha " + (string)llGetAlpha(face));
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set image width/height and panel width/height. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

The crop assumes centered image alignment. Applying UV values depends on the actual face mapping and texture conventions.

// Original Incoprea. MIT. Planning only.
float IW=1920.0;
float IH=1080.0;
float PW=3.0;
float PH=4.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(IW<=0.0||IH<=0.0||PW<=0.0||PH<=0.0)
        {
            llOwnerSay("Positive dimensions required.");
            return;
        }
        float scale=PW/IW;
        if(PH/IH>scale)scale=PH/IH;
        float u=PW/(IW*scale);
        float v=PH/(IH*scale);
        llOwnerSay("Visible UV span="+(string)<u,v,0.0>+"; minimum UV="+(string)<(1.0-u)*0.5,(1.0-v)*0.5,0.0>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a rezzed object without seated avatars; touch as owner.

Stop / restore: Remove or disable. This inspector changes no build properties.

Bounds are root-local and based on physical representation. Seated avatars can enlarge them; mesh visible geometry can differ.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed object.");
            return;
        }
        list bounds=llGetBoundingBox(llGetKey());
        if(llGetListLength(bounds)!=2)
        {
            llOwnerSay("Bounds unavailable.");
            return;
        }
        vector extent=llList2Vector(bounds,1)-llList2Vector(bounds,0);
        float longest=extent.x;
        string axis="X";
        if(extent.y>longest)
        {
            longest=extent.y;
            axis="Y";
        }
        if(extent.z>longest)
        {
            longest=extent.z;
            axis="Z";
        }
        if(longest<=0.0)
        {
            llOwnerSay("Degenerate bounds.");
            return;
        }
        llOwnerSay("Dominant local axis: "+axis+"; relative proportions: "+(string)(extent/longest));
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded. Set MARKER, for example role:lamp.

Stop / restore: Remove or disable. This inspector changes no build properties.

Literal substring search is case-sensitive and may match a longer value. It does not interpret Description as structured data or change it.

// Original Incoprea example. MIT.
string MARKER="role:lamp";
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        if(MARKER=="")
        {
            llOwnerSay("Set a nonempty marker.");
            return;
        }
        integer i;
        integer matches;
        for(i=1;i<=total;++i)
        {
            string description=llList2String(llGetLinkPrimitiveParams(i,[PRIM_DESC]),0);
            if(llSubStringIndex(description,MARKER)!=-1)
            {
                ++matches;
                llOwnerSay("Match at "+(string)i+": "+llGetLinkName(i));
            }
        }
        llOwnerSay("Matches: "+(string)matches);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set relative TARGET_POSITION, TARGET_VELOCITY and positive CHASER_SPEED. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Uses supplied vectors only; no avatar tracking. Assumes straight constant velocity and no obstacles.

// Original Incoprea. MIT. Planning only.
vector TARGET_POSITION=<12.0,4.0,0.0>;
vector TARGET_VELOCITY=<0.0,1.0,0.0>;
float CHASER_SPEED=4.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(CHASER_SPEED<=0.0)
        {
            llOwnerSay("Positive speed required.");
            return;
        }
        float a=TARGET_VELOCITY*TARGET_VELOCITY-CHASER_SPEED*CHASER_SPEED;
        float b=2.0*(TARGET_POSITION*TARGET_VELOCITY);
        float c=TARGET_POSITION*TARGET_POSITION;
        float t=-1.0;
        if(llFabs(a)<0.000001)
        {
            if(llFabs(b)>0.000001)t=-c/b;
        }
        else
        {
            float d=b*b-4.0*a*c;
            if(d>=0.0)
            {
                float root=llSqrt(d);
                float t1=(-b-root)/(2.0*a);
                float t2=(-b+root)/(2.0*a);
                if(t1>0.0)t=t1;
                if(t2>0.0&&(t<0.0||t2<t))t=t2;
            }
        }
        if(t<=0.0)
        {
            llOwnerSay("No future intercept.");
            return;
        }
        llOwnerSay("Time="+(string)t+" relative intercept="+(string)(TARGET_POSITION+t*TARGET_VELOCITY));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded. Edit TOLERANCE in meters.

Stop / restore: Remove or disable. This inspector changes no build properties.

This compares centers, not mesh overlap or collision shapes. Pairs at identical centers may be intentional. Bounded to 64 prims.

// Original Incoprea example. MIT.
float TOLERANCE=0.001;
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        if(TOLERANCE<=0.0 || TOLERANCE>1.0)
        {
            llOwnerSay("Use a tolerance above zero and at most one meter.");
            return;
        }
        list positions=[];
        integer i;
        integer j;
        integer matches;
        for(i=2;i<=total;++i) positions+=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]);
        for(i=0;i<llGetListLength(positions);++i) for(j=i+1;j<llGetListLength(positions);++j)
        {
            if(llVecDist(llList2Vector(positions,i),llList2Vector(positions,j))<TOLERANCE)
            {
                ++matches;
                llOwnerSay("Near-coincident child centers: "+(string)(i+2)+" / "+(string)(j+2));
            }
        }
        llOwnerSay("Pairs found: "+(string)matches);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded.

Stop / restore: Remove or disable. This inspector changes no build properties.

Exact case-sensitive names are compared. Duplicate names can be intentional, but name-driven controls should handle them explicitly.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        list names=[];
        list numbers=[];
        integer i;
        for(i=1;i<=total;++i)
        {
            string name=llGetLinkName(i);
            integer previous=llListFindList(names,[name]);
            if(previous!=-1) llOwnerSay("Duplicate name ["+name+"] at links "+llList2String(numbers,previous)+" and "+(string)i);
            else
            {
                names += [name];
                numbers += [i];
            }
        }
        llOwnerSay("Link-name audit finished.");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a rezzed linkset of 2-32 prims and touch as owner. Edit TOLERANCE.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Only matches center positions; orientation, scale, mesh shape, and appearance are not compared. Points on the mirror plane can match each other.

// Original Incoprea example. MIT.
float TOLERANCE=0.01;
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        if(TOLERANCE<0 || TOLERANCE>1)
        {
            llOwnerSay("Use a tolerance from 0 to 1 meter.");
            return;
        }
        list positions=[];
        integer i;
        integer j;
        for(i=2;i<=total;++i)positions+=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]);
        for(i=0;i<llGetListLength(positions);++i)
        {
            vector p=llList2Vector(positions,i);
            vector mirror=<-p.x,p.y,p.z>;
            for(j=i+1;j<llGetListLength(positions);++j)if(llVecDist(mirror,llList2Vector(positions,j))<=TOLERANCE)llOwnerSay("Mirror-center pair: "+(string)(i+2)+" / "+(string)(j+2));
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the exact prim and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Negative repeats can intentionally mirror images. This is a diagnostic report, not a correction; mesh UV orientation can also mirror an image.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer face;
        integer findings;
        for(face=0;face<llGetNumberOfSides();++face)
        {
            vector repeats=llList2Vector(llGetPrimitiveParams([PRIM_TEXTURE,face]),1);
            if(repeats.x<0 || repeats.y<0)
            {
                ++findings;
                llOwnerSay("Mirrored repeat on face "+(string)face+": "+(string)repeats);
            }
        }
        llOwnerSay("Faces with negative repeat: "+(string)findings);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set POINTS with at most12 positions and positive TOLERANCE. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

This is a small quadratic comparison; it reports proximity without merging points.

// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,0.0,0.0>,<1.0,0.0,0.0>,<1.001,0.0,0.0>,<2.0,1.0,0.0>];
float TOLERANCE=0.01;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(POINTS);
        if(n>12||TOLERANCE<=0.0)
        {
            llOwnerSay("Use at most12 points and positive tolerance.");
            return;
        }
        integer found;
        integer i;
        integer j;
        for(i=0;i<n;++i)for(j=i+1;j<n;++j)if(llVecDist(llList2Vector(POINTS,i),llList2Vector(POINTS,j))<TOLERANCE)
        {
            ++found;
            llOwnerSay("Close pair="+(string)i+","+(string)j);
        }
        llOwnerSay("Close pairs="+(string)found);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded.

Stop / restore: Remove or disable. This inspector changes no build properties.

The product is a bounding-box size proxy, not actual mesh volume, physics mass, or land impact.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        float smallest=1.0e30;
        float largest=-1.0;
        integer smallLink;
        integer largeLink;
        integer i;
        for(i=1;i<=total;++i)
        {
            vector size=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_SIZE]),0);
            float proxy=size.x*size.y*size.z;
            if(proxy<smallest)
            {
                smallest=proxy;
                smallLink=i;
            }
            if(proxy>largest)
            {
                largest=proxy;
                largeLink=i;
            }
        }
        llOwnerSay("Smallest scale box: "+(string)smallLink+" "+llGetLinkName(smallLink)+" = "+(string)smallest+" m3");
        llOwnerSay("Largest scale box: "+(string)largeLink+" "+llGetLinkName(largeLink)+" = "+(string)largest+" m3");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Compares prim centers, not surfaces or collision distance. This can help identify a hub component before selecting a pivot manually.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        float closest=1e30;
        integer chosen;
        integer i;
        for(i=2;i<=total;++i)
        {
            vector p=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
            float distance=llVecMag(p);
            if(distance<closest)
            {
                closest=distance;
                chosen=i;
            }
        }
        llOwnerSay("Nearest child center: "+(string)chosen+" "+llGetLinkName(chosen)+" at "+(string)closest+" m");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare owned prim. Set ANCHORS and QUERY. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

This uses provided coordinates only, not nearby avatars or scene sensing. Ties choose the first anchor.

// Original Incoprea. MIT. Planning only.
list ANCHORS=[<0.0,0.0,0.0>,<5.0,0.0,0.0>,<2.0,4.0,0.0>];
vector QUERY=<3.0,2.0,0.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(ANCHORS);
        if(n==0)
        {
            llOwnerSay("No anchors.");
            return;
        }
        integer best=0;
        float distance=llVecDist(QUERY,llList2Vector(ANCHORS,0));
        integer i;
        for(i=1;i<n;++i)
        {
            float d=llVecDist(QUERY,llList2Vector(ANCHORS,i));
            if(d<distance)
            {
                distance=d;
                best=i;
            }
        }
        llOwnerSay("Anchor="+(string)best+" position="+(string)llList2Vector(ANCHORS,best)+" distance="+(string)distance);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set axial Q/R and positive hex RADIUS. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Axial coordinates are integers; radius is center-to-corner distance.

// Original Incoprea. MIT. Planning only.
integer Q=2;
integer R=-1;
float RADIUS=1.0;
list DIRECTIONS=[<1.0,0.0,0.0>,<1.0,-1.0,0.0>,<0.0,-1.0,0.0>,<-1.0,0.0,0.0>,<-1.0,1.0,0.0>,<0.0,1.0,0.0>];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RADIUS<=0.0)
        {
            llOwnerSay("Positive radius required.");
            return;
        }
        integer i;
        for(i=0;i<6;++i)
        {
            vector d=llList2Vector(DIRECTIONS,i);
            float q=Q+d.x;
            float r=R+d.y;
            llOwnerSay("Neighbor axial="+(string)<q,r,0.0>+" center="+(string)<RADIUS*llSqrt(3.0)*(q+r*0.5),1.5*RADIUS*r,0.0>);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded.

Stop / restore: Remove or disable. This inspector changes no build properties.

Description may already be reserved for another script. This only identifies blank fields and never writes labels.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        integer i;
        integer empty;
        for(i=1;i<=total;++i)
        {
            string description=llList2String(llGetLinkPrimitiveParams(i,[PRIM_DESC]),0);
            if(llStringTrim(description,STRING_TRIM)=="")
            {
                ++empty;
                llOwnerSay("Blank description: "+(string)i+" "+llGetLinkName(i));
            }
        }
        llOwnerSay((string)empty+" blank descriptions.");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Use a boxlike child beam whose length axis is +X; name other children beam_a and beam_b. Owner-touch the child to preview; touch again to restore.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Uses bounding dimensions. Length must be0.01–64 meters; simulator link/build limits may reject or clamp. Clear surrounding geometry first.

// Original Incoprea. MIT. Test on a spare copy first.
integer selected;
key identity;
list original;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        if(selected)
        {
            if(llGetLinkKey(selected)==identity)llSetLinkPrimitiveParamsFast(selected,[PRIM_POS_LOCAL,llList2Vector(original,0),PRIM_ROT_LOCAL,llList2Rot(original,1),PRIM_SIZE,llList2Vector(original,2)]);
            else llOwnerSay("Topology changed; restore manually from backup.");
            selected=0;
            return;
        }
        integer link=llDetectedLinkNumber(0);
        if(link<2||link>llGetObjectPrimCount(llGetKey()))
        {
            llOwnerSay("Touch a child prim.");
            return;
        }
        list data=llGetLinkPrimitiveParams(link,[PRIM_POS_LOCAL,PRIM_ROT_LOCAL,PRIM_SIZE]);
        vector p=llList2Vector(data,0);
        rotation r=llList2Rot(data,1);
        vector size=llList2Vector(data,2);
        integer i;
        integer a;
        integer b;
        integer ca;
        integer cb;
        integer total=llGetObjectPrimCount(llGetKey());
        if(total>32)return;
        for(i=2;i<=total;++i)
        {
            if(llGetLinkName(i)=="beam_a")
            {
                a=i;
                ++ca;
            }
            if(llGetLinkName(i)=="beam_b")
            {
                b=i;
                ++cb;
            }
        }
        if(ca!=1||cb!=1||a==link||b==link)return;
        vector ap=llList2Vector(llGetLinkPrimitiveParams(a,[PRIM_POS_LOCAL]),0);
        vector bp=llList2Vector(llGetLinkPrimitiveParams(b,[PRIM_POS_LOCAL]),0);
        float length=llVecDist(ap,bp);
        if(length<0.01||length>64.0)return;
        p=(ap+bp)*0.5;
        r=llRotBetween(<1.0,0.0,0.0>,llVecNorm(bp-ap));
        size.x=length;
        selected=link;
        identity=llGetLinkKey(link);
        original=data;
        llSetLinkPrimitiveParamsFast(link,[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,r,PRIM_SIZE,size]);
        llOwnerSay("Preview applied; touch again to restore.");
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set image pixel dimensions and panel metre dimensions. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Returns displayed width/height and symmetric margins; does not upload or apply an image.

// Original Incoprea. MIT. Planning only.
float IW=1920.0;
float IH=1080.0;
float PW=4.0;
float PH=3.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(IW<=0.0||IH<=0.0||PW<=0.0||PH<=0.0)
        {
            llOwnerSay("Positive dimensions required.");
            return;
        }
        float scale=PW/IW;
        if(PH/IH<scale)scale=PH/IH;
        float w=IW*scale;
        float h=IH*scale;
        llOwnerSay("Image size="+(string)<w,h,0.0>+"; margins="+(string)<(PW-w)*0.5,(PH-h)*0.5,0.0>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set clear span, picket width and minimum gap. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Includes gaps adjacent to both end posts. If none fit, it reports that instead of returning negative dimensions.

// Original Incoprea. MIT. Calculation only.
float SPAN=5.0;
float WIDTH=0.12;
float MIN_GAP=0.08;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SPAN<=0.0||WIDTH<=0.0||MIN_GAP<0.0)
        {
            llOwnerSay("Invalid dimensions.");
            return;
        }
        integer count=llFloor((SPAN-MIN_GAP)/(WIDTH+MIN_GAP));
        if(count<1)
        {
            llOwnerSay("No picket fits.");
            return;
        }
        float gap=(SPAN-count*WIDTH)/(count+1);
        llOwnerSay("Pickets="+(string)count+" clear gaps="+(string)gap+" first centre="+(string)(gap+WIDTH*0.5));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Name children layer1 through layer5. Put script in root. First touch hides layer5, then4,3,2,1; sixth restores all.

Stop / restore: Complete the six-touch cycle before removal; relinking invalidates stored link indices.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Only visibility changes; transparent parts still collide. PBR appearance and special alpha modes may differ.

// Original Incoprea. MIT. Not compiled or tested in-world.
list saved;
integer step;
integer valid=TRUE;
default
{
    state_entry()
    {
        integer link;
        for(link=2;link<=llGetObjectPrimCount(llGetKey());++link)
        {
            string name=llGetLinkName(link);
            integer layer=llListFindList(["layer1","layer2","layer3","layer4","layer5"],[name])+1;
            if(layer)
            {
                integer f;
                for(f=0;f<llGetLinkNumberOfSides(link);++f)saved+=[link,f,layer]+llGetLinkPrimitiveParams(link,[PRIM_COLOR,f]);
            }
        }
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||!valid)return;
        step=(step+1)%6;
        integer i;
        for(i=0;i<llGetListLength(saved);i+=5)
        {
            float alpha=llList2Float(saved,i+4);
            if(step&&llList2Integer(saved,i+2)>5-step)alpha=0.0;
            llSetLinkPrimitiveParamsFast(llList2Integer(saved,i),[PRIM_COLOR,llList2Integer(saved,i+1),llList2Vector(saved,i+3),alpha]);
        }
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)valid=FALSE;
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set A/B/C. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

A small ratio identifies a skinny triangle; this is a diagnostic metric, not a mesh-quality guarantee.

// Original Incoprea. MIT. Planning only.
vector A=ZERO_VECTOR;
vector B=<5.0,0.0,0.0>;
vector C=<2.0,0.1,0.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        float ab=llVecDist(A,B);
        float bc=llVecDist(B,C);
        float ca=llVecDist(C,A);
        float longest=ab;
        if(bc>longest)longest=bc;
        if(ca>longest)longest=ca;
        if(longest<0.000001)
        {
            llOwnerSay("Coincident triangle.");
            return;
        }
        float twiceArea=llVecMag((B-A)%(C-A));
        float altitude=twiceArea/longest;
        llOwnerSay("Shortest altitude="+(string)altitude+" slenderness ratio="+(string)(altitude/longest));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set POINTS and nonnegative MAX_GRADE_PERCENT. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

User-selected threshold is a virtual-design preference, not a legal accessibility standard.

// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,0.0,0.0>,<4.0,0.0,0.3>,<6.0,2.0,1.2>];
float MAX_GRADE_PERCENT=10.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(MAX_GRADE_PERCENT<0.0)
        {
            llOwnerSay("Nonnegative limit required.");
            return;
        }
        integer i;
        for(i=1;i<llGetListLength(POINTS);++i)
        {
            vector d=llList2Vector(POINTS,i)-llList2Vector(POINTS,i-1);
            float run=llSqrt(d.x*d.x+d.y*d.y);
            if(run<0.000001)llOwnerSay("Segment "+(string)i+" vertical or zero-length.");
            else
            {
                float grade=100.0*d.z/run;
                llOwnerSay("Segment "+(string)i+" grade="+(string)grade+" exceeds="+(string)(llFabs(grade)>MAX_GRADE_PERCENT));
            }
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the prim before an experiment and touch as owner. Copy the reported statements into your own restore script.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Output is source text only and is not run automatically. Does not capture textures, PBR materials, normal/specular maps, or future changes.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer face;
        for(face=0;face<llGetNumberOfSides();++face)
        {
            list p=llGetPrimitiveParams([PRIM_COLOR,face,PRIM_GLOW,face,PRIM_FULLBRIGHT,face]);
            llOwnerSay("llSetPrimitiveParams([PRIM_COLOR, "+(string)face+", "+llList2String(p,0)+", "+llList2String(p,1)+", PRIM_GLOW, "+(string)face+", "+llList2String(p,2)+", PRIM_FULLBRIGHT, "+(string)face+", "+llList2String(p,3)+"]);");
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the exact prim or mesh and touch as owner.

Stop / restore: Remove or disable the script. It does not change the build.

Mesh material faces are not individual polygons. Face indices start at zero.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        integer faces = llGetNumberOfSides();
        llOwnerSay((string)faces + " faces; valid indices 0 through " + (string)(faces - 1) + ".");
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare owned prim. Set POINTS with3..12 vertices. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Repeated points are skipped with a warning. Angles do not imply whether a physical object can traverse the turn.

// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,0.0,0.0>,<4.0,0.0,0.0>,<5.0,3.0,0.0>,<2.0,5.0,0.0>];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(POINTS);
        if(n<3||n>12)
        {
            llOwnerSay("Use3..12 points.");
            return;
        }
        integer i;
        for(i=1;i<n-1;++i)
        {
            vector incoming=llList2Vector(POINTS,i)-llList2Vector(POINTS,i-1);
            vector outgoing=llList2Vector(POINTS,i+1)-llList2Vector(POINTS,i);
            incoming.z=0.0;
            outgoing.z=0.0;
            if(llVecMag(incoming)<0.000001||llVecMag(outgoing)<0.000001)llOwnerSay("Repeated XY point near index "+(string)i);
            else llOwnerSay("Turn "+(string)i+" degrees="+(string)(llAtan2(incoming.x*outgoing.y-incoming.y*outgoing.x,incoming*outgoing)*RAD_TO_DEG));
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set sides>=3, outer circumradius and inward border width. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

The inset uses parallel edges and must remain inside the original apothem.

// Original Incoprea. MIT. Calculation only.
integer SIDES=6;
float RADIUS=5.0;
float BORDER=0.4;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SIDES<3||RADIUS<=0.0||BORDER<0.0)
        {
            llOwnerSay("Invalid polygon.");
            return;
        }
        float angle=PI/SIDES;
        float apothem=RADIUS*llCos(angle);
        if(BORDER>=apothem)
        {
            llOwnerSay("Border consumes the polygon.");
            return;
        }
        float inner=(apothem-BORDER)/llCos(angle);
        float factor=0.5*SIDES*llSin(TWO_PI/SIDES);
        llOwnerSay("Inner circumradius="+(string)inner+" border area="+(string)(factor*(RADIUS*RADIUS-inner*inner)));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set image dimensions, cell pixel bounds and inset pixels. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Padding reduces neighboring-cell sampling but cannot eliminate every mipmap or filtering artifact.

// Original Incoprea. MIT. Planning only.
float IW=1024.0;
float IH=1024.0;
float X=256.0;
float Y=512.0;
float W=256.0;
float H=256.0;
float PAD=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(IW<=0.0||IH<=0.0||W<=2.0*PAD||H<=2.0*PAD||PAD<0.0||X<0.0||Y<0.0||X+W>IW||Y+H>IH)
        {
            llOwnerSay("Invalid cell or padding.");
            return;
        }
        llOwnerSay("U="+(string)((X+PAD)/IW)+".."+(string)((X+W-PAD)/IW)+"; V="+(string)(1.0-(Y+H-PAD)/IH)+".."+(string)(1.0-(Y+PAD)/IH));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Touch repeatedly to feed the next predefined measurement. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

A teaching controller with fixed sample time, not a ready physics controller. Real control needs measured dt, reset handling and tuning.

// Original Incoprea. MIT. Planning only.
list MEASUREMENTS=[0.0,0.4,0.7,0.9,1.1,1.0];
integer cursor;
float integral;
float previousError;
integer initialized;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        float measured=llList2Float(MEASUREMENTS,cursor);
        cursor=(cursor+1)%llGetListLength(MEASUREMENTS);
        float dt=0.1;
        float error=1.0-measured;
        integral+=error*dt;
        if(integral>0.5)integral=0.5;
        if(integral< -0.5)integral=-0.5;
        float derivative=0.0;
        if(initialized)derivative=(error-previousError)/dt;
        previousError=error;
        initialized=TRUE;
        float output=2.0*error+0.8*integral+0.1*derivative;
        if(output>1.0)output=1.0;
        if(output< -1.0)output=-1.0;
        llOwnerSay("Measurement="+(string)measured+" error="+(string)error+" output="+(string)output);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a rezzed prim and touch as owner.

Stop / restore: Remove or disable. This inspector changes no build properties.

Directions are unit vectors. They do not identify a mesh’s artistic front; the creator may model the nose or face along any local axis.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed prim.");
            return;
        }
        rotation orientation=llGetRot();
        llOwnerSay("Local +X in world: "+(string)llRot2Fwd(orientation));
        llOwnerSay("Local +Y in world: "+(string)llRot2Left(orientation));
        llOwnerSay("Local +Z in world: "+(string)llRot2Up(orientation));
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Put in the inspected prim. Touch one of its faces as owner; in a linkset the touched prim must contain this script.

Stop / restore: Remove or disable the script. It does not change the build.

Reports legacy/base texture settings. It does not inspect PBR material parameters. Texture UUID visibility depends on permissions.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        integer ownLink = llGetLinkNumber();
        integer touchedLink = llDetectedLinkNumber(0);
        if (ownLink > 0 && touchedLink != ownLink)
        {
            llOwnerSay("Touch the prim containing this script.");
            return;
        }
        integer face = llDetectedTouchFace(0);
        if (face == TOUCH_INVALID_FACE)
        {
            llOwnerSay("The viewer did not provide a face.");
            return;
        }
        list p = llGetPrimitiveParams([PRIM_TEXTURE, face]);
        llOwnerSay("Face " + (string)face + ": " + llList2CSV(p));
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch three corners around the opening. Collect 3 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Altitudes are geometric face dimensions, not a guarantee that an avatar or object will pass through. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=3)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<3)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 3.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        float ab=llVecDist(a,b);
        float bc=llVecDist(b,c);
        float ca=llVecDist(c,a);
        float twiceArea=llVecMag((b-a)%(c-a));
        if(ab<0.000001||bc<0.000001||ca<0.000001)
        {
            llOwnerSay("Repeated vertex.");
            return;
        }
        llOwnerSay("Altitudes oppositeAB/BC/CA="+(string)<twiceArea/ab,twiceArea/bc,twiceArea/ca>);
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Place in the prim to inspect and touch as owner.

Stop / restore: Remove or disable the script. It does not change the build.

This does not display the actual collision mesh or change land impact. Physics-shape support can vary by simulator; a visual mesh is not necessarily its collision shape.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        list result = llGetPrimitiveParams([PRIM_PHYSICS_SHAPE_TYPE]);
        if (llGetListLength(result) != 1)
        {
            llOwnerSay("Physics shape data unavailable.");
            return;
        }
        integer shape = llList2Integer(result, 0);
        string name = "Unknown (" + (string)shape + ")";
        if (shape == PRIM_PHYSICS_SHAPE_PRIM) name = "Prim";
        else if (shape == PRIM_PHYSICS_SHAPE_CONVEX) name = "Convex Hull";
        else if (shape == PRIM_PHYSICS_SHAPE_NONE) name = "None";
        llOwnerSay("Physics shape setting: " + name);
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Touch a visible surface as owner.

Stop / restore: Remove or disable. This inspector changes no build properties.

These are viewer-supplied touch vectors in region coordinates. Invalid or degenerate data is rejected; no object is rotated.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llDetectedTouchFace(0)==TOUCH_INVALID_FACE)
        {
            llOwnerSay("Surface data unavailable.");
            return;
        }
        vector normal=llDetectedTouchNormal(0);
        vector binormal=llDetectedTouchBinormal(0);
        if(llVecMag(normal)<0.0001 || llVecMag(binormal)<0.0001)
        {
            llOwnerSay("Degenerate touch frame.");
            return;
        }
        vector tangent=llVecNorm(binormal % normal);
        llOwnerSay("Normal: "+(string)normal+" / binormal: "+(string)binormal+" / tangent: "+(string)tangent);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set ordered convex planar POINTS. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

A simple fan is appropriate for convex polygons; concave or nonplanar inputs can overlap or misrepresent area.

// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,0.0,0.0>,<4.0,0.0,0.0>,<5.0,3.0,0.0>,<2.0,5.0,0.0>,<0.0,3.0,0.0>];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(POINTS);
        if(n<3)
        {
            llOwnerSay("Need three vertices.");
            return;
        }
        vector origin=llList2Vector(POINTS,0);
        float total;
        integer i;
        for(i=1;i<n-1;++i)
        {
            vector a=llList2Vector(POINTS,i)-origin;
            vector b=llList2Vector(POINTS,i+1)-origin;
            float area=0.5*llVecMag(a%b);
            total+=area;
            llOwnerSay("Triangle0,"+(string)i+","+(string)(i+1)+" area="+(string)area);
        }
        llOwnerSay("Fan total area="+(string)total);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Set GAP and START_X. Limit12 actual prims. Owner-touch applies/restores; all children are included in link order.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Preserves each part’s Y, Z and rotation. Bounding-box gaps are not exact gaps between irregular meshes. Use an isolated copied assembly.

// Original Incoprea. MIT. Test on a spare copy first.
float GAP=0.2;
float START_X=-2.0;
list saved;
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        integer i;
        if(active)
        {
            for(i=0;i<llGetListLength(saved);i+=3)
            {
                integer link=llList2Integer(saved,i);
                if(llGetLinkKey(link)==llList2Key(saved,i+1))llSetLinkPrimitiveParamsFast(link,[PRIM_POS_LOCAL,llList2Vector(saved,i+2)]);
            }
            active=FALSE;
            saved=[];
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2||total>12||GAP<0.0||GAP>2.0)return;
        list targets;
        float cursor=START_X;
        for(i=2;i<=total;++i)
        {
            list data=llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL,PRIM_SIZE,PRIM_ROT_LOCAL]);
            vector p=llList2Vector(data,0);
            vector size=llList2Vector(data,1);
            rotation r=llList2Rot(data,2);
            vector x=<1.0,0.0,0.0>*r;
            vector y=<0.0,1.0,0.0>*r;
            vector z=<0.0,0.0,1.0>*r;
            float width=llFabs(x.x)*size.x+llFabs(y.x)*size.y+llFabs(z.x)*size.z;
            p.x=cursor+width*0.5;
            if(llFabs(p.x)>20.0)
            {
                llOwnerSay("Planned row exceeds20 meter local bound.");
                return;
            }
            targets += [p];
            cursor += width+GAP;
        }
        for(i=2;i<=total;++i)
        {
            saved += [i,llGetLinkKey(i),llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0)];
            llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llList2Vector(targets,i-2)]);
        }
        active=TRUE;
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Name child vector_arrow with its front along +X. Root owner-touch arms; root script sends code8063 and x,y,z integers from -100 to100.

Stop / restore: Owner-touch disarms and restores the arrow rotation.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Direction is root-local; magnitude is ignored. Zero vector rejected; nonphysical build only.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer target;
rotation home;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        integer i;
        integer count;
        for(i=2;i<=llGetObjectPrimCount(llGetKey());++i)if(llGetLinkName(i)=="vector_arrow")
        {
            target=i;
            ++count;
        }
        if(count!=1)
        {
            valid=FALSE;
            return;
        }
        home=llList2Rot(llGetLinkPrimitiveParams(target,[PRIM_ROT_LOCAL]),0);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS)||!valid)return;
        active=!active;
        if(!active)llSetLinkPrimitiveParamsFast(target,[PRIM_ROT_LOCAL,home]);
    }
    link_message(integer sender,integer code,string s,key data)
    {
        if(!active||!valid||sender!=1||code!=8063||llGetStatus(STATUS_PHYSICS))return;
        list values=llCSV2List(s);
        if(llGetListLength(values)!=3)return;
        integer i;
        for(i=0;i<3;++i)
        {
            string value=llStringTrim(llList2String(values,i),STRING_TRIM);
            integer v=(integer)value;
            if((string)v!=value||llAbs(v)>100)return;
        }
        vector direction=<llList2Float(values,0),llList2Float(values,1),llList2Float(values,2)>;
        if(llVecMag(direction)<0.01)return;
        llSetLinkPrimitiveParamsFast(target,[PRIM_ROT_LOCAL,llRotBetween(<1.0,0.0,0.0>,llVecNorm(direction))]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            active=FALSE;
            valid=FALSE;
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a rezzed object; touch as owner. Deselect seated avatars when measuring a bare build.

Stop / restore: Remove or disable the script. It does not change the build.

Bounds use root-local axes and physical representation. Seated avatars can affect them; attachments have different behavior. Mesh visible geometry may differ.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        list bounds = llGetBoundingBox(llGetKey());
        if (llGetListLength(bounds) != 2)
        {
            llOwnerSay("Bounds unavailable.");
            return;
        }
        vector low = llList2Vector(bounds, 0);
        vector high = llList2Vector(bounds, 1);
        llOwnerSay("Local minimum: " + (string)low);
        llOwnerSay("Local maximum: " + (string)high);
        llOwnerSay("Extent: " + (string)(high - low));
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare owned prim. Set positive SIZE, CENTER and Euler ANGLES. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

An oriented ideal box, not a mesh-bound query. The corner order follows three binary sign bits.

// Original Incoprea. MIT. Planning only.
vector SIZE=<4.0,2.0,3.0>;
vector CENTER=<5.0,5.0,2.0>;
vector ANGLES=<0.0,0.0,30.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SIZE.x<=0.0||SIZE.y<=0.0||SIZE.z<=0.0)
        {
            llOwnerSay("Positive size required.");
            return;
        }
        rotation r=llEuler2Rot(ANGLES*DEG_TO_RAD);
        integer i;
        for(i=0;i<8;++i)
        {
            float x=-0.5;
            float y=-0.5;
            float z=-0.5;
            if(i&1)x=0.5;
            if(i&2)y=0.5;
            if(i&4)z=0.5;
            llOwnerSay((string)i+": "+(string)(CENTER+<SIZE.x*x,SIZE.y*y,SIZE.z*z>*r));
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a rezzed linkset of 2-32 prims. Touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Sorting affects only report order, not link numbers. Equal X positions may retain simulator/list-sort tie behavior; no topology changes occur.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        list rows=[];
        integer i;
        for(i=2;i<=total;++i)
        {
            vector p=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
            rows += [p.x,i];
        }
        rows=llListSort(rows,2,TRUE);
        for(i=0;i<llGetListLength(rows);i+=2)
        {
            integer link=llList2Integer(rows,i+1);
            llOwnerSay("X="+llList2String(rows,i)+": "+(string)link+" "+llGetLinkName(link));
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set COLUMNS, ROWS and zero-based FRAME. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Row zero starts at the top of the image; V coordinates are reported bottom-up. Texture animation APIs may use their own order.

// Original Incoprea. MIT. Planning only.
integer COLUMNS=4;
integer ROWS=3;
integer FRAME=6;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(COLUMNS<1||ROWS<1||COLUMNS>64||ROWS>64||FRAME<0||FRAME>=COLUMNS*ROWS)
        {
            llOwnerSay("Invalid atlas dimensions/frame.");
            return;
        }
        integer column=FRAME%COLUMNS;
        integer row=FRAME/COLUMNS;
        float left=(float)column/(float)COLUMNS;
        float right=(float)(column+1)/(float)COLUMNS;
        float top=1.0-(float)row/(float)ROWS;
        float bottom=1.0-(float)(row+1)/(float)ROWS;
        llOwnerSay("Column="+(string)column+" row="+(string)row+" bounds U="+(string)left+".."+(string)right+" V="+(string)bottom+".."+(string)top);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch rail start, rail end, then a point to compare. Collect 3 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

The rail is a finite segment; projection clamps at either endpoint. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=3)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<3)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 3.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector rail=b-a;
        float den=rail*rail;
        if(den<0.000001)
        {
            llOwnerSay("Rail endpoints coincide.");
            return;
        }
        float t=((c-a)*rail)/den;
        if(t<0.0)t=0.0;
        if(t>1.0)t=1.0;
        vector point=a+t*rail;
        llOwnerSay("Along fraction="+(string)t+" rail point="+(string)point+" perpendicular/clamped distance="+(string)llVecDist(c,point));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Name one other child reference_size. Use nonphysical child; owner-touch applies/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Copies bounding dimensions, not geometry, rotation, material or mesh shape.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
vector home;
default
{
    state_entry()
    {
        home=llGetScale();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        preview=!preview;
        if(preview)
        {
            integer i;
            integer target;
            integer count;
            for(i=2;i<=llGetNumberOfPrims();++i)if(i!=llGetLinkNumber()&&llGetLinkName(i)=="reference_size")
            {
                target=i;
                ++count;
            }
            if(count!=1)
            {
                preview=FALSE;
                llOwnerSay("Need one other reference_size child.");
                return;
            }
            llSetScale(llList2Vector(llGetLinkPrimitiveParams(target,[PRIM_SIZE]),0));
        }
        else
        {
            llSetScale(home);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set surface size, source image dimensions, and target density. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Assumes conventional rectangular UV mapping. Mesh UV islands and viewer texture limits may prevent the target density.

// Original Incoprea. MIT. Planning only.
float W=5.0;
float H=3.0;
float PIXELS_W=1024.0;
float PIXELS_H=1024.0;
float PIXEL_DENSITY=256.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(W<=0.0||H<=0.0||PIXELS_W<=0.0||PIXELS_H<=0.0||PIXEL_DENSITY<=0.0)
        {
            llOwnerSay("Positive values required.");
            return;
        }
        llOwnerSay("Suggested repeats U="+(string)(W*PIXEL_DENSITY/PIXELS_W)+" V="+(string)(H*PIXEL_DENSITY/PIXELS_H));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set positive RADIUS and signed DISTANCE. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Assumes rolling without slip; actual simulated wheel contact may differ.

// Original Incoprea. MIT. Planning only.
float RADIUS=0.5;
float DISTANCE=7.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RADIUS<=0.0)
        {
            llOwnerSay("Positive radius required.");
            return;
        }
        float radians=DISTANCE/RADIUS;
        float phase=radians-TWO_PI*llFloor(radians/TWO_PI);
        llOwnerSay("Total turns="+(string)(radians/TWO_PI)+" phase degrees="+(string)(phase*RAD_TO_DEG));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch three triangle vertices. Collect 3 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

The center and radius belong to the mathematical triangle, not a curved patch. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=3)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<3)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 3.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        float sideA=llVecDist(b,c);
        float sideB=llVecDist(a,c);
        float sideC=llVecDist(a,b);
        float perimeter=sideA+sideB+sideC;
        float twiceArea=llVecMag((b-a)%(c-a));
        if(perimeter<0.000001||twiceArea<0.000001)
        {
            llOwnerSay("Degenerate triangle.");
            return;
        }
        llOwnerSay("Incenter="+(string)((sideA*a+sideB*b+sideC*c)/perimeter)+" radius="+(string)(twiceArea/perimeter));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch three separated points around a circular edge. Collect 3 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

The three points define a circle in3D. Near-collinear clicks make the radius unstable. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=3)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<3)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 3.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        float ab=llVecDist(a,b);
        float bc=llVecDist(b,c);
        float ca=llVecDist(c,a);
        float twiceArea=llVecMag((b-a)%(c-a));
        if(twiceArea<0.000001)
        {
            llOwnerSay("Points are nearly collinear.");
            return;
        }
        llOwnerSay("Fitted radius="+(string)(ab*bc*ca/(2.0*twiceArea)));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch two points whose horizontal positions differ. Collect 2 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Region+Y is north and+X east. This does not read avatar heading. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=2)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<2)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 2.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector delta=b-a;
        delta.z=0.0;
        if(llVecMag(delta)<0.000001)
        {
            llOwnerSay("No horizontal separation.");
            return;
        }
        float degrees=llAtan2(delta.x,delta.y)*RAD_TO_DEG;
        if(degrees<0.0)degrees+=360.0;
        llOwnerSay("North-clockwise bearing="+(string)degrees+" degrees");
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch one edge point, the corner, then the other edge point. Collect 3 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

The middle touch is the angle vertex. Repeated points are rejected. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=3)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<3)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 3.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector u=a-b;
        vector v=c-b;
        if(llVecMag(u)<0.000001||llVecMag(v)<0.000001)
        {
            llOwnerSay("Repeated corner point.");
            return;
        }
        float dot=llVecNorm(u)*llVecNorm(v);
        if(dot>1.0)dot=1.0;
        if(dot< -1.0)dot=-1.0;
        llOwnerSay("Corner degrees="+(string)(llAcos(dot)*RAD_TO_DEG));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch five ordered points along the feature. Collect 5 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Straight segment sums underestimate curved paths. Touches are not automatically captured during a drag. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=5)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<5)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 5.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        float length;
        integer i;
        for(i=1;i<5;++i)length+=llVecDist(llList2Vector(points,i-1),llList2Vector(points,i));
        float direct=llVecDist(a,llList2Vector(points,4));
        llOwnerSay("Traced length="+(string)length+" endpoint distance="+(string)direct);
        if(length>0.000001)llOwnerSay("Directness="+(string)(direct/length));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch four corners around the boundary in order. Collect 4 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Assumes a simple roughly planar patch and uses diagonal0-to2; concave or twisted patches need care. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=4)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<4)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 4.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        float first=0.5*llVecMag((b-a)%(c-a));
        float second=0.5*llVecMag((c-a)%(d-a));
        llOwnerSay("Triangulated patch area="+(string)(first+second)+" triangles="+(string)first+","+(string)second);
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Put in your own rezzed test object. Move your own model with Edit or its existing animation. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

One-second samples underestimate curved or rapid paths. Stops when region coordinates change; does not track avatars.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
vector origin;
vector previous;
vector region;
float distance;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    llOwnerSay("Sampled travel="+(string)distance+" m; net displacement="+(string)llVecDist(origin,previous)+" m; elapsed="+(string)(llGetTime()-began));
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        origin=llGetRootPosition();
        previous=origin;
        region=llGetRegionCorner();
        distance=0.0;
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        if(llGetRegionCorner()!=region)
        {
            llOwnerSay("Region changed; stopping before coordinate discontinuity.");
            finish();
            return;
        }
        vector current=llGetRootPosition();
        distance += llVecDist(previous,current);
        previous=current;
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5 · API reference 6

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch three noncollinear points on a planar surface. Collect 3 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Reversing winding does not change the reported tilt. A vertical plane reports90 degrees. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=3)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<3)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 3.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector normal=(b-a)%(c-a);
        if(llVecMag(normal)<0.000001)
        {
            llOwnerSay("Collinear samples.");
            return;
        }
        normal=llVecNorm(normal);
        float z=llFabs(normal.z);
        if(z>1.0)z=1.0;
        llOwnerSay("Plane tilt degrees="+(string)(llAcos(z)*RAD_TO_DEG)+" normal="+(string)normal);
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5 · API reference 6

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch three noncollinear plane points, then the point to compare. Collect 4 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Normal direction follows the first triple’s winding. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=4)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<4)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 4.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector normal=(b-a)%(c-a);
        if(llVecMag(normal)<0.000001)
        {
            llOwnerSay("First three points are collinear.");
            return;
        }
        normal=llVecNorm(normal);
        float height=(d-a)*normal;
        llOwnerSay("Signed height="+(string)height+" projected point="+(string)(d-height*normal));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Put in your own rezzed test object. Start while an existing light-control script runs. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

Uses previous sampled state over each elapsed interval; short flashes can be missed. This is not electrical energy or measured illumination.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
integer wasOn;
float intensity;
float prior;
float onTime;
float exposure;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    float duration=prior-began;
    float duty=0.0;
    if(duration>0.0)duty=onTime/duration;
    llOwnerSay("Sampled on-seconds="+(string)onTime+" duty fraction="+(string)duty+" intensity-seconds="+(string)exposure);
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        list light=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_POINT_LIGHT]);
        wasOn=llList2Integer(light,0);
        intensity=llList2Float(light,2);
        prior=llGetTime();
        onTime=0.0;
        exposure=0.0;
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        float now=llGetTime();
        float dt=now-prior;
        if(wasOn)
        {
            onTime += dt;
            exposure += dt*intensity;
        }
        list light=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_POINT_LIGHT]);
        wasOn=llList2Integer(light,0);
        intensity=llList2Float(light,2);
        prior=now;
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Place in a spare owned prim. Set nonzero NORMAL_A/NORMAL_B and shared EDGE direction. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

The edge must lie in both face planes. Reversing the edge reverses the signed fold direction.

// Original Incoprea. MIT. Planning only.
vector NORMAL_A=<0.0,0.0,1.0>;
vector NORMAL_B=<0.0,0.7071068,0.7071068>;
vector EDGE=<1.0,0.0,0.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llVecMag(NORMAL_A)<0.000001||llVecMag(NORMAL_B)<0.000001||llVecMag(EDGE)<0.000001)
        {
            llOwnerSay("Nonzero vectors required.");
            return;
        }
        vector a=llVecNorm(NORMAL_A);
        vector b=llVecNorm(NORMAL_B);
        vector edge=llVecNorm(EDGE);
        if(llFabs(a*edge)>0.001||llFabs(b*edge)>0.001)
        {
            llOwnerSay("Edge must be perpendicular to both normals.");
            return;
        }
        llOwnerSay("Signed fold degrees="+(string)(llAtan2(edge*(a%b),a*b)*RAD_TO_DEG));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch four noncoplanar points. Collect 4 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

This is the tetrahedron through those samples, not the volume of the whole mesh. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=4)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<4)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 4.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        float volume=llFabs((b-a)*((c-a)%(d-a)))/6.0;
        llOwnerSay("Tetrahedron volume="+(string)volume);
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch the three corners of a triangular patch. Collect 3 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

Uses the planar triangle through the clicks; a curved surface may have greater true area. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=3)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<3)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 3.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        float area=0.5*llVecMag((b-a)%(c-a));
        float perimeter=llVecDist(a,b)+llVecDist(b,c)+llVecDist(c,a);
        llOwnerSay("Triangle area="+(string)area+" perimeter="+(string)perimeter);
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Put in your own rezzed test object. Rotate the actual model with Edit or server-side animation. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

Viewer-only target omega may not appear. Motion over180 degrees between samples is ambiguous; this is not a turn counter.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
rotation previous;
float previousTime;
float totalAngle;
float peak;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    llOwnerSay("Sampled angular travel degrees="+(string)(totalAngle*RAD_TO_DEG)+" peak degrees/sec="+(string)(peak*RAD_TO_DEG));
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        previous=llGetRot();
        previousTime=llGetTime();
        totalAngle=0.0;
        peak=0.0;
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        rotation current=llGetRot();
        float now=llGetTime();
        float angle=llAngleBetween(previous,current);
        float dt=now-previousTime;
        totalAngle += angle;
        if(dt>0.0&&angle/dt>peak)peak=angle/dt;
        previous=current;
        previousTime=now;
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5 · API reference 6

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch the start and end of a ramp or walkway. Collect 2 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

The result uses worldZ as vertical and reports signed uphill/downhill grade. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=2)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<2)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 2.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector delta=b-a;
        float run=llSqrt(delta.x*delta.x+delta.y*delta.y);
        llOwnerSay("Rise="+(string)delta.z+" run="+(string)run+" length="+(string)llVecMag(delta));
        if(run>0.000001)llOwnerSay("Grade percent="+(string)(100.0*delta.z/run)+" angle="+(string)(llAtan2(delta.z,run)*RAD_TO_DEG));
        else llOwnerSay("Vertical segment: grade undefined.");
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Use a rezzed prim and touch as owner before and after rotating it.

Stop / restore: Remove or disable. This inspector changes no build properties.

No rotation is applied. Uses quaternion angular difference, not a subtraction of Euler angles. Reset discards the bookmark.

// Original Incoprea example. MIT.
rotation original;
integer ready;
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed prim.");
            return;
        }
        if(!ready)
        {
            original=llGetRot();
            ready=TRUE;
            llOwnerSay("Orientation bookmarked.");
            return;
        }
        llOwnerSay("Angular change: "+(string)(llAngleBetween(original,llGetRot())*RAD_TO_DEG)+" degrees.");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the inspected prim. Touch as owner before and after resizing.

Stop / restore: Remove or disable. This inspector changes no build properties.

Uses prim scale, not mesh visible dimensions. It does not restore or enforce the baseline. Reset forgets the bookmark.

// Original Incoprea example. MIT.
vector original;
integer ready;
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        vector current=llGetScale();
        if(!ready)
        {
            original=current;
            ready=TRUE;
            llOwnerSay("Scale baseline: "+(string)original);
            return;
        }
        if(original.x<=0.0 || original.y<=0.0 || original.z<=0.0)
        {
            llOwnerSay("Invalid baseline.");
            return;
        }
        vector ratios=<current.x/original.x,current.y/original.y,current.z/original.z>;
        llOwnerSay("Scale ratios X/Y/Z: "+(string)ratios);
        llOwnerSay("Size delta: "+(string)(current-original));
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch first line start/end, then second line start/end. Collect 4 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

The lines are infinite; closest positions can lie beyond clicked segments. Parallel lines use perpendicular point-to-line distance. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=4)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<4)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 4.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector u=b-a;
        vector v=d-c;
        if(llVecMag(u)<0.000001||llVecMag(v)<0.000001)
        {
            llOwnerSay("Repeated endpoint.");
            return;
        }
        vector normal=u%v;
        float length=llVecMag(normal);
        float distance;
        if(length<0.000001)distance=llVecMag((c-a)%u)/llVecMag(u);
        else distance=llFabs((c-a)*normal)/length;
        llOwnerSay("Infinite guide-line separation="+(string)distance);
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Put in the prim to inspect; touch as its owner.

Stop / restore: Remove or disable the script. It does not change the build.

These are the prim scale settings, not the visible bounds of a mesh or the whole linkset.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        vector size = llGetScale();
        llOwnerSay("Prim size in meters: " + (string)size);
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Set NORMAL and PLANE_POINT. Owner-touch the child to preview; touch again to restore.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Mirrors position only; it does not reverse mesh handedness or reflect orientation. The original position, rotation and size are restored together.

// Original Incoprea. MIT. Test on a spare copy first.
integer selected;
key identity;
list original;
vector NORMAL=<1.0,0.0,0.0>;
vector PLANE_POINT=ZERO_VECTOR;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        if(selected)
        {
            if(llGetLinkKey(selected)==identity)llSetLinkPrimitiveParamsFast(selected,[PRIM_POS_LOCAL,llList2Vector(original,0),PRIM_ROT_LOCAL,llList2Rot(original,1),PRIM_SIZE,llList2Vector(original,2)]);
            else llOwnerSay("Topology changed; restore manually from backup.");
            selected=0;
            return;
        }
        integer link=llDetectedLinkNumber(0);
        if(link<2||link>llGetObjectPrimCount(llGetKey()))
        {
            llOwnerSay("Touch a child prim.");
            return;
        }
        list data=llGetLinkPrimitiveParams(link,[PRIM_POS_LOCAL,PRIM_ROT_LOCAL,PRIM_SIZE]);
        vector p=llList2Vector(data,0);
        rotation r=llList2Rot(data,1);
        vector size=llList2Vector(data,2);
        if(llVecMag(NORMAL)<0.001)return;
        vector normal=llVecNorm(NORMAL);
        p=p-2.0*((p-PLANE_POINT)*normal)*normal;
        selected=link;
        identity=llGetLinkKey(link);
        original=data;
        llSetLinkPrimitiveParamsFast(link,[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,r,PRIM_SIZE,size]);
        llOwnerSay("Preview applied; touch again to restore.");
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set bend angle0..170 degrees and positive half-width. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Sharp bends create long miters; the example reports a miter-limit ratio before actual construction.

// Original Incoprea. MIT. Calculation only.
float BEND=70.0;
float HALF_WIDTH=0.8;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(BEND<0.0||BEND>=170.0||HALF_WIDTH<=0.0)
        {
            llOwnerSay("Invalid angle/width.");
            return;
        }
        float length=HALF_WIDTH/llCos(BEND*DEG_TO_RAD*0.5);
        llOwnerSay("Miter length="+(string)length+" ratio="+(string)(length/HALF_WIDTH)+" outer extension="+(string)(HALF_WIDTH*llTan(BEND*DEG_TO_RAD*0.5)));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a nonphysical ordinary prim. Touch compares/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Separates deformation from rotation. Mesh/sculpt and other types rejected.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TYPE]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer type=llList2Integer(saved,0);
        if(llGetStatus(STATUS_PHYSICS)||(type!=PRIM_TYPE_BOX&&type!=PRIM_TYPE_CYLINDER&&type!=PRIM_TYPE_PRISM))return;
        preview=!preview;
        if(preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TYPE]+llListReplaceList(saved,[ZERO_VECTOR],4,4));
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TYPE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare owned prim. Set COLUMNS, ROWS and cell spacing; total cells at most16. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Useful for scan paths and ordered installations; output stays in one plane and includes cell centers.

// Original Incoprea. MIT. Planning only.
integer COLUMNS=4;
integer ROWS=3;
float SPACING=1.5;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(COLUMNS<1||ROWS<1||COLUMNS*ROWS>16||SPACING<=0.0)
        {
            llOwnerSay("Use1..16 total cells and positive spacing.");
            return;
        }
        integer i;
        for(i=0;i<COLUMNS*ROWS;++i)
        {
            integer row=i/COLUMNS;
            integer column=i%COLUMNS;
            if(row%2)column=COLUMNS-1-column;
            llOwnerSay((string)i+": "+(string)<column*SPACING,row*SPACING,0.0>);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set positive SPACING. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

The walk expands right/up/left/down in pairs of growing run lengths; it is a placement plan only.

// Original Incoprea. MIT. Planning only.
float SPACING=1.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SPACING<=0.0)
        {
            llOwnerSay("Positive spacing required.");
            return;
        }
        integer x;
        integer y;
        integer direction;
        integer run=1;
        integer printed=1;
        llOwnerSay("0: "+(string)ZERO_VECTOR);
        while(printed<16)
        {
            integer pair;
            for(pair=0;pair<2&&printed<16;++pair)
            {
                integer step;
                for(step=0;step<run&&printed<16;++step)
                {
                    if(direction==0)++x;
                    else if(direction==1)++y;
                    else if(direction==2)--x;
                    else --y;
                    llOwnerSay((string)printed+": "+(string)<x*SPACING,y*SPACING,0.0>);
                    ++printed;
                }
                direction=(direction+1)%4;
            }
            ++run;
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set noncollinear XY points PREV/CORNER/NEXT and signed OFFSET. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Positive offset is left of travel. Nearly parallel offset lines are rejected; sharp corners may require beveling.

// Original Incoprea. MIT. Calculation only.
vector PREV=<0.0,0.0,0.0>;
vector CORNER=<5.0,0.0,0.0>;
vector NEXT=<7.0,4.0,0.0>;
float OFFSET=0.5;
float cross2(vector a,vector b)
{
    return a.x*b.y-a.y*b.x;
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        vector d1=CORNER-PREV;
        vector d2=NEXT-CORNER;
        d1.z=0.0;
        d2.z=0.0;
        if(llVecMag(d1)<0.000001||llVecMag(d2)<0.000001)
        {
            llOwnerSay("Repeated vertex.");
            return;
        }
        d1=llVecNorm(d1);
        d2=llVecNorm(d2);
        vector p=CORNER+OFFSET*<-d1.y,d1.x,0.0>;
        vector q=CORNER+OFFSET*<-d2.y,d2.x,0.0>;
        float den=cross2(d1,d2);
        if(llFabs(den)<0.000001)
        {
            llOwnerSay("Parallel corner; handle straight path separately.");
            return;
        }
        llOwnerSay("Offset corner="+(string)(p+d1*(cross2(q-p,d2)/den)));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare owned prim. Set POINTS and CENTRE. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

The strided sort key is consistently float; equal-distance ties may use implementation-dependent order.

// Original Incoprea. MIT. Planning only.
list POINTS=[<4.0,0.0,0.0>,<1.0,1.0,0.0>,<2.0,3.0,0.0>];
vector CENTRE=ZERO_VECTOR;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        list rows;
        integer i;
        for(i=0;i<llGetListLength(POINTS);++i)
        {
            vector delta=llList2Vector(POINTS,i)-CENTRE;
            rows+=[delta*delta,i];
        }
        rows=llListSort(rows,2,TRUE);
        for(i=0;i<llGetListLength(rows);i+=2)llOwnerSay("Index="+(string)llList2Integer(rows,i+1)+" distance="+(string)llSqrt(llList2Float(rows,i)));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a nonphysical box, cylinder or prism; owner-touch toggles.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Keeps the saved hole shape, cuts, twist and other shape fields. Does not apply to mesh/sculpt prims; collision geometry changes.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TYPE]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetStatus(STATUS_PHYSICS))return;
        integer type=llList2Integer(saved,0);
        if(type!=PRIM_TYPE_BOX&&type!=PRIM_TYPE_CYLINDER&&type!=PRIM_TYPE_PRISM)return;
        preview=!preview;
        if(preview)
        {
            list shape=llListReplaceList(saved,[0.5],3,3);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TYPE]+shape);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TYPE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare owned prim. Set positive SPACING. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

This is a triangular point lattice, useful for dense round-item arrangements; it does not check actual object footprints.

// Original Incoprea. MIT. Planning only.
float SPACING=1.2;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SPACING<=0.0)
        {
            llOwnerSay("Positive spacing required.");
            return;
        }
        integer row;
        integer column;
        for(row=0;row<3;++row)for(column=0;column<4;++column)
        {
            float offset=0.0;
            if(row%2)offset=0.5;
            llOwnerSay((string)<SPACING*(column+offset),SPACING*llSqrt(3.0)*0.5*row,0.0>);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a rezzed linkset or attachment. Touch repeatedly to move through the prims.

Stop / restore: Remove or disable the script. It does not change the build.

Seated avatars are excluded for rezzed objects. Relinking resets the page. Names need not be unique.

// Original Incoprea example. MIT.
integer cursor = 1;
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        integer total = llGetObjectPrimCount(llGetKey());
        if (total == 0) total = llGetNumberOfPrims();
        if (total == 1)
        {
            llOwnerSay("This prim: " + llGetObjectName());
            return;
        }
        if (cursor > total) cursor = 1;
        integer end = cursor + 9;
        if (end > total) end = total;
        integer i;
        for (i = cursor; i <= end; ++i)
        llOwnerSay((string)i + ": " + llGetLinkName(i));
        cursor = end + 1;
    }
    changed(integer flags)
    {
        if (flags & (CHANGED_LINK | CHANGED_OWNER)) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Use at most32 actual prims. Stop scripts that would reapply rotation. Owner-touch toggles pause.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Pauses viewer-side target omega only. It does not freeze physics, KFM or timer-driven pose changes. Restoring resumes speed, not the former visual phase.

// Original Incoprea. MIT. Test on a spare copy first.
list saved;
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        integer i;
        if(active)
        {
            for(i=0;i<llGetListLength(saved);i+=5)
            {
                integer link=llList2Integer(saved,i);
                if(llGetLinkKey(link)==llList2Key(saved,i+1))llSetLinkPrimitiveParamsFast(link,[PRIM_OMEGA]+llList2List(saved,i+2,i+4));
                else llOwnerSay("Skipped changed link.");
            }
            active=FALSE;
            saved=[];
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2||total>32)return;
        for(i=1;i<=total;++i)
        {
            saved += [i,llGetLinkKey(i)]+llGetLinkPrimitiveParams(i,[PRIM_OMEGA]);
            llSetLinkPrimitiveParamsFast(i,[PRIM_OMEGA,ZERO_VECTOR,0.0,0.0]);
        }
        active=TRUE;
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set POINTS with at least two positions. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Duplicate points are allowed, but total route length must be positive. This plans positions without creating markers.

// Original Incoprea. MIT. Calculation only.
list POINTS=[<0.0,0.0,0.0>,<4.0,0.0,0.0>,<4.0,6.0,0.0>,<8.0,6.0,0.0>];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(POINTS);
        if(n<2)
        {
            llOwnerSay("Need two points.");
            return;
        }
        float total;
        integer i;
        for(i=1;i<n;++i)total+=llVecDist(llList2Vector(POINTS,i-1),llList2Vector(POINTS,i));
        if(total<0.000001)
        {
            llOwnerSay("Zero-length path.");
            return;
        }
        integer marker;
        for(marker=0;marker<6;++marker)
        {
            float remaining=total*(float)marker/5.0;
            vector result=llList2Vector(POINTS,-1);
            integer found;
            for(i=1;i<n&&!found;++i)
            {
                vector a=llList2Vector(POINTS,i-1);
                vector b=llList2Vector(POINTS,i);
                float length=llVecDist(a,b);
                if(length>0.0&&remaining<=length)
                {
                    result=a+(b-a)*(remaining/length);
                    found=TRUE;
                }
                else remaining-=length;
            }
            llOwnerSay("Marker "+(string)marker+" "+(string)result);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set positive widths no larger than CAPACITY; at most twenty items. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

One-dimensional width packing with no gaps; first-fit is a heuristic and may use more shelves than an optimal arrangement.

// Original Incoprea. MIT. Planning only.
list WIDTHS=[3.0,2.0,4.0,1.5,2.5,1.0];
float CAPACITY=6.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(WIDTHS);
        if(n>20||CAPACITY<=0.0)
        {
            llOwnerSay("Invalid capacity/count.");
            return;
        }
        list used;
        integer i;
        for(i=0;i<n;++i)
        {
            float width=llList2Float(WIDTHS,i);
            if(width<=0.0||width>CAPACITY)
            {
                llOwnerSay("Invalid item width.");
                return;
            }
            integer shelf=0;
            integer placed=FALSE;
            while(shelf<llGetListLength(used)&&!placed)
            {
                float consumed=llList2Float(used,shelf);
                if(consumed+width<=CAPACITY)
                {
                    llOwnerSay("Item "+(string)i+" shelf "+(string)shelf+" x="+(string)consumed);
                    used=llListReplaceList(used,[consumed+width],shelf,shelf);
                    placed=TRUE;
                }
                else ++shelf;
            }
            if(!placed)
            {
                llOwnerSay("Item "+(string)i+" new shelf "+(string)llGetListLength(used));
                used+=[width];
            }
        }
        llOwnerSay("Shelf loads="+llDumpList2String(used,","));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set radii and center distance greater than their sum. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Crossed belts reverse relative rotation; a real belt needs clearance where it crosses. This is geometry only.

// Original Incoprea. MIT. Planning only.
float R1=1.5;
float R2=1.0;
float DISTANCE=6.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(R1<=0.0||R2<=0.0||DISTANCE<=R1+R2)
        {
            llOwnerSay("Pulleys need sufficient separation.");
            return;
        }
        float sum=R1+R2;
        float angle=llAsin(sum/DISTANCE);
        float straight=llSqrt(DISTANCE*DISTANCE-sum*sum);
        llOwnerSay("Crossed length="+(string)(2.0*straight+(PI+2.0*angle)*sum)+" wrap degrees="+(string)((PI+2.0*angle)*RAD_TO_DEG));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set outer width/height and left/right/top/bottom border sizes. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Returns dimensions, not rendered panels. Opposing borders cannot exceed the outer span.

// Original Incoprea. MIT. Planning only.
float W=6.0;
float H=4.0;
float LEFT=0.4;
float RIGHT=0.6;
float TOP=0.5;
float BOTTOM=0.3;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(LEFT<0.0||RIGHT<0.0||TOP<0.0||BOTTOM<0.0||W<=LEFT+RIGHT||H<=TOP+BOTTOM)
        {
            llOwnerSay("Borders leave no positive centre.");
            return;
        }
        llOwnerSay("Column widths="+(string)<LEFT,W-LEFT-RIGHT,RIGHT>+"; row heights bottom/centre/top="+(string)<BOTTOM,H-TOP-BOTTOM,TOP>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set SHIFT in root-local meters. Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

A planning calculation only. Assumes root orientation remains unchanged; moving the root geometry itself is intentional. It neither unlinks nor moves anything.

// Original Incoprea example. MIT.
vector SHIFT=<1.0,0.0,0.0>;
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        rotation rootRot=llGetRootRotation();
        vector rootPos=llGetRootPosition();
        llOwnerSay("Proposed root position: "+(string)(rootPos+SHIFT*rootRot));
        integer i;
        for(i=2;i<=total;++i)
        {
            vector position=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
            llOwnerSay("Child "+(string)i+" proposed offset: "+(string)(position-SHIFT));
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set overall LENGTH greater than WIDTH and positive WIDTH. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Unlike a rounded rectangle, the end radius is exactly half the width.

// Original Incoprea. MIT. Calculation only.
float LENGTH=12.0;
float WIDTH=5.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(WIDTH<=0.0||LENGTH<WIDTH)
        {
            llOwnerSay("Need length>=width>0.");
            return;
        }
        float straight=LENGTH-WIDTH;
        float radius=WIDTH*0.5;
        llOwnerSay("Straight middle length="+(string)straight+" perimeter="+(string)(2.0*straight+TWO_PI*radius)+" area="+(string)(straight*WIDTH+PI*radius*radius));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set positive DISTANCE, MAX_SPEED and ACCELERATION. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Selects a triangular profile when the move is too short to reach maximum speed. It does not move an object.

// Original Incoprea. MIT. Planning only.
float DISTANCE=12.0;
float MAX_SPEED=3.0;
float ACCELERATION=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(DISTANCE<=0.0||MAX_SPEED<=0.0||ACCELERATION<=0.0)
        {
            llOwnerSay("Positive inputs required.");
            return;
        }
        float ramp=MAX_SPEED/ACCELERATION;
        float rampDistance=ACCELERATION*ramp*ramp;
        float cruise=0.0;
        float peak=MAX_SPEED;
        if(DISTANCE<rampDistance)
        {
            ramp=llSqrt(DISTANCE/ACCELERATION);
            peak=ACCELERATION*ramp;
        }
        else cruise=(DISTANCE-rampDistance)/MAX_SPEED;
        llOwnerSay("Accelerate="+(string)ramp+" cruise="+(string)cruise+" decelerate="+(string)ramp+" total="+(string)(2.0*ramp+cruise)+" peak="+(string)peak);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set radii R1/R2 and center distance greater than their absolute difference. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

The formula models tangent straight segments plus contact arcs; pulleys must also avoid physical overlap for a practical arrangement.

// Original Incoprea. MIT. Planning only.
float R1=2.0;
float R2=1.0;
float DISTANCE=6.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(R1<=0.0||R2<=0.0||DISTANCE<=llFabs(R1-R2))
        {
            llOwnerSay("Invalid pulley layout.");
            return;
        }
        float big=R1;
        float small=R2;
        if(small>big)
        {
            float temp=big;
            big=small;
            small=temp;
        }
        float angle=llAsin((big-small)/DISTANCE);
        float straight=llSqrt(DISTANCE*DISTANCE-(big-small)*(big-small));
        float length=2.0*straight+PI*(big+small)+2.0*angle*(big-small);
        llOwnerSay("Belt length="+(string)length+" big wrap="+(string)((PI+2.0*angle)*RAD_TO_DEG)+" small wrap="+(string)((PI-2.0*angle)*RAD_TO_DEG));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set WIDTH, HEIGHT, and METERS_PER_TILE to your measured flat panel values; touch as owner.

Stop / restore: Remove or disable. This inspector changes no build properties.

Read-only planning for a flat rectangular mapping. Mesh UVs and planar mapping may differ; the script does not infer face orientation or apply repeats.

// Original Incoprea example. MIT.
float WIDTH=4.0;
float HEIGHT=2.0;
float METERS_PER_TILE=0.5;
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(WIDTH<=0.0 || HEIGHT<=0.0 || METERS_PER_TILE<=0.0)
        {
            llOwnerSay("Use positive dimensions and tile size.");
            return;
        }
        vector repeats=<WIDTH/METERS_PER_TILE,HEIGHT/METERS_PER_TILE,0.0>;
        llOwnerSay("Suggested repeats: "+(string)repeats);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a rezzed object and touch as owner. Copy the report into your own build notes.

Stop / restore: Remove or disable the script. It does not change the build.

This records nothing permanently by itself and does not move the object. Region coordinates are not global grid coordinates.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        llOwnerSay("Region: " + llGetRegionName());
        llOwnerSay("Position: " + (string)llGetPos());
        llOwnerSay("World Euler degrees: " + (string)(llRot2Euler(llGetRot()) * RAD_TO_DEG));
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set relative POSITION and VELOCITY. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Negative closest time is clamped to now. Only supplied test vectors are used; no sensors or avatar data.

// Original Incoprea. MIT. Planning only.
vector POSITION=<10.0,4.0,0.0>;
vector VELOCITY=<-2.0,-0.2,0.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        float speed2=VELOCITY*VELOCITY;
        float t=0.0;
        if(speed2>0.000001)t=-(POSITION*VELOCITY)/speed2;
        if(t<0.0)t=0.0;
        llOwnerSay("Closest future time="+(string)t+" separation="+(string)llVecMag(POSITION+t*VELOCITY));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set OFFSET and use a rezzed build. Touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Reports the target location but does not rez or move anything. Uses the root orientation and position; object scale does not scale the offset.

// Original Incoprea example. MIT.
vector OFFSET=<2.0,0.0,1.0>;
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        vector target=llGetRootPosition()+OFFSET*llGetRootRotation();
        llOwnerSay("Proposed region position: "+(string)target);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set positive SPAN and shape parameter A; supports are atZ0. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

A controls tension-like shape but this is not a structural simulation. Large span/A ratios can overflow and are rejected.

// Original Incoprea. MIT. Calculation only.
float SPAN=8.0;
float A=5.0;
float cosh(float x)
{
    return 0.5*(llPow(2.718281828,x)+llPow(2.718281828,-x));
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SPAN<=0.0||A<=0.0||SPAN/A>20.0)
        {
            llOwnerSay("Invalid span/shape ratio.");
            return;
        }
        float edge=cosh(SPAN/(2.0*A));
        integer i;
        for(i=0;i<=6;++i)
        {
            float x=-SPAN*0.5+SPAN*(float)i/6.0;
            float z=A*(cosh(x/A)-edge);
            llOwnerSay((string)<x,0.0,z>);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACTOR from 0.1 through 10. Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

This does not apply scaling. Simulator size, link-distance, mesh physics, and land-impact limits still require testing; warning limits are conservative sample values.

// Original Incoprea example. MIT.
float FACTOR=1.5;
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        if(FACTOR<0.1 || FACTOR>10)
        {
            llOwnerSay("Factor must be 0.1-10.");
            return;
        }
        integer i;
        for(i=1;i<=total;++i)
        {
            vector size=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_SIZE]),0)*FACTOR;
            llOwnerSay("Link "+(string)i+" scale -> "+(string)size);
            if(size.x<0.01 || size.y<0.01 || size.z<0.01 || size.x>64 || size.y>64 || size.z>64)llOwnerSay("Review simulator size limits for this prim.");
            if(i>1)
            {
                vector offset=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
                llOwnerSay("Offset -> "+(string)(offset*FACTOR));
            }
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set PREFIX. Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

No names are changed. Existing name-based scripts could depend on current names, so review their dependencies before manually applying a plan.

// Original Incoprea example. MIT.
string PREFIX="GardenPart";
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        if(PREFIX=="" || llStringLength(PREFIX)>20)
        {
            llOwnerSay("Use a prefix of 1-20 characters.");
            return;
        }
        integer i;
        for(i=1;i<=total;++i)llOwnerSay(llGetLinkName(i)+" -> "+PREFIX+"-"+(string)i);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Set PREFIX. Limit32 actual prims; owner-touch applies/restores.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Renaming may affect scripts that find parts by name. Disable those scripts first. Root name and inventory names are unchanged.

// Original Incoprea. MIT. Test on a spare copy first.
string PREFIX="Part-";
list saved;
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        integer i;
        if(active)
        {
            for(i=0;i<llGetListLength(saved);i+=3)
            {
                integer link=llList2Integer(saved,i);
                if(llGetLinkKey(link)==llList2Key(saved,i+1))llSetLinkPrimitiveParamsFast(link,[PRIM_NAME,llList2String(saved,i+2)]);
                else llOwnerSay("Skipped changed link="+(string)link);
            }
            saved=[];
            active=FALSE;
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2||total>32||llStringLength(PREFIX)>20)return;
        for(i=2;i<=total;++i)
        {
            saved += [i,llGetLinkKey(i),llGetLinkName(i)];
            llSetLinkPrimitiveParamsFast(i,[PRIM_NAME,PREFIX+(string)(i-1)]);
        }
        active=TRUE;
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Use a nonphysical ordinary box, cylinder or prism. Owner-touch toggles its slice from startup to the lower half.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Shape and collision geometry change; mesh objects do not use the same slicing behavior. Verify on a copy first.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_SLICE]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetStatus(STATUS_PHYSICS))return;
        integer type=llList2Integer(llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TYPE]),0);
        if(type!=PRIM_TYPE_BOX&&type!=PRIM_TYPE_CYLINDER&&type!=PRIM_TYPE_PRISM)return;
        preview=!preview;
        if(preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_SLICE,<0.0,0.5,0.0>]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_SLICE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set POINT, ORIGIN, U_AXIS and V_AXIS, each axis scaled to one texture repeat. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Axes must be nonzero and perpendicular. This does not inspect mesh UVs; it plans a projection.

// Original Incoprea. MIT. Planning only.
vector POINT=<3.0,4.0,2.0>;
vector ORIGIN=ZERO_VECTOR;
vector U_AXIS=<2.0,0.0,0.0>;
vector V_AXIS=<0.0,2.0,0.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        float uu=U_AXIS*U_AXIS;
        float vv=V_AXIS*V_AXIS;
        if(uu<0.000001||vv<0.000001||llFabs(U_AXIS*V_AXIS)>0.0001)
        {
            llOwnerSay("Use nonzero perpendicular axes.");
            return;
        }
        vector delta=POINT-ORIGIN;
        llOwnerSay("Planar UV="+(string)<(delta*U_AXIS)/uu,(delta*V_AXIS)/vv,0.0>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set DIRECTION; longitude seam lies on the negativeX axis. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

The poles have ambiguous longitude. This is one explicit mapping convention and may differ from a mesh UV layout.

// Original Incoprea. MIT. Planning only.
vector DIRECTION=<2.0,3.0,1.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llVecMag(DIRECTION)<0.000001)
        {
            llOwnerSay("Nonzero direction required.");
            return;
        }
        vector n=llVecNorm(DIRECTION);
        float z=n.z;
        if(z>1.0)z=1.0;
        if(z< -1.0)z=-1.0;
        float u=0.5+llAtan2(n.y,n.x)/TWO_PI;
        float v=0.5+llAsin(z)/PI;
        llOwnerSay("Spherical UV="+(string)<u,v,0.0>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Place in a spare owned prim. Set POINT, CENTER, HEIGHT and angular SEAM degrees. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

U wraps around the cylinder; V is measured from center upward. Points on the axis have no unique U.

// Original Incoprea. MIT. Planning only.
vector POINT=<2.0,2.0,3.0>;
vector CENTER=ZERO_VECTOR;
float HEIGHT=4.0;
float SEAM=0.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        vector p=POINT-CENTER;
        if(HEIGHT<=0.0||p.x*p.x+p.y*p.y<0.000001)
        {
            llOwnerSay("Positive height and point off axis required.");
            return;
        }
        float u=(llAtan2(p.y,p.x)-SEAM*DEG_TO_RAD)/TWO_PI;
        u-=llFloor(u);
        llOwnerSay("Cylindrical UV="+(string)<u,p.z/HEIGHT,0.0>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Set A and B. Put in nonphysical child; owner-touch previews/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Centerline alignment, not a moving constraint. Degenerate endpoints rejected.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
vector A=<-1.0,0.0,0.0>;
vector B=<1.0,0.0,0.0>;
vector home;
default
{
    state_entry()
    {
        home=llGetLocalPos();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS)||llVecDist(A,B)<0.001)return;
        preview=!preview;
        if(preview)
        {
            vector d=B-A;
            float t=((home-A)*d)/(d*d);
            if(t<0.0)t=0.0;
            if(t>1.0)t=1.0;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,A+d*t]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POS_LOCAL,home]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set SPAN positive and SAG nonnegative. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

A parabola is a visual approximation, not the exact hanging-cable catenary. Endpoints areZ0.

// Original Incoprea. MIT. Calculation only.
float SPAN=8.0;
float SAG=1.2;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SPAN<=0.0||SAG<0.0)
        {
            llOwnerSay("Invalid span/sag.");
            return;
        }
        integer i;
        for(i=0;i<=6;++i)
        {
            float t=(float)i/6.0;
            llOwnerSay((string)<SPAN*t,0.0,-4.0*SAG*t*(1.0-t)>);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Add a notecard and set CARD_NAME to its exact inventory name. The script reads the first line after reset.

Stop / restore: Remove the script; clear the floating text if the card has no line.

Demonstration of asynchronous notecard reading. It intentionally reads only one line and exposes it as public hover text.

// Original Incoprea example. Add your own notecard to this prim.
string CARD_NAME = "museum_note";
key query;
default
{
    state_entry()
    {
        if (llGetInventoryType(CARD_NAME) == INVENTORY_NOTECARD)
        query = llGetNotecardLine(CARD_NAME, 0);
        else
        llSetText("Add the museum_note notecard", <1.0, 0.7, 0.5>, 1.0);
    }
    dataserver(key request, string data)
    {
        if (request == query)
        llSetText(data, <0.85, 0.92, 0.78>, 1.0);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in your own rezzed test object. Resize this prim manually or with an existing animation during the session. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

Bounding-box volume is not mesh/material volume. Samples do not include changes that happen entirely between callbacks.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
vector low;
vector high;
float minVolume;
float maxVolume;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    llOwnerSay("Dimension minima="+(string)low+" maxima="+(string)high+" box volume range="+(string)minVolume+" to "+(string)maxVolume);
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        low=llGetScale();
        high=low;
        minVolume=low.x*low.y*low.z;
        maxVolume=minVolume;
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        vector s=llGetScale();
        if(s.x<low.x)low.x=s.x;
        if(s.y<low.y)low.y=s.y;
        if(s.z<low.z)low.z=s.z;
        if(s.x>high.x)high.x=s.x;
        if(s.y>high.y)high.y=s.y;
        if(s.z>high.z)high.z=s.z;
        float volume=s.x*s.y*s.z;
        if(volume<minVolume)minVolume=volume;
        if(volume>maxVolume)maxVolume=volume;
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5

Setup: Put in the root of a spare owned object/linkset. Child touch handlers may consume events. Touch opposite corners of the region-aligned area to measure. Collect 2 owner touches; the next touch starts another measurement.

Stop / restore: Reset clears collected points; disable/remove to stop. No geometry is changed.

This constructs an axis-aligned box even if the source object is rotated. Results use actual touch positions in region coordinates, not hidden mesh dimensions.

// Original Incoprea. MIT. Live touch measurements only.
list points;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llDetectedTouchFace(0)<0)
        {
            llOwnerSay("Touch position unavailable.");
            return;
        }
        if(llGetListLength(points)>=2)points=[];
        points+=[llDetectedTouchPos(0)];
        integer collected=llGetListLength(points);
        if(collected<2)
        {
            llOwnerSay("Recorded point "+(string)collected+" of 2.");
            return;
        }
        vector a=llList2Vector(points,0);
        vector b=llList2Vector(points,1);
        vector c=llList2Vector(points,2);
        vector d=llList2Vector(points,3);
        vector low=a;
        vector high=a;
        if(b.x<low.x)low.x=b.x;
        if(b.y<low.y)low.y=b.y;
        if(b.z<low.z)low.z=b.z;
        if(b.x>high.x)high.x=b.x;
        if(b.y>high.y)high.y=b.y;
        if(b.z>high.z)high.z=b.z;
        llOwnerSay("Minimum="+(string)low+" maximum="+(string)high+" size="+(string)(high-low));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Place in a spare owned prim. Set nonnegative ARM_A/ARM_B and signed ANGLE. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

This reports motion ratios only; it does not calculate real force, efficiency or material strength.

// Original Incoprea. MIT. Planning only.
float ARM_A=1.0;
float ARM_B=3.0;
float ANGLE=15.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(ARM_A<=0.0||ARM_B<=0.0)
        {
            llOwnerSay("Positive arm lengths required.");
            return;
        }
        float angle=ANGLE*DEG_TO_RAD;
        llOwnerSay("Arc travelA="+(string)(ARM_A*angle)+" B="+(string)(ARM_B*angle)+" travel ratio="+(string)(ARM_B/ARM_A));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set POINTS and nonnegative MIN_DISTANCE. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

The final endpoint is always retained, which may leave a short final segment. This does not preserve sharp corners like a full simplifier.

// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,0.0,0.0>,<0.02,0.0,0.0>,<1.0,0.0,0.0>,<1.01,0.0,0.0>,<2.0,1.0,0.0>];
float MIN_DISTANCE=0.1;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(POINTS);
        if(n==0||MIN_DISTANCE<0.0)
        {
            llOwnerSay("Need points and nonnegative threshold.");
            return;
        }
        list kept=[llList2Vector(POINTS,0)];
        vector last=llList2Vector(POINTS,0);
        integer i;
        for(i=1;i<n;++i)
        {
            vector p=llList2Vector(POINTS,i);
            if(llVecDist(last,p)>=MIN_DISTANCE||i==n-1)
            {
                kept+=[p];
                last=p;
            }
        }
        llOwnerSay("Kept="+(string)llGetListLength(kept)+": "+llDumpList2String(kept," | "));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put inside a test prim with at most32 faces. Add a texture named replacement with permissions that allow reuse. Owner-touch a face; next touch restores.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Only this prim is edited. Preserves each face’s repeats, offsets and rotation. Does not touch normal, specular or PBR assets.

// Original Incoprea. MIT. Test on a spare copy first.
list saved;
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer i;
        if(active)
        {
            for(i=0;i<llGetListLength(saved);i+=5)llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,llList2Integer(saved,i)]+llList2List(saved,i+1,i+4));
            saved=[];
            active=FALSE;
            return;
        }
        integer face=llDetectedTouchFace(0);
        if(face<0||llDetectedLinkNumber(0)!=llGetLinkNumber()||llGetNumberOfSides()>32)return;
        if(llGetInventoryType("replacement")!=INVENTORY_TEXTURE)
        {
            llOwnerSay("Add replacement texture.");
            return;
        }
        string asset=llList2String(llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,face]),0);
        if((key)asset==NULL_KEY)
        {
            llOwnerSay("Selected texture key is not readable.");
            return;
        }
        for(i=0;i<llGetNumberOfSides();++i)
        {
            list data=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,i]);
            if(llList2String(data,0)==asset)
            {
                saved += [i]+data;
                llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,i,"replacement"]+llList2List(data,1,3));
            }
        }
        active=TRUE;
        llOwnerSay("Replaced matching faces="+(string)(llGetListLength(saved)/5));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Put inside one test prim with at most32 faces. Set SOURCE_TINT, TARGET_TINT and TOLERANCE; owner-touch toggles preview.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Uses Euclidean RGB distance, not perceptual color distance. Does not change textures or PBR material factors.

// Original Incoprea. MIT. Test on a spare copy first.
vector SOURCE_TINT=<1.0,1.0,1.0>;
vector TARGET_TINT=<0.2,0.7,0.5>;
float TOLERANCE=0.05;
list saved;
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer i;
        if(active)
        {
            for(i=0;i<llGetListLength(saved);i+=3)llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_COLOR,llList2Integer(saved,i),llList2Vector(saved,i+1),llList2Float(saved,i+2)]);
            saved=[];
            active=FALSE;
            return;
        }
        integer faces=llGetNumberOfSides();
        if(faces>32||TOLERANCE<0.0||TOLERANCE>0.5)return;
        for(i=0;i<faces;++i)
        {
            list data=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_COLOR,i]);
            vector tint=llList2Vector(data,0);
            float alpha=llList2Float(data,1);
            if(llVecDist(tint,SOURCE_TINT)<=TOLERANCE)
            {
                saved += [i,tint,alpha];
                llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_COLOR,i,TARGET_TINT,alpha]);
            }
        }
        active=TRUE;
        llOwnerSay("Changed faces="+(string)(llGetListLength(saved)/3));
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

This is the envelope of centers only, unlike llGetBoundingBox. It ignores component sizes, shape, root size, and rotation of individual parts.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        vector low=llList2Vector(llGetLinkPrimitiveParams(2,[PRIM_POS_LOCAL]),0);
        vector high=low;
        integer i;
        for(i=3;i<=total;++i)
        {
            vector p=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
            if(p.x<low.x)low.x=p.x;
            if(p.y<low.y)low.y=p.y;
            if(p.z<low.z)low.z=p.z;
            if(p.x>high.x)high.x=p.x;
            if(p.y>high.y)high.y=p.y;
            if(p.z>high.z)high.z=p.z;
        }
        llOwnerSay("Child-center min: "+(string)low+" max: "+(string)high);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set UV, PIVOT and ANGLE degrees. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

The result may leave0..1 and wrap on repeating textures. This is coordinate math, not a prim texture mutation.

// Original Incoprea. MIT. Planning only.
vector UV=<0.2,0.8,0.0>;
vector PIVOT=<0.5,0.5,0.0>;
float ANGLE=30.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        float a=ANGLE*DEG_TO_RAD;
        vector q=UV-PIVOT;
        vector result=PIVOT+<q.x*llCos(a)-q.y*llSin(a),q.x*llSin(a)+q.y*llCos(a),0.0>;
        llOwnerSay("Rotated UV="+(string)result);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Put in a spare owned prim. Set interior angle1..179 degrees and radius. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

The angle is the interior angle between rays leaving the corner, not the change in travel heading.

// Original Incoprea. MIT. Calculation only.
float INTERIOR=100.0;
float RADIUS=1.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(INTERIOR<=0.0||INTERIOR>=180.0||RADIUS<=0.0)
        {
            llOwnerSay("Invalid angle/radius.");
            return;
        }
        float half=INTERIOR*DEG_TO_RAD*0.5;
        llOwnerSay("Setback along each ray="+(string)(RADIUS/llTan(half))+" centre distance on bisector="+(string)(RADIUS/llSin(half))+" arc sweep degrees="+(string)(180.0-INTERIOR));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set START, VELOCITY, GRAVITY and positive DURATION. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

This is ideal kinematics with no collisions or drag. It does not rez or launch a projectile.

// Original Incoprea. MIT. Planning only.
vector START=<0.0,0.0,1.0>;
vector VELOCITY=<4.0,0.0,6.0>;
vector GRAVITY=<0.0,0.0,-9.81>;
float DURATION=1.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(DURATION<=0.0)
        {
            llOwnerSay("Positive duration required.");
            return;
        }
        integer i;
        for(i=0;i<=4;++i)
        {
            float t=DURATION*(float)i/4.0;
            llOwnerSay("t="+(string)t+" position="+(string)(START+VELOCITY*t+0.5*GRAVITY*t*t));
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a spare owned prim. Set POINTS with two or more positions. Touch for private results.

Stop / restore: Disable/remove; no scene properties change.

Net height change alone hides intermediate climbs; this reports both cumulative directions.

// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,0.0,0.0>,<2.0,0.0,3.0>,<4.0,0.0,1.0>,<6.0,0.0,4.0>];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(POINTS);
        if(n<2)
        {
            llOwnerSay("Need two points.");
            return;
        }
        float ascent;
        float descent;
        integer i;
        for(i=1;i<n;++i)
        {
            vector a=llList2Vector(POINTS,i-1);
            vector b=llList2Vector(POINTS,i);
            float dz=b.z-a.z;
            if(dz>0.0)ascent+=dz;
            else descent-=dz;
        }
        llOwnerSay("Ascent="+(string)ascent+" descent="+(string)descent+" net="+(string)(ascent-descent));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set positive stiffness, nonnegative damping and target; use the supplied small step size. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

Numerical stability depends on step size and stiffness. The simulation is illustrative and does not drive prim physics.

// Original Incoprea. MIT. Planning only.
float STIFFNESS=12.0;
float DAMPING=5.0;
float TARGET=1.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(STIFFNESS<=0.0||DAMPING<0.0)
        {
            llOwnerSay("Invalid spring parameters.");
            return;
        }
        float x=0.0;
        float velocity=0.0;
        float dt=0.02;
        integer i;
        for(i=0;i<100;++i)
        {
            float acceleration=STIFFNESS*(TARGET-x)-DAMPING*velocity;
            velocity+=acceleration*dt;
            x+=velocity*dt;
            if((i+1)%20==0)llOwnerSay("t="+(string)((i+1)*dt)+" position="+(string)x+" velocity="+(string)velocity);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set viewing distance positive and angle between0 and170 degrees. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Assumes centered perpendicular viewing. This is geometric planning, not a viewer camera adjustment.

// Original Incoprea. MIT. Calculation only.
float DISTANCE=6.0;
float ANGLE=45.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(DISTANCE<=0.0||ANGLE<=0.0||ANGLE>=170.0)
        {
            llOwnerSay("Invalid distance/angle.");
            return;
        }
        llOwnerSay("Display width="+(string)(2.0*DISTANCE*llTan(ANGLE*DEG_TO_RAD*0.5)));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set outer radius greater than inner radius and sweep0..360 degrees. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Boundary edges are circular; straight-sided mesh approximations have different areas.

// Original Incoprea. MIT. Calculation only.
float OUTER=6.0;
float INNER=3.0;
float SWEEP=45.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(INNER<0.0||OUTER<=INNER||SWEEP<=0.0||SWEEP>360.0)
        {
            llOwnerSay("Invalid sector.");
            return;
        }
        float angle=SWEEP*DEG_TO_RAD;
        llOwnerSay("Area="+(string)(0.5*angle*(OUTER*OUTER-INNER*INNER))+" outer arc="+(string)(angle*OUTER)+" inner arc="+(string)(angle*INNER));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Place in a spare owned prim. Set DISTANCE, PREFERRED_SPEED and DECELERATION. Touch for owner-only output.

Stop / restore: Remove/disable. The script calculates only; no scene properties change.

This is a speed planner only. Repeated control needs measured elapsed time, tolerances and simulator-specific limits.

// Original Incoprea. MIT. Planning only.
float DISTANCE=1.2;
float PREFERRED_SPEED=4.0;
float DECELERATION=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(DISTANCE<0.0||PREFERRED_SPEED<0.0||DECELERATION<=0.0)
        {
            llOwnerSay("Invalid arrival inputs.");
            return;
        }
        float speed=llSqrt(2.0*DECELERATION*DISTANCE);
        if(speed>PREFERRED_SPEED)speed=PREFERRED_SPEED;
        llOwnerSay("Recommended maximum arrival speed="+(string)speed);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Set positive GRID up to1 meter. Owner-touch the child to preview; touch again to restore.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

This is a one-time actual position preview, not a moving constraint; collision clearance is your responsibility.

// Original Incoprea. MIT. Test on a spare copy first.
integer selected;
key identity;
list original;
float GRID=0.25;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        if(selected)
        {
            if(llGetLinkKey(selected)==identity)llSetLinkPrimitiveParamsFast(selected,[PRIM_POS_LOCAL,llList2Vector(original,0),PRIM_ROT_LOCAL,llList2Rot(original,1),PRIM_SIZE,llList2Vector(original,2)]);
            else llOwnerSay("Topology changed; restore manually from backup.");
            selected=0;
            return;
        }
        integer link=llDetectedLinkNumber(0);
        if(link<2||link>llGetObjectPrimCount(llGetKey()))
        {
            llOwnerSay("Touch a child prim.");
            return;
        }
        list data=llGetLinkPrimitiveParams(link,[PRIM_POS_LOCAL,PRIM_ROT_LOCAL,PRIM_SIZE]);
        vector p=llList2Vector(data,0);
        rotation r=llList2Rot(data,1);
        vector size=llList2Vector(data,2);
        if(GRID<=0.0||GRID>1.0)return;
        p=<llRound(p.x/GRID)*GRID,llRound(p.y/GRID)*GRID,llRound(p.z/GRID)*GRID>;
        selected=link;
        identity=llGetLinkKey(link);
        original=data;
        llSetLinkPrimitiveParamsFast(link,[PRIM_POS_LOCAL,p,PRIM_ROT_LOCAL,r,PRIM_SIZE,size]);
        llOwnerSay("Preview applied; touch again to restore.");
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set POINTS around CENTER. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

Angle sorting does not produce a valid polygon for every arbitrary point cloud; duplicate bearings and interior points need additional handling.

// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,3.0,0.0>,<-3.0,0.0,0.0>,<3.0,0.0,0.0>,<0.0,-3.0,0.0>];
vector CENTER=ZERO_VECTOR;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        list ordered;
        integer i;
        for(i=0;i<llGetListLength(POINTS);++i)
        {
            vector p=llList2Vector(POINTS,i)-CENTER;
            if(p.x*p.x+p.y*p.y<0.000001)
            {
                llOwnerSay("Point at center has no bearing.");
                return;
            }
            ordered+=[llAtan2(p.y,p.x),i];
        }
        ordered=llListSort(ordered,2,TRUE);
        for(i=0;i<llGetListLength(ordered);i+=2)llOwnerSay("Index="+(string)llList2Integer(ordered,i+1)+" angle="+(string)(llList2Float(ordered,i)*RAD_TO_DEG));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare owned prim. Set radius, positive sweep up to360 degrees and maximum spacing. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

Both endpoints receive posts. A full circle duplicates the start/end location; omit one endpoint in a closed build.

// Original Incoprea. MIT. Calculation only.
float RADIUS=4.0;
float SWEEP=120.0;
float MAX_SPACING=1.2;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RADIUS<=0.0||SWEEP<=0.0||SWEEP>360.0||MAX_SPACING<=0.0)
        {
            llOwnerSay("Invalid arc.");
            return;
        }
        float arc=RADIUS*SWEEP*DEG_TO_RAD;
        integer intervals=llCeil(arc/MAX_SPACING);
        llOwnerSay("Posts="+(string)(intervals+1)+" angle step="+(string)(SWEEP/(float)intervals)+" arc spacing="+(string)(arc/(float)intervals));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set positive RADIUS. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

This avoids latitude-grid pole clustering but does not optimize minimum separation exactly.

// Original Incoprea. MIT. Planning only.
float RADIUS=3.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RADIUS<=0.0)
        {
            llOwnerSay("Positive radius required.");
            return;
        }
        integer n=12;
        float golden=PI*(3.0-llSqrt(5.0));
        integer i;
        for(i=0;i<n;++i)
        {
            float z=1.0-2.0*((float)i+0.5)/(float)n;
            float ring=llSqrt(1.0-z*z);
            float angle=golden*i;
            llOwnerSay((string)(RADIUS*<ring*llCos(angle),ring*llSin(angle),z>));
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Use a spare owned prim. Set positive RADIUS. Owner touch prints sample coordinates.

Stop / restore: Remove/disable. Nothing is rezzed or moved.

An approximately even-area disc pattern, not random sampling. It intentionally excludes a point exactly at the origin.

// Original Incoprea. MIT. Planning only.
float RADIUS=4.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RADIUS<=0.0)
        {
            llOwnerSay("Positive radius required.");
            return;
        }
        integer n=12;
        float angleStep=PI*(3.0-llSqrt(5.0));
        integer i;
        for(i=0;i<n;++i)
        {
            float r=RADIUS*llSqrt(((float)i+0.5)/(float)n);
            float angle=i*angleStep;
            llOwnerSay((string)<r*llCos(angle),r*llSin(angle),0.0>);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Descriptions are treated as complete literal role labels. A description used as complex configuration may not make a useful role label; nothing is edited.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        list roles=[];
        list counts=[];
        integer i;
        for(i=1;i<=total;++i)
        {
            string role=llList2String(llGetLinkPrimitiveParams(i,[PRIM_DESC]),0);
            if(role=="")role="[blank]";
            integer index=llListFindList(roles,[role]);
            if(index==-1)
            {
                roles += [role];
                counts += [1];
            }
            else counts=llListReplaceList(counts,[llList2Integer(counts,index)+1],index,index);
        }
        for(i=0;i<llGetListLength(roles);++i)llOwnerSay(llList2String(roles,i)+": "+llList2String(counts,i));
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the inspected prim and touch as owner.

Stop / restore: Remove or disable. This inspector changes no build properties.

Only reads legacy face alpha. Texture pixels, alpha modes, and PBR can change actual appearance; zero alpha does not make metadata private.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        integer opaque;
        integer partial;
        integer clear;
        integer face;
        for(face=0;face<llGetNumberOfSides();++face)
        {
            float alpha=llGetAlpha(face);
            if(alpha<=0.0) ++clear;
            else if(alpha>=1.0) ++opaque;
            else ++partial;
        }
        llOwnerSay("Opaque: "+(string)opaque+"; partial: "+(string)partial+"; alpha zero: "+(string)clear);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a rezzed linkset of 2-32 prims and touch as owner.

Stop / restore: Remove or disable. This planner does not apply the reported changes.

Mesh/sculpted objects can appear under the sculpt type family; this is not a mesh topology or polygon-count audit.

// Original Incoprea example. MIT.
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed build.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>32)
        {
            llOwnerSay("Use a linkset of 2-32 prims.");
            return;
        }
        list types=[];
        list counts=[];
        integer i;
        for(i=1;i<=total;++i)
        {
            integer shape=llList2Integer(llGetLinkPrimitiveParams(i,[PRIM_TYPE]),0);
            integer index=llListFindList(types,[shape]);
            if(index==-1)
            {
                types += [shape];
                counts += [1];
            }
            else counts=llListReplaceList(counts,[llList2Integer(counts,index)+1],index,index);
        }
        for(i=0;i<llGetListLength(types);++i)llOwnerSay("PRIM_TYPE "+llList2String(types,i)+": "+llList2String(counts,i)+" prims");
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Place in a build and touch its visible surface as owner.

Stop / restore: Remove or disable the script. It does not change the build.

ST is face-space; UV reflects texture mapping. Unsupported touches can return invalid coordinates. This only reports the owner’s deliberate touch.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        integer face = llDetectedTouchFace(0);
        if (face == TOUCH_INVALID_FACE)
        {
            llOwnerSay("Surface data unavailable.");
            return;
        }
        llOwnerSay("Face " + (string)face + " / link " + (string)llDetectedLinkNumber(0));
        llOwnerSay("ST: " + (string)llDetectedTouchST(0));
        llOwnerSay("UV: " + (string)llDetectedTouchUV(0));
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare nonphysical rezzed linkset; disable competing scripts and do not edit or relink during the preview. Put this in the root. Touch first child, second child, then any prim to restore.

Stop / restore: Owner-touch again to restore before removing, resetting, relinking or transferring. Snapshots are memory-only; deletion/reset does not undo changes. Keep an untouched backup.

Moves real geometry. Seated avatars and root are excluded. A changed topology aborts the swap or restore.

// Original Incoprea. MIT. Test on a spare copy first.
integer first;
integer second;
key firstKey;
key secondKey;
vector firstPos;
vector secondPos;
integer active;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetAttached()||llGetStatus(STATUS_PHYSICS)||llGetLinkNumber()>1)
        {
            llOwnerSay("Use a nonphysical rezzed root.");
            return;
        }
        if(active)
        {
            if(llGetLinkKey(first)==firstKey&&llGetLinkKey(second)==secondKey)
            {
                llSetLinkPrimitiveParamsFast(first,[PRIM_POS_LOCAL,firstPos]);
                llSetLinkPrimitiveParamsFast(second,[PRIM_POS_LOCAL,secondPos]);
            }
            else llOwnerSay("Topology changed; restore manually.");
            first=0;
            active=FALSE;
            return;
        }
        integer link=llDetectedLinkNumber(0);
        if(link<2||link>llGetObjectPrimCount(llGetKey()))return;
        if(!first)
        {
            first=link;
            firstKey=llGetLinkKey(link);
            firstPos=llList2Vector(llGetLinkPrimitiveParams(link,[PRIM_POS_LOCAL]),0);
            llOwnerSay("Touch a different child.");
            return;
        }
        if(link==first)return;
        if(llGetLinkKey(first)!=firstKey)
        {
            first=0;
            return;
        }
        second=link;
        secondKey=llGetLinkKey(link);
        secondPos=llList2Vector(llGetLinkPrimitiveParams(link,[PRIM_POS_LOCAL]),0);
        llSetLinkPrimitiveParamsFast(first,[PRIM_POS_LOCAL,secondPos]);
        llSetLinkPrimitiveParamsFast(second,[PRIM_POS_LOCAL,firstPos]);
        active=TRUE;
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the object to inspect. Touch to print its region position privately to the owner.

Stop / restore: Disable or remove the script; it does not change object placement.

Reports the prim position in region coordinates. It is not a compass heading or teleport tool.

// Original Incoprea building helper.
default
{
    touch_start(integer count)
    {
        vector p = llGetPos();
        llOwnerSay("Position: " + (string)p);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Name three root-aligned box children bar1,bar2,bar3. Use nonphysical root. Owner-touch arms; root script sends code8062 and three comma-separated integers0–100.

Stop / restore: Owner-touch disarms and restores each position and scale.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Zero values retain a0.01m sliver; no automatic physics or link changes. Intended for small exhibit bars, not structural parts.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list saved;
integer active;
integer valid=TRUE;
default
{
    state_entry()
    {
        integer i;
        for(i=1;i<=3;++i)
        {
            integer j;
            integer found;
            integer count;
            for(j=2;j<=llGetObjectPrimCount(llGetKey());++j)if(llGetLinkName(j)=="bar"+(string)i)
            {
                found=j;
                ++count;
            }
            if(count!=1)
            {
                valid=FALSE;
                return;
            }
            links+=[found];
            saved+=llGetLinkPrimitiveParams(found,[PRIM_SIZE,PRIM_POS_LOCAL]);
        }
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS)||!valid)return;
        active=!active;
        if(!active)
        {
            integer i;
            for(i=0;i<3;++i)llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_SIZE,llList2Vector(saved,i*2),PRIM_POS_LOCAL,llList2Vector(saved,i*2+1)]);
        }
    }
    link_message(integer sender,integer code,string s,key data)
    {
        if(!active||!valid||sender!=1||code!=8062||llGetStatus(STATUS_PHYSICS))return;
        list values=llCSV2List(s);
        if(llGetListLength(values)!=3)return;
        integer i;
        for(i=0;i<3;++i)
        {
            string value=llStringTrim(llList2String(values,i),STRING_TRIM);
            integer number=(integer)value;
            if((string)number!=value||number<0||number>100)return;
        }
        for(i=0;i<3;++i)
        {
            vector size=llList2Vector(saved,i*2);
            vector p=llList2Vector(saved,i*2+1);
            float old=size.z;
            size.z*=llList2Integer(values,i)/100.0;
            if(size.z<0.01)size.z=0.01;
            p.z+=(size.z-old)*0.5;
            llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_SIZE,size,PRIM_POS_LOCAL,p]);
        }
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            active=FALSE;
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a rezzed object and touch a surface as owner.

Stop / restore: Remove or disable. This inspector changes no build properties.

Attachments are rejected. Point conversion includes translation and inverse rotation; it does not compensate for mesh modelling offsets.

// Original Incoprea example. MIT.
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed object.");
            return;
        }
        if(llDetectedTouchFace(0)==TOUCH_INVALID_FACE)
        {
            llOwnerSay("Touch surface data unavailable.");
            return;
        }
        vector localPoint=(llDetectedTouchPos(0)-llGetRootPosition())/llGetRootRotation();
        llOwnerSay("Root-local point: "+(string)localPoint);
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a small nonphysical linkset. Put in root; children pass touches to root. Root-touch restores selection.

Stop / restore: Touch the root to restore before removing. Selecting another child restores the previous one first.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Moves at most 0.25 meters along the child center’s radial direction. Does not promise a collision-free path.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer selected;
vector home;
integer valid=TRUE;
restore()
{
    if(selected)llSetLinkPrimitiveParamsFast(selected,[PRIM_POS_LOCAL,home]);
    selected=0;
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS)||!valid)return;
        integer link=llDetectedLinkNumber(0);
        restore();
        if(link<2||link>llGetObjectPrimCount(llGetKey()))return;
        home=llList2Vector(llGetLinkPrimitiveParams(link,[PRIM_POS_LOCAL]),0);
        if(llVecMag(home)<0.01)
        {
            llOwnerSay("Part center coincides with root.");
            return;
        }
        selected=link;
        llSetLinkPrimitiveParamsFast(selected,[PRIM_POS_LOCAL,home+llVecNorm(home)*0.25]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            selected=0;
            valid=FALSE;
            llOwnerSay("Link change: restore moved component manually if necessary.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in root with one child crosshair. Set FACE,WIDTH,HEIGHT for a root-local XY panel whose UV axes match X/Y. Owner-touch panel positions marker; root long-hold restores.

Stop / restore: Hold the root panel for two seconds to restore before removal.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. UV orientation varies by mesh/face; test authored mapping first. Nonphysical only; Z is preserved from marker Home.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
float WIDTH=1.0;
float HEIGHT=1.0;
integer target;
integer valid=TRUE;
vector home;
float pressed;
default
{
    state_entry()
    {
        integer i;
        integer count;
        for(i=2;i<=llGetObjectPrimCount(llGetKey());++i)if(llGetLinkName(i)=="crosshair")
        {
            target=i;
            ++count;
        }
        if(count!=1)
        {
            valid=FALSE;
            return;
        }
        home=llList2Vector(llGetLinkPrimitiveParams(target,[PRIM_POS_LOCAL]),0);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)==llGetOwner())pressed=llGetTime();
    }
    touch_end(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||llGetStatus(STATUS_PHYSICS)||!valid||llDetectedLinkNumber(0)>1)return;
        if(llGetTime()-pressed>=2.0)
        {
            llSetLinkPrimitiveParamsFast(target,[PRIM_POS_LOCAL,home]);
            return;
        }
        if(llDetectedTouchFace(0)!=FACE)return;
        vector st=llDetectedTouchST(0);
        if(st.x<0.0||st.y<0.0||st.x>1.0||st.y>1.0)return;
        llSetLinkPrimitiveParamsFast(target,[PRIM_POS_LOCAL,<(st.x-0.5)*WIDTH,(st.y-0.5)*HEIGHT,home.z>]);
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)valid=FALSE;
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare owned prim. Set three vertices and a positive setback smaller than both adjacent runs. Touch to print the plan privately.

Stop / restore: Remove/disable; calculations do not alter objects.

The setback is measured along each adjoining segment. No actual mesh is edited.

// Original Incoprea. MIT. Calculation only.
vector A=<0.0,0.0,0.0>;
vector B=<5.0,0.0,0.0>;
vector C=<5.0,4.0,0.0>;
float SETBACK=0.8;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        float first=llVecDist(A,B);
        float second=llVecDist(B,C);
        if(SETBACK<=0.0||SETBACK>=first||SETBACK>=second)
        {
            llOwnerSay("Setback does not fit adjacent runs.");
            return;
        }
        vector p=B+llVecNorm(A-B)*SETBACK;
        vector q=B+llVecNorm(C-B)*SETBACK;
        llOwnerSay("Cut endpoints="+(string)p+" and "+(string)q+"; chamfer length="+(string)llVecDist(p,q));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a stationary rezzed build. Touch one surface point, then another point on the same scripted build.

Stop / restore: Remove or reset to forget the first point. No build properties change.

Uses viewer-provided world touch positions. Moving the object between touches changes the meaning of the measurement; results are approximate.

// Original Incoprea example. MIT.
vector first;
integer hasFirst;
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        if (llDetectedTouchFace(0) == TOUCH_INVALID_FACE)
        {
            llOwnerSay("Touch data unavailable; try a visible surface.");
            return;
        }
        vector point = llDetectedTouchPos(0);
        if (!hasFirst)
        {
            first = point;
            hasFirst = TRUE;
            llOwnerSay("First point saved. Touch the second point.");
        }
        else
        {
            llOwnerSay("Distance: " + (string)llVecDist(first, point) + " meters.");
            hasFirst = FALSE;
        }
    }
    changed(integer flags)
    {
        if (flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set BOX dimensions. Use nonphysical child or unlinked prim; touch previews/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Not a whole-linkset resizer. Checks 0.01–64 meter dimensions; grids may impose other limits.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
vector BOX=<1.0,1.0,1.0>;
vector home;
default
{
    state_entry()
    {
        home=llGetScale();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetStatus(STATUS_PHYSICS)||BOX.x<=0.0||BOX.y<=0.0||BOX.z<=0.0)return;
        preview=!preview;
        if(preview)
        {
            float factor=BOX.x/home.x;
            if(BOX.y/home.y<factor)factor=BOX.y/home.y;
            if(BOX.z/home.z<factor)factor=BOX.z/home.z;
            vector size=home*factor;
            if(size.x<0.01||size.y<0.01||size.z<0.01||size.x>64.0||size.y>64.0||size.z>64.0)
            {
                preview=FALSE;
                return;
            }
            llSetScale(size);
        }
        else
        {
            llSetScale(home);
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in a rezzed linkset of 2-64 prims and touch as owner. Seated avatars are excluded. Edit REQUIRED.

Stop / restore: Remove or disable. This inspector changes no build properties.

This checks names, not function, content, or material. An unexpected extra copy is a finding rather than silently choosing one.

// Original Incoprea example. MIT.
list REQUIRED=["Root","Door","Handle"];
default
{
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner()) return;
        if(llGetAttached())
        {
            llOwnerSay("Use a rezzed linkset.");
            return;
        }
        integer total=llGetObjectPrimCount(llGetKey());
        if(total<2 || total>64)
        {
            llOwnerSay("Use a linkset of 2-64 prims.");
            return;
        }
        integer i;
        integer j;
        for(i=0;i<llGetListLength(REQUIRED);++i)
        {
            string wanted=llList2String(REQUIRED,i);
            integer matches;
            for(j=1;j<=total;++j) if(llGetLinkName(j)==wanted) ++matches;
            if(matches==1) llOwnerSay("OK: "+wanted);
            else llOwnerSay("Expected one ["+wanted+"], found "+(string)matches);
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER) llResetScript();
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use an ordinary nonphysical prim well within build limits. Owner-touch previews/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Preserves bounding-box volume, not hollow or arbitrary mesh surface volume.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
vector home;
default
{
    state_entry()
    {
        home=llGetScale();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetStatus(STATUS_PHYSICS))return;
        preview=!preview;
        if(preview)
        {
            vector size=<home.x/llSqrt(2.0),home.y/llSqrt(2.0),home.z*2.0>;
            if(size.x<0.01||size.y<0.01||size.z>64.0)
            {
                preview=FALSE;
                return;
            }
            llSetScale(size);
        }
        else
        {
            llSetScale(home);
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in your own rezzed test object. Put in the root of a rezzed linkset with2–32 actual prims. Owner-touch starts a thirty-sample session; touch again ends early.

Stop / restore: Automatically stops after thirty samples. Disable/remove to stop; no scene properties are changed.

Stops when link keys change, rather than confusing relinked components. Names are only read; reports contain link numbers and change counts.

// Original Incoprea. MIT. Test on a spare copy first.
integer active;
integer samples;
float began;
list keys;
list names;
list counts;
integer total;
finish()
{
    llSetTimerEvent(0.0);
    active=FALSE;
    integer i;
    for(i=0;i<llGetListLength(counts);++i)if(llList2Integer(counts,i)>0)llOwnerSay("Link "+(string)(i+2)+" name transitions="+(string)llList2Integer(counts,i));
    llOwnerSay("Component-name watch finished.");
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(active)
        {
            finish();
            return;
        }
        samples=0;
        began=llGetTime();
        if(llGetAttached()||llGetLinkNumber()>1)return;
        total=llGetObjectPrimCount(llGetKey());
        if(total<2||total>32)return;
        keys=[];
        names=[];
        counts=[];
        integer i;
        for(i=2;i<=total;++i)
        {
            keys += [llGetLinkKey(i)];
            names += [llGetLinkName(i)];
            counts += [0];
        }
        active=TRUE;
        llSetTimerEvent(1.0);
        llOwnerSay("Measurement session started.");
    }
    timer()
    {
        if(!active)return;
        ++samples;
        if(llGetObjectPrimCount(llGetKey())!=total)
        {
            llOwnerSay("Prim count changed; stopped.");
            finish();
            return;
        }
        integer i;
        for(i=2;i<=total;++i)
        {
            integer at=i-2;
            if(llGetLinkKey(i)!=llList2Key(keys,at))
            {
                llOwnerSay("Link identity changed; stopped.");
                finish();
                return;
            }
            string name=llGetLinkName(i);
            if(name!=llList2String(names,at))
            {
                counts=llListReplaceList(counts,[llList2Integer(counts,at)+1],at,at);
                names=llListReplaceList(names,[name],at,at);
            }
        }
        if(samples>=30)finish();
    }
    changed(integer flags)
    {
        if(flags&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4 · API reference 5 · API reference 6 · API reference 7

Setup: Use unattached nonphysical root away from region edges. Owner-touch previews/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Region rules can clamp movement; failures are reported. Does not change rotation or link offsets.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
vector home;
default
{
    state_entry()
    {
        home=llGetRootPosition();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()>1||llGetAttached()||llGetStatus(STATUS_PHYSICS))return;
        preview=!preview;
        if(preview)
        {
            vector target=home;
            target.x=llRound(home.x*2.0)*0.5;
            target.y=llRound(home.y*2.0)*0.5;
            if(!llSetRegionPos(target))llOwnerSay("Move failed; inspect for clamping.");
        }
        else
        {
            if(!llSetRegionPos(home))llOwnerSay("Restore failed; inspect for clamping.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in nonphysical child; owner-touch previews/restores. Keep root still.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Converts world orientation into root-local rotation.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
rotation home;
default
{
    state_entry()
    {
        home=llGetLocalRot();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetLinkNumber()<2||llGetStatus(STATUS_PHYSICS))return;
        vector forward=llRot2Fwd(home*llGetRootRotation());
        forward.z=0.0;
        if(llVecMag(forward)<0.01)return;
        preview=!preview;
        if(preview)
        {
            rotation root=llGetRootRotation();
            vector f=llRot2Fwd(home*root);
            float yaw=llAtan2(f.y,f.x);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,llEuler2Rot(<0.0,0.0,yaw>)/root]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ROT_LOCAL,home]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE on a classic material with readable texture settings. Owner-touch aligns; touch again restores the original normal/specular transforms.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Does not replace normal/specular images or change PBR transforms. Useful when maps unexpectedly drift apart.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
integer FACE=0;
list normal;
list specular;
default
{
    state_entry()
    {
        normal=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_NORMAL,FACE]);
        specular=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_SPECULAR,FACE]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        preview=!preview;
        if(preview)
        {
            list diffuse=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
            list uv=llList2List(diffuse,1,3);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_NORMAL,FACE]+llListReplaceList(normal,uv,1,3)+[PRIM_SPECULAR,FACE]+llListReplaceList(specular,uv,1,3));
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_NORMAL,FACE]+normal+[PRIM_SPECULAR,FACE]+specular);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a diffuse texture with transparency. Set FACE and preview a 128 cutoff.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Classic-material controls only; PBR materials may display differently. Use a spare prim and textures whose settings you can read and restore. Another controller must not edit the same face during the preview. Hard cutouts differ from blended transparency and can remove soft edges.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
integer FACE=0;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_ALPHA_MODE, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        if (preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ALPHA_MODE,FACE,PRIM_ALPHA_MODE_MASK,128]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ALPHA_MODE,FACE]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Set FACE on a transparent diffuse texture. Owner-touch and choose a mode; Restore returns original alpha mode and mask cutoff.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. This changes the material alpha rule, not face color alpha. PBR has separate material controls.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
integer FACE=0;
list saved;
init()
{
    saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_ALPHA_MODE,FACE]);
}
show()
{
    menu("Classic alpha comparison",["Opaque","Blend","Mask","Restore"]);
}
choose(string s)
{
    if(s=="Restore")llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ALPHA_MODE,FACE]+saved);
    else
    {
        integer mode=PRIM_ALPHA_MODE_NONE;
        if(s=="Blend")mode=PRIM_ALPHA_MODE_BLEND;
        else if(s=="Mask")mode=PRIM_ALPHA_MODE_MASK;
        else if(s!="Opaque")return;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_ALPHA_MODE,FACE,mode,128]);
    }
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set FACE, IMAGE_WIDTH/HEIGHT and DISPLAY_WIDTH/HEIGHT to positive values. Use default texture mapping. Owner-touch applies/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Dimensions are supplied by you; the script cannot inspect image pixels or infer mesh face dimensions. It crops, rather than adding letterbox bars.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
integer FACE=0;
float IMAGE_WIDTH=1024.0;
float IMAGE_HEIGHT=512.0;
float DISPLAY_WIDTH=1.0;
float DISPLAY_HEIGHT=1.0;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(IMAGE_WIDTH<=0.0||IMAGE_HEIGHT<=0.0||DISPLAY_WIDTH<=0.0||DISPLAY_HEIGHT<=0.0)return;
        preview=!preview;
        if(preview)
        {
            float source=IMAGE_WIDTH/IMAGE_HEIGHT;
            float target=DISPLAY_WIDTH/DISPLAY_HEIGHT;
            vector repeats=<1.0,1.0,0.0>;
            if(source>target)repeats.x=target/source;
            else repeats.y=source/target;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE,llList2String(saved,0),repeats,ZERO_VECTOR,0.0]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare owned prim. Set two sRGB colors and MIX0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

Output is a mathematical display-color blend, not a prediction of every viewer lighting/material result.

// Original Incoprea. MIT. Color calculation only.
vector A=<1.0,0.0,0.0>;
vector B=<0.0,1.0,0.0>;
float MIX=0.5;
float dec(float v)
{
    if(v<=0.04045)return v/12.92;
    return llPow((v+0.055)/1.055,2.4);
}
float enc(float v)
{
    if(v<=0.0031308)return 12.92*v;
    return 1.055*llPow(v,1.0/2.4)-0.055;
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(MIX<0.0||MIX>1.0)
        {
            llOwnerSay("Mix must be0..1.");
            return;
        }
        vector la=<dec(A.x),dec(A.y),dec(A.z)>;
        vector lb=<dec(B.x),dec(B.y),dec(B.z)>;
        vector l=la+(lb-la)*MIX;
        llOwnerSay("Direct="+(string)(A+(B-A)*MIX)+" linear-light blend="+(string)<enc(l.x),enc(l.y),enc(l.z)>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE and use a centered repeating pattern on a spare prim. Owner-touch starts and stops.

Stop / restore: Touch to disable texture animation before removing. The saved diffuse texture/UV settings are restored, but an earlier animation is not recoverable.

Use a spare prim with readable classic diffuse texture settings. Material behavior can differ with PBR transforms. SCALE animation changes image scale, not prim dimensions.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
integer active;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        active=!active;
        if(active)llSetTextureAnim(ANIM_ON|SMOOTH|SCALE|PING_PONG|LOOP,FACE,1,1,1.0,0.5,0.1);
        else
        {
            llSetTextureAnim(FALSE,FACE,0,0,0.0,0.0,1.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set HUE degrees and SATURATION/LIGHTNESS0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

HSL lightness is a geometric channel measure, not perceptual luminance.

// Original Incoprea. MIT. Color calculation only.
float HUE=220.0;
float SATURATION=0.6;
float LIGHTNESS=0.4;
float channel(float p,float q,float t)
{
    if(t<0.0)t+=1.0;
    if(t>1.0)t-=1.0;
    if(t<1.0/6.0)return p+(q-p)*6.0*t;
    if(t<0.5)return q;
    if(t<2.0/3.0)return p+(q-p)*(2.0/3.0-t)*6.0;
    return p;
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SATURATION<0.0||SATURATION>1.0||LIGHTNESS<0.0||LIGHTNESS>1.0)
        {
            llOwnerSay("Saturation/lightness must be0..1.");
            return;
        }
        float h=HUE/360.0;
        h-=llFloor(h);
        float q=LIGHTNESS*(1.0+SATURATION);
        if(LIGHTNESS>=0.5)q=LIGHTNESS+SATURATION-LIGHTNESS*SATURATION;
        float p=2.0*LIGHTNESS-q;
        llOwnerSay("RGB="+(string)<channel(p,q,h+1.0/3.0),channel(p,q,h),channel(p,q,h-1.0/3.0)>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set RGB in0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

This uses the standard sRGB/Rec.709 channel weights, not perceived brightness in every viewing condition.

// Original Incoprea. MIT. Color calculation only.
vector RGB=<0.25,0.65,0.4>;
float dec(float v)
{
    if(v<=0.04045)return v/12.92;
    return llPow((v+0.055)/1.055,2.4);
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RGB.x<0.0||RGB.y<0.0||RGB.z<0.0||RGB.x>1.0||RGB.y>1.0||RGB.z>1.0)
        {
            llOwnerSay("RGB must be0..1.");
            return;
        }
        float y=0.2126*dec(RGB.x)+0.7152*dec(RGB.y)+0.0722*dec(RGB.z);
        llOwnerSay("Relative luminance="+(string)y);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Add gallery with lines texture_name|caption, plus the named licensed textures. Set FACE. Owner-touch advances; a two-second hold restores the startup display.

Stop / restore: Owner hold for at least two seconds restores face texture and text. Then remove.

One outstanding request at a time. Only textures present in inventory are accepted; the caption is public. No external image service is used. Keep example captions and notecard lines short, preferably ASCII. Character clipping is not UTF-8 byte-budget clipping: multibyte text may reach hover-text or chat limits sooner and be truncated.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
integer line;
key request;
float pressed;
list texture;
list text;
restore()
{
    request=NULL_KEY;
    llSetTimerEvent(0.0);
    llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+texture+[PRIM_TEXT]+text);
}
default
{
    state_entry()
    {
        texture=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
        text=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXT]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)==llGetOwner())pressed=llGetTime();
    }
    touch_end(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetTime()-pressed>=2.0)
        {
            restore();
            return;
        }
        if(request!=NULL_KEY||llGetInventoryType("gallery")!=INVENTORY_NOTECARD)return;
        request=llGetNotecardLine("gallery",line);
        llSetTimerEvent(15.0);
    }
    dataserver(key id,string data)
    {
        if(id!=request)return;
        request=NULL_KEY;
        llSetTimerEvent(0.0);
        if(data==EOF)
        {
            line=0;
            restore();
            return;
        }
        ++line;
        list pair=llParseStringKeepNulls(data,["|"],[]);
        if(llGetListLength(pair)!=2)return;
        string name=llStringTrim(llList2String(pair,0),STRING_TRIM);
        if(llGetInventoryType(name)!=INVENTORY_TEXTURE)
        {
            llOwnerSay("Missing texture "+name);
            return;
        }
        llSetTexture(name,FACE);
        llSetText(llGetSubString(llList2String(pair,1),0,220),<0.95,0.95,0.9>,1.0);
    }
    timer()
    {
        request=NULL_KEY;
        llSetTimerEvent(0.0);
        llOwnerSay("Gallery read timed out.");
    }
    changed(integer change)
    {
        if(change&CHANGED_INVENTORY)
        {
            request=NULL_KEY;
            line=0;
            llSetTimerEvent(0.0);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set FACE. Owner-touch halves the original repeats while keeping its offset and angle.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Classic-material controls only; PBR materials may display differently. Use a spare prim and textures whose settings you can read and restore. Another controller must not edit the same face during the preview. A lower repeat count magnifies the image. Works best with default mapping.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
integer FACE=0;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_TEXTURE, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        if (preview)
        {
            vector repeats=llList2Vector(saved,1)*0.5;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+llListReplaceList(saved,[repeats],1,1));
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Set FACE on a spare classic-material prim and owner-touch.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Classic-material controls only; PBR materials may display differently. Use a spare prim and textures whose settings you can read and restore. Another controller must not edit the same face during the preview. This concerns legacy bump/shiny, separate from normal and specular maps.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
integer FACE=0;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_BUMP_SHINY, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        if (preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_BUMP_SHINY,FACE,PRIM_SHINY_NONE,PRIM_BUMP_NONE]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_BUMP_SHINY,FACE]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare owned prim. Set A and B as RGB0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

These artistic blend modes are not optical material simulations. Alpha is not included.

// Original Incoprea. MIT. Color calculation only.
vector A=<0.8,0.4,0.2>;
vector B=<0.2,0.6,0.9>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        vector multiply=<A.x*B.x,A.y*B.y,A.z*B.z>;
        vector screen=<1.0-(1.0-A.x)*(1.0-B.x),1.0-(1.0-A.y)*(1.0-B.y),1.0-(1.0-A.z)*(1.0-B.z)>;
        llOwnerSay("Multiply="+(string)multiply+" screen="+(string)screen);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set FOREGROUND and BACKGROUND components0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

This is a numeric design aid; actual text readability also depends on size, weight, viewer rendering and lighting.

// Original Incoprea. MIT. Color calculation only.
vector FOREGROUND=<0.9,1.0,0.92>;
vector BACKGROUND=<0.05,0.12,0.08>;
float dec(float v)
{
    if(v<=0.04045)return v/12.92;
    return llPow((v+0.055)/1.055,2.4);
}
float lum(vector c)
{
    return 0.2126*dec(c.x)+0.7152*dec(c.y)+0.0722*dec(c.z);
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        float a=lum(FOREGROUND);
        float b=lum(BACKGROUND);
        if(a<b)
        {
            float temp=a;
            a=b;
            b=temp;
        }
        llOwnerSay("Contrast ratio="+(string)((a+0.05)/(b+0.05))+":1");
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set source/destination colors and opacity values0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

The blend is performed directly in the supplied channel space; decode sRGB first for physically meaningful linear-light mixing.

// Original Incoprea. MIT. Color calculation only.
vector SOURCE=<1.0,0.2,0.0>;
vector DEST=<0.0,0.2,1.0>;
float SA=0.4;
float DA=0.8;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SA<0.0||SA>1.0||DA<0.0||DA>1.0)
        {
            llOwnerSay("Alphas must be0..1.");
            return;
        }
        float alpha=SA+DA*(1.0-SA);
        vector color=ZERO_VECTOR;
        if(alpha>0.000001)color=(SOURCE*SA+DEST*DA*(1.0-SA))/alpha;
        llOwnerSay("Composite RGB="+(string)color+" alpha="+(string)alpha);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set HUE, SATURATION and VALUE; latter two in0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

Hue wraps cyclically. The calculation uses HSV, whose equal value is not equal perceived brightness.

// Original Incoprea. MIT. Color calculation only.
float HUE=145.0;
float SATURATION=0.7;
float VALUE=0.8;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SATURATION<0.0||SATURATION>1.0||VALUE<0.0||VALUE>1.0)
        {
            llOwnerSay("Saturation/value must be0..1.");
            return;
        }
        float h=HUE/60.0;
        h-=6.0*llFloor(h/6.0);
        float c=VALUE*SATURATION;
        float rem=h-2.0*llFloor(h/2.0);
        float x=c*(1.0-llFabs(rem-1.0));
        vector rgb;
        if(h<1.0)rgb=<c,x,0.0>;
        else if(h<2.0)rgb=<x,c,0.0>;
        else if(h<3.0)rgb=<0.0,c,x>;
        else if(h<4.0)rgb=<0.0,x,c>;
        else if(h<5.0)rgb=<x,0.0,c>;
        else rgb=<c,0.0,x>;
        float m=VALUE-c;
        llOwnerSay("RGB="+(string)(rgb+<m,m,m>));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare owned prim. Set RGB components between0 and1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

Only a color-space calculation. Do not assume every LSL material parameter uses the same transfer convention.

// Original Incoprea. MIT. Color calculation only.
vector RGB=<0.2,0.5,0.8>;
float linear(float v)
{
    if(v<=0.04045)return v/12.92;
    return llPow((v+0.055)/1.055,2.4);
}
float srgb(float v)
{
    if(v<=0.0031308)return 12.92*v;
    return 1.055*llPow(v,1.0/2.4)-0.055;
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RGB.x<0.0||RGB.y<0.0||RGB.z<0.0||RGB.x>1.0||RGB.y>1.0||RGB.z>1.0)
        {
            llOwnerSay("RGB must be0..1.");
            return;
        }
        vector l=<linear(RGB.x),linear(RGB.y),linear(RGB.z)>;
        llOwnerSay("Linear="+(string)l+" roundtrip="+(string)<srgb(l.x),srgb(l.y),srgb(l.z)>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set RGB and ALPHA0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

Zero alpha contains no recoverable RGB in premultiplied form. This is a data representation tool, not a viewer alpha-mode setter.

// Original Incoprea. MIT. Color calculation only.
vector RGB=<0.8,0.3,0.1>;
float ALPHA=0.4;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(ALPHA<0.0||ALPHA>1.0)
        {
            llOwnerSay("Alpha must be0..1.");
            return;
        }
        vector premultiplied=RGB*ALPHA;
        llOwnerSay("Premultiplied="+(string)premultiplied);
        if(ALPHA>0.000001)llOwnerSay("Recovered="+(string)(premultiplied/ALPHA));
        else llOwnerSay("Zero alpha: source RGB is unrecoverable.");
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set SOURCE and TARGET to different existing faces in one prim. Owner-touch copies the limited style; touch again restores target.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Does not copy PBR, normal/specular maps, alpha mode, texgen or texture animation. Source texture must be readable and reusable.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer SOURCE=0;
integer TARGET=1;
integer preview;
list saved;
list capture(integer face)
{
    return [PRIM_TEXTURE,TARGET]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,face])
    +[PRIM_COLOR,TARGET]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_COLOR,face])
    +[PRIM_GLOW,TARGET]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_GLOW,face])
    +[PRIM_FULLBRIGHT,TARGET]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_FULLBRIGHT,face]);
}
default
{
    state_entry()
    {
        if(TARGET>=0&&TARGET<llGetNumberOfSides())saved=capture(TARGET);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||SOURCE==TARGET||SOURCE<0||SOURCE>=llGetNumberOfSides()||!llGetListLength(saved))return;
        preview=!preview;
        if(preview)llSetLinkPrimitiveParamsFast(LINK_THIS,capture(SOURCE));
        else llSetLinkPrimitiveParamsFast(LINK_THIS,saved);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in root; name each target child palette_swatch. Targets use face 0. Owner-touch applies/restores.

Stop / restore: Touch to restore before reset/removal/relink.

This copies a tint, not texture pixels or PBR material values. Alpha is not changed. Limited to 24 targets for a compact sample board.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list saved;
integer preview;
default
{
    state_entry()
    {
        integer i;
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<24;++i)
        if(llGetLinkName(i)=="palette_swatch")
        {
            links+=[i];
            saved+=[llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_COLOR,0]),0)];
        }
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1)return;
        preview=!preview;
        integer i;
        vector root=llGetColor(0);
        for(i=0;i<llGetListLength(links);++i)
        {
            vector color=llList2Vector(saved,i);
            if(preview)color=root;
            llSetLinkColor(llList2Integer(links,i),color,0);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set encoded PIXEL. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

Channel conventions vary, especially the green/Y channel. A neutral pixel should be near<0.5,0.5,1>.

// Original Incoprea. MIT. Color calculation only.
vector PIXEL=<0.65,0.4,0.95>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(PIXEL.x<0.0||PIXEL.y<0.0||PIXEL.z<0.0||PIXEL.x>1.0||PIXEL.y>1.0||PIXEL.z>1.0)
        {
            llOwnerSay("Pixel must be0..1.");
            return;
        }
        vector normal=2.0*PIXEL-<1.0,1.0,1.0>;
        if(llVecMag(normal)<0.000001)
        {
            llOwnerSay("Pixel encodes a zero vector.");
            return;
        }
        llOwnerSay("Tangent normal="+(string)llVecNorm(normal));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set nonzero NORMAL. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

This is numerical encoding only. A texture image also needs the intended tangent basis and channel convention.

// Original Incoprea. MIT. Color calculation only.
vector NORMAL=<0.3,-0.2,1.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llVecMag(NORMAL)<0.000001)
        {
            llOwnerSay("Nonzero normal required.");
            return;
        }
        vector pixel=(llVecNorm(NORMAL)+<1.0,1.0,1.0>)*0.5;
        llOwnerSay("Encoded pixel="+(string)pixel);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set left/right/down/up heights, positive SPACING and strength. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

Central differences assume evenly spaced samples. Strength changes slope scale; this does not create a normal-map asset.

// Original Incoprea. MIT. Color calculation only.
float LEFT=0.2;
float RIGHT=0.5;
float DOWN=0.3;
float UP=0.4;
float SPACING=1.0;
float STRENGTH=2.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(SPACING<=0.0)
        {
            llOwnerSay("Positive spacing required.");
            return;
        }
        float dx=(RIGHT-LEFT)/(2.0*SPACING);
        float dy=(UP-DOWN)/(2.0*SPACING);
        llOwnerSay("Estimated normal="+(string)llVecNorm(<-dx*STRENGTH,-dy*STRENGTH,1.0>));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set nonzero NORMAL and TO_LIGHT. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

This is a Lambertian angular factor only; real lighting also involves distance, materials, shadows and environment.

// Original Incoprea. MIT. Color calculation only.
vector NORMAL=<0.0,0.0,1.0>;
vector TO_LIGHT=<2.0,1.0,3.0>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llVecMag(NORMAL)<0.000001||llVecMag(TO_LIGHT)<0.000001)
        {
            llOwnerSay("Nonzero vectors required.");
            return;
        }
        float factor=llVecNorm(NORMAL)*llVecNorm(TO_LIGHT);
        if(factor<0.0)factor=0.0;
        llOwnerSay("Diffuse angular factor="+(string)factor);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set BASE and BLEND colors0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

Overlay is asymmetric: exchanging base and blend usually changes the result.

// Original Incoprea. MIT. Color calculation only.
vector BASE=<0.2,0.5,0.8>;
vector BLEND=<0.7,0.3,0.4>;
float overlay(float base,float blend)
{
    if(base<0.5)return 2.0*base*blend;
    return 1.0-2.0*(1.0-base)*(1.0-blend);
}
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        llOwnerSay("Overlay="+(string)<overlay(BASE.x,BLEND.x),overlay(BASE.y,BLEND.y),overlay(BASE.z,BLEND.z)>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in root of a small model. Children should pass touches to root. Root touch clears selection.

Stop / restore: Touch root to clear before removing.

Only face-zero glow on the most recently touched child is changed. The previous selection is restored before capturing a new one.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer selected;
float original;
clear()
{
    if(selected>1)llSetLinkPrimitiveParamsFast(selected,[PRIM_GLOW,0,original]);
    selected=0;
}
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1)return;
        integer touched=llDetectedLinkNumber(0);
        clear();
        if(touched>1)
        {
            selected=touched;
            original=llList2Float(llGetLinkPrimitiveParams(selected,[PRIM_GLOW,0]),0);
            llSetLinkPrimitiveParamsFast(selected,[PRIM_GLOW,0,0.12]);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE. Saving captures diffuse, color, glow, fullbright, mapping and legacy bump. Touch, then enter RESTORE in the owner text box after manual experiments.

Stop / restore: Enter RESTORE before removing if you want the startup appearance. Removing alone does not undo manual edits.

Does not capture PBR, normal/specular maps or texture animation. Original texture access must permit restoration. Snapshot disappears at reset.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
list saved;
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
default
{
    state_entry()
    {
        saved=[PRIM_TEXTURE,FACE]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
        saved+=[PRIM_COLOR,FACE]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_COLOR,FACE]);
        saved+=[PRIM_GLOW,FACE]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_GLOW,FACE]);
        saved+=[PRIM_FULLBRIGHT,FACE]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_FULLBRIGHT,FACE]);
        saved+=[PRIM_TEXGEN,FACE]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXGEN,FACE]);
        saved+=[PRIM_BUMP_SHINY,FACE]+llGetLinkPrimitiveParams(LINK_THIS,[PRIM_BUMP_SHINY,FACE]);
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
        llTextBox(llGetOwner(),"Enter RESTORE to apply the startup snapshot to face "+(string)FACE,channel);
        llSetTimerEvent(30.0);
    }
    listen(integer ch,string name,key id,string message)
    {
        if(ch!=channel||id!=llGetOwner())return;
        close();
        if(llToUpper(llStringTrim(message,STRING_TRIM))=="RESTORE")llSetLinkPrimitiveParamsFast(LINK_THIS,saved);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in a spare prim. Menu lists up to nine face numbers; selecting another restores the previous face. Restore unhides the selected face.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. This is only a visual inspection tool and never changes collisions. It restores saved per-face alpha, not PBR alpha modes.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
list alpha;
integer selected=-1;
init()
{
    integer i;
    for(i=0;i<llGetNumberOfSides();++i)alpha+=[llGetAlpha(i)];
}
show()
{
    list buttons=["Restore"];
    integer i;
    for(i=0;i<llGetListLength(alpha)&&i<9;++i)buttons+=[(string)i];
    menu("Hide one face for inspection",buttons);
}
choose(string s)
{
    if(s=="Restore")
    {
        if(selected>=0)llSetAlpha(llList2Float(alpha,selected),selected);
        selected=-1;
        show();
        return;
    }
    integer i=llListFindList(["0","1","2","3","4","5","6","7","8"],[s]);
    if(i<0||i>=llGetListLength(alpha))return;
    if(selected>=0)llSetAlpha(llList2Float(alpha,selected),selected);
    selected=i;
    llSetAlpha(0.0,selected);
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in the prim to inspect. Owner-touch toggles diagnostic colors.

Stop / restore: Touch again to restore every original face color and alpha.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Texture pixels still multiply the tint; use a plain-textured copy for the clearest face distinction.

// Original Incoprea. MIT. Not compiled or tested in-world.
list saved;
integer preview;
default
{
    state_entry()
    {
        integer f;
        for(f=0;f<llGetNumberOfSides();++f)saved+=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_COLOR,f]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        preview=!preview;
        list palette=[<1.0,0.2,0.2>,<0.2,1.0,0.2>,<0.2,0.4,1.0>,<1.0,1.0,0.2>,<1.0,0.2,1.0>,<0.2,1.0,1.0>,<1.0,0.6,0.2>,<0.6,0.2,1.0>];
        integer f;
        for(f=0;f<llGetNumberOfSides()&&f*2+1<llGetListLength(saved);++f)
        {
            vector color=llList2Vector(saved,f*2);
            float alpha=llList2Float(saved,f*2+1);
            if(preview)
            {
                color=llList2Vector(palette,f%8);
                alpha=1.0;
            }
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_COLOR,f,color,alpha]);
        }
        llOwnerSay("Faces 0-7: red green blue yellow magenta cyan orange violet; repeats after 8.");
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare window prim. Set FACE; owner-touch changes the target opacity. Use a face/material whose alpha mode supports blending.

Stop / restore: Touch to return to the original opacity, wait for the fade to finish, then remove. Resetting mid-fade captures the altered opacity.

Transparency is visual, not privacy or access security. It does not change the object’s collision geometry.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer FACE = 0;
float original;
float target;
float current;
integer clear;
default
{
    state_entry()
    {
        original = llGetAlpha(FACE);
        current = original;
        target = original;
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        clear = !clear;
        target = original;
        if (clear) target = 0.15;
        llSetTimerEvent(0.1);
    }
    timer()
    {
        float difference = target - current;
        if (llFabs(difference) <= 0.05)
        {
            current = target;
            llSetTimerEvent(0.0);
        }
        else if (difference > 0.0) current += 0.05;
        else current -= 0.05;
        llSetAlpha(current, FACE);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare owned prim. Set PALETTE vectors and TARGET. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

RGB Euclidean distance is fast but not perceptually uniform; use it for simple palette indexing rather than color-critical matching.

// Original Incoprea. MIT. Color calculation only.
list PALETTE=[<0.1,0.2,0.15>,<0.8,0.9,0.6>,<0.3,0.4,0.8>,<0.9,0.4,0.2>];
vector TARGET=<0.7,0.8,0.5>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(PALETTE);
        if(n==0)
        {
            llOwnerSay("Empty palette.");
            return;
        }
        integer best;
        vector delta=llList2Vector(PALETTE,0)-TARGET;
        float distance=delta*delta;
        integer i;
        for(i=1;i<n;++i)
        {
            delta=llList2Vector(PALETTE,i)-TARGET;
            float d=delta*delta;
            if(d<distance)
            {
                distance=d;
                best=i;
            }
        }
        llOwnerSay("Nearest index="+(string)best+" color="+(string)llList2Vector(PALETTE,best));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Add texture art to root. Name four children tile00, tile10, tile01, tile11. Use face0/default mapping with matching face orientations.

Stop / restore: Owner-touch applies/restores the four saved diffuse mappings.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Names encode column,row with row0 at bottom in UV space. Duplicate or missing names reject the preview.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list saved;
integer preview;
integer valid=TRUE;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||!valid)return;
        integer i;
        if(preview)
        {
            for(i=0;i<4;++i)llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_TEXTURE,0]+llList2List(saved,i*4,i*4+3));
            preview=FALSE;
            return;
        }
        if(llGetInventoryType("art")!=INVENTORY_TEXTURE)return;
        links=[];
        saved=[];
        list names=["tile00","tile10","tile01","tile11"];
        for(i=0;i<4;++i)
        {
            integer j;
            integer found;
            integer count;
            for(j=2;j<=llGetObjectPrimCount(llGetKey());++j)if(llGetLinkName(j)==llList2String(names,i))
            {
                found=j;
                ++count;
            }
            if(count!=1)
            {
                llOwnerSay("Need four unique tile names.");
                return;
            }
            links+=[found];
        }
        for(i=0;i<4;++i)
        {
            integer link=llList2Integer(links,i);
            saved+=llGetLinkPrimitiveParams(link,[PRIM_TEXTURE,0]);
            vector offset=<-0.25,-0.25,0.0>;
            if(i%2)offset.x=0.25;
            if(i/2)offset.y=0.25;
            llSetLinkPrimitiveParamsFast(link,[PRIM_TEXTURE,0,"art",<0.5,0.5,0.0>,offset,0.0]);
        }
        preview=TRUE;
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)valid=FALSE;
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a square atlas as the face diffuse texture. Set FACE; five owner touches cycle quadrants and restoration.

Stop / restore: Touch through all four quadrants and the fifth touch restores the original settings. Restore before removing or resetting.

Classic-material controls only; PBR materials may display differently. Use a spare prim and textures whose settings you can read and restore. Another controller must not edit the same face during the preview. Uses 0.5 repeats and ±0.25 offsets. The atlas orientation depends on your image layout.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE = 0;
integer step;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(step==4)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
            step=0;
            llOwnerSay("Original restored.");
            return;
        }
        float x=-0.25;
        float y=0.25;
        if(step%2)x=0.25;
        if(step>1)y=-0.25;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE,llList2String(saved,0),<0.5,0.5,0.0>,<x,y,0.0>,0.0]);
        ++step;
    }
}

MIT · original Incoprea example

API reference 1

Setup: Set FACE and place in a texture sample prim. Owner-touch toggles the classic face fullbright flag.

Stop / restore: Touch until Original lighting restored is reported, then remove.

Classic fullbright is not the same as PBR emissive. Viewer rendering and material choice may change the result.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer FACE = 0;
integer original;
integer preview;
default
{
    state_entry()
    {
        original = llList2Integer(llGetLinkPrimitiveParams(LINK_THIS, [PRIM_FULLBRIGHT, FACE]), 0);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        integer value = original;
        if (preview) value = !original;
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_FULLBRIGHT, FACE, value]);
        if (!preview) llOwnerSay("Original lighting restored.");
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare multi-face prim. Owner-touch creates a palette; the next touch restores. White or neutral textures show the palette most clearly.

Stop / restore: Touch to restore before removing or resetting. The original face tints are kept only in script memory.

Faces receive different hue offsets with fixed saturation and brightness. This does not alter alpha or PBR material settings.

// Original Incoprea example. MIT. Not compiled or tested in-world.
list original;
integer preview;
vector hue(float h)
{
    float sector = h * 6.0;
    integer part = (integer)sector;
    float f = sector - part;
    float low = 0.35;
    float rising = low + (1.0 - low) * f;
    float falling = 1.0 - (1.0 - low) * f;
    if (part == 0) return <1.0, rising, low>;
    if (part == 1) return <falling, 1.0, low>;
    if (part == 2) return <low, 1.0, rising>;
    if (part == 3) return <low, falling, 1.0>;
    if (part == 4) return <rising, low, 1.0>;
    return <1.0, low, falling>;
}
default
{
    state_entry()
    {
        integer face;
        for (face = 0; face < llGetNumberOfSides(); ++face) original += [llGetColor(face)];
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        integer total = llGetListLength(original);
        integer face;
        float base = llFrand(1.0);
        for (face = 0; face < total; ++face)
        {
            if (!preview) llSetColor(llList2Vector(original, face), face);
            else
            {
                float h = base + (float)face / (float)total;
                if (h >= 1.0) h -= 1.0;
                llSetColor(hue(h), face);
            }
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Name up to 32 children height_ramp. Face0 only. Set MIN_Z and MAX_Z in root-local meters.

Stop / restore: Owner-touch applies/restores.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Height is clamped to the authored range. This is a tint composition, not a scientific temperature measurement.

// Original Incoprea. MIT. Not compiled or tested in-world.
float MIN_Z=0.0;
float MAX_Z=2.0;
list links;
list saved;
integer preview;
integer valid=TRUE;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||!valid||MAX_Z<=MIN_Z)return;
        integer i;
        if(preview)
        {
            for(i=0;i<llGetListLength(links);++i)llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_COLOR,0]+llList2List(saved,i*2,i*2+1));
            preview=FALSE;
            return;
        }
        links=[];
        saved=[];
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<32;++i)if(llGetLinkName(i)=="height_ramp")
        {
            links+=[i];
            list color=llGetLinkPrimitiveParams(i,[PRIM_COLOR,0]);
            saved+=color;
            vector p=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
            float t=(p.z-MIN_Z)/(MAX_Z-MIN_Z);
            if(t<0.0)t=0.0;
            if(t>1.0)t=1.0;
            vector a=<0.1,0.3,0.8>;
            vector b=<1.0,0.7,0.1>;
            llSetLinkPrimitiveParamsFast(i,[PRIM_COLOR,0,a+(b-a)*t,llList2Float(color,1)]);
        }
        preview=TRUE;
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)valid=FALSE;
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare lamp prim. Press and hold to illuminate. Releasing or a missed-touch timeout restores the saved light parameters.

Stop / restore: Release and wait three seconds before removal or reset.

A point light only, without changing glow or fullbright. Timer fallback protects against a missing touch_end event.

// Original Incoprea example. MIT. Not compiled or tested in-world.
list original;
integer lit;
press()
{
    if (llDetectedKey(0) != llGetOwner()) return;
    if (!lit)
    {
        lit = TRUE;
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_POINT_LIGHT, TRUE, <1.0, 0.85, 0.6>, 0.4, 4.0, 1.0]);
    }
    llSetTimerEvent(3.0);
}
release()
{
    if (lit) llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_POINT_LIGHT] + original);
    lit = FALSE;
    llSetTimerEvent(0.0);
}
default
{
    state_entry()
    {
        original = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_POINT_LIGHT]);
    }
    touch_start(integer count)
    {
        press();
    }
    touch(integer count)
    {
        press();
    }
    touch_end(integer count)
    {
        if (llDetectedKey(0) == llGetOwner()) release();
    }
    timer()
    {
        release();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put properly licensed textures into a spare display prim. Set FACE to the display face; owner-touch advances. Start with an original texture you have full rights to read and restore.

Stop / restore: Cycle through all inventory textures until the script reports Original face restored, then remove.

Changes the classic diffuse texture, not a PBR material. Texture UUID access is permission-sensitive. Original UV settings are captured only until reset.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer FACE = 0;
integer index;
list original;
default
{
    state_entry()
    {
        original = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_TEXTURE, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        integer total = llGetInventoryNumber(INVENTORY_TEXTURE);
        if (index >= total)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_TEXTURE, FACE] + original);
            index = 0;
            llOwnerSay("Original face restored.");
            return;
        }
        string texture = llGetInventoryName(INVENTORY_TEXTURE, index++);
        llSetTexture(texture, FACE);
        llOwnerSay(texture);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare lamp and owner-touch. Enable/Disable affect the point light; Restore reinstates its startup parameters.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Light color and falloff are preserved. Radius is capped at 10 meters and intensity at 0.7 for a modest exhibit light.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
list saved;
list current;
init()
{
    saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_POINT_LIGHT]);
    current=saved;
}
show()
{
    menu("Point light controls",["Enable","Disable","Brighter","Dimmer","Wider","Narrower","Restore"]);
}
choose(string s)
{
    if(s=="Restore")current=saved;
    else
    {
        integer enabled=llList2Integer(current,0);
        float strength=llList2Float(current,2);
        float radius=llList2Float(current,3);
        if(s=="Enable")enabled=TRUE;
        else if(s=="Disable")enabled=FALSE;
        else if(s=="Brighter")strength+=0.1;
        else if(s=="Dimmer")strength-=0.1;
        else if(s=="Wider")radius+=0.5;
        else if(s=="Narrower")radius-=0.5;
        else return;
        if(strength<0.0)strength=0.0;
        if(strength>0.7)strength=0.7;
        if(radius<0.1)radius=0.1;
        if(radius>10.0)radius=10.0;
        current=[enabled,llList2Vector(current,1),strength,radius,llList2Float(current,4)];
    }
    llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_POINT_LIGHT]+current);
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a nonphysical linkset with child prims. Touch it to recolor child prims, leaving the root prim alone.

Stop / restore: Disable the script and restore each child’s original color in Edit.

Original per-child colors are not saved. Mesh materials may not show the tint as expected.

// Original Incoprea example. Nonphysical linkset; root prim.
default
{
    touch_start(integer count)
    {
        vector tint = <llFrand(1.0), llFrand(1.0), llFrand(1.0)>;
        llSetLinkColor(LINK_ALL_CHILDREN, tint, ALL_SIDES);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in root; name up to ten child segments meter_segment in the desired link order. Each owner-touch advances; after full, next touch restores.

Stop / restore: Cycle once more after full to restore original face-zero colors.

This is a manually advanced exhibit meter, not tied to a download or external job. Keep link order unchanged during use.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list saved;
integer progress;
default
{
    state_entry()
    {
        integer i;
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<10;++i)
        if(llGetLinkName(i)=="meter_segment")
        {
            links+=[i];
            saved+=[llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_COLOR,0]),0)];
        }
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||!llGetListLength(links))return;
        progress=(progress+1)%(llGetListLength(links)+1);
        integer i;
        for(i=0;i<llGetListLength(links);++i)
        {
            vector c=llList2Vector(saved,i);
            if(i<progress)c=<0.3,1.0,0.6>;
            llSetLinkColor(llList2Integer(links,i),c,0);
        }
        llOwnerSay((string)progress+" of "+(string)llGetListLength(links));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put textures in root; name up to twelve children gallery_. Prefix matching accepts gallery_1 etc. Face0 is used; link order determines placement.

Stop / restore: Owner-touch applies; touch again restores each face0 diffuse transform.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Textures are inventory-sorted by name. Only their diffuse asset changes; child face count and permissions must be suitable.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list saved;
integer preview;
integer valid=TRUE;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||!valid)return;
        integer i;
        if(preview)
        {
            for(i=0;i<llGetListLength(links);++i)llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_TEXTURE,0]+llList2List(saved,i*4,i*4+3));
            preview=FALSE;
            return;
        }
        links=[];
        saved=[];
        integer images=llGetInventoryNumber(INVENTORY_TEXTURE);
        integer placed;
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&placed<12&&placed<images;++i)if(llSubStringIndex(llGetLinkName(i),"gallery_")==0)
        {
            links+=[i];
            list face=llGetLinkPrimitiveParams(i,[PRIM_TEXTURE,0]);
            saved+=face;
            llSetLinkPrimitiveParamsFast(i,[PRIM_TEXTURE,0,llGetInventoryName(INVENTORY_TEXTURE,placed),<1.0,1.0,0.0>,ZERO_VECTOR,0.0]);
            ++placed;
        }
        preview=placed>0;
        llOwnerSay("Assigned "+(string)placed+" textures.");
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            llOwnerSay("Relinked: snapshot invalid; manually restore if needed.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a square 16-frame sheet on FACE. Owner-touch advances through frames; the seventeenth restores original UV settings.

Stop / restore: Cycle through frame 16, then touch once to restore before removing.

Uses explicit UV repeats and offsets, no persistent texture-animation setting. Frame order is left-to-right, top-to-bottom. Keep example captions and notecard lines short, preferably ASCII. Character clipping is not UTF-8 byte-budget clipping: multibyte text may reach hover-text or chat limits sooner and be truncated.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
integer frame;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(frame==16)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
            frame=0;
            return;
        }
        float x=-0.375+(frame%4)*0.25;
        float y=0.375-(frame/4)*0.25;
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE,llList2String(saved,0),<0.25,0.25,0.0>,<x,y,0.0>,0.0]);
        llOwnerSay("Frame "+(string)(frame+1));
        ++frame;
    }
}

MIT · original Incoprea example

API reference 1

Setup: Set FACE, WIDTH, HEIGHT and REPEATS_PER_METER; use default mapping on a known rectangular face. Owner-touch applies/restores.

Stop / restore: Owner-touch again to restore the startup snapshot before removal or reset, unless setup describes a different cycle. Do not relink during a preview.

Use a spare modifiable build. Saved state lives only in script memory. Face dimensions are explicit because mesh geometry cannot be inferred from bounding-box scale. Planar mapping has different units and is rejected.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
integer FACE=0;
float WIDTH=2.0;
float HEIGHT=1.0;
float REPEATS_PER_METER=2.0;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(WIDTH<=0.0||HEIGHT<=0.0||REPEATS_PER_METER<=0.0||WIDTH*REPEATS_PER_METER>100.0||HEIGHT*REPEATS_PER_METER>100.0)return;
        if(llList2Integer(llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXGEN,FACE]),0)!=PRIM_TEXGEN_DEFAULT)return;
        preview=!preview;
        if(preview)
        {
            vector repeats=<WIDTH*REPEATS_PER_METER,HEIGHT*REPEATS_PER_METER,0.0>;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+llListReplaceList(saved,[repeats],1,1));
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE. Owner-touch toggles the mirror while preserving the saved offset and rotation.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Classic-material controls only; PBR materials may display differently. Use a spare prim and textures whose settings you can read and restore. Another controller must not edit the same face during the preview.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
integer FACE = 0;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_TEXTURE, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        if (preview)
        {
            vector repeats = llList2Vector(saved,1);
            repeats.x = -repeats.x;
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+llListReplaceList(saved,[repeats],1,1));
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Set FACE to a flat face on a spare prim. Owner-touch and drag across that face. Edit LEFT and RIGHT to choose endpoints.

Stop / restore: Release the touch and wait two seconds before removing. The watchdog also restores color if touch-end is missed.

Preview lasts only during interaction. UV texture transforms do not affect the ST coordinate used for blending.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer FACE = 0;
vector LEFT = <0.1, 0.3, 1.0>;
vector RIGHT = <1.0, 0.5, 0.1>;
vector original;
preview()
{
    if (llDetectedKey(0) != llGetOwner() || llDetectedTouchFace(0) != FACE) return;
    vector st = llDetectedTouchST(0);
    if (st.x < 0.0 || st.x > 1.0) return;
    llSetColor(LEFT * (1.0 - st.x) + RIGHT * st.x, FACE);
    llSetTimerEvent(2.0);
}
restore()
{
    llSetColor(original, FACE);
    llSetTimerEvent(0.0);
}
default
{
    state_entry()
    {
        original = llGetColor(FACE);
    }
    touch_start(integer count)
    {
        preview();
    }
    touch(integer count)
    {
        preview();
    }
    touch_end(integer count)
    {
        if (llDetectedKey(0) == llGetOwner()) restore();
    }
    timer()
    {
        restore();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3 · API reference 4

Setup: Use on a spare prim. The tint affects all of its faces.

Stop / restore: Set the original color again in Edit; the script does not keep a backup.

Textures may change how the color appears.

// Original Incoprea example.
default
{
    touch_start(integer count)
    {
        vector tint = <0.35 + llFrand(0.65), 0.45 + llFrand(0.55),
        0.35 + llFrand(0.65)>;
        llSetColor(tint, ALL_SIDES);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in root with one uniquely named exhibit_cover child. Owner-touch toggles.

Stop / restore: Restore visibility before removing, resetting, or relinking.

Visual hiding does not change collisions, privacy or access. Original alpha values remain only in script memory.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer target;
integer hidden;
list alpha;
default
{
    state_entry()
    {
        integer i;
        integer hits;
        for(i=2;i<=llGetObjectPrimCount(llGetKey());++i)if(llGetLinkName(i)=="exhibit_cover")
        {
            target=i;
            ++hits;
        }
        if(hits!=1)
        {
            target=0;
            llOwnerSay("Need one exhibit_cover child.");
            return;
        }
        for(i=0;i<llGetLinkNumberOfSides(target);++i)alpha+=[llList2Float(llGetLinkPrimitiveParams(target,[PRIM_COLOR,i]),1)];
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||!target)return;
        hidden=!hidden;
        integer i;
        for(i=0;i<llGetListLength(alpha);++i)
        {
            float value=llList2Float(alpha,i);
            if(hidden)value=0.0;
            llSetLinkAlpha(target,value,i);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Put in root; name up to eight children exhibit_light. Owner-touch toggles the scene.

Stop / restore: Touch to restore before removing, resetting, or relinking.

Captures five point-light parameters per target. A link change disables reuse until reset without guessing the old target links. Keep example captions and notecard lines short, preferably ASCII. Character clipping is not UTF-8 byte-budget clipping: multibyte text may reach hover-text or chat limits sooner and be truncated.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list saved;
integer scene;
integer valid=TRUE;
default
{
    state_entry()
    {
        integer i;
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<8;++i)if(llGetLinkName(i)=="exhibit_light")
        {
            links+=[i];
            saved+=llGetLinkPrimitiveParams(i,[PRIM_POINT_LIGHT]);
        }
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||!valid)return;
        scene=!scene;
        integer i;
        for(i=0;i<llGetListLength(links);++i)
        {
            list rule=llList2List(saved,i*5,i*5+4);
            if(scene)rule=[TRUE,<1.0,0.85,0.6>,0.35,3.0,1.0];
            llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_POINT_LIGHT]+rule);
        }
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)
        {
            valid=FALSE;
            llOwnerSay("Links changed. Check lighting manually and reset before reuse.");
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the root of a small linkset. Name up to 16 children chase_lamp. Owner-touch starts/stops.

Stop / restore: Touch to stop and restore every lamp’s original face-zero glow.

Changes face 0 only; name each lamp intentionally. Do not relink while running. Uses a moderate half-second step and low glow.

// Original Incoprea. MIT. Not compiled or tested in-world.
list links;
list saved;
integer active;
integer index;
restore()
{
    integer i;
    for(i=0;i<llGetListLength(links);++i)llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_GLOW,0,llList2Float(saved,i)]);
}
default
{
    state_entry()
    {
        integer i;
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<16;++i)
        if(llGetLinkName(i)=="chase_lamp")
        {
            links+=[i];
            saved+=llGetLinkPrimitiveParams(i,[PRIM_GLOW,0]);
        }
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||!llGetListLength(links))return;
        active=!active;
        if(active)
        {
            index=0;
            llSetTimerEvent(0.5);
        }
        else
        {
            llSetTimerEvent(0.0);
            restore();
        }
    }
    timer()
    {
        restore();
        llSetLinkPrimitiveParamsFast(llList2Integer(links,index),[PRIM_GLOW,0,0.12]);
        index=(index+1)%llGetListLength(links);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare lantern prim and owner-touch to enable automatic monitoring. Samples every 30 seconds.

Stop / restore: Touch to stop monitoring and restore the original point-light parameters before removal.

Reads the simulator parcel sun, which may differ from a visitor’s personal environment. It does not change glow, fullbright, region time, or the environment.

// Original Incoprea example. MIT. Not compiled or tested in-world.
list original;
integer active;
integer previous = -1;
updateLight()
{
    vector sun = llGetSunDirection();
    integer night = sun.z < 0.0;
    if (night == previous) return;
    previous = night;
    llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_POINT_LIGHT, night, <1.0, 0.8, 0.5>, 0.45, 4.0, 1.0]);
}
default
{
    state_entry()
    {
        original = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_POINT_LIGHT]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        active = !active;
        if (active)
        {
            previous = -1;
            updateLight();
            llSetTimerEvent(30.0);
        }
        else
        {
            llSetTimerEvent(0.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_POINT_LIGHT] + original);
        }
    }
    timer()
    {
        updateLight();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a classic material face and set FACE. Ensure the original normal texture is readable and restorable.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Classic-material controls only; PBR materials may display differently. Use a spare prim and textures whose settings you can read and restore. Another controller must not edit the same face during the preview. The original normal map parameters are kept in memory; no diffuse texture is changed.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
integer FACE=0;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_NORMAL, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        if (preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_NORMAL,FACE,NULL_KEY,<1.0,1.0,0.0>,ZERO_VECTOR,0.0]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_NORMAL,FACE]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Add licensed textures to this prim and set FACE. Owner-touch displays names and number buttons; Restore returns the original diffuse settings.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Numbers keep dialog button labels short. The list is refreshed each time the menu opens and checks the selected inventory type before applying.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
integer FACE=0;
list saved;
list names;
init()
{
    saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
}
show()
{
    names=[];
    list buttons=["Restore"];
    string text="Choose a texture:\n";
    integer i;
    integer count=llGetInventoryNumber(INVENTORY_TEXTURE);
    if(count>9)count=9;
    for(i=0;i<count;++i)
    {
        string name=llGetInventoryName(INVENTORY_TEXTURE,i);
        names+=[name];
        buttons+=[(string)(i+1)];
        text+=(string)(i+1)+": "+llGetSubString(name,0,32)+"\n";
    }
    menu(text,buttons);
}
choose(string s)
{
    if(s=="Restore")
    {
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        show();
        return;
    }
    integer index=llListFindList(["1","2","3","4","5","6","7","8","9"],[s]);
    if(index<0||index>=llGetListLength(names))return;
    string name=llList2String(names,index);
    if(llGetInventoryType(name)==INVENTORY_TEXTURE)llSetTexture(name,FACE);
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set FACE and apply a 2×2 sheet. Owner-touch starts a two-second one-shot animation.

Stop / restore: Wait three seconds for explicit animation cleanup and UV restoration before removal.

No LOOP flag is used. The timer explicitly disables the stored animation after the cue; it cannot restore a previously configured animation.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
integer busy;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||busy)return;
        busy=TRUE;
        llSetTextureAnim(ANIM_ON,FACE,2,2,0.0,4.0,2.0);
        llSetTimerEvent(3.0);
    }
    timer()
    {
        llSetTimerEvent(0.0);
        llSetTextureAnim(FALSE,FACE,0,0,0.0,0.0,1.0);
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        busy=FALSE;
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in a spare prim. Owner-touch individual faces. The script captures every face color when saved.

Stop / restore: Touch each painted face again to restore it before deleting. Reset only when restored.

Touch-face support depends on the viewer. Does not change alpha, textures, or PBR material parameters.

// Original Incoprea example. MIT. Not compiled or tested in-world.
list colors;
list painted;
default
{
    state_entry()
    {
        integer face;
        for (face = 0; face < llGetNumberOfSides(); ++face)
        {
            colors += [llGetColor(face)];
            painted += [FALSE];
        }
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        integer face = llDetectedTouchFace(0);
        if (face < 0 || face >= llGetListLength(colors)) return;
        integer on = !llList2Integer(painted, face);
        painted = llListReplaceList(painted, [on], face, face);
        if (on) llSetColor(<0.35, 0.95, 0.7>, face);
        else llSetColor(llList2Vector(colors, face), face);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set FACE and apply a 2×2 sheet whose frames form one outward movement. Owner-touch starts and stops.

Stop / restore: Touch to disable texture animation before removing. The saved diffuse texture/UV settings are restored, but an earlier animation is not recoverable.

Use a spare prim with readable classic diffuse texture settings. Material behavior can differ with PBR transforms. PING_PONG avoids a hard jump from the final frame to the first. Frames are read left-to-right, top-to-bottom.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
integer active;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        active=!active;
        if(active)llSetTextureAnim(ANIM_ON|LOOP|PING_PONG,FACE,2,2,0.0,4.0,2.0);
        else
        {
            llSetTextureAnim(FALSE,FACE,0,0,0.0,0.0,1.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE and place in a spare textured prim. Owner-touch toggles.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Classic-material controls only; PBR materials may display differently. Use a spare prim and textures whose settings you can read and restore. Another controller must not edit the same face during the preview. Planar repeat units differ from default mapping.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
integer FACE = 0;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_TEXGEN, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        if (preview)
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXGEN,FACE,PRIM_TEXGEN_PLANAR]);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXGEN,FACE]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Use a spare owned prim. Set GREY0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

This is a tiny text preview, not a texture generator. Tile pattern is deterministic and spatially structured.

// Original Incoprea. MIT. Color calculation only.
float GREY=0.4;
list BAYER=[0,8,2,10,12,4,14,6,3,11,1,9,15,7,13,5];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(GREY<0.0||GREY>1.0)
        {
            llOwnerSay("Grey must be0..1.");
            return;
        }
        integer row;
        integer col;
        for(row=0;row<4;++row)
        {
            string line="";
            for(col=0;col<4;++col)
            {
                float threshold=(llList2Integer(BAYER,row*4+col)+0.5)/16.0;
                if(GREY>threshold)line+="#";
                else line+=".";
            }
            llOwnerSay(line);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set CYAN/MAGENTA/YELLOW/BLACK each0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

This is not color-managed printing conversion and cannot replace an ICC profile.

// Original Incoprea. MIT. Color calculation only.
float CYAN=0.2;
float MAGENTA=0.5;
float YELLOW=0.1;
float BLACK=0.15;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(CYAN<0.0||CYAN>1.0||MAGENTA<0.0||MAGENTA>1.0||YELLOW<0.0||YELLOW>1.0||BLACK<0.0||BLACK>1.0)
        {
            llOwnerSay("Channels must be0..1.");
            return;
        }
        llOwnerSay("Approximate RGB="+(string)<(1.0-CYAN)*(1.0-BLACK),(1.0-MAGENTA)*(1.0-BLACK),(1.0-YELLOW)*(1.0-BLACK)>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a spare owned prim. Set LEVELS2..256 and RGB0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

This produces a regular RGB cube palette; it is not adaptive image quantization.

// Original Incoprea. MIT. Color calculation only.
vector RGB=<0.18,0.53,0.87>;
integer LEVELS=6;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(LEVELS<2||LEVELS>256||RGB.x<0.0||RGB.y<0.0||RGB.z<0.0||RGB.x>1.0||RGB.y>1.0||RGB.z>1.0)
        {
            llOwnerSay("Invalid levels/color.");
            return;
        }
        float steps=LEVELS-1;
        vector q=<llRound(RGB.x*steps)/steps,llRound(RGB.y*steps)/steps,llRound(RGB.z*steps)/steps>;
        llOwnerSay("Quantized="+(string)q+" error magnitude="+(string)llVecDist(q,RGB));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set FACE and place in the prim whose classic tint you want to inspect.

Stop / restore: Remove or disable; no setting is changed.

This reports the stored tint, not a sampled rendered pixel. Lighting, texture pixels, and material color spaces can make the visible surface different.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer FACE = 0;
string digits = "0123456789ABCDEF";
string channelHex(float value)
{
    integer byte = llRound(value * 255.0);
    return llGetSubString(digits, byte / 16, byte / 16) + llGetSubString(digits, byte % 16, byte % 16);
}
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        vector color = llGetColor(FACE);
        llOwnerSay("RGB " + (string)color + " | #" + channelHex(color.x) + channelHex(color.y) + channelHex(color.z));
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Use a spare owned prim. Set RGB components0..1. Touch for owner-only numeric output.

Stop / restore: Remove/disable; no colors or materials are applied.

Achromatic colors have undefined hue; this example reports zero for that case.

// Original Incoprea. MIT. Color calculation only.
vector RGB=<0.2,0.7,0.4>;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(RGB.x<0.0||RGB.y<0.0||RGB.z<0.0||RGB.x>1.0||RGB.y>1.0||RGB.z>1.0)
        {
            llOwnerSay("RGB must be0..1.");
            return;
        }
        float high=RGB.x;
        float low=RGB.x;
        if(RGB.y>high)high=RGB.y;
        if(RGB.z>high)high=RGB.z;
        if(RGB.y<low)low=RGB.y;
        if(RGB.z<low)low=RGB.z;
        float delta=high-low;
        float hue;
        float saturation;
        if(high>0.0)saturation=delta/high;
        if(delta>0.000001)
        {
            if(high==RGB.x)hue=(RGB.y-RGB.z)/delta;
            else if(high==RGB.y)hue=2.0+(RGB.z-RGB.x)/delta;
            else hue=4.0+(RGB.x-RGB.y)/delta;
            hue*=60.0;
            if(hue<0.0)hue+=360.0;
        }
        llOwnerSay("HSV="+(string)<hue,saturation,high>);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE and use a 16-frame sheet. Owner-touch starts and stops.

Stop / restore: Touch to disable texture animation before removing. The saved diffuse texture/UV settings are restored, but an earlier animation is not recoverable.

Use a spare prim with readable classic diffuse texture settings. Material behavior can differ with PBR transforms. Useful for disassembly/reassembly inspection. This reverses frame order, not the prim orientation.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
integer active;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        active=!active;
        if(active)llSetTextureAnim(ANIM_ON|LOOP|REVERSE,FACE,4,4,0.0,16.0,4.0);
        else
        {
            llSetTextureAnim(FALSE,FACE,0,0,0.0,0.0,1.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE on a spare dial with a readable diffuse texture. Owner-touch starts and stops.

Stop / restore: Touch to disable texture animation before removing. The saved diffuse texture/UV settings are restored, but an earlier animation is not recoverable.

Use a spare prim with readable classic diffuse texture settings. Material behavior can differ with PBR transforms. ROTATE affects UV orientation, not geometry; rate is radians per second.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer FACE=0;
integer active;
list saved;
default
{
    state_entry()
    {
        saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    }
    touch_start(integer count)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        active=!active;
        if(active)llSetTextureAnim(ANIM_ON|SMOOTH|ROTATE|LOOP,FACE,1,1,0.0,TWO_PI,0.15);
        else
        {
            llSetTextureAnim(FALSE,FACE,0,0,0.0,0.0,1.0);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        }
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Use a repeating texture on a spare prim. Texture animation changes the texture coordinates, not the prim position.

Stop / restore: Run Stop surface animation below. The animation setting persists after removing its starter script.

PBR/material combinations and pre-rotated faces can change the apparent direction.

// Original Incoprea example. Nonphysical surface treatment.
default
{
    state_entry()
    {
        llSetTextureAnim(ANIM_ON | SMOOTH | LOOP, ALL_SIDES,
        1, 1, 0.0, 1.0, 0.035);
    }
}

MIT · original Incoprea example

API reference 1

Setup: Name up to 32 children checker_tile, set CELL spacing, and align the root-local floor grid. Face0 only.

Stop / restore: Owner-touch applies/restores saved colors.

Use a spare modifiable build. Snapshot state is held only in script memory; restore before reset/removal. Do not relink during a preview. Alternating parity is based on rounded root-local X/Y cell coordinates; uneven or rotated tile centers need their own layout.

// Original Incoprea. MIT. Not compiled or tested in-world.
float CELL=1.0;
list links;
list saved;
integer preview;
integer valid=TRUE;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner()||llGetLinkNumber()>1||!valid||CELL<=0.0)return;
        integer i;
        if(preview)
        {
            for(i=0;i<llGetListLength(links);++i)llSetLinkPrimitiveParamsFast(llList2Integer(links,i),[PRIM_COLOR,0]+llList2List(saved,i*2,i*2+1));
            preview=FALSE;
            return;
        }
        links=[];
        saved=[];
        for(i=2;i<=llGetObjectPrimCount(llGetKey())&&llGetListLength(links)<32;++i)if(llGetLinkName(i)=="checker_tile")
        {
            links+=[i];
            list color=llGetLinkPrimitiveParams(i,[PRIM_COLOR,0]);
            saved+=color;
            vector p=llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
            integer parity=(llRound(p.x/CELL)+llRound(p.y/CELL))%2;
            vector tint=<0.9,0.9,0.9>;
            if(parity)tint=<0.12,0.12,0.12>;
            llSetLinkPrimitiveParamsFast(i,[PRIM_COLOR,0,tint,llList2Float(color,1)]);
        }
        preview=TRUE;
    }
    changed(integer change)
    {
        if(change&CHANGED_LINK)valid=FALSE;
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE on a classic material surface with readable specular settings.

Stop / restore: Owner-touch again to restore the startup snapshot before removing or resetting. A reset while previewing loses the original snapshot.

Classic-material controls only; PBR materials may display differently. Use a spare prim and textures whose settings you can read and restore. Another controller must not edit the same face during the preview. Sets specular color, glossiness, and environment contribution to zero for the comparison.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer preview;
list saved;
integer FACE=0;
default
{
    state_entry()
    {
        saved = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_SPECULAR, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        preview = !preview;
        if (preview)
        {
            list test=llListReplaceList(saved,[ZERO_VECTOR,0,0],4,6);
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_SPECULAR,FACE]+test);
        }
        else
        {
            llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_SPECULAR,FACE]+saved);
            llOwnerSay("Original setting restored.");
        }
    }
}

MIT · original Incoprea example

API reference 1

Setup: Put in a copy of a prim. Touch to switch its point light on or off.

Stop / restore: Disable the script and turn the point light off in Edit if needed.

This affects only the prim containing the script. Viewers render local lights differently.

// Original Incoprea example.
integer isLit;
default
{
    state_entry()
    {
        isLit = FALSE;
        llSetLinkPrimitiveParamsFast(LINK_THIS,
        [PRIM_POINT_LIGHT, FALSE, <1.0, 0.72, 0.38>, 0.8, 8.0, 0.75]);
    }
    touch_start(integer count)
    {
        isLit = !isLit;
        llSetLinkPrimitiveParamsFast(LINK_THIS,
        [PRIM_POINT_LIGHT, isLit, <1.0, 0.72, 0.38>, 0.8, 8.0, 0.75]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Put in the prim and set FACE. The original glow is captured at startup. Keep other glow scripts off that face.

Stop / restore: Let the three-second timer complete before removing. Removing while lit leaves the glow until manually restored.

Glow can be unavailable or visually reduced in some viewer configurations. No point light is created.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer FACE = 0;
float original;
default
{
    state_entry()
    {
        original = llList2Float(llGetLinkPrimitiveParams(LINK_THIS, [PRIM_GLOW, FACE]), 0);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_GLOW, FACE, 0.12]);
        llSetTimerEvent(3.0);
    }
    timer()
    {
        llSetTimerEvent(0.0);
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_GLOW, FACE, original]);
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Apply a 4-by-4 sprite sheet with sixteen equal frames to a prim face. Adjust the grid settings to match your texture.

Stop / restore: Run Stop surface animation. Removing this script does not clear the saved animation setting.

Texture frame animation is a viewer effect and may look different on PBR materials.

// Original Incoprea example. Requires a 4 x 4 sprite sheet texture.
default
{
    state_entry()
    {
        llSetTextureAnim(ANIM_ON | LOOP, ALL_SIDES, 4, 4, 0.0, 16.0, 4.0);
    }
}

MIT · original Incoprea example

API reference 1

Setup: Set FACE on a spare classic diffuse-textured prim. Owner-touch; Restore restores the entire captured diffuse rule.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Uses readable texture settings. Offsets are normalized/wrapped into the valid -1 to 1 range. Does not edit PBR-specific transforms.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
integer FACE=0;
list saved;
init()
{
    saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
}
show()
{
    menu("Diffuse UV offset: 0.05 steps",["Left","Right","Up","Down","Center","Restore"]);
}
choose(string s)
{
    if(s=="Restore")
    {
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        show();
        return;
    }
    list rule=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    vector p=llList2Vector(rule,2);
    if(s=="Left")p.x-=0.05;
    else if(s=="Right")p.x+=0.05;
    else if(s=="Up")p.y+=0.05;
    else if(s=="Down")p.y-=0.05;
    else if(s=="Center")p=ZERO_VECTOR;
    else return;
    if(p.x>1.0)p.x-=2.0;
    if(p.x< -1.0)p.x+=2.0;
    if(p.y>1.0)p.y-=2.0;
    if(p.y< -1.0)p.y+=2.0;
    llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+llListReplaceList(rule,[p],2,2));
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Set FACE and use an original texture you can read and restore. The script captures its texture and UV settings. Owner-touch cycles four orientations.

Stop / restore: After the fourth touch the original UV rotation is restored. Remove or reset only then.

Changes classic diffuse UV rotation. A PBR material has separate texture transforms.

// Original Incoprea example. MIT. Not compiled or tested in-world.
integer FACE = 0;
integer step;
list original;
default
{
    state_entry()
    {
        original = llGetLinkPrimitiveParams(LINK_THIS, [PRIM_TEXTURE, FACE]);
    }
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        step = (step + 1) % 4;
        list settings = llListReplaceList(original, [llList2Float(original, 3) + step * PI_BY_TWO], 3, 3);
        llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_TEXTURE, FACE] + settings);
        if (!step) llOwnerSay("Original texture rotation restored.");
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2

Setup: Set FACE. Buttons increase/decrease repeat magnitude by 20 percent; Restore returns the original texture rule.

Stop / restore: Use the Restore or Home action described in setup before removing or resetting if you want the startup appearance. Menu listeners expire after 45 seconds.

Local owner-only control. Saved snapshots live in script memory and are lost on reset. Classic diffuse transforms only. Existing mirror signs are retained. Repeat magnitudes are capped to avoid runaway tiling.

// Original Incoprea. MIT. Not compiled or tested in-world.
integer channel;
integer handle;
close()
{
    if(handle)llListenRemove(handle);
    handle=0;
    llSetTimerEvent(0.0);
}
menu(string prompt,list buttons)
{
    if(!handle)
    {
        channel=-1000-(integer)llFrand(1000000.0);
        handle=llListen(channel,"",llGetOwner(),"");
    }
    llDialog(llGetOwner(),prompt,buttons,channel);
    llSetTimerEvent(45.0);
}
integer FACE=0;
list saved;
float cap(float v)
{
    if(v>20.0)return 20.0;
    if(v< -20.0)return -20.0;
    return v;
}
init()
{
    saved=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
}
show()
{
    menu("Texture density",["U More","U Less","V More","V Less","Both More","Both Less","Restore"]);
}
choose(string s)
{
    if(s=="Restore")
    {
        llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+saved);
        show();
        return;
    }
    list rule=llGetLinkPrimitiveParams(LINK_THIS,[PRIM_TEXTURE,FACE]);
    vector r=llList2Vector(rule,1);
    if(s=="U More")r.x*=1.2;
    else if(s=="U Less")r.x/=1.2;
    else if(s=="V More")r.y*=1.2;
    else if(s=="V Less")r.y/=1.2;
    else if(s=="Both More")r*=1.2;
    else if(s=="Both Less")r/=1.2;
    else return;
    r.x=cap(r.x);
    r.y=cap(r.y);
    llSetLinkPrimitiveParamsFast(LINK_THIS,[PRIM_TEXTURE,FACE]+llListReplaceList(rule,[r],1,1));
    show();
}
default
{
    state_entry()
    {
        init();
    }
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        close();
        show();
    }
    listen(integer ch,string name,key id,string message)
    {
        if(!handle||ch!=channel||id!=llGetOwner())return;
        choose(message);
    }
    timer()
    {
        close();
    }
    changed(integer change)
    {
        if(change&CHANGED_OWNER)llResetScript();
    }
}

MIT · original Incoprea example

API reference 1 · API reference 2 · API reference 3

Setup: Add licensed textures to a spare display prim; set FACE. Owner-touch starts/stops a ten-second slideshow.