hi ,i have illegal-search-bot. he kick users for porn and other system files. i want what user who have that files not be kicked,will be REDIRECTED to another hub, how to change script ? help plz
here script
-----------------------------------------------------------------------------------------
-- --
-- "illegal-search-bot" --
-- --
-----------------------------------------------------------------------------------------
--???????????????????????????????????????????????????????????????????????????????
--? ???????????? Botname ???????????? ?
--???????????????????????????????????????????????????????????????????????????????
--???????????????????????????????????????
BotName = frmHub:GetHubBotName() --? ???? zur Zeit OP chat ?
--???????????????????????????????????????
--???????????????????????????????????????????????????????????????????????????????
--? ???????????? Befehle ++ Beschreibungstext ???????????? ?
--???????????????????????????????????????????????????????????????????????????????
--???????????????????????????????????????
infotxt = " wurde gekickt, Begr?ndung: " --? ???? Info Text for OPs ?
--???????????????????????????????????????
--???????????????????????????????????????
kicktxt = "Du wurdest gekickt, Begr?ndung: " --? ???? Kick Text for User ?
--???????????????????????????????????????
--???????????????????????????????????????
infowarn = " wurde verwarnt, Begr?ndung: " --? ???? Info Text for OPs ?
--???????????????????????????????????????
--???????????????????????????????????????
warntxt = "Du wurdest verwarnt, Begr?ndung: " --? ???? Kick Text for User ?
--???????????????????????????????????????
--???????????????????????????????????????????????????????????????????????????????
--? ???????????? Such w?rter ???????????? ?
suche={ --???????????????????????????????????????????????????????????????????????????????
["F?T?0?7?preteen"]="Bitte keine Porn files Sharen!",
["F?T?0?6?preteen"]="Bitte keine Porn files Sharen!",
["F?T?0?7?XXX"]="Bitte keine Porn files Sharen!",
["F?T?0?6?XXX"]="Bitte keine Porn files Sharen!",
["F?T?0?7?andrew blake"]="Bitte keine Porn files Sharen!",
["F?T?0?6?andrew blake"]="Bitte keine Porn files Sharen!",
["F?T?0?7?masturbati"]="Bitte keine Porn files Sharen!",
["F?T?0?6?masturbati"]="Bitte keine Porn files Sharen!",
["F?T?0?7?handjob"]="Bitte keine Porn files Sharen!",
["F?T?0?6?handjob"]="Bitte keine Porn files Sharen!",
["F?T?0?7?incest"]="Bitte keine Porn files Sharen!",
["F?T?0?6?incest"]="Bitte keine Porn files Sharen!",
["F?T?0?7?schoolgirl"]="Bitte keine Porn files Sharen!",
["F?T?0?6?schoolgirl"]="Bitte keine Porn files Sharen!",
["F?T?0?7?teenage sex"]="Bitte keine Porn files Sharen!",
["F?T?0?6?teenage sex"]="Bitte keine Porn files Sharen!",
["F?T?0?7?-moi$lolita"]="Bitte keine Porn files Sharen!",
["F?T?0?6?-moi$lolita"]="Bitte keine Porn files Sharen!",
["F?T?0?7?Gina Wild"]="Bitte keine Porn files Sharen!",
["F?T?0?6?Gina Wild"]="Bitte keine Porn files Sharen!",
["F?T?0?7?porn"]="Bitte keine Porn files Sharen!",
["F?T?0?6?porn"]="Bitte keine Porn files Sharen!",
["F?T?0?7?sex"]="Bitte keine Porn files Sharen!",
["F?T?0?6?sex"]="Bitte keine Porn files Sharen!",
["F?T?0?7?xxx"]="Bitte keine Porn files Sharen!",
["F?T?0?6?xxx"]="Bitte keine Porn files Sharen!",
["F?T?0?7?fuck"]="Bitte keine Porn files Sharen!",
["F?T?0?6?fuck"]="Bitte keine Porn files Sharen!",
["F?T?0?7?cff"]="Bitte keine Porn files Sharen!",
["F?T?0?6?cff"]="Bitte keine Porn files Sharen!",
["F?T?0?7?porno"]="Bitte keine Porn files Sharen!",
["F?T?0?6?porno"]="Bitte keine Porn files Sharen!",
["F?T?0?7?ficken"]="Bitte keine Porn files Sharen!",
["F?T?0?6?ficken"]="Bitte keine Porn files Sharen!",
["F?T?0?7?pornos"]="Bitte keine Porn files Sharen!",
["F?T?0?6?pornos"]="Bitte keine Porn files Sharen!",
["F?T?0?7?nazi"]="Bitte keine Rechtsradikalen Datein Sharen!",
["F?T?0?6?nazi"]="Bitte keine Rechtsradikalen Datein Sharen!",
["F?T?0?7?Hitler"]="Bitte keine Rechtsradikalen Datein Sharen!",
["F?T?0?6?Hitler"]="Bitte keine Rechtsradikalen Datein Sharen!",
--["F?F?0?1?MyList.bz2"]="Bitte keine zipped DC folder Sharen!",
--["F?F?0?1?.tmp"]="Bitte keine temporaly files Sharen!",
--["F?F?0?1?__incomplete__"]="Bitte keine incompleten files Sharen!",
--["F?F?0?1?taskman.exe"]="Bitte keine Windows Ordner Sharen!",
--["F?F?0?1?msoobe.exe"]="Bitte keine Installierte Programme Sharen!",
--["F?F?0?1?hmmapi.dll"]="Bitte keine Installierte Programme Sharen!",
--["F?F?0?1?MyList.DcLst"]="Bitte keine unzipped DC folder Sharen!",
--["F?F?0?1?msimn.exe"]="Bitte keine Installierte Programme Sharen!",
--["F?F?0?1?windowsshell.manifest"]="Bitte keine Windows Ordner Sharen!",
--["F?F?0?1?explorer.scf"]="Bitte keine Windows Ordner Sharen!",
} --???????????????????????????????????????????????????????????????????????????????
--? ???????????? Ausnahme w?rter ???????????? ?
nosuch={--???????????????????????????????????????????????????????????????????????????????
["cream~1.mpg"]="nix", --???????????????????????????????????????
["supreme"]="nix", --? ???? nix = w?rd komplet misachtet ?
["xxxtriplex"]="nix", --???????????????????????????????????????
[".jpg"]="nix", --???????????????????????????????????????
[".jpeg"]="nix", --? ???? warn = user w?rd gewarnt ?
[".mp3"]="nix", --???????????????????????????????????????
["French Affair-sexy"]="nix", --???????????????????????????????????????
[".bmp"]="nix", --???????????????????????????????????????
} --???????????????????????????????????????????????????????????????????????????????
--? ???????????? ende ???????????? ?
--???????????????????????????????????????????????????????????????????????????????
-----------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------
--------------------------------------------CODE-----------------------------------------
-----------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------
Kicked = {}
function Main()
frmHub:RegBot(BotName)
frmHub:EnableSearchData(1)
end
function OpConnected(user)
if( Kicked[user.sName] == 1 ) then
Kicked[user.sName] = nil
end
for i,v in suche do
local lngBotNr = random(1, 100000)
user:SendData("$Search Hub:"..BotName..lngBotNr.." "..i)
end
end
function NewUserConnected(user)
if( Kicked[user.sName] == 1 ) then
Kicked[user.sName] = nil
end
for i,v in suche do
local lngBotNr = random(1, 100000)
user:SendData("$Search Hub:"..BotName..lngBotNr.." "..i)
end
end
function filter(data)
local iFind = ""
for i,v in suche do
_,_,iFind = strfind(i, "%a%?%a%?%d%?%d%?(.+)")
if( strfind(strlower(data), strlower(iFind)) ) then
s,e,nick,data = strfind(data, "$SR%s+(%S+)%s+(.+)(.+)(.+)(.+)")
return v.." Filter: "..data
end
end
return "Other files"
end
function nosearch(data)
for i,v in nosuch do
if( strfind(strlower(data), strlower(i)) ) then
s,e,nick,data = strfind(data, "$SR%s+(%S+)%s+(.+)(.+)(.+)(.+)")
return v
end
end
return "kick"
end
function DataArrival(user, data)
if( strsub(data, 1, 3) == "$SR" ) then
_,_,nick = strfind( data, "\05(%S*)|$" )
if (strsub(nick, 1, strlen(BotName)) == BotName and Kicked[user.sName] == nil ) then
nixsuch = nil
nixsuch = nosearch(data)
if (nixsuch == "nix") then
elseif (nixsuch == "warn") then
ergebnis = filter(data)
SendPmToOps(BotName,"*** User "..user.sName..infowarn..ergebnis)
user:SendPM(BotName, warntxt..ergebnis)
else
Kicked[user.sName] = 1
ergebnis = filter(data)
SendPmToOps(BotName,"*** User "..user.sName..infotxt..ergebnis)
user:SendPM(BotName, kicktxt..ergebnis)
user:Disconnect()
end
end
end
end
-----------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------
--? by Mr.Garth Brooks--www.dc-stammtisch.de---------------------------------------------
------------------------------------------------------------------------------?----------
-----------------------------------------------------------------------------------------
maybe give this a try...
function DataArrival(user, data)
if( strsub(data, 1, 3) == "$SR" ) then
_,_,nick = strfind( data, "\05(%S*)|$" )
if (strsub(nick, 1, strlen(BotName)) == BotName and Kicked[user.sName] == nil ) then
nixsuch = nil
nixsuch = nosearch(data)
if (nixsuch == "nix") then
elseif (nixsuch == "warn") then
ergebnis = filter(data)
SendPmToOps(BotName,"*** User "..user.sName..infowarn..ergebnis)
user:SendPM(BotName, warntxt..ergebnis)
else
Kicked[user.sName] = 1
ergebnis = filter(data)
SendPmToOps(BotName,"*** User "..user.sName..infotxt..ergebnis)
user:SendPM(BotName, kicktxt..ergebnis)
user:SendData("$ForceMove "..frmHub:GetRedirectAddress().."|") --//redirect.
user:Disconnect()
end
end
end
end
hope this helps...
-BH