-------------------------------------------------------------------------------
ChatBot={
["bOn"]=1, -- 1-вкл., 0-выкл. бота
["iVer"]=90, --вероятность ответа (в <img src="http://src.ucoz.net/sm/1/wacko.gif" border="0" align="absmiddle" alt="wacko">
["tDelay"]={1,2}, --задержки перед отправкой (в сек)
["tAllHubs"]={ -- таблица всех хабов. Если следующий параметр ["Say"]~=nil, то таблица для отдельных хабов ["tHubs"] не работает.
["Say"]=nil, -- nil - отключить таблицу всех хабов (иначе ставь Say1)
["iTimer"]=-1, -- не трогаем этот параметр
["sMsg"]="", -- не трогаем этот параметр
["sHub"]="" -- не трогаем этот параметр
},
["tHubs"]={
["dchub://dc.crossnet.ru"]={ -- адрес хаба (в соответствие с настройками в избранных хабах)
["Say"]=Say1, -- таблица фраз/ответов
["iTimer"]=-1, -- не трогаем этот параметр
["sMsg"]="", -- не трогаем этот параметр
},
}
}
-- таблица фраз и ответов
Say1= {
{
["q"] = {"hi","хай","пр[иею]ве[тд]","даров","здрав","добрый вечер","вечер добрый","доброго вечера","добрый день","доброго дня","день добрый","доброе утро","утро доброе"},
["a"] = {"Привет :-)","Приветствую","[NICK]: здарова =)","[NICK]: и тебе здравствуй","Салют! :))"},
},
{
["q"] = {"bye","п[оа]ка","бай","до%s*свидания"},
["a"] = {"удачи","[NICK]: счастливо","пока","66"},
},
{
["q"] = {"lol","дщд"},
["a"] = {" :-D"},
},
{
["q"] = {" :-D"},
["a"] = {" =)"," :)"},
},
{
["q"] = {"слот","slot"},
["a"] = {"А что предложешь взамен?","1 слот=100 руб. торгуйся, уступлю дешевле","Только под запись. Могу тебя записать на послезавтра. Хочешь?","в очередь!","хи-хи, а тебе точно можно доверить слот, вернёшь потом?","не дам! но если расскажешь анекдот, то подумаю :)"},
},
{
["q"] = {"пожалуйст","please","плиз"},
["a"] = {"ути-пути, какие мы вежливые"},
},
{
["q"] = {"спасиб","спс","сенкс","сэнкс","thank"},
["a"] = {"ути-пути, какие мы вежливые", "за такое обращение ничего не жалко"},
},
{
["q"] = {"спс"},
["a"] = {"краткость - сестра таланта?"},
},
{
["q"] = {"кач"},
["a"] = {"не понял","чего?"},
},
{
["q"] = {"эээ"},
["a"] = {"че разэкался?","[NICK]: че тебе?","бббееееее"},
},
{
["q"] = {"жди","ждешь"},
["a"] = {"фигасе! Дождаться невозможно"},
},
{
["q"] = {"жду"},
["a"] = {"не поверишь, сам жду. Давай ждать вместе"},
},
{
["q"] = {"бот"},
["a"] = {"Как ты догадался?","Меня раскрыли!","Не совсем :-D","Да что ты знаешь о ботах?","Примерно так. Но не совсем"},
},
{
["q"] = {"говно","гавно"},
["a"] = {"где гавно? кто гавно?"},
},
{
["q"] = {"мудак","мудила"},
["a"] = {"Кто действительно тут мудак, так это ты!","мудила у тебя дома сидит и трахается с твоей матерью"},
},
{
["q"] = {"сука"},
["a"] = {"кроме тебе, не вижу тут больше сук!"},
},
{
["q"] = {"[aо]хуел","[ао]хуеть"},
["a"] = {"хуеть будешь ты, когда у коня будешь сосать!"},
},
{
["q"] = {"ебан"},
["a"] = {"похоже, что у тебя ебало ебанулось с ебла"},
},
{
["q"] = {"хуй"},
["a"] = {"дать пососать?","дать отсосать?","сам ты хуй"},
},
{
["q"] = {"бля"},
["a"] = {"на псарни они - запомни это!"},
},
{
["q"] = {"ебло"},
["a"] = {"твоё ебливое ебло уже заебало"},
},
{
["q"] = {"ебать"},
["a"] = {"ебать будешь свою тёлку, если есть чем..."},
},
{
["q"] = {"?"},
["a"] = {"А почему ты спрашиваешь?","Я на глупые вопросы не отвечаю!","Дурацкий вопрос, подумай","этот вопрос мне?","не понял вопроса!","Я сёня туплю. Повторите что вы сказали?"},
},
{
["q"] = {"а"},
["a"] = {"занимаюсь сексом с девушкой, а ты меня отвлекаешь!!!","я ща в магазин за водярой! го со мной","по 100 грамм го?","Я тебя видел на прошлой недели с пивом и квасом!","А мы знакомы??","Правда что-ли","К чему это ты","бе-бе-бе","Не тупи!","Какого ..я?","Какойто не в тему разговор","Эх... что то у нас сегодня не клеится разговор","Чёрт, мне пора. фильм начинается","я ща варю яйца страуса! не отвлекай меня!","Я тебя видел на прошлой недели с пивом!","как жизнь? гавно? я согласен с тобой","[NICK]: И не лень тебе было расшаривать [SHARE] байт","[NICK]: Твой ник [NICK]! Ты знаешь что он означает?","го все ко мне суп жрать!","менты секут сенешний разговор","кто воздух испортил?","Мне не нужны ни \"да\", ни \"нет\", - Мне нужен доступ в Интернеt","Билл-гей.Тсс...","Яубьютогоктосломалмойпробел!","Давно хочу купить память, но всё время забываю","хаха","жгём по полной...","чета скучно с вами((","почему тут пишут всякую туфту? не понимаю я","[NICK]: ооо... ты бот?","всем привет","скучно... ужас!","подкине пару фраз нищему боту..."},
},
}
-------------------------------------------------------------------------------
-- Далее ничего не трогаем --
-------------------------------------------------------------------------------
MainFunc["chatbot"].OnPublicMessage = function(tUser,sData)
if ChatBot.bOn==1 and ChatBot.iVer>=math.random(1,100) then
if tUser.ME~="1" then
if ChatBot.tAllHubs.Say then
for j,tbl in pairs(ChatBot.tAllHubs.Say) do
if ChatBot:Find2(cid,tUser,sData,tbl) then return true end
end
else
for i,v in pairs(ChatBot.tHubs) do
if i==tUser.HL then
for j,tbl in pairs(v.Say) do
if ChatBot:Find(tUser,sData,tbl,i) then return true end
end
end
end
end
end
end
end
MainFunc["chatbot"].OnTimer = function()
if ChatBot.bOn==1 then
if ChatBot.tAllHubs.Say then
if ChatBot.tAllHubs.iTimer>=0 then
if ChatBot.tAllHubs.iTimer==0 then DC():SendPublicMessage(ChatBot.tAllHubs.sHub,ChatBot.tAllHubs.sMsg) end
ChatBot.tAllHubs.iTimer=ChatBot.tAllHubs.iTimer-1
end
else
for i,v in pairs(ChatBot.tHubs) do
if v.iTimer>=0 and v.Say then
if v.iTimer==0 then DC():SendPublicMessage(i,v.sMsg) end
ChatBot.tHubs[i].iTimer=ChatBot.tHubs[i].iTimer-1
end
end
end
end
end
function ChatBot:Find(tUser,sData,tbl,i)
for _, v in pairs(tbl["q"]) do
if string.find(Sys:ToLower(sData),"("..Sys:ToLower(v)..")") then
self.tHubs[i].iTimer=self.tDelay[math.random(1, table.getn(self.tDelay))]
self.tHubs[i].sMsg=Sys:Tags(tUser,DC():ToUtf8(tbl["a"][math.random(1, table.getn(tbl["a"]))]),sData)
return true
end
end
end
function ChatBot:Find2(cid,tUser,sData,tbl)
for _, v in pairs(tbl["q"]) do
if string.find(Sys:ToLower(sData),"("..Sys:ToLower(v)..")") then
self.tAllHubs.iTimer=self.tDelay[math.random(1, table.getn(self.tDelay))]
self.tAllHubs.sMsg=Sys:Tags(tUser,DC():ToUtf8(tbl["a"][math.random(1, table.getn(tbl["a"]))]),sData)
self.tAllHubs.sHub=tUser.HL
return true
end
end
end
