Hey ppl, i've got this script & I think it's supposed 2 boot out users who av any of the followin in their shares but it dun seem 2 work, any help please?
BotName = "?PHH?"
Files = {
["forcedsex"]="forcedsex = permban!",
["preteen"]="preteen is for sicko's!",
["rape"]="Do not share sick porn!",
["incest"]="NO incest movies-pictures here!",
["childsex"]="NO sick Porn in here!",
["childporn"]="NO sick Porn in here!",
["underage"]="NO sick Porn in here!",
["nazi"]="NO nazi related material here!",
["animalsex"]="NO Animalsex files here!",
["svastika"]="NO Nazi/white power music HERE!!!",
[".temp.mp3"]="NO sharing of incomplete downloads",
["_INCOMPLETE_"]="NO sharing of incomplete downloads",
["download123456789.dat"]="NO sharing of incomplete downloads",
["part.met"]="NO sharing of incomplete downloads",
[".getright"]="NO sharing of incomplete downloads",
[".vob"]="NO sharing of incomplete downloads",
["lolita"]="Lolita?? Who r u, SHI??",
["kiddy"]="KiddyPorn is for sicko's!",
["forcedtosuck"]="forced to WHAT?? YUKKK!",
["2_teen 16 year young cute lolita"] = "under 18? NOT HERE!"}
Kicked = {}
function NewUserConnected(user)
if( Kicked[user.sName] == 1 ) then
Kicked[user.sName] = nil
end
for i,v in Files do
user:SendData("$Search Hub:"..BotName.." F?F?0?1?"..i)
end
end
function DataArrival(user, data)
if( strsub(data, 1, 3) == "$SR" ) then
_,_,nick = strfind( data, "\05(%S*)|$" )
if( nick == BotName and Kicked[user.sName] == nil ) then
Kicked[user.sName] = 1
Reason = FindWhat(data)
SendToOps(BotName, "*** User "..user.sName.." banned. Reason: "..Reason)
user:SendPM(BotName, "You were banned. "..Reason)
user:Ban()
user:Disconnect()
end
end
end
function FindWhat(data)
for i,v in Files do
if( strfind(strlower(data), i) ) then
return v
end
end
return "Other files"
end
Thanx in advance,
Quik.
Remember that scripts are only capable of retrieving this kind of data from Active users.
QuikThinker
it seems to me that you are missing a part of the script
use the one below it works.
- Simple Illegalist v0.1
-- Created by Ptaczek, Jan-3, 2003
-- Searches for specified patterns. Useful for illegal share checking
-- some changes by Skippy and RabidWombat and OpiumVolage and trucker
BotName = "Illegalist"
function Main()
frmHub:EnableSearchData(1)
end
Files = {
["childsex"]="NO sick Porn inhere!",
["childporn"]="NO sick kid Porn inhere!",
["underage"]="NO sick kid Porn inhere!",
["animalsex"]="NO Animalsex files here!",
["svastika"]="NO Nazi/white power music HERE!!!",
[".temp.mp3"]="NO sharing of incomplete downloads",
["_INCOMPLETE_"]="NO sharing of incomplete downloads",
["download123456789.dat"]="NO sharing of incomplete downloads",
["part.met"]="NO sharing of incomplete downloads",
[".getright"]="NO sharing of incomplete downloads",
[".vob"]="NO sharing of incomplete downloads",
["share faker"]="NO tools for fake sharing allowed",
["share hacker"]="No tools for fake sharing allowed"}
Kicked = {}
function NewUserConnected(user)
if( Kicked[user.sName] == 1 ) then
Kicked[user.sName] = nil
end
for i,v in Files do
user:SendData("$Search Hub:"..BotName.." F?F?0?1?"..i)
end
end
function DataArrival(user, data)
if( strsub(data, 1, 3) == "$SR" ) then
_,_,nick = strfind( data, "\05(%S*)|$" )
if( nick == BotName and Kicked[user.sName] == nil ) then
Kicked[user.sName] = 1
Reason = FindWhat(data)
SendPmToNick("[NL]trucker", BotName, "*** User "..user.sName.." kicked. Reason: "..Reason)
user:SendPM((BotName),( "You were kicked. "..Reason),("You can come back when you have corrected the problem"))
user:Disconnect()
end
end
end
function FindWhat(data)
for i,v in Files do
if( strfind(strlower(data), i) ) then
return v
end
end
return "Other files"
end
in this part you can set your name so that you receive a pm wich users were disconnected and why ;))
this way your OPchat doesnt get pop ups evrytime a user is diconnected.
SendPmToNick("[NL]trucker", BotName, "*** User "..user.sName.." kicked. Reason: "..Reason)
user:SendPM((BotName),( "You were kicked. "..Reason),("You can come back when you have corrected the problem"))
Seems 2 be workin fine man but is it possible 2 give them a tempban like a usual kick coz some users get kicked & just come str8 back within minutes?
Quote- Simple Illegalist v0.1
-- Created by Ptaczek, Jan-3, 2003
-- Searches for specified patterns. Useful for illegal share checking
-- some changes by Skippy and RabidWombat and OpiumVolage and trucker
BotName = "Illegalist"
function Main()
frmHub:EnableSearchData(1)
end
Files = {
["childsex"]="NO sick Porn inhere!",
["childporn"]="NO sick kid Porn inhere!",
["underage"]="NO sick kid Porn inhere!",
["animalsex"]="NO Animalsex files here!",
["svastika"]="NO Nazi/white power music HERE!!!",
[".temp.mp3"]="NO sharing of incomplete downloads",
["_INCOMPLETE_"]="NO sharing of incomplete downloads",
["download123456789.dat"]="NO sharing of incomplete downloads",
["part.met"]="NO sharing of incomplete downloads",
[".getright"]="NO sharing of incomplete downloads",
[".vob"]="NO sharing of incomplete downloads",
["share faker"]="NO tools for fake sharing allowed",
["share hacker"]="No tools for fake sharing allowed"}
Kicked = {}
function NewUserConnected(user)
if( Kicked[user.sName] == 1 ) then
Kicked[user.sName] = nil
end
for i,v in Files do
user:SendData("$Search Hub:"..BotName.." F?F?0?1?"..i)
end
end
function DataArrival(user, data)
if( strsub(data, 1, 3) == "$SR" ) then
_,_,nick = strfind( data, "\05(%S*)|$" )
if( nick == BotName and Kicked[user.sName] == nil ) then
Kicked[user.sName] = 1
Reason = FindWhat(data)
SendPmToNick("[NL]trucker", BotName, "*** User "..user.sName.." kicked. Reason: "..Reason)
user:SendPM((BotName),( "You were kicked. "..Reason),("You can come back when you have corrected the problem"))
user:TimeBan(30)
end
end
end
function FindWhat(data)
for i,v in Files do
if( strfind(strlower(data), i) ) then
return v
end
end
return "Other files"
end
this gives 30 min tempban.. just edit the number in TimeBan() if u wanna change this... (Value is in minutes.)
or open ptotax and go to advanced options and set the timeban in minuts there that way you dont need to adjust the script.
Little problem on the above mentioned Illigalist script;
The script does not send any info to the users on what files he/she was kicked for. Only responce shown is>> *** Search spam detected from Illegalist
Welcome Tiger Your IP is: xxx.xxx.xxx.xxx and has been logged for security purposes only.
Some how this part Is not working>> user:SendPM((BotName),( "You were kicked. "..Reason),("You can come back when you have corrected the problem"))
The info to Me comes perfect >> *** User Tiger kicked. Reason: NO sharing of incomplete downloads.
I hit the wrong key to fast I wasnt done ;
I have tested it running dc++401 and I get disconnected , but testing with oDC5.31 keeps me connected to the hub with only the messege from the script>>*** Search spam detected from Illegalist .
Any feed back on why ?
tks Gate
One more thing;
to send the Pm not only to me but to all my ops is it just to add additional Nicks.
Ie..
SendPmToNick("[G-T-E]:I:N:F:O:R:C:E:R:?", "[G-T-E]Orion","[G-T-E]Patrax","[G-T-E]Q", BotName, "*** User "..user.sName.." kicked. Reason: "..Reason)
Hope I wrote it correctly
Gate
btw i dont use this script... is this a resource hog?
If I read between the line I still dont see any solution to my ? . ,, :D
If u mean cpu hog, well it depends on what ur system is.
Not the feed back I was waiting 4.
Next ...
:D Gate
[G-T-E]Gate?
user:SendPM((BotName),( "You were kicked. "..Reason),("You can come back when you have corrected the problem"))
replace it with this
user:SendPM((BotName),( "You were kicked. Reason: "..Reason),("You can come back when you have corrected the problem"))
hope it helps
One more thing;
to send the Pm not only to me but to all my ops is it just to add additional Nicks.
Ie..
SendPmToNick("[G-T-E]:I:N:F:O:R:C:E:R:?", "[G-T-E]Orion","[G-T-E]Patrax","[G-T-E]Q", BotName, "*** User "..user.sName.." kicked. Reason: "..Reason)
Hope I wrote it correctly
change this SendPmToNick to SendPmToOpchat that should do the trick also if i,m right.
Just back from work . real late too 23:46, Grrr.
But anyway , [NL]trucker thans lots M8 for the feedback , will try out ur solution m8.
Will get back to ya which ever way it goes...
Tks again ,
G8
Saw some different versions of the 'Illigalist' and change some text in it myself too. But there is a problem that we should be aware of.
Searching with an argument like 'underage', will also give result on a title like 'underaged workers'; 'rape' will also give result on everything with 'grapes'; 'lolita'... you know!
Therefor it would be nice to have a script that will look for a combination of words. I'm not a scripter, so please forgive me my way of interpretation.
Files = {
["underage" "girl" "sex"]
["underage" "girl" "porn"]
["underage" "boy" "xxx"]
}
search ("filename") NewUserConnected(user) for ("firstword")
if ("filename") contains ("firstword") then
search ("filename") for ("secondword")
else return
if found ("filename") contains ("secondword") then
search ("filename") for ("thirdword")
else return
if ("filename") contains ("thirdword") then
ban user
else return
end
I know it isn't correct, but I hope it express the idea.
Ifn't, I'll draw a flowdiagram and place it as a gif picture.
robertone
[NL]trucker I said Iwould get back ;) But
With the editing on Reason I now get this responce:
*** User Tiger kicked. Reason: Other files
*** User went offline [Illegalist (Offline)] ***
FeedBack Pleezz Tks G8
Below is the code.
-- Simple Illegalist v0.1
-- Created by Ptaczek, Jan-3, 2003
-- Searches for specified patterns. Useful for illegal share checking
-- some changes by Skippy and RabidWombat and OpiumVolage and trucker
BotName = "Illegalist"
function Main()
frmHub:EnableSearchData(1)
end
Files = {
["childsex"]="NO sick Porn inhere!",
["childporn"]="NO sick kid Porn inhere!",
["underage"]="NO sick kid Porn inhere!",
["animalsex"]="NO Animalsex files here!",
["svastika"]="NO Nazi/white power music HERE!!!",
[".temp.mp3"]="NO sharing of incomplete downloads",
["_INCOMPLETE_"]="NO sharing of incomplete downloads",
["download123456789.dat"]="NO sharing of incomplete downloads",
["part.met"]="NO sharing of incomplete downloads",
[".getright"]="NO sharing of incomplete downloads",
[".vob"]="NO sharing of incomplete downloads",
[".dmg"]="NO Mac Files here this is a Windows Location",
["mspqm.sys"]="Dont share files like this in this Location",
["ntoskrnl.exe"]="Dont share files like this in this Location",
["emalware.cab"]="Dont share files like this in this Location",
["msmsg.exe"]="Dont share files like this in this Location",
["wordpad.exe"]="Dont share files like this in this Location",
["system32"]="Dont share folder like this in this Location",
["winampa.exe"]="Dont share shit like this in this Location",
["InstalledSKUs"]="Dont share files like this in this Location",
["Q330994.cat"]="Dont share files like this in this Location",
["dailer.exe"]="Dont share files like this in this Location",
["share faker"]="NO tools for fake sharing allowed",
["share hacker"]="No tools for fake sharing allowed"}
Kicked = {}
function NewUserConnected(user)
if( Kicked[user.sName] == 1 ) then
Kicked[user.sName] = nil
end
for i,v in Files do
user:SendData("$Search Hub:"..BotName.." F?F?0?1?"..i)
end
end
function DataArrival(user, data)
if( strsub(data, 1, 3) == "$SR" ) then
_,_,nick = strfind( data, "\05(%S*)|$" )
if( nick == BotName and Kicked[user.sName] == nil ) then
Kicked[user.sName] = 1
Reason = FindWhat(data)
SendPmToNick("[G-T-E]:I:N:F:O:R:C:E:R:?", BotName, "*** User "..user.sName.." kicked. Reason: "..Reason)
user:SendPM((BotName),( "You were kicked. Reason: "..Reason),("You can come back when you have corrected the problem"))
user:Disconnect()
end
end
end
function FindWhat(data)
for i,v in Files do
if( strfind(strlower(data), i) ) then
return v
end
end
return "Other files"
end
gate
i,m sorry m8 i cant help you any further
have you tried putting a file with rape or something like that and looked at the kick message than?
i have no idear what "other files"means.
*** User went offline [Illegalist (Offline)] ***
who went offline? the user or the bot?
HI Trucker sorry for the headach..
I shared a folder called Test and in that a file called underage.avi.
When I connect I (as Users Tiger) I get disconnected with just this in man chat showing no reason for kick from Illegalist
Quote*** Search spam detected from Illegalist
Welcome Tiger Your IP is: xxx.xxx.xx.xxx and has been logged for security purposes only. Enhanced Right Click Support for [RoboCop] is available!
// Type !help in main for your available commands!
Welcome Tiger to [BBB]SwedishFastSpeed[10Mb] Have a Good Time. Read -infobot & -forbiddenfiles !!!
*** Disconnected
In my other dc client logged in as master I get the followng messege from the script
Quote *** User Tiger kicked. Reason: Other files
*** User went offline [Illegalist (Offline)] ***
The script at this part of the code is sending the "Other Files"
function FindWhat(data)
for i,v in Files do
if( strfind(strlower(data), i) ) then
return v
end
end
return "Other files"
end
This code isnt sending a reason to user who gets kicked.
user:SendPM((BotName),( "You were kicked. Reason: "..Reason),("You can come back when you have corrected the problem"))
GATE
i,m sorry m8 my knoledge of scripting isnt that good yet
perhaps one of the other members of this board can help you any further.
but i know you are right there is something wrong in this script;but on the other hand it is kicking with a good reason tat is something you know now :-)
thanks Trucker.
Will see if anyone else can give it a go.
Tks again ,
Have a Grand week end
[G-T-E]Gate? aka [G-T-E]:I:N:F:O:R:C:E:R:?
here's a brief explenation of that search function.
function FindWhat(data)
for i,v in Files do
if( strfind(strlower(data), i) ) then
return v -- here it breaks the loop and returns the found item
end
end
return "Other files" -- if nothing is found it returns "other files"
end
now i can remember a modded version of this script which doesn't trigger a search on users who connect but which uses a timer.
on the timer it sends out a search 2 all connected users.
this has a much better result as it doesn't cause a search spam on the 2 be searched users.
but beside that these kind of scripts are causing more faulty kicks then good 1's.
i lost count on the amout of times i have been kicked for "nirvana - rape me.mp3".
my advice is 2 use dc++k CDM and manualy check if it really is a bad file.
plop
yep you,re right plop
i would check with dc++k cmd to as it can search for far more things through ADL search and it even kicks automaticlly whit out causing any prob,s to the hub.
anf thnx gate have a nice weekend yourself to.
First to start off with I want to thank [NL]Trucker and plop for the input u both gave and the suggestion on dc++k cmd.
Long before this thread began I have visited Imperialnet.org forum (http://www.imperialnet.org/forum/) and dc++k cmd Guide (http://www.ukdnb.dsl.pipex.com/dcppkcdm-guide/index.html) where Iam registered and attempted to use eariler and
the latest version of dc++k cmd v3.0.
Understanding the application of dc++k cmd is clear but the problem arises on where to place the raw commands and how it is written.
I have read thru the Guide and copied severial raw cmds and placed them in Favorites/Properities then used a cmd like /checkshare and it runs,
even added forbidden files in ADL Search with raw cmds.
finds and kicks but God does it kick ppl, somethings gone real crazy. So I gave up on that.
I know that many hub owners are using the program with great results, wish it was possible
to get a copy of the raw cmds and all that is needed to do a correct set up of dc++k cmd.
Would be nice if the old saying "share and share alike" was true. We are all working for haveing a clean hub operation.
More I can not say, so that is why I turned to the "Banned Files Scanner" and unfortunately Iam still back to square 1.
Maybe I'll be lucky and find a complete list of Raw and where to place them.
AgainTks for what help u all have given.
Regards from a sad hubowner.
G8
gate
the files you want user to be banned for has to go in adlsearch and CMD will automatticlly kick those users whitout you even noticing it.
so this is what you could call a real spy like and undercover operation ...lol
i use these raws for my cmd.
this one is for files and filelist enz.
$To: %[nick] From: %[mynick] $<%[mynick]> You are being Warned because: %[cheatingdescription]|$To: OpChat From: %[mynick] $<%[mynick]> User: %[nick] %[cheatingdescription]|<%[mynick]> is warning %[nick] because: %[cheatingdescription]|<%[mynick]> !warn %[nick] %[cheatingdescription]|
this one is for the client part.
$To: %[nick] From: %[mynick] $<%[mynick]> You are being Warned because: %[clienttype-] - %[cheatingdescription]|$To: OpChat From: %[mynick] $<%[mynick]> User: %[nick] - %[clienttype] - %[cheatingdescription]|<%[mynick]> is Warning %[nick] because: %[clienttype] - %[cheatingdescription]|<%[mynick]> !Warn %[nick] %[clienttype]|
if CMD find a bad user it will telll the user and if you ticked the right box in settings[ kick after sending raw command] it will also kick the user
and it will tell in OPchat who has been kicked and why.
Trucker again tks.
Regarding ur codes I have placed them in what I think is the right place ,
Ur code for ADL Search can u see thru my link how I have done. ADL Search Properites1 (http://www.gate-to-eternity.dynu.com/ADLSearch/ADLSearch%20Properites1.bmp) and ADL SearchProperites2 (http://www.gate-to-eternity.dynu.com/ADLSearch/ADLSearch%20Properites2.bmp) .
Then regarding the client code look here Favorite Hub Properites (http://www.gate-to-eternity.dynu.com/FavHubProperites/FavHubProperites.bmp) .
The Favorite hub properites Iam little confused about if I have the correct raws and if I have ticked the correct boxes.
If anything more is need to show what Ive done just tell me.
If any of the links dont get u in u can go thru the main page which has them just for this purpose.
The site Ive put up for really another purpose.... Search'n' Rescue (http://www.gate-to-eternity.dynu.com/index.asp)
I received a PM from Snooze and he will be mailing me aswell.
Tks Gate
Have just added 2 more links showing the Fav.xml (http://www.gate-to-eternity.dynu.com/FavHubProperites/Favorites.xml) and adl.xml (http://www.gate-to-eternity.dynu.com/ADLSearch/ADLSearch.xml) to get feedback of its all right.
G8
gate
3 remarks
1 there is no need to put a rawcommand in adl-search.
2 you allready named your opchat in the box where it said opchatname so no need to do that in rawcommand again just use opchat instead. i mean [?OpChat?] this is what you use. it should be just plain [opchat]
3
Code Select Expand
]|<%[mynick]> is Warning %[nick] because: %[clienttype] - %[cheatingdescription]|<%[mynick]> !Warn %[nick] %[clienttype]|"
see what i mean?
just use the raw as i provided them they will work.
and you ticked the right boxes.
but i would be carefull about the junkfiles i dont know what dc++kcmd think is junkfile but on occasions i checked the list of users and the had a perfect share and still cmd says junkfiles so i thin it is better to leave that one out.
can someone change this script so a user can be kicked first and then if he comes back, then be banned ?? ---- Or you just put a number of kicks in the parenthesis --> "Kicked = {}" ?????
- Simple Illegalist v0.1
-- Created by Ptaczek, Jan-3, 2003
-- Searches for specified patterns. Useful for illegal share checking
-- some changes by Skippy and RabidWombat and OpiumVolage and trucker
BotName = "Illegalist"
function Main()
frmHub:EnableSearchData(1)
end
Files = {
["childsex"]="NO sick Porn inhere!",
["childporn"]="NO sick kid Porn inhere!",
["underage"]="NO sick kid Porn inhere!",
["animalsex"]="NO Animalsex files here!",
["svastika"]="NO Nazi/white power music HERE!!!",
[".temp.mp3"]="NO sharing of incomplete downloads",
["_INCOMPLETE_"]="NO sharing of incomplete downloads",
["download123456789.dat"]="NO sharing of incomplete downloads",
["part.met"]="NO sharing of incomplete downloads",
[".getright"]="NO sharing of incomplete downloads",
[".vob"]="NO sharing of incomplete downloads",
["share faker"]="NO tools for fake sharing allowed",
["share hacker"]="No tools for fake sharing allowed"}
Kicked = {}
function NewUserConnected(user)
if( Kicked[user.sName] == 1 ) then
Kicked[user.sName] = nil
end
for i,v in Files do
user:SendData("$Search Hub:"..BotName.." F?F?0?1?"..i)
end
end
function DataArrival(user, data)
if( strsub(data, 1, 3) == "$SR" ) then
_,_,nick = strfind( data, "\05(%S*)|$" )
if( nick == BotName and Kicked[user.sName] == nil ) then
Kicked[user.sName] = 1
Reason = FindWhat(data)
SendPmToNick("[NL]trucker", BotName, "*** User "..user.sName.." kicked. Reason: "..Reason)
user:SendPM((BotName),( "You were kicked. "..Reason),("You can come back when you have corrected the problem"))
user:Disconnect()
end
end
end
function FindWhat(data)
for i,v in Files do
if( strfind(strlower(data), i) ) then
return v
end
end
return "Other files"
end
Thanks :)
I tried this script, and when someone has a file from the list above it says search spam from Illegalist, and doesn't do anything, does not kick the user. How can I change this so it would say the user's name and kick him?? thanks.