This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

help in anti proxy

Help for those learning Tcl or writing their own scripts.
Post Reply
User avatar
Arnold_X-P
Master
Posts: 226
Joined: Mon Oct 30, 2006 12:19 am
Location: DALnet - Trinidad - Beni - Bolivia
Contact:

help in anti proxy

Post by Arnold_X-P »

please someone to help me move this remote to tcl
It is an excellent anti proxy

Code: Select all

on !@*:JOIN:#:{
  ;checks for anything ending in 4 numbers, typically a proxy using clonesx
  ;you don't need to check the start, a nick is invalid with a numer at the start
  if ($regex($nick,\d{4}$)) {
    mode $chan +b $nick
  }
}
thanks
.:an ideal world:. www.geocities.ws/chateo/yo.htm
my programming place /server ix.scay.net:7005
s
simo
Revered One
Posts: 1107
Joined: Sun Mar 22, 2015 2:41 pm

Post by simo »

depending on ircd version / type u could use filter to detect exessive use of digits in nick and anti random module wich is available for unrealircd and inspircd
s
simo
Revered One
Posts: 1107
Joined: Sun Mar 22, 2015 2:41 pm

Post by simo »

u could try this

Code: Select all

bind join - * join:clonex

proc join:clonex {nick uhost hand chan} {
if {[botisop $chan] && [string length [regsub -all {[^0-9]} $nick ""]] > 3} { 
pushmode $chan +b  [maskhost *!*$uhost 2] 
} 
}
Post Reply