--------------------------------------------------------------------------------------------------------------------- --------------------------------------------------------------------------------------------------------------------- -- Данный скрипт взят с сайта 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 -- --------------------------------------------------------------------------------------------------------------------- --------------------------------------------------------------------------------------------------------------------- -- Конфигурация botname="Ringside" -- имя бота sCommand="!позвать" -- команда для главного чата sDescription=" --позвать пользователя с ником " -- описание команды sMissBefor=" попытался позвать " -- та часть, которая высвечивается между вашим ником и ником того, кого бы вы хотели позвать, но кого нет на хабе sMissAfter=", но его на хабе не оказалось!" sHitBefor=" позвал " -- та часть, которая высветится перед ником того, кого вы зовете sHitAfter="" -- та часть, которая высветится после ника того, кого вы зовете -- Конец конфига -- Пожалуйста! Если вы не разбираетесь в скриптах, то не трогайте то, что написано ниже!!! function ChatArrival(user, data) data=string.sub(data,1,string.len(data)-1) s,e,cmd = string.find( data,"%b<>%s+(%S+)" ) if (cmd=="!ringhelp") then user:SendData("Ringside",sCommand.." " ..sDescription) end s,e,cmd,arg = string.find(data,"%b<>%s+(%S+)%s+(%S+)") if (cmd==sCommand) then if not (arg==nil) then local tmp = GetItemByName(arg) if (tmp==nil) then SendToAll(botname,""..user.sName..sMissBefor..arg..sMissAfter) end if not (tmp==nil) then SendToAll(botname, ""..user.sName..sHitBefor..arg..sHitAfter) end return 1 end end end