Settings = {
    Name = "Tester",
    Step = 0,
    line = {}
}

LINES = 1

for x = 1, LINES, 1 do
    Settings.line[x] = {
        Name = "Line" .. tostring(x),
        Type = TYPE_LINE,
        Color = RGB(255, 255, 255),
        Width = 1
    }
end

function Init()
    LINES = #Settings.line
    return LINES
end

function OnCalculate(index)
    local start = O(index)
    if start == nil then
        return nil
    end
    return indicMoneyFlowIndex(indicToDataSource(), 6, Size()-index)
end

---Money Flow Index
---@param datasource fnCreateDataSourceReturn DataSource
---@param period number Период
---@param shift number Сдвиг в барах
---@return number
function indicMoneyFlowIndex(datasource, period, shift)
    if shift == nil then
        shift = 0
    end
    local stop = datasource.Size() - shift
    local start = stop - period
    if start < 1 or stop < 1 then
        return nil
    end
    local pos = 0.0
    local neg = 0.0
    local last = (datasource.H(start) + datasource.L(start) + datasource.C(start)) / 3.0
    for x = start+1, stop, 1 do
        local tp = (datasource.H(x) + datasource.L(x) + datasource.C(x)) / 3.0
        if tp >= last then
            pos = pos + (tp * datasource.V(x))
        else
            neg = neg + (tp * datasource.V(x))
        end
        last = tp
    end
    if neg ~= 0.0 then
        return 100.0 - (100.0 / (1.0 + (pos / neg)))
    else
        return 100.0
    end
end

---DataSource for Indicator
---@return fnCreateDataSourceReturn
function indicToDataSource()
    return {["O"] = O, ["H"] = H, ["L"] = L, ["C"] = C, ["V"] = V, ["T"] = T, ["Size"] = Size}
end

Settings = {
    Name = "Levels_TEST",
    Step = 50,
    Count = 10,
    IsBoolean = false, -- БАГ: В настройках этот тип не меняется!
    line = {}, -- БАГ: без этой строки индикатор не появляется в списке!

    hideline = {}, -- В настройках не отображаются
}

Settings.line = {
    {
        Name = "Line1",
        Type = TYPE_POINT,
        Color = RGB(55, 55, 55),
        Width = 2
    }
}

function Init()
    -- Можно вынести этот код за Init() и результат будет тот же.
    LINES = Settings.Count
    Settings.hideline = {} -- сброс, чтобы актуальные параметры сгенерировать

    for x = 2, LINES, 1 do
        Settings.hideline[x] = { -- LineERROR: здесь line[x] было (ошибка ниже)
            Name = "Line" .. tostring(x),
            Type = Settings.line[1].Type,
            Color = Settings.line[1].Color,
            Width = Settings.line[1].Width
    }
    end
    LINES = #Settings.line + #Settings.hideline
    -- А какой смысл возвращать другое значение?
    -- В МТ5 тут статус Инит, который может быть ошибкой.
    -- Но, количество линий? Где логика?
    -- Если превысить, то добавятся линии с случайным цветом...
    return LINES
end

function OnChangeSettings()
    -- Юзер сменил Settings.Count ?
    Init()
    -- Function OnChangeSettings: LineERROR: attempt to index a nil value (field 'line')

    -- ИЗМЕНЕНИЙ НЕТ! Линии не добавились и не покрасились.
    -- Очередная наспех сделанная кривая функция...
end

function OnCalculate(index)
    local start = O(index)
    if start == nil then
        return nil
    end
    if MINSTEP == nil then
        local info = getDataSourceInfo()
        MINSTEP = getSecurityInfo(info.class_code, info.sec_code).min_price_step
        FIRST = (math.tointeger(LINES / 2) + 1) * Settings.Step * MINSTEP
    end
    local result = {}
    start = start - ((math.tointeger(math.ceil(start / MINSTEP)) % Settings.Step) * MINSTEP) + FIRST
    for x = 1, LINES, 1 do
        table.insert(result, start - (x * Settings.Step * MINSTEP))
    end
    return table.unpack(result)
end

---@class roffild
---@field ISTRADINGALLOWED_SECONDS number Секунд в ожидании обезличиной сделки (по умолчанию = 3)
local roffild = {
    ISTRADINGALLOWED_SECONDS = 3,
}

---`isConnected() == 1` ещё ДО ввода PIN при Двухфакторной аутентификации.
---Обход бага через `getInfoParam("LASTRECORDTIME")`.
---@param seconds? number Секунд для ожидания (по умолчанию = 3 = `ISTRADINGALLOWED_SECONDS`)
---@return boolean
function roffild.isTradingAllowed(seconds)
    if isConnected() == 1 then
        local lastrecordtime = getInfoParam("LASTRECORDTIME")
        local servertime = getInfoParam("SERVERTIME") -- время с часовым поясом сервера (секунды локальные)
        if
            not (lastrecordtime == nil or lastrecordtime == "")
            and not (servertime == nil or servertime == "")
        then
            -- convertDateOrTimeToUnix из-за ":" не работает
            local fixlastrecordtime = os.sysdate()
            fixlastrecordtime.hour = tonumber(string.sub(lastrecordtime, 0, -7))
            fixlastrecordtime.min = tonumber(string.sub(lastrecordtime, -5, -4))
            fixlastrecordtime.sec = tonumber(string.sub(lastrecordtime, -2))
            if -- clearing
                fixlastrecordtime.hour < 7
                or (fixlastrecordtime.hour == 14 and fixlastrecordtime.min < 5)
                or (fixlastrecordtime.hour == 18 and fixlastrecordtime.min >= 45)
                or (fixlastrecordtime.hour == 19 and fixlastrecordtime.min < 5)
                or (fixlastrecordtime.hour == 23 and fixlastrecordtime.min >= 50)
            then
                return false
            end
            local fixservertime = os.sysdate()
            fixservertime.hour = tonumber(string.sub(servertime, 0, -7))
            fixservertime.min = tonumber(string.sub(servertime, -5, -4))
            fixservertime.sec = tonumber(string.sub(servertime, -2))
            return (math.abs(os.time(fixservertime) - os.time(fixlastrecordtime)) <=
                (seconds or roffild.ISTRADINGALLOWED_SECONDS))
        end
    end
    return false
end

return roffild

---@class roffild
---@field LAST_TIME_ANONYMIZED_DEAL qluaDateTime Время последней обезличенной сделки
---@field ISTRADINGALLOWED_SECONDS number Секунд в ожидании обезличиной сделки (по умолчанию = 3)
local roffild = {
    LAST_TIME_ANONYMIZED_DEAL = os.sysdate(),
    ISTRADINGALLOWED_SECONDS = 3,
}

roffild.LAST_TIME_ANONYMIZED_DEAL.hour = 0 -- для начальной разницы времени

---Функция должна вызываться в `OnAllTrade()`, когда она переопределена.
function roffild.OnAllTrade(alltrade)
    ---@type qluaDateTime
    roffild.LAST_TIME_ANONYMIZED_DEAL = alltrade.datetime
end

function OnAllTrade(alltrade)
    roffild.OnAllTrade(alltrade)
end

---`isConnected() == 1` ещё ДО ввода PIN при Двухфакторной аутентификации. Обход бага через `OnAllTrade()`. \
--- \
---**ЗАВИСИТ от интенсивности "Таблица обезличенных сделок".**
---@param seconds? number Секунд в ожидании обезличиной сделки (по умолчанию = 3 = `ISTRADINGALLOWED_SECONDS`)
---@return boolean
function roffild.isTradingAllowed(seconds)
    return (isConnected() == 1
        and (os.time(os.sysdate()) - os.time(roffild.LAST_TIME_ANONYMIZED_DEAL)) <= (seconds or roffild.ISTRADINGALLOWED_SECONDS))
end