// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Measure the peak simultaneous cue count
// Not compiled or tested in-world
// Setup: Place in a spare owned prim. Set valid nonzero start/end pairs. Owner touch runs a bounded local calculation.
// Stop / restore: Disable/remove. No travel, publication, payments or external operations occur.
// Notes: At equal times, ending events precede starting events, so back-to-back cues do not overlap.
// License: see LICENSE in this distribution.
// Original Incoprea. MIT. Local planning demonstration.
list WINDOWS=[0.0,3.0,1.0,4.0,3.0,5.0,2.0,3.5];
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        integer n=llGetListLength(WINDOWS);
        if(n%2)
        {
            llOwnerSay("Use pairs.");
            return;
        }
        list times;
        integer i;
        for(i=0;i<n;i+=2)
        {
            float a=llList2Float(WINDOWS,i);
            float b=llList2Float(WINDOWS,i+1);
            if(b<=a)
            {
                llOwnerSay("Positive durations required.");
                return;
            }
            times+=[a,b];
        }
        times=llListSort(times,1,TRUE);
        integer peak;
        float peakAt;
        for(i=0;i<llGetListLength(times);++i)
        {
            float t=llList2Float(times,i);
            integer active;
            integer j;
            for(j=0;j<n;j+=2)if(llList2Float(WINDOWS,j)<=t&&t<llList2Float(WINDOWS,j+1))++active;
            if(active>peak)
            {
                peak=active;
                peakAt=t;
            }
        }
        llOwnerSay("Peak simultaneous="+(string)peak+" first at="+(string)peakAt);
    }
}