local customlag = CreateFrame("Frame")
    local int = 30
    local LatencyUpdate = function(self, elapsed)
        int = int - elapsed
        if int < 0 then
            local ping = select(4, GetNetStats())
            if GetCVar("reducedLagTolerance") ~= tostring(1) then SetCVar("reducedLagTolerance", tostring(1)) end
            if ping ~= 0 and ping <= 400 then
                SetCVar("maxSpellStartRecoveryOffset", tostring(ping))
            end
            int = 30
        end
    end
    customlag:SetScript("OnUpdate", LatencyUpdate)
    LatencyUpdate(customlag, 20)