Need A Script

[turkiye]

I need a script FakeChecker on join on the hub downloads FakeChecker your list to check your share!
Who Haves It?

[[NL]Pur]

a fakechecker try dc++k client

 server side is not good because of bandwidth

[pHaTTy]

try this ;)

badShare = { "11534336","10000000000","5368709120","10737418240","13630010000","16106127360",
"21474836480","26843545600","27000000000","32212254720","7970010000",
"37580963840","37970010000","6599201000000","65992010000000","36772010000000",
"3677201000000","42949672960","48318382080","214266156265","53687091200",
"59055800320","1747201000000","16772010000000","147720100000000","10240000000000",
"64424509440","65719010000","69793218560","75161927680","80530636800","85899345920",
"91268055040","96636764160","102005473280","102400000000","107374182400","118648471552",
"128849018880","140301549174","161061273600","174720100000","183287729356","214748364800",
"268435456000","322122547200","375809638400","397760100000","429496729600","536870912000",
"657190100000","1024000000000","183287729357","102392020337","13625783747","174719269601",
"65712999629","26993869455","140295106724","199715979264" }

function checkFake(user)
local s, e, shared = strfind(user.sMyInfoString, "$ALL %S+ .-$ $.+.$.-$(%d+)")
return foreachi(badShare, function(id, value) if value == %shared then return id end end)
end

function NewUserConnected(user)
	if checkFake(user) then user:SendData("*** You seem to be using a fakeshare client") 
	user:Disconnect() 
    end
end

function OpConnected(user)
	if checkFake(user) then user:SendData("*** You seem to be using a fakeshare client") 
	user:Disconnect() 
    end
end

l8rr,,

-phatty

[turkiye]

it works not!
Havw you got a another one?
Where Find you Scripts?

[pHaTTy]

ahh you mean for donkeys

Kos = "DonkeyKiicker"

Donkeys = { "mldc", "mldc client", "mldonkey"}

function NewUserConnected(user)
	for key,checkWord in Donkeys do
		if strfind(user.sMyInfoString, checkWord, 1, 1) then
			SendToNick(user.sName, "<" ..Kos .."> You are using unauthorized client software, please go to [URL]http://dcplusplus.sourceforge.net[/URL] and download the newest version of DC++")
			SendToNick(user.sName, "<" ..Kos .."> Disconnecting...")
			user:TimeBan(120)
			return 1

		end
	end
end

there ya go that is what you mean ;)


l8rr,,

-phatty

[turkiye]

no that's not
The Script what i look is a script on join on the hub downloads that script to check your share (on turkhub.kicks-ass.net is the script)

[pHaTTy]

ahhh you mean where it check for bad files?

[turkiye]

yes,
the script checkt your share on join at the hub

[turkiye]

have you got that script?

[pHaTTy]

try here


l8rr,,

-phatty

[turkiye]

there's no result

[pHaTTy]

ooops yep try here


l8rr,,

-phatty

[turkiye]

not that script
go to turkhub.kicks-ass.net and then you see a fakechecker script downloaded your list to check of you got a fake list!
that script need I!
not searchkicker

[Alexei]

Sorry m8.. never saw it b4... but i will keep an eye open for you....
That script is not hard to make as far as i know...
Might try to make some primitive one tomorrow...

Keep looking...

[(Mr420)]

try this
-- Simple Illegalist v0.1 
-- Created by Ptaczek, Jan-3, 2003 
-- Searches for specified patterns. Useful for illegal share checking 
-- Modificed by Leo 

BotName = "Illegalist" 

Files = { 
["rape"]="Do not share sick porn!", 
["preteen"]="No pre-teen here!", 
["nazi"]="No nazi related material here!", 
[".avi"]="No AVI files here!" 
} 

Kicked = {} 

function NewUserConnected(user) 
frmHub:EnableSearchData(1) 
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.." kicked. Reason: "..Reason) 
user:SendPM(BotName, "You were kicked. "..Reason) 
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  

[plop]

Originally posted by turkiye
not that script
go to turkhub.kicks-ass.net and then you see a fakechecker script downloaded your list to check of you got a fake list!
that script need I!
not searchkicker

sounds like pur sayd in the start, he wants dc++K.
there is no script wich can download a filelist, only clients can.
dc++k downloads the list on entry and checks for fakeshares.
you can download the latest version here .
or send a blanco email to dcplusplusK@plop.nl to recieve a older but more stable version.

plop