BotName = "Illegalist"

Files = {
	["forcedsex"]="forcedsex = permban!",
	["preteen"]="preteen is for sicko's!",
	["kiddy"]="KiddyPorn is for sicko's!",
	["forcedtosuck"]="forced to WHAT?? YUKKK!",
	["2_teen 16 year young cute lolita"] = "under 18? NOT HERE!"}

Kicked = {}

function NewUserConnected(user)
if( Kicked[user.sName] == 1 ) then
	Kicked[user.sName] = nil
end
	for i,v in Files do
		user:SendData("$Search Hub:"..BotName.." F?F?0?1?"..i)
	end
end

function DataArrival(user, data)
if( strsub(data, 1, 3) == "$SR" ) then
_,_,nick = strfind( data, "\05(%S*)|$" )
	if( nick == BotName and Kicked[user.sName] == nil ) then
		Kicked[user.sName] = 1
		Reason = FindWhat(data)
		SendToOps(BotName, "*** User "..user.sName.." banned. Reason: "..Reason)
		user:SendPM(BotName, "You were banned. "..Reason)
		user:Ban()
		user:Disconnect()
		end
	end
end

function FindWhat(data)
	for i,v in Files do
		if( strfind(strlower(data), i) ) then
		return v
		end
	end
	return "Other files"
end