local isRun = true
local logFile

local function log_tostring(...)
    local n = select('#', ...)
    if n == 1 then
    return tostring(select(1, ...))
    end
    local t = {}
    for i = 1, n do
    t[#t + 1] = tostring((select(i, ...)))
    end
    return table.concat(t, " ")
end

local function myLog(...)
    if logFile==nil then return end
    logFile:write(tostring(os.date("%c",os.time())).." "..log_tostring(...).."\n");
    logFile:flush();
end

local function GetFuturesHolding(Sec)

    local futures_client_holding = _G.getFuturesHolding(Sec.FIRM_ID, Sec.ACCOUNT, Sec.SEC_CODE, 0)
    if futures_client_holding then
        return futures_client_holding.totalnet
    end
    return 0
end

local function GetTotalnet(Sec)

    local num = getNumberOf('futures_client_holding')
    for i = 0, num - 1 do
        local futures_client_holding = getItem('futures_client_holding',i)
        if futures_client_holding and futures_client_holding.sec_code == Sec.SEC_CODE and futures_client_holding.trdaccid == Sec.ACCOUNT then
            return futures_client_holding.totalnet
        end
    end
    return 0
end

function _G.main()

    logFile = io.open(_G.getScriptPath().."\\test_log.txt", "w")

    local Sec          = {SEC_CODE = 'SRU0', CLASS_CODE = 'SPBFUT', ACCOUNT = 'SPBFUT001nw', FIRM_ID = 'SPBFUT000000'}
    local curOpenCount = GetTotalnet(Sec)

    while isRun do
        local new_count = GetFuturesHolding(Sec)
        if  new_count ~= curOpenCount then
            myLog('----------------------------------------------------------------------------------')
            myLog('getFuturesHolding new_count', new_count)
            curOpenCount = new_count
            for i = 0, _G.getNumberOf('futures_client_holding') - 1 do
                local fut_pos = _G.getItem('futures_client_holding', i)
                myLog('futures_client_holding', i, 'sec_code', fut_pos.sec_code, 'avrposnprice', fut_pos.avrposnprice, 'totalnet', fut_pos.totalnet)
            end
            myLog('----------------------------------------------------------------------------------')
        end
        sleep(100)
    end
end

function _G.OnFuturesClientHolding(fut_pos)
    myLog('----------------------------------------------------------------------------------')
    myLog('          OnFuturesClientHolding ', 'sec_code', fut_pos.sec_code, 'avrposnprice', fut_pos.avrposnprice, 'totalnet', fut_pos.totalnet)
    myLog('----------------------------------------------------------------------------------')
end

function _G.OnStop()
    isRun = false
    myLog("Script Stoped")
    if logFile then logFile:close() end
end

function _G.OnClose()
    isRun = false
    myLog("Script OnClose")
end