_sk_ (Все сообщения пользователя)

local function getSecCodeMinutes(secCodesTable)
    if next(secCodesTable) == nil then
        secCodesTable = nil
    end
    local tradeDate = getInfoParam("TRADEDATE")
    local day, month, year = string.match(tradeDate, "(%d+).(%d+).(%d+)")
    local yyyymmddTradeDate = year * 10000 + month * 100 + day
    local lotSizes = {}
    local newSecCodeMinutes = {}
    for i = 0, getNumberOf("all_trades") - 1 do
        local item = getItem("all_trades", i)
        if item == nil then
            -- очистка данных
            return nil
        end
        -- Использование данных только за текущий торговый день и для разрешённых кодов классов
        local datetime = item.datetime
        local classCode = item.class_code
        if Misc.yyyymmdd(datetime) == yyyymmddTradeDate and classCodes[classCode] then
            local secCode = item.sec_code
            if secCodesTable == nil or secCodesTable[secCode] then
                local lotSize = lotSizes[secCode]
                if lotSize == nil then
                    lotSize = (classCode == "SPBFUT") and 1 or getSecurityInfo(classCode, secCode).lot_size
                    lotSizes[secCode] = lotSize
                end
                local dirtyMinutes = newSecCodeMinutes[secCode]
                if dirtyMinutes == nil then
                    dirtyMinutes = { count = 0, classCode = classCode }
                    newSecCodeMinutes[secCode] = dirtyMinutes
                end
                local count = dirtyMinutes.count
                if count == 0 then
                    dirtyMinutes[1] = newCandle(item, lotSize)
                    dirtyMinutes.count = 1
                else
                    local candle = dirtyMinutes[count]
                    if isSamePeriod(candle.hour, candle.min, datetime.hour, datetime.min, 1) then
                        updateCandle(candle, item.price, item.qty * lotSize)
                    else
                        count = count + 1
                        dirtyMinutes[count] = newCandle(item, lotSize)
                        dirtyMinutes.count = count
                    end
                end
            end
        end
    end
    return newSecCodeMinutes
end