--Auotoban by Tezlo
--Added a OPmsg when user reached maximum kicks by Snoris
--With a little help from lallo82 
botname = "Auotobanner™"
maxKicks = 3
usrKicks = { }

ignoreKicks = nil
silentKicks = nil
silentKickPMs = nil

function DataArrival(user, data)
	if strsub(data, 1, 1) == "<" then
		local s, e, who, why = strfind(data, "^%b<> %S+ is kicking (%S+) because: (.*)|$")
		if s and silentKicks then return 1 end
	elseif strsub(data, 1, 3) == "$To" then
		local s, e, who, why = strfind(data, "^%$To: (%S+) From: %S+ %$%b<> You are being kicked because: (.*)|$")
		if s and silentKickPMs then return 1 end
	elseif strsub(data, 1, 5) == "$Kick" then
		local s, e, who = strfind(data, "^%$Kick (%S+)|$")
		if s then
			local tmp = GetItemByName(who)
			usrKicks[who] = usrKicks[who] or 0
			usrKicks[who] = usrKicks[who] + 1
			if tmp and usrKicks[who] >= maxKicks then
				SendToOps(botname, "User "..who.." has been auotobanned cus he dosenīt follow the rules")
				tmp:SendData("*** Ur Banned Becouse U Didnīt Follow The Rules...Have A Nice Day.")
				tmp:Ban() -- tmp:NickBan()
			end if ignoreKicks then return 1 end
		end
	end
end