// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Flag steep segments in a planned walkway
// Not compiled or tested in-world
// Setup: Place in a spare owned prim. Set POINTS and nonnegative MAX_GRADE_PERCENT. Touch for private results.
// Stop / restore: Disable/remove; no scene properties change.
// Notes: User-selected threshold is a virtual-design preference, not a legal accessibility standard.
// License: see LICENSE in this distribution.
// Original Incoprea. MIT. Planning only.
list POINTS=[<0.0,0.0,0.0>,<4.0,0.0,0.3>,<6.0,2.0,1.2>];
float MAX_GRADE_PERCENT=10.0;
default
{
    touch_start(integer detectedCount)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        if(MAX_GRADE_PERCENT<0.0)
        {
            llOwnerSay("Nonnegative limit required.");
            return;
        }
        integer i;
        for(i=1;i<llGetListLength(POINTS);++i)
        {
            vector d=llList2Vector(POINTS,i)-llList2Vector(POINTS,i-1);
            float run=llSqrt(d.x*d.x+d.y*d.y);
            if(run<0.000001)llOwnerSay("Segment "+(string)i+" vertical or zero-length.");
            else
            {
                float grade=100.0*d.z/run;
                llOwnerSay("Segment "+(string)i+" grade="+(string)grade+" exceeds="+(string)(llFabs(grade)>MAX_GRADE_PERCENT));
            }
        }
    }
}