--Lance Evol v1.00
--Hider Bot, this one does not give the nick taken error ;)
--Written by Phatty 12th December 2k3
--Need to sort the Logged in LogedIn not work neither any ideas?

Bot = "ΝεΡΗλR" 
Hidden = {}

function NewUserConnected(user)
	if Hidden == nil then
		return 1
	else
		for i,v in Hidden do
			user:SendData( "$Quit "..i ) 
		end
	end
end

function OpConnected(user)
	if Hidden == nil then
		return 1
	else
		for i,v in Hidden do
			user:SendData( "$Quit "..i ) 
		end
	end
end

function DataArrival(user, data) 
	if(strsub(data, 1, 4) == "$Quit ") then
		if Hidden[user.sName] == 1 then
			Hidden[user.sName] = nil
		end
	end
	
	if strsub(data, 1, 1) == "<" then
		data=strsub(data,1,strlen(data)-1)
		s,e,cmd = strfind(data,"%b<>%s+(%S+)")
		
		if cmd == "hide" then
			if user.bOperator then
				SendToAll( "$Quit "..user.sName )
				Hidden[user.sName] = 1
			end
		elseif cmd == "unhide" then
			if user.bOperator then
				SendToAll( "$Hello "..user.sName )
				Hidden[user.sName] = nil
			end
		end
	end
end