dcpp = {}
spamtable = {}
-- spamtable= { ["dc.ru"] = { 0, 10, "sample" } , ["localhost"] = { 0, 12, "hello there!" } }

function spam(hubname, timeout, text)
            spamtable[hubname] = { 0, timeout, text }
end

function dcpp.OnTimer()
            for hubname, hubentry in pairs(spamtable) do
                    if (hubentry[1] == 0) and (hubentry[3] ~= "") then
                            hubentry[1] = hubentry[2]
                            DC():SendPublicMessage(hubname, hubentry[3])
                    else
                            hubentry[1] = hubentry[1] - 1
                    end
            end
            return nil
end

text =          "Спам-бот. Запуск спама на хабе с периодом 600 секунд:\r\n"
text = text ..  "/lua spam(\"dc.ufanet.ru\", 600, \" ТУТ ВАШЕ СООБЩЕНИЕ \")\r\n"
text = text ..  "\r\n"
text = text ..  "Чтобы отключить спам на хабе, наберите\r\n"
text = text ..  "/lua spam(\"dc.ufanet.ru\", 0, \"\")\r\n"
text = text ..  "\r\n"
text = text ..  "Адрес хаба надо писать в точности, как в столбце 'Сервер'\r\n"
text = text ..  "в списке 'Избранных хабов'\r\n"

DC():MessageBox(text, "spam.lua", "ok", "info")
DC():RunTimer(1)

dcpp = {}

BotSay = {
     {
         ["question"] = {"всем привет",},
         ["answer"] = {"[NICK] привет",},
     },
     {
         ["question"] = {"всем пока",},
         ["answer"] = {"[NICK]! не уходи!!!",},
     },
}

function dcpp.OnPublicMessage(cid, msg)
         local userInfo = DC():GetUserInfo(cid)
          if (userInfo.ME ~= "1") then
           local huburl = userInfo.HL
            for _, mini_table in pairs(BotSay) do
             for _, trigger in pairs(mini_table["question"]) do
              if string.find(msg, trigger) then
               DC():SendPublicMessage(huburl, mini_table["answer"][math.random(1,table.getn(mini_table["answer"]))]:gsub("%[NICK%]", userInfo.NI))
                    return nil
                    end
                         end
                 end
         end

         return nil
end

                reply = mini_table["answer"][math.random(1,table.getn(mini_table["answer"]))]:gsub("%[NICK%]", userInfo.NI)
                DC():SendPublicMessage(huburl, reply)

               reply = mini_table["answer"][math.random(1,table.getn(mini_table["answer"]))]:gsub("%[NICK%]", userInfo.NI)  

               reply = mini_table["answer"][math.random(1,table.getn(mini_table["answer"]))]:gsub("%[NICK%]", userInfo.NI):gsub("%[TAG%]", userInfo.TAG)