// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Wall area after openings
// Not compiled or tested in-world
// Setup: Place in a spare prim. Set wall size and paired opening widths/heights. Owner touch prints results without altering the scene.
// Stop / restore: Disable or remove. No prim properties are changed.
// Notes: Openings must not overlap and must lie within the wall; this arithmetic does not check their positions.
// License: see LICENSE in this distribution.
// Original Incoprea. MIT. Owner-only calculation.
float WIDTH=12.0;
float HEIGHT=3.0;
list OPENINGS=[1.0,2.1,2.0,1.2];
default
{
    touch_start(integer detectedCount)
    {
        if (llDetectedKey(0)!=llGetOwner()) return;
        if (WIDTH<=0.0 || HEIGHT<=0.0 || llGetListLength(OPENINGS)%2)
        {
            llOwnerSay("Invalid wall or opening pairs.");
            return;
        }
        float area=WIDTH*HEIGHT;
        integer i;
        for(i=0;i<llGetListLength(OPENINGS);i+=2)
        {
            float w=llList2Float(OPENINGS,i);
            float h=llList2Float(OPENINGS,i+1);
            if(w<0.0||h<0.0)
            {
                llOwnerSay("Negative opening.");
                return;
            }
            area-=w*h;
        }
        if(area<0.0)
        {
            llOwnerSay("Openings exceed wall area.");
            return;
        }
        llOwnerSay("Net area: "+(string)area+" m2");
    }
}