Скрипт, перенаправления юзверей

-- Автор: Артём
local tRanks = {
  {"10.0.0.0", "10.255.255.255"},        -- Диапазон для перенаправления
  {"192.168.0.0", "192.168.255.255"}    -- Диапазон для перенаправления
}

sAddress = "адрес_для_перенаправления"
sReason = "причина для перенаправления"

function Ip2Num(sIP)
  local a, b, c, d = sIP:match"^(%d+)%.(%d+)%.(%d+)%.(%d+)$"
  return a * 16777216 + b * 65536 + c * 256 + d
end

function OnStartup()
  for k, v in ipairs(tRanks) do
    tRanks[k][1], tRanks[k][2] = Ip2Num(v[1]), Ip2Num(v[2])
  end
end

function UserConnected(tUser)
  local iIP = Ip2Num(tUser.sIP)
  for _, v in ipairs(tRanks) do
    if iIP > v[1] and iIP < v[2] then
        Core.Redirect(tUser, sAddress, sReason)
        return
    end
  end
end

RegConnected, OpConnected = UserConnected, UserConnected