To Damn Simple Advertising Bot

[NightLitch]

Here it goes:

--// Simple AntiAdvertising Bot by NightLitch 2005-07-10

adverTable = {"no-ip", "myftp.org", "mine.nu"}

function ChatArrival(user,data)
	local s,e,msg = string.find(data, "%b<>%s*(.*)%|")
	if checkForAdvertising(msg) then
		user:SendData(frmHub:GetHubBotName(), "*** You have been kicked for advertising !!")
		SendPmToOps(frmHub:GetOpChatName(), "*** User "..user.sName.." has been kicked for advertising: "..msg)
		user:TempBan()
	end
end

function ToArrival(user,data)
	local s,e,msg = string.find(data, "%b<>%s*(.*)%|$")
	if checkForAdvertising(msg) then
		user:SendData(frmHub:GetHubBotName(), "*** You have been kicked for advertising !!")
		SendPmToOps(frmHub:GetOpChatName(), "*** User "..user.sName.." has been kicked for advertising: "..msg)
		user:TempBan()
	end
end

function checkForAdvertising(msg)
	for i = 1,table.getn(adverTable) do
		if string.find( msg , adverTable[i] , 1 , true ) then
			return 1
		end
	end
	return
end
-- NightLitch

Enjoy!

[GeceBekcisi]

Great script, thanks NightLitch.

BTW, how is Thor developing going ?

[NightLitch]

Originally posted by GeceBekcisi
Great script, thanks NightLitch.

BTW, how is Thor developing going ?

will take some while, I have created my own hubsoft ( Voltron ) so Thor is really on hold.

[kunal]

can u gimme ur hubsoftware

[GeceBekcisi]

If you ever need betatesters, I'll be glad to work for you..

[kunal]

ok gimme beta testers

[Northwind]

Simplex Table  by Northwind ;-) 20-10-2005

adverTable = {

-- Poistamalla alla olevasta -- merkit saat scriptin 50% lis?? tehotappajaksi.
-- Remove -- marks and you get allmost 50% more efficent addybutcher.

-- Simplex Basic

	"bounceme.net", "b o u n c e m e", 
	"hopto.org", "h o p t o",
	"myftp.biz", "m y f t p",
	"myvnc.com", "m y v n c",
	"no-ip.", "n o - i p", "no - ip",
	"redirectme.net", "r e d i r e c t m e",		
	"servebeer.com", "s e r v e b e e r",
	"servequake.com", "s e r v e q u a k e",
	"sytes.net", "s y t e s",
	"zapto.org", "z a p t o",
	"dchub://"

-- Simplex 50%

        --,"http://", 
        --"www.", "w w w ."
	--".biz", ". b i z",
	--".com", ". c o m",
	--".net", ". n e t",
	--".org", ". o r g",
	--".fi", ". f i",
	--".se", ". s e",
	--".no", ". n o",
	--".de", ". d e",
	--".us", ". u s",
	--".be", ". b e"

	     }

[Northwind]

This is what i have, but can somebody do one thing to it. I need safeaddres table, cos i only have few adress what i wanna promote. Others will be blocked.

I don't wanna use Lucifer, i like this little script.

So please somebody help me with this prob.

--// Simple AntiAdvertising Bot by NightLitch 2005-07-10
--// SimpleX addylist by Northwind 21.10.2005
--// #Justiina Finnish Translation also by Northwind



adverTable = {

-- Poistamalla alla olevasta -- merkit saat scriptin 50% lis?? tehotappajaksi.
-- Remove -- marks and you get allmost 50% more efficent addybutcher.

-- Simplex Basic

	"bounceme.net", "b o u n c e m e", 
	"hopto.org", "h o p t o",
	"myftp.biz", "m y f t p",
	"myvnc.com", "m y v n c",
	"no-ip.", "n o - i p", "no - ip",
	"redirectme.net", "r e d i r e c t m e",		
	"servebeer.com", "s e r v e b e e r",
	"servequake.com", "s e r v e q u a k e",
	"sytes.net", "s y t e s",
	"zapto.org", "z a p t o",
	"dchub://", 

-- Simplex 50%

        --,"http://", 
        --"www.", "w w w ."
	--".biz", ". b i z",
	--".com", ". c o m",
	--".net", ". n e t",
	--".org", ". o r g",
	--".fi", ". f i",
	--".se", ". s e",
	--".no", ". n o",
	--".de", ". d e",
	--".us", ". u s",
	--".be", ". b e"

	     }



function ChatArrival(user,data)

	local s,e,msg = string.find(data, "%b<>%s*(.*)%|")

	if checkForAdvertising(msg) then

		user:SendData(frmHub:GetHubBotName(), "*** Kaulimesta tuli ett? l?s?hti, perkeleen mainostaja!")

		SendPmToOps(frmHub:GetOpChatName(), "*** K?ytt?j? "..user.sName.." sai #Justiinan kaulimesta koska mainosti: "..msg)

		user:TempBan()

	end

end



function ToArrival(user,data)

	local s,e,msg = string.find(data, "%b<>%s*(.*)%|$")

	if checkForAdvertising(msg) then

		user:SendData(frmHub:GetHubBotName(), "*** Kaulimesta tuli ett? l?s?hti, perkeleen mainostaja!")

		SendPmToOps(frmHub:GetOpChatName(), "*** K?ytt?j? "..user.sName.." sai #Justiinan kaulimesta koska mainosti: "..msg)

		user:TempBan()

	end

end



function checkForAdvertising(msg)

	for i = 1,table.getn(adverTable) do

		if string.find( msg , adverTable[i] , 1 , true ) then

			return 1

		end

	end

	return

end

-- NightLitch
 

[Northwind]

can somebody help please ;-)

[Cêñoßy†ê]

Try this one

--// Simple AntiAdvertising Bot by NightLitch 2005-07-10
--// SimpleX addylist by Northwind 21.10.2005
--// #Justiina Finnish Translation also by Northwind
--// SafeAddress table by C??o?y??



adverTable = {

-- Poistamalla alla olevasta -- merkit saat scriptin 50% lis?? tehotappajaksi.
-- Remove -- marks and you get allmost 50% more efficent addybutcher.

-- Simplex Basic

	"bounceme.net", "b o u n c e m e", 
	"hopto.org", "h o p t o",
	"myftp.biz", "m y f t p",
	"myvnc.com", "m y v n c",
	"no-ip.", "n o - i p", "no - ip",
	"redirectme.net", "r e d i r e c t m e",		
	"servebeer.com", "s e r v e b e e r",
	"servequake.com", "s e r v e q u a k e",
	"sytes.net", "s y t e s",
	"zapto.org", "z a p t o",
	"dchub://", 

-- Simplex 50%

        --,"http://", 
        --"www.", "w w w ."
	--".biz", ". b i z",
	--".com", ". c o m",
	--".net", ". n e t",
	--".org", ". o r g",
	--".fi", ". f i",
	--".se", ". s e",
	--".no", ". n o",
	--".de", ". d e",
	--".us", ". u s",
	--".be", ". b e"

	     }

[COLOR=red]SafeAddressTable = {"hub1.no-ip.org",hub2.no-ip.org"}[/COLOR] 

function ChatArrival(user,data)
	local s,e,msg = string.find(data, "%b<>%s*(.*)%|")
[COLOR=red]	if not checkSafe(msg) then[/COLOR] 
	if checkForAdvertising(msg) then
		user:SendData(frmHub:GetHubBotName(), "*** Kaulimesta tuli ett? l?s?hti, perkeleen mainostaja!")
		SendPmToOps(frmHub:GetOpChatName(), "*** K?ytt?j? "..user.sName.." sai #Justiinan kaulimesta koska mainosti: "..msg)
		user:TempBan()
		end
	[COLOR=red]return 1
	end[/COLOR]
end



function ToArrival(user,data)
	local s,e,msg = string.find(data, "%b<>%s*(.*)%|$")
[COLOR=red]	if not checkSafe(msg) then[/COLOR]
	if checkForAdvertising(msg) then
		user:SendData(frmHub:GetHubBotName(), "*** Kaulimesta tuli ett? l?s?hti, perkeleen mainostaja!")
		SendPmToOps(frmHub:GetOpChatName(), "*** K?ytt?j? "..user.sName.." sai #Justiinan kaulimesta koska mainosti: "..msg)
		user:TempBan()
	          end
	[COLOR=red]return 1
	end[/COLOR]
end

[COLOR=red]function checkSafe(msg)
	for i = 1,table.getn(SafeAddressTable) do
		if string.find( msg , SafeAddressTable[i] , 1 , true ) then
			return 1
		end
	end
	return
end[/COLOR]

function checkForAdvertising(msg)
	for i = 1,table.getn(adverTable) do
		if string.find( msg , adverTable[i] , 1 , true ) then
			return 1
		end
	end
	return
end

-- NightLitch