【进阶实战】Lua数值精度上限：沙巴克国库囤金的2^53错账

local function addGold(actor, n)
    local vault = getplayvar(actor, "SBK_VAULT") + n
    setplayvar(actor, "SBK_VAULT", vault)   -- 超2^53后加法丢位
end

local function addGold(actor, n)
    local hi = getplayvar(actor, "SBK_HI") or 0
    local lo = (getplayvar(actor, "SBK_LO") or 0) + n
    while lo >= 1000000 do              -- 拆高低位，各段不越界
        lo = lo - 1000000
        hi = hi + 1
    end
    setplayvar(actor, "SBK_HI", hi)
    setplayvar(actor, "SBK_LO", lo)
    sendmsg(actor, 1, "沙巴克国库入账 " .. n .. " 金")
end