LuaCRC校验：多项式除法的字节核算

local function xor8(a, b)
    local r, bit = 0, 1
    for _ = 1, 8 do
        if a % 2 ~= b % 2 then r = r + bit end
        a = math.floor(a / 2)
        b = math.floor(b / 2)
        bit = bit * 2
    end
    return r
end

local function crc8(data)
    local crc = 0
    for i = 1, #data do
        crc = xor8(crc, data:byte(i))
        for _ = 1, 8 do
            local msb = math.floor(crc / 128) % 2
            crc = (crc * 2) % 256
            if msb == 1 then
                crc = xor8(crc, 0x07)
            end
        end
    end
    return crc
end
local p = getplayerbyname("crc01")
sendmsg(p, 1, "校验码 " .. crc8("save01"))