// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Linked prim name map
// Not compiled or tested in-world
// Setup: Put in a rezzed object and owner-touch. Intended for small linksets; output is one line per object prim.
// Stop / restore: Remove or disable. No link, name, or position is changed.
// Notes: Uses the object prim count to exclude seated avatars. Link numbers may change after relinking. Large linksets can produce substantial owner chat.
// License: see LICENSE in this distribution.
// Original Incoprea example. MIT. Not compiled or tested in-world.
default
{
    touch_start(integer count)
    {
        if (llDetectedKey(0) != llGetOwner()) return;
        integer total = llGetObjectPrimCount(llGetKey());
        if (total <= 1)
        {
            llOwnerSay("Single object prim: " + llGetObjectName());
            return;
        }
        integer link;
        for (link = 1; link <= total; ++link)
        llOwnerSay((string)link + ": " + llGetLinkName(link));
    }
}