sBot = SetMan.GetString(21) -- Имя бота

tProfiles = { -- Разрешенные профили
[0] = 1,
}

function ChatArrival(tUser,sData)
local sData = sData:sub(1,-2)
local _,_,sCmd = sData:find"%b<>%s+(%S+)"
if sCmd == "!setmotd" then
local _,_,sMsg = sData:find"%b<>%s+%S+%s+(.*)"
if sMsg then
if tProfiles and tProfiles[tUser.iProfile] == 1 then
SetMan.SetMOTD(sMsg)
Core.SendToUser(tUser,"<"..sBot.."> Сообщение дня успешно изменено!")
else
Core.SendToUser(tUser,"<"..sBot.."> Ошибка! У вас нет прав на использование данной команды!")
end
else
Core.SendToUser(tUser,"<"..sBot.."> Ошибка! Вы не ввели текст сообщения дня!")
end
end
return true
end