// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Calculate a local stock movement ledger
// Not compiled or tested in-world
// Setup: Edit START and MOVES as note/integer delta pairs; touch as owner.
// Stop / restore: Remove or disable; it only reports locally to the owner.
// Notes: Illustrative planning arithmetic only. It never delivers, sells, or counts actual inventory assets; values must be configured integers.
// License: see LICENSE in this distribution.
// Original Incoprea example. MIT.
integer START=10;
list MOVES=["Added",5,"Reserved",-4,"Used",-3,"Planned",-12];
default
{
    touch_start(integer touches)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(START<0 || llGetListLength(MOVES)%2)
        {
            llOwnerSay("Invalid start or movement records.");
            return;
        }
        integer balance=START;
        integer i;
        for(i=0;i<llGetListLength(MOVES);i+=2)
        {
            balance+=llList2Integer(MOVES,i+1);
            llOwnerSay(llList2String(MOVES,i)+": balance "+(string)balance);
            if(balance<0)llOwnerSay("Finding: balance below zero at this step.");
        }
    }
    changed(integer flags)
    {
        if(flags & CHANGED_OWNER)llResetScript();
    }
}