Система принятия решений и/или Нечеткая логика(FuzzyLogic)

local path = getWorkingFolder()
local f;
local save = {
    position = 0,
    d = 0,
    t = 0
    }

Settings={}
Settings.Name = "*BreakoutIndicator"
Settings.period = 5
Settings.k = 1
Settings.wid = 0

function Init()
    local Cached = dofile(path .. "\\cached.lua"); 
   f = BreakoutIndicator()
   Cached=nil
   Settings.line = {
   {Name = "BUY", Type = TYPE_TRIANGLE_UP, Width = 1, Color = RGB(0, 0, 255) },
   {Name = "SELL", Type = TYPE_TRIANGLE_DOWN, Width = 1, Color = RGB(255, 0, 128) },
   
   {Name = "save.upper", Type = TYPE_BAR , Width = 1, Color = RGB(0, 128, 255) },
   {Name = "save.lower", Type = TYPE_BAR, Width = 1, Color = RGB(255, 0, 128) },
   {Name = "SL", Type =TYPE_DASH, Width = 1, Color = RGB(255, 0, 0) }
   }
   return #Settings.line
end
function OnCalculate(index)

   -- ====== ТЕКУЩИИ ЗНАЧЕНИЯ ======
    local position1 = save.position 
    local d1 = save.d
    local t1 = save.t
    
    -- ====== Расчет ЗНАЧЕНИЙ ======
    local breakout = f( index, Settings )
    
    -- ====== Обработка ======
    local newbar = (breakout and d1 ~= breakout.d or breakout.t ~= t1)
    
    save.position = breakout and breakout.position
    save.d = breakout and breakout.d
    save.t = breakout and breakout.t
    
    --====== RETURN LINES ======
    if Settings.wid == 2 then
        return nil,nil,nil,nil, breakout and breakout.volatilityRatio > 1 and breakout.volatilityRatio or nil
    end
    return  breakout and (d1 ~= breakout.d or breakout.t ~= t1) and breakout.position == 1 and  breakout.entryLevel or nil,   -- BUY
            breakout and (d1 ~= breakout.d or breakout.t ~= t1) and breakout.position == -1 and breakout.entryLevel or nil,   -- SELL
            breakout and breakout.position == 1 and breakout.upperPivot or nil,
            breakout and breakout.position == -1 and breakout.lowerPivot or nil,
            breakout and breakout.position ~= 0 and breakout.slLevel or nil

end