boot_thrust_limiter.ks

//kOS script to limit all thrust to 0 above 25 me radar alt, fadeout from 10 m

declare local r_alt_max to 25.
declare local r_alt_fadeout to 10.
declare local r_alt_fadeDist to (r_alt_max - r_alt_fadeout).

LOCK th_mod TO 1 - ((MAX(MIN((ALT:RADAR - r_alt_fadeout), r_alt_fadeDist),0)) / r_alt_fadeDist).

List Engines in engine_list.

UNTIL false {

    FOR engine IN engine_list {
        set engine:thrustlimit to (100 * th_mod).
    }.

    WAIT 0.05.

}