PtokaX forum

Another update(version 4.2)

I have added on/off setting, so that you don't need to delete the lines in the table(Thanx for the idea Optimus).

I have also added another field in each string, so that you can add a info that shouldn't be found example = for BCDC++, I have in the fourth field added <%.%P> and. This function works well I think and I hope by doing this, there won't be any confusion in the checking.

 For the moment I have in the other strings just added "cccc" in the fourth field. Anyone can give a sugestion of a better info or that you know a client that you think should have a certian info in the fourth field just like BCDC++-- ??????????????????????????????????????????????????????????????????
-- ? Deny Client's Checker 4.2.1                                    ?
-- ? Made by: blackwings                                            ?
-- ?----------------------------------------------------------------?
-- ? This Script blocks: DCGUI,zDC++,StrongDC++,Phantom DC++,iDC++, ?
-- ? MS++V,DC++K CDM,rmDC++,DC@fe++,DC++ DCDM,BCDC++,nDC++,CZDC++,  ?
-- ? ReverseConnect,oDC,NMDC,DC:PRO,RDC++,[X]DC,YETI++,DHDc++,      ?
-- ? MORIA++,LDC++,TiDc++,R2++,Chp++,SdDC++,FInDC                   ?
-- ?            --------------------------------------              ?
-- ? The Script doesn't check Ops and VIP's                         ?
-- ?            --------------------------------------              ?
-- ? I made this script to use it with RoboCop 9.0b                 ?
-- ? (remeber to name the script so it comes after RC when ptokax   ?
-- ? loads it)                                                      ?
-- ?            --------------------------------------              ?
-- ? Changed: Maybe Optimized the script :S                         ?
-- ? Changed: I rewrote most of the script, much better now         ?
-- ? Added: A table for clients that I don't know the version       ?
-- ?        description off                                         ?
-- ? Added: A few more clients to the table                         ?
-- ? Removed: The check on the clients zY++ and xR++ (after Typhoon ?
-- ?          pointed it out), which make the script shorter        ?
-- ?      and faster                                            ?
-- ? Added: DCGUI and zDC++ to the deny table                       ?
-- ? Fixed: A small bug in the client table                         ?
-- ? Added: Allot of new clients (Thanx Optimus)                    ?
-- ? Improved: some of search info, so that some clients won't get  ?
-- ?           confused with other clients. (Thanx Optimus)         ?
-- ? Added: A on/off setting for each client (Thanx Optimus)        ?
-- ? Improved: I made the table and the way it search better,       ?
-- ?           so now there is no confusion in the checking         ?
-- ??????????????????????????????????????????????????????????????????

Bot="Client-Checker"

-- To make the bot not block a certain client, you should
-- then change the number at the end from 1 to 0
C = {
{"{"{"{"{"<%.%P>","V:(0.%d+)","Phantom DC++","cccc", 1},
{"[BL]:","V:(0.%d+)","BCDC++","<%.%P>", 1},
{"zDC%+%+","V:(0.%d+)","zDC++","cccc", 1},
{"{"V:0.%d+%a","V:(0.%d+)","CZDC++","cccc", 1},
{"{"{"{"{"{"DC@fe%+%+","V:(0.%d+)","DC@fe++","cccc", 1},
{"v%[","V:(0.%d+)","nDC++","cccc", 1},
{"reverseconnect.sf.net","V:(0.%d+)","ReverseConnect","cccc", 1},
{"www.RevConnect.com","V:(0.%d+)","ReverseConnect","cccc", 1},
{"{"{"<[X]DC","V:(0.%d+)","[X]DC","cccc", 1},
{"{"{"{"{"{"{"{"{"}

function Main()
-- Remove "frmHub:RegBot(Bot)" if you don't want this bot to appear in the userlist
frmHub:RegBot(Bot)
end

function BlockedUser(User,Client)
User:SendData(Bot,"The Client <"..Client.."> isn't allowed in this hub.")
User:SendData(Bot,"Use Original DC++, NMDC, oDC or DCGUI")
User:Disconnect()
end

function DataArrival(User , data)
if strsub(data, 1, 7) == "$MyINFO"  and not User.bOperator  and User.iProfile ~= 2 then
for i=1,getn(C) do
C[i][1] = gsub(C[i][1], "<" , "")
if strfind(data, C[i][1]) and strfind(data, C[i][2]) and not strfind(data, C[i][4]) then
if C[i][5] == 1 then
local Client=C[i][3]
return BlockedUser(User,Client)
end
end
end
end
end

Hi,

You could also avoid on using a global var "Client" on making the Blocked function reciving the client. For eg:

local Client=C[i][3]
return BlockedUser(User,Client)
Best regards, nErBoS

The Script is updated!-Version 4.2.1- (Check the post before this one to find the script)

I followed nErBoS advice and changed the variabel Client from Global to local.

I wonder what will be the next stepp, lol