Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

MyDC.ru _ Kорзина _ Нельзя Писать Гостям

Автор: Goblin 19.2.2009, 9:51

Как сделать чтобы сообщение отправлялись администраторам, если пользователь что-то написал в Пм или в главном чате.

CODE
tConfig = {
["bMainChat"] = 1, -- главный чат
["bPM"] = 1, -- лички
["bDownload"] = 1, -- скачку
}

sBot = SetMan.GetString(21)

function ChatArrival(curUser,sData)
Core.GetUserAllData(curUser)
if curUser.iProfile == -1 and tConfig["bMainChat"] == 1 then
Core.SendPmToNick(curUser.sNick,sBot, "*** "..curUser.sNick..", главный чат для незарегистрированных пользователей запрещен, сообщение не отправлено! Зарегистрируйтесь, пожалуйста!")
return true
end
end

function ToArrival(curUser,sData)
Core.GetUserAllData(curUser)
if curUser.iProfile == -1 and tConfig["bPM"] == 1 then
Core.SendPmToNick(curUser.sNick,sBot, "*** "..curUser.sNick..", приватные сообщения для незарегистрированных пользователей запрещены, сообщение не отправлено! Зарегистрируйтесь, пожалуйста!")
return true
end
end

function ConnectToMeArrival(curUser,sData)
Core.GetUserAllData(curUser)
local _,_, sToNick = string.find(sData, "^$%S+%s+(%S+)")
local sToNick = Core.GetUser(sToNick,true)
if sToNick then
if curUser.iProfile == -1 and tConfig["bDownload"] == 1 then
Core.SendPmToNick(curUser.sNick,sBot, "*** "..curUser.sNick..", поиск и скачивание для незарегистрированных пользователей запрещены! Зарегистрируйтесь, пожалуйста!")
return true
end
end
end
MultiConnectToMeArrival = ConnectToMeArrival
RevConnectToMeArrival = ConnectToMeArrival
SRArrival = ConnectToMeArrival
UDPSRArrival = ConnectToMeArrival

Автор: ustas 19.2.2009, 11:00

и будешь следить за личками??