---------------------------------------------------------------------------------------------------------------------
---------------------------------------------------------------------------------------------------------------------
--            Данный скрипт взят с сайта http://board.univ-angers.fr/main.php 
--             Оптимизировал и протестировал для русско-язычных хабов:
--                                            NRJ ( nrj@labo.ru )
--
--
--             Любые боты и скрипты - поддержка/обновления/новинки:
--             1) http://dc.hovel.ru/
--             2) http://forum.proc.ru/index.php?showforum=24
--
---------------------------------------------------------------------------------------------------------------------
---------------------------------------------------------------------------------------------------------------------

-- Пожалуйста!!! Если вы не знакомы со скриптами, то не редактируйте то, что здесь написано!!!
sBot = frmHub:GetHubBotName()
tPrefixes = {}

Main = function()
for a,b in pairs(frmHub:GetPrefixes()) do tPrefixes[b] = 1 end
end

function ChatArrival(user, sData)
local s,e,sPrefix,sCmd,sNick,sMsg = string.find(sData, "%b<>%s*(%S)(%S+)%s*(%S*)%s*(.*)|")
if sPrefix and tPrefixes[sPrefix] then
if user.bOperator and sCmd == "say" then
if sNick == "" then
user:SendData(sBot, "Пожалуйста, введите ник, от которого будет послано сообщение")
elseif sMsg == "" then
user:SendData(sBot, "Пожалуйста, введите сообщение для "..sNick.." , которое он произнесет.")
else
SendToAll(sNick, sMsg)
end return 1
end
end
end