// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Detect schema field-order drift
// Not compiled or tested in-world
// Setup: Edit A and B; touch as owner.
// Stop / restore: Remove or disable; it only reports locally to the owner.
// Notes: A differing order is informational unless your serialization format depends on it. Missing trailing keys are explicitly reported.
// License: see LICENSE in this distribution.
// Original Incoprea example. MIT.
list A=["title","Lamp","color","green"];
list B=["color","blue","title","Lamp","size","small"];
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetListLength(A)%2 || llGetListLength(B)%2)
        {
            llOwnerSay("Incomplete pair.");
            return;
        }
        integer total=llGetListLength(A);
        if(llGetListLength(B)>total)total=llGetListLength(B);
        integer i;
        for(i=0;i<total;i+=2)
        {
            string left="[absent]";
            string right="[absent]";
            if(i<llGetListLength(A))left=llList2String(A,i);
            if(i<llGetListLength(B))right=llList2String(B,i);
            if(left!=right)llOwnerSay("Field slot "+(string)(i/2)+": "+left+" -> "+right);
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}