-- LPFILT.lua
-- EMA low-pass filter + производная (скорость изменения)

local input = {
  { "In",  SOURCE },
  { "Tau", VALUE, 0, 127, 20 },   -- десятки секунд: 20 => 2.0s
}

local output = { "Flt", "Rate" }

local lastTime = nil
local y = 0
local lastY = 0

local function init()
  lastTime = getTime()
  y = 0
  lastY = 0
end

local function run(x, tau10)
  local now = getTime()
  local dtTicks = now - (lastTime or now)
  lastTime = now

  local dt = dtTicks * 0.01
  if dt <= 0 then
    return y, 0
  end

  local tau = (tau10 or 0) * 0.1
  local alpha
  if tau <= 0 then
    alpha = 1
  else
    alpha = dt / (tau + dt)
  end

  lastY = y
  y = y + alpha * (x - y)

  local rate = (y - lastY) / dt
  return y, rate
end

return { input=input, output=output, run=run, init=init }

-- Q6POS.lua
-- Quantizer: аналоговый вход -> N дискретных позиций с гистерезисом

local input = {
  { "In",  SOURCE },
  { "N",   VALUE, 2, 12, 6 },
  { "Hys", VALUE, 0, 50, 5 },     -- гистерезис в "%"
}

local output = { "Pos" }

local idx = 0
local levels = {}

local function clamp(x, lo, hi)
  if x < lo then return lo end
  if x > hi then return hi end
  return x
end

local function buildLevels(n)
  levels = {}
  for i = 0, n - 1 do
    local v = -1024 + (2048 * i) / (n - 1)
    levels[i] = v
  end
end

local function init()
  idx = 0
  buildLevels(6)
end

local function run(x, n, hysPct)
  n = clamp(n or 6, 2, 12)
  if #levels ~= n then
    buildLevels(n)
    idx = clamp(idx, 0, n - 1)
  end

  local hys = (hysPct or 0) * 10.24

  while idx < n - 1 do
    local midUp = (levels[idx] + levels[idx + 1]) / 2
    if x > midUp + hys then
      idx = idx + 1
    else
      break
    end
  end

  while idx > 0 do
    local midDn = (levels[idx - 1] + levels[idx]) / 2
    if x < midDn - hys then
      idx = idx - 1
    else
      break
    end
  end

  return levels[idx]
end

return { input=input, output=output, run=run, init=init }

-- PEAK.lua
-- min/max tracker + peak-hold with decay

local input = {
  { "In",  SOURCE },
  { "Rst", SOURCE },               -- кнопка/тумблер сброса
  { "Dec", VALUE, 0, 127, 20 },     -- затухание пика (%/sec)
}

local output = { "Cur", "Max", "Min", "Pk" }

local lastTime = nil
local maxV = -1024
local minV =  1024
local peak = -1024

local function init()
  lastTime = getTime()
  maxV = -1024
  minV =  1024
  peak = -1024
end

local function run(x, rst, dec)
  local now = getTime()
  local dtTicks = now - (lastTime or now)
  lastTime = now
  local dt = dtTicks * 0.01

  if (rst or 0) > 0 then
    maxV = x
    minV = x
    peak = x
  end

  if x > maxV then maxV = x end
  if x < minV then minV = x end

  if x >= peak then
    peak = x
  else
    local drop = (dec or 0) * 10.24 * dt
    peak = peak - drop
    if peak < x then peak = x end
  end

  return x, maxV, minV, peak
end

return { input=input, output=output, run=run, init=init }

1) SD:
   /SCRIPTS/MIXES/SLEW.lua

2) Model Settings → Custom Scripts → LUA1:
   File: SLEW
   Name: GIM_SLEW
   In:   S1
   Up:   10
   Dn:   10

3) Mixes → CH7:
   Line1 (fallback): Src=S1     Weight=100
   Line2 (Lua):      Src=LUA1a  Weight=100  Multiplex=Replace

-- TST2.lua (имя до 6 символов)
local input  = { { "In", SOURCE } }
local output = { "Raw", "Half" }

local function run(x)
  return x, x * 0.5
end

return { input=input, output=output, run=run }

Mixes (пример):
CH8:
  Line1: Src=LUA2a Weight=100   (Raw)
CH9:
  Line1: Src=LUA2b Weight=100   (Half)

Custom Scripts → LUA3:
  File: Q6POS
  In:   S1
  N:    6
  Hys:  6

Mixes → CH10:
  Line1 fallback: Src=S1     Weight=100
  Line2 Lua:      Src=LUA3a  Weight=100  Replace

Custom Scripts → LUA2:
  File: LPFILT
  In:   RxBt
  Tau:  20   (≈ 2.0s)

Logical Switches:
  L01: (LUA2a < порог)  -- LUA2a = Flt

Special Functions:
  SF1: Trigger=L01  → Play Value (RxBt или LUA2a)  Repeat=10s

Custom Scripts → LUA4:
  File: PEAK
  In:   RSSI    (или RxBt)
  Rst:  SH↓     (momentary)
  Dec:  15

Использование:
  LUA4c = Min
  LUA4b = Max
  LUA4d = Peak-hold

Идея:
  - после полёта нажмите SH↓ и/или озвучьте LUA4c (минимум)