Core.TempBan(tCurUser,iBanTime,sBanReason,sBot,0)

BanMan.TempBan(tCurUser,iBanTime,sBanReason,sBot,true)

sBotName = SetMan.GetString(21)

iKickLevel = 3

tBanCmds = {
["ban"] = 3,
["fullban"] = 3,
["nickban"] = 3,
["tempban"] = 3,
["fulltempban"] = 3,
["nicktempban"] = 3,
["gag"] = 2,
["drop"] = 3,
}

tDisallCmds = {
["fullbanip"] = 1,
["fulltempbanip"] = 1,
}

function KickArrival(tUser, sData)
local sData = string.sub(sData,1,-2)
local _,_,sNick = string.find(sData, "%p%S+%s(%S+)")
local tVictim = Core.GetUser(sNick)
if tVictim.iProfile < iKickLevel and tUser.iProfile > 0 then
Core.SendPmToNick(tUser.sNick, sBotName, "*** "..tUser.sNick..", вы не можете кикнуть "..sNick.."!!!" )
Core.SendToOps("<"..sBotName.."> *** "..tUser.sNick.." пытался кикнуть "..sNick)
return true
end
end

function ChatArrival(tUser,sData)
local sData = string.sub(sData,1,-2)
local _,_,msg = string.find(sData,"^%b<>%s(.*)$")
local _,_,cmd,sNick = string.find(msg,"^%s*%p(%S+)%s(%S+)")
if cmd and sNick then
cmd = cmd:lower()
if tUser.iProfile > 0 then
if tDisallCmds[cmd] == 1 then
Core.SendPmToNick(tUser.sNick, sBotName, "*** команда !"..cmd.." отключена владельцем хаба" )
return true
end
if tBanCmds[cmd] then
local tVictim = Core.GetUser(sNick)
if tVictim.iProfile < tBanCmds[cmd] then
Core.SendPmToNick(tUser.sNick, sBotName, "*** "..tUser.sNick..", вы не можете забанить "..sNick.."!!!" )
Core.SendToOps("<"..sBotName.."> *** "..tUser.sNick.." пытался забанить "..sNick..": \""..msg.."\"")
return true
end
end
end
end
end