// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Join product rows to a lookup table
// Not compiled or tested in-world
// Setup: Edit PRODUCTS and MATERIALS as alternating pairs; touch as owner.
// Stop / restore: Remove or disable; results are reported only to the owner.
// Notes: First matching lookup key wins. Missing matches are reported explicitly. This is a small local table join, not a database or inventory operation.
// License: see LICENSE in this distribution.
// Original Incoprea example. MIT.
list PRODUCTS=["Lamp","brass","Bench","wood","Vase","ceramic"];
list MATERIALS=["wood","warm grain","brass","polished metal"];
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(llGetListLength(PRODUCTS)%2 || llGetListLength(MATERIALS)%2)
        {
            llOwnerSay("Tables need complete pairs.");
            return;
        }
        integer i;
        integer j;
        for(i=0;i<llGetListLength(PRODUCTS);i+=2)
        {
            string product=llList2String(PRODUCTS,i);
            string material=llList2String(PRODUCTS,i+1);
            string description="[unmatched]";
            integer found;
            for(j=0;j<llGetListLength(MATERIALS);j+=2)if(!found && llList2String(MATERIALS,j)==material)
            {
                description=llList2String(MATERIALS,j+1);
                found=TRUE;
            }
            llOwnerSay(product+" | "+material+" | "+description);
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}