// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Find alpha differences across one component
// Not compiled or tested in-world
// Setup: Put in a spare owned prim or linkset root. Touch the face or component to inspect. Child scripts may consume touches; face-based tools require a viewer that supplies touched-face data.
// Stop / restore: Remove/disable. Inspectors read state and report only to the owner; they do not change the build.
// Notes: Reads tint alpha, not texture pixel transparency or material blend behavior. Scans at most32 faces.
// License: see LICENSE in this distribution.
// Original Incoprea. MIT. Owner-only live inspection.
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer link=llDetectedLinkNumber(0);
        if(link==0)link=LINK_THIS;
        integer face=llDetectedTouchFace(0);
        integer count=llGetLinkNumberOfSides(link);
        if(count<1||count>32)
        {
            llOwnerSay("Use a component with1..32 faces.");
            return;
        }
        float reference=llList2Float(llGetLinkPrimitiveParams(link,[PRIM_COLOR,0]),1);
        integer mismatches;
        integer i;
        for(i=0;i<count;++i)
        {
            float alpha=llList2Float(llGetLinkPrimitiveParams(link,[PRIM_COLOR,i]),1);
            if(llFabs(alpha-reference)>0.001)
            {
                ++mismatches;
                llOwnerSay("Face "+(string)i+" alpha="+(string)alpha);
            }
        }
        llOwnerSay("Face0 alpha="+(string)reference+" differing faces="+(string)mismatches);
    }
}