PtokaX forum

Archive => Archived 5.0 boards => Finished Scripts => Topic started by: NightLitch on 10 July, 2005, 14:27:16

Title: To Damn Simple Advertising Bot
Post by: NightLitch on 10 July, 2005, 14:27:16
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!
Title:
Post by: GeceBekcisi on 10 July, 2005, 14:34:34
Great script, thanks NightLitch.

BTW, how is Thor developing going ?
Title:
Post by: NightLitch on 10 July, 2005, 14:48:17
QuoteOriginally posted by GeceBekcisi
Great script, thanks NightLitch.

BTW, how is Thor developing going ?

will take some while, I have created my own hubsoft ( Voltron ) :D so Thor is really on hold. :(
Title:
Post by: kunal on 10 July, 2005, 14:52:40
can u gimme ur hubsoftware
Title:
Post by: GeceBekcisi on 10 July, 2005, 14:59:14
If you ever need betatesters, I'll be glad to work for you..
Title:
Post by: kunal on 10 July, 2005, 15:01:38
ok gimme beta testers
Title:
Post by: Northwind on 20 October, 2005, 18:59:05
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"

    }

Title:
Post by: Northwind on 20 October, 2005, 23:44:53
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
 
Title:
Post by: Northwind on 21 October, 2005, 20:58:33
can somebody help please ;-)
Title:
Post by: Cêñoßy†ê on 03 November, 2005, 04:30:46
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