Нельзя Писать Гостям

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