anti-ad in description

[lynyrd]

hi,

sometimes users advertise via the description or email.
(i dont know if it's already done..but i searched my butt off..did'nt find any) so my idea is a script
that looks for example xxx or blabla.no-ip.com in their description
and disconnects that user at login..
i made a little part of it but dont know how to do it so it works
code:
------------------------------------------------------------------------
--just an example this is not working

description =  {["dns2go"]=1,["myftpsite"]=2,["xxx"]=3,["porn"]=4}

function NewUserConnected(user)
                if not user.bOperator then
                for key, value in D do
                if strfind(user.sMyInfoString, "$MyINFO $ALL " .. description .."%$) then
                user:SendData("you are advertising or have unwanted text in description/email remove ..word.. and reconnect")
                user:Disconnect()
                end
         end
  end
end
------------------------------------------------------------------------
crossing my fingers for help

lynyrd..instant noob just add lua ;)

[NightLitch]

try this one:

description = {["dns2go"]=1,["myftpsite"]=2,["xxx"]=3,["porn"]=4} 

function NewUserConnected(user) 
	if not user.bOperator then 
		for key, value in D do 
			if strfind(user.sMyInfoString, "$MyINFO $ALL "..user.sName.." " .. description .."<") then 
				user:SendData("you are advertising or have unwanted text in description/email remove ..word.. and reconnect") 
				user:Disconnect() 
			end 
		end 
	end 
end

Maybe work / NL

[nErBoS]

Hi,

Try this..

description = {"dns2go","myftpsite","xxx","porn"} 

function NewUserConnected(user, data) 
	for i=1, getn(description) do 
		local s,e, desc = strfind(user.sMyInfoString, "$MyINFO $ALL%s+%S+%s+(.*)<")
		if strfind(desc, description[i]) then
			user:SendData("you are advertising or have unwanted text in description/email remove ..word.. and reconnect") 
			user:Disconnect() 
		end 
	end 
end

Best regards, nErBoS

[nErBoS]

Posted at same time :P

Now you have two eg :)

Best regards, nErBoS

[pHaTTy]

Originally posted by NightLitch
try this one:

description = {["dns2go"]=1,["myftpsite"]=2,["xxx"]=3,["porn"]=4} 

function NewUserConnected(user) 
	if not user.bOperator then 
		for key, value in D do 
			if strfind(user.sMyInfoString, "$MyINFO $ALL "..user.sName.." " .. description .."<") then 
				user:SendData("you are advertising or have unwanted text in description/email remove ..word.. and reconnect") 
				user:Disconnect() 
			end 
		end 
	end 
end

Maybe work / NL

errrm what is D? hmm m8 i thinku need some sleep lmao what is word?

[pHaTTy]

hmm u might as well check the full my info string

table = {
["dns2go"]=1,
["myftpsite"]=2,
["xxx"]=3,
["porn"]=4
}

function NewUserConnected(user) 
	if not user.bOperator then 
		for i,v in table do 
			if strfind(user.sMyInfoString, i) then 
				user:SendData("you are advertising or have unwanted text in description/email remove ..i.. and reconnect") 
				user:Disconnect() 
			end 
		end 
	end 
end

[pHaTTy]

in fact wudnt even use the cpu timefor the sake of numbers ;)

table = {"dns2go","myftpsite","xxx","porn"}

function NewUserConnected(user) 
	if not user.bOperator then 
		for i,v in table do 
			if strfind(user.sMyInfoString, v) then 
				user:SendData("you are avertising or have unwanted text in description/email remove ..v.. and reconnect") 
				user:Disconnect() 
			end 
		end 
	end 
end

[nErBoS]

Hi,

No use to use "if not user.bOperator", since you are working in the function NewUserConnected, unless you have made this.. OpConnected = NewUserConnected before.

Best regards, nErBoS

[pHaTTy]

dont need check for operator status as its new user connected not op connected

table = {"dns2go","myftpsite","xxx","porn"}

function NewUserConnected(user) 
	for i,v in table do 
		if strfind(user.sMyInfoString, v) then 
			user:SendData("you are avertising or have unwanted text in description/email remove ..v.. and reconnect") 		user:Disconnect()
		end 
	end 
end

[pHaTTy]

Originally posted by nErBoS
Hi,

No use to use "if not user.bOperator", since you are working in the function NewUserConnected, unless you have made this.. OpConnected = NewUserConnected before.

Best regards, nErBoS

lmao u got there b4 me :p same time post seems common tonight :p

[nErBoS]

Deja vu :)

Got two this nigth, i better go to sleep.

Best regards, nErBoS

[pHaTTy]

if u also want to play with tables u can do somethign like

table = {

["dns2go"]="Advertising",
["myftpsite"]="Advertising",
["xxx"]="XXX",
["porn"]="Porn",

}

Bot = "BotName";

function NewUserConnected(user) 
	for i,v in table do 
		if strfind(user.sMyInfoString, i) then 
		user:SendData(Bot,"you are avertising or have unwanted text in description/email remove ..i.. and reconnect")
		SendToOps(Bot,user.sName.." has been kicked because of "..v.." in MyInfo string")
 		user:Disconnect()
		end 
	end 
end

later,,

[pHaTTy]

whoa i didnt see that humm another silly fix lmao :p

table = {

["dns2go"]="Advertising",
["myftpsite"]="Advertising",
["xxx"]="XXX",
["porn"]="Porn",

}

Bot = "BotName";

function NewUserConnected(user) 
	for i,v in table do 
		if strfind(user.sMyInfoString, i) then 
			user:SendData(Bot,"You have "..v.." in description/email, please remove "..i.." and reconnect")
			SendToOps(Bot,user.sName.." has been kicked because of "..v.." in MyInfo string")
			user:Disconnect()
		end 
	end 
end

[lynyrd]

i got this..

------------------------------------------------------------------------------------------------------------
you are avertising or have unwanted text in description/email remove ..i .. and reconnect
 *** Connection reset by server
------------------------------------------------------------------------------------------------------------
but this really made me happy
thanks phatty =))

[pHaTTy]

Originally posted by lynyrd
i got this..

------------------------------------------------------------------------------------------------------------
you are avertising or have unwanted text in description/email remove ..i .. and reconnect
 *** Connection reset by server
------------------------------------------------------------------------------------------------------------
but this really made me happy
thanks phatty =))

yep im one step ahead :p, have alook at post above urs ;)

then tell me what u see ;)

[lynyrd]

now it works as a charm!
youre the man phatty =)

[pHaTTy]

Originally posted by lynyrd
now it works as a charm!
youre the man phatty =)

lmao :)

[lynyrd]

then it should be like this....

code:--------------------------------------------------------------------------------
--made by Phatty

table = {

["dns2go"]="Advertising",
["myftpsite"]="Advertising",
["xxx"]="XXX",
["porn"]="Porn",

}

Bot = "BotName";

function NewUserConnected(user)
   for i,v in table do
      if strfind(user.sMyInfoString, i) then
         user:SendData(Bot,"You have "..v.." in description/email, please remove "..i.." and reconnect")
         SendToOps(Bot,user.sName.." has been kicked because of "..v.." in MyInfo string")
         user:Disconnect()
      end
   end
end
--------------------------------------------------------------------------------

[NightLitch]

Originally posted by (uk-kingdom)pH?tt?

Originally posted by NightLitch
try this one:

description = {["dns2go"]=1,["myftpsite"]=2,["xxx"]=3,["porn"]=4} 

function NewUserConnected(user) 
	if not user.bOperator then 
		for key, value in D do 
			if strfind(user.sMyInfoString, "$MyINFO $ALL "..user.sName.." " .. description .."<") then 
				user:SendData("you are advertising or have unwanted text in description/email remove ..word.. and reconnect") 
				user:Disconnect() 
			end 
		end 
	end 
end

Maybe work / NL

errrm what is D? hmm m8 i thinku need some sleep lmao what is word?

lmao, hahahaha I have changed keyboard now... I have trashed my old one now...

Think I was lucky just getting the rest.. Cause when sending an e-mail My Friend just got:

f o e w r i ll / Niglch

there is like 30 vocal's missing....

[NightLitch]

this should be my working code i think, am really tired too.... hehe

description = {["dns2go"]=1,["myftpsite"]=2,["xxx"]=3,["porn"]=4} 

function NewUserConnected(user) 
	for value, key in description do 
		if strfind(user.sMyInfoString,value) then 
			user:SendData("you are advertising or have unwanted text in description/email remove "..value.." and reconnect") 
			user:Disconnect() 
		end 
	end 
end

[NightLitch]

But then again.. this will take on all e-mail addresses....

[pHaTTy]

Originally posted by lynyrd
then it should be like this....

code:--------------------------------------------------------------------------------
--made by Phatty

table = {

["dns2go"]="Advertising",
["myftpsite"]="Advertising",
["xxx"]="XXX",
["porn"]="Porn",

}

Bot = "BotName";

function NewUserConnected(user)
   for i,v in table do
      if strfind(user.sMyInfoString, i) then
         user:SendData(Bot,"You have "..v.." in description/email, please remove "..i.." and reconnect")
         SendToOps(Bot,user.sName.." has been kicked because of "..v.." in MyInfo string")
         user:Disconnect()
      end
   end
end
--------------------------------------------------------------------------------

muhahah lmfao, oki then :)))

[NightLitch]

that goes for almost all of your fine ex's exept nErBoS.

[lynyrd]

Zitat:
--------------------------------------------------------------------------------
Originally posted by NightLitch
lmao, hahahaha I have changed keyboard now... I have trashed my old one now...
--------------------------------------------------------------------------------


yeah! it happens to me all the time LOL

[pHaTTy]

Originally posted by NightLitch
that goes for almost all of your fine ex's exept nErBoS.

yah true, but i have seen

someone@acertainhub.no-ip.com

this is advertising :p