-------------------------------------------------------------------------------
local tRanker = {
  ["192.168.39.200:413"] = {
    bOn = 1, -- 1-вкл., 0-выкл. бота на данном хабе
    iC = 1, -- не трогаем этот параметр
    iInterval = 6, -- интервал между сообщениями (в сек)
    tMsgs = { -- таблица команд для набора чат-ранга
      "!gettempbans",
      "!getpermbans",
      "!getbans",
      "!clrpermbans",
      "!clrtempbans",
      "!clrrangepermbans",
      "!clrrangetempbans",
      "!getrangepermbans",
      "!getrangetempbans",
      "!getrangebans",
      "!getscripts"
    },
  },
  ["192.168.0.100"] = {
    bOn = 1,
    iC = 1,
    iInterval = 4,
    tMsgs = {
      "!gettempbans",
      "!getpermbans",
      "!getbans",
      "!clrpermbans",
      "!clrtempbans",
      "!clrrangepermbans",
      "!clrrangetempbans",
      "!getrangepermbans",
      "!getrangetempbans",
      "!getrangebans",
      "!getscripts"
    },
  },
}

-------------------------------------------------------------------------------
-- Далее ничего не трогаем --
-------------------------------------------------------------------------------
tRanker.tHubs={}

tMainFunc["ranker"].OnTimer=function()
  for i,v in pairs(tRanker) do
    if v.bOn==1 and tRanker.tHubs[i] then
      tRanker[i].iC=tRanker[i].iC and tRanker[i].iC+1 or 1
      if math.fmod(v.iC,v.iInterval)==0 then
        DC():SendPublicMessage(i,DC():ToUtf8(v.tMsgs[math.random(1,#v.tMsgs)]))
      end
    end
  end
end

tMainFunc["ranker"].OnHubConnected=function(sHubUrl)
  if tSys:Table(tRanker[sHubUrl]) and tRanker[sHubUrl].bOn and tRanker[sHubUrl].bOn==1 then
    tRanker.tHubs[sHubUrl]=true
  end
end

tMainFunc["ranker"].OnHubDisconnected=function(sHubUrl)
  if tSys:Table(tRanker[sHubUrl]) and tRanker[sHubUrl].bOn and tRanker[sHubUrl].bOn==1 then
    tRanker.tHubs[sHubUrl]=nil
  end
end
