Linkset Scrubber

// This should cover clearing most of the prim properties
// out of all prims in a linkset, with a few extra commands
// (like camera and touchtext) to clear out the linkset's
// root prim.

default
{
    state_entry()
    {
        llSetLinkPrimitiveParamsFast(LINK_SET, [PRIM_TEXT, "", ZERO_VECTOR, 0.0, PRIM_OMEGA, ZERO_VECTOR, 0.0, 0.0, PRIM_SIT_TARGET, FALSE, ZERO_VECTOR, ZERO_ROTATION]);
        llSetTouchText( "" );
        llLinkParticleSystem(LINK_SET, []);
        llSetCameraAtOffset( ZERO_VECTOR );
        llSetCameraEyeOffset( ZERO_VECTOR );
        llSetLinkTextureAnim(LINK_SET, FALSE, ALL_SIDES, 1, 1, 0, 0, 0.0 );
        llOwnerSay("These prims are Clean... ");
        llRemoveInventory( llGetScriptName() );
        // vanish without a trace...
    }
}